int main(int argc, char** argv)
{
if(argc != 1)
{
LOGE("usage: %s", argv[0]);
return EXIT_FAILURE;
}
// create temporary working image
texgz_tex_t* dst = texgz_tex_new(SUBTILE_SIZE, SUBTILE_SIZE,
SUBTILE_SIZE, SUBTILE_SIZE,
TEXGZ_UNSIGNED_BYTE,
TEXGZ_RGB, NULL);
if(dst == NULL)
{
return EXIT_FAILURE;
}
int month;
char fname[256];
const char* base = "png/world.topo.bathy.2004";
const char* size = "3x21600x21600";
for(month = 1; month <= 12; ++month)
{
snprintf(fname, 256, "%s%02i.%s.A1.png", base, month, size);
sample_sector(dst, month, 0, 0, 90.0, -180.0, 0.0, -90.0, fname);
snprintf(fname, 256, "%s%02i.%s.B1.png", base, month, size);
sample_sector(dst, month, 0, 1, 90.0, -90.0, 0.0, 0.0, fname);
snprintf(fname, 256, "%s%02i.%s.C1.png", base, month, size);
sample_sector(dst, month, 0, 2, 90.0, 0.0, 0.0, 90.0, fname);
snprintf(fname, 256, "%s%02i.%s.D1.png", base, month, size);
sample_sector(dst, month, 0, 3, 90.0, 90.0, 0.0, 180.0, fname);
snprintf(fname, 256, "%s%02i.%s.A2.png", base, month, size);
sample_sector(dst, month, 1, 0, 0.0, -180.0, -90.0, -90.0, fname);
snprintf(fname, 256, "%s%02i.%s.B2.png", base, month, size);
sample_sector(dst, month, 1, 1, 0.0, -90.0, -90.0, 0.0, fname);
snprintf(fname, 256, "%s%02i.%s.C2.png", base, month, size);
sample_sector(dst, month, 1, 2, 0.0, 0.0, -90.0, 90.0, fname);
snprintf(fname, 256, "%s%02i.%s.D2.png", base, month, size);
sample_sector(dst, month, 1, 3, 0.0, 90.0, -90.0, 180.0, fname);
}
texgz_tex_delete(&dst);
return EXIT_SUCCESS;
}
static void sample_subtile(texgz_tex_t* src,
pak_file_t* pak,
int x, int y,
int i, int j,
double latT, double lonL,
double latB, double lonR)
{
assert(src);
assert(pak);
LOGD("debug x=%i, y=%i, i=%i, j=%i, latT=%lf, lonL=%lf, latB=%lf, lonR=%lf",
x, y, i, j, latT, lonL, latB, lonR);
// create dst
texgz_tex_t* dst = texgz_tex_new(SUBTILE_SIZE, SUBTILE_SIZE,
SUBTILE_SIZE, SUBTILE_SIZE,
TEXGZ_UNSIGNED_BYTE,
TEXGZ_RGB, NULL);
if(dst == NULL)
{
return;
}
int m;
int n;
for(m = 0; m < SUBTILE_SIZE; ++m)
{
for(n = 0; n < SUBTILE_SIZE; ++n)
{
sample_data(src, dst, x, y, i, j, m, n, latT, lonL, latB, lonR);
}
}
// convert dst to 565
texgz_tex_convert(dst, TEXGZ_UNSIGNED_SHORT_5_6_5, TEXGZ_RGB);
char key[256];
snprintf(key, 256, "%i_%i", j, i);
pak_file_writek(pak, key);
texgz_tex_exportf(dst, pak->f);
texgz_tex_delete(&dst);
}
static int sample_subtile(nedgz_tile_t* tile, int i, int j,
pak_file_t* pak)
{
assert(tile);
LOGD("debug i=%i, j=%i", i, j);
texgz_tex_t* tex = texgz_tex_new(SUBTILE_SIZE,
SUBTILE_SIZE,
SUBTILE_SIZE,
SUBTILE_SIZE,
TEXGZ_SHORT,
TEXGZ_LUMINANCE,
NULL);
if(tex == NULL)
{
return 0;
}
int m;
int n;
for(m = 0; m < SUBTILE_SIZE; ++m)
{
for(n = 0; n < SUBTILE_SIZE; ++n)
{
double lat;
double lon;
tile_coord(tile, i, j, m, n, &lat, &lon);
// flt_cc most likely place to find sample
// At edges of range a subtile may not be
// fully covered by flt_xx
short height;
if((flt_cc && flt_tile_sample(flt_cc, lat, lon, &height)) ||
(flt_tc && flt_tile_sample(flt_tc, lat, lon, &height)) ||
(flt_bc && flt_tile_sample(flt_bc, lat, lon, &height)) ||
(flt_cl && flt_tile_sample(flt_cl, lat, lon, &height)) ||
(flt_cr && flt_tile_sample(flt_cr, lat, lon, &height)) ||
(flt_tl && flt_tile_sample(flt_tl, lat, lon, &height)) ||
(flt_bl && flt_tile_sample(flt_bl, lat, lon, &height)) ||
(flt_tr && flt_tile_sample(flt_tr, lat, lon, &height)) ||
(flt_br && flt_tile_sample(flt_br, lat, lon, &height)))
{
short* pixels = (short*) tex->pixels;
pixels[m*SUBTILE_SIZE + n] = height;
}
else
{
short* pixels = (short*) tex->pixels;
pixels[m*SUBTILE_SIZE + n] = NEDGZ_NODATA;
}
}
}
// j=dx, i=dy
char fname[256];
snprintf(fname, 256, "%i_%i", j, i);
pak_file_writek(pak, fname);
texgz_tex_exportf(tex, pak->f);
texgz_tex_delete(&tex);
return 1;
}
lzs_renderer_t* lzs_renderer_new(const char* font)
{
assert(s);
LOGD("debug");
lzs_renderer_t* self = (lzs_renderer_t*) malloc(sizeof(lzs_renderer_t));
if(self == NULL)
{
LOGE("malloc failed");
return NULL;
}
self->sphero_x = 400.0f;
self->sphero_y = 240.0f;
self->sphero_X = 0.0f;
self->sphero_Y = 0.0f;
self->sphero_speed = 0.0f;
self->sphero_heading = 0.0f;
self->sphero_heading_offset = 0.0f;
self->sphero_goal = 0.0f;
self->phone_heading = 0.0f;
self->phone_slope = 0.0f;
self->phone_height = 5.0f;
self->t0 = a3d_utime();
self->frames = 0;
// allocate the buffer(s)
GLint bsize = 2 * ((int) RADIUS_BALL);
GLint format = TEXGZ_BGRA;
GLint type = TEXGZ_UNSIGNED_BYTE;
self->buffer_color = texgz_tex_new(bsize, bsize, bsize, bsize, type, format, NULL);
if(self->buffer_color == NULL)
{
goto fail_color;
}
format = TEXGZ_LUMINANCE;
type = TEXGZ_FLOAT;
self->buffer_gray = texgz_tex_new(bsize, bsize, bsize, bsize, type, format, NULL);
if(self->buffer_gray == NULL)
{
goto fail_gray;
}
self->buffer_sx = texgz_tex_new(bsize, bsize, bsize, bsize, type, format, NULL);
if(self->buffer_sx == NULL)
{
goto fail_sx;
}
self->buffer_sy = texgz_tex_new(bsize, bsize, bsize, bsize, type, format, NULL);
if(self->buffer_sy == NULL)
{
goto fail_sy;
}
// create the font
self->font = a3d_texfont_new(font);
if(self->font == NULL)
{
goto fail_font;
}
// create the string(s)
self->string_sphero = a3d_texstring_new(self->font, 64, 24, A3D_TEXSTRING_TOP_CENTER, 1.0f, 1.0f, 0.235f, 1.0f);
if(self->string_sphero == NULL)
{
goto fail_string_sphero;
}
self->string_phone = a3d_texstring_new(self->font, 64, 24, A3D_TEXSTRING_TOP_CENTER, 1.0f, 1.0f, 0.235f, 1.0f);
if(self->string_phone == NULL)
{
goto fail_string_phone;
}
self->string_fps = a3d_texstring_new(self->font, 16, 24, A3D_TEXSTRING_BOTTOM_RIGHT, 1.0f, 1.0f, 0.235f, 1.0f);
if(self->string_fps == NULL)
{
goto fail_string_fps;
}
glGenTextures(1, &self->texid);
glEnableClientState(GL_VERTEX_ARRAY);
glPixelStorei(GL_UNPACK_ALIGNMENT, 1);
glDisable(GL_DEPTH_TEST);
// success
return self;
// failure
fail_string_fps:
a3d_texstring_delete(&self->string_phone);
fail_string_phone:
a3d_texstring_delete(&self->string_sphero);
fail_string_sphero:
a3d_texfont_delete(&self->font);
fail_font:
texgz_tex_delete(&self->buffer_sy);
fail_sy:
texgz_tex_delete(&self->buffer_sx);
fail_sx:
texgz_tex_delete(&self->buffer_gray);
fail_gray:
texgz_tex_delete(&self->buffer_color);
fail_color:
free(self);
return NULL;
}
static texgz_tex_t* naip_sampleNode(int zoom, int x, int y)
{
// restart the saved node if it exists
char sname[256];
if((zoom == 12) || (zoom == 3))
{
snprintf(sname, 256, "naipsave/%i/%i/%i.texz", zoom, x, y);
sname[255] = '\0';
if(access(sname, F_OK) == 0)
{
// assume this LOD already completed
texgz_tex_t* down = texgz_tex_importz(sname);
if(down)
{
LOGI("restart %s", sname);
return down;
}
}
}
// terrain tiles only exist up to zoom 15
// and zoom > 15 is covered by zoom 15
short min;
short max;
int flags = TERRAIN_NEXT_ALL;
if(zoom < 15)
{
if(terrain_tile_header(".", x, y, zoom,
&min, &max, &flags) == 0)
{
return NULL;
}
}
// create a working texture
texgz_tex_t* tex = texgz_tex_new(256, 256, 256, 256,
TEXGZ_UNSIGNED_BYTE,
TEXGZ_RGBA, NULL);
if(tex == NULL)
{
return NULL;
}
// prefetch images used by z17 (naip_sampleEnd)
// cache should easily hold all images needed for z12-z17
// z12=256, z13=512, z14=1024
// z15=2048, z16=4096, z17=8192
if(zoom == 12)
{
naip_cache_prefetch(zoom, x, y);
}
// sample the next/end LOD
// naip data roughly corresponds to zoom 17
if(zoom == 17)
{
if(naip_cache_isCached(zoom, x, y))
{
naip_sampleEnd(tex, zoom, x, y);
}
}
else
{
texgz_tex_t* tmp;
if(flags & TERRAIN_NEXT_TL)
{
tmp = naip_sampleNode(zoom + 1, 2*x, 2*y);
if(tmp)
{
texgz_tex_blit(tmp, tex, 128, 128,
0, 0, 0, 0);
texgz_tex_delete(&tmp);
}
}
if(flags & TERRAIN_NEXT_BL)
{
tmp = naip_sampleNode(zoom + 1, 2*x, 2*y + 1);
if(tmp)
{
texgz_tex_blit(tmp, tex, 128, 128,
0, 0, 0, 128);
texgz_tex_delete(&tmp);
}
}
if(flags & TERRAIN_NEXT_TR)
{
tmp = naip_sampleNode(zoom + 1, 2*x + 1, 2*y);
if(tmp)
{
texgz_tex_blit(tmp, tex, 128, 128,
0, 0, 128, 0);
texgz_tex_delete(&tmp);
}
}
if(flags & TERRAIN_NEXT_BR)
{
tmp = naip_sampleNode(zoom + 1, 2*x + 1, 2*y + 1);
if(tmp)
{
texgz_tex_blit(tmp, tex, 128, 128,
0, 0, 128, 128);
texgz_tex_delete(&tmp);
}
}
}
// export the JPEG texture
char fname[256];
snprintf(fname, 256, "naipjpg/%i/%i/%i.jpg", zoom, x, y);
fname[255] = '\0';
{
char pname[256];
snprintf(pname, 256, "naipjpg/%i/%i/%i.jpg.part", zoom, x, y);
pname[255] = '\0';
if(naip_mkdir(fname) == 0)
{
goto fail_export;
}
if(texgz_jpeg_export(tex, pname) == 0)
{
goto fail_export;
}
if(rename(pname, fname) != 0)
{
LOGE("rename failed %s", fname);
unlink(pname);
goto fail_export;
}
LOGI("export %s", fname);
}
// compute the downscaled texture for the next LOD
texgz_tex_t* down = texgz_tex_downscale(tex);
if(down == NULL)
{
goto fail_down;
}
// save the output for restart
if((zoom == 12) || (zoom == 3))
{
char pname[256];
snprintf(pname, 256, "naipsave/%i/%i/%i.texz.part", zoom, x, y);
pname[255] = '\0';
if(naip_mkdir(sname) == 0)
{
goto fail_save;
}
if(texgz_tex_exportz(down, pname) == 0)
{
goto fail_save;
}
if(rename(pname, sname) != 0)
{
LOGE("rename failed %s", sname);
unlink(pname);
goto fail_save;
}
LOGI("export %s", sname);
}
texgz_tex_delete(&tex);
// success
return down;
// failure
fail_save:
texgz_tex_delete(&down);
fail_down:
unlink(fname);
fail_export:
texgz_tex_delete(&tex);
return NULL;
}
