static char sqla_program_id[292] = { 172,0,65,69,65,77,65,73,77,65,105,103,79,83,71,90,48,49,49,49, 49,32,50,32,32,32,32,32,32,32,32,32,8,0,68,79,78,32,32,32, 32,32,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,8,0,69,88,80,48,48,52,66,65,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0 }; #include "sqladef.h" static struct sqla_runtime_info sqla_rtinfo = {{'S','Q','L','A','R','T','I','N'}, sizeof(wchar_t), 0, {' ',' ',' ',' '}}; static const short sqlIsLiteral = SQL_IS_LITERAL; static const short sqlIsInputHvar = SQL_IS_INPUT_HVAR; #line 1 "exp004base.sqc" /* I seem to need this for glGenBuffers as per http://www.gamedev.net/community/forums/topic.asp?topic_id=422358 */ #define GL_GLEXT_PROTOTYPES #include "exp004base.h" #include "../view/exp004state0.h" #include "../util/check_error.h" #include #include #include #include "sqlca.h" extern struct sqlca sqlca; /* * A simple alias to make the code more readable. */ #define S exp004state0 void exp004base (void) { /* * This implementation can be improved by mapping the video memory * directly rather than loading into system memory and then copying * into video memory. */ /* * db2dclgn -d exp004 -t coordinates */ /* EXEC SQL BEGIN DECLARE SECTION; */ #line 31 "exp004base.sqc" /* EXEC SQL INCLUDE 'model/coordinates.h'; */ #line 1 "/home/don/projects/Research/Experiments/exp005/src/model/coordinates.h" struct { sqlint32 coord_id; struct { short length; char data[50]; } gi; double x; double y; } coordinates; #line 32 "exp004base.sqc" /* EXEC SQL END DECLARE SECTION; */ #line 33 "exp004base.sqc" /* EXEC SQL DECLARE c2 CURSOR FOR SELECT * FROM coordinates; */ #line 36 "exp004base.sqc" /* EXEC SQL OPEN c2; */ { #line 38 "exp004base.sqc" sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); #line 38 "exp004base.sqc" sqlacall((unsigned short)26,1,0,0,0L); #line 38 "exp004base.sqc" sqlastop(0L); } #line 38 "exp004base.sqc" /* * Initialize the bounding box of the points. */ S.bb.min_x = 0.0; S.bb.max_x = 0.0; S.bb.min_y = 0.0; S.bb.max_y = 0.0; /* EXEC SQL FETCH c2 INTO :coordinates; */ { #line 48 "exp004base.sqc" sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); #line 48 "exp004base.sqc" sqlaaloc(3,4,1,0L); { struct sqla_setdata_list sql_setdlist[4]; #line 48 "exp004base.sqc" sql_setdlist[0].sqltype = 496; sql_setdlist[0].sqllen = 4; #line 48 "exp004base.sqc" sql_setdlist[0].sqldata = (void*)&coordinates.coord_id; #line 48 "exp004base.sqc" sql_setdlist[0].sqlind = 0L; #line 48 "exp004base.sqc" sql_setdlist[1].sqltype = 448; sql_setdlist[1].sqllen = 50; #line 48 "exp004base.sqc" sql_setdlist[1].sqldata = (void*)&coordinates.gi; #line 48 "exp004base.sqc" sql_setdlist[1].sqlind = 0L; #line 48 "exp004base.sqc" sql_setdlist[2].sqltype = 480; sql_setdlist[2].sqllen = 8; #line 48 "exp004base.sqc" sql_setdlist[2].sqldata = (void*)&coordinates.x; #line 48 "exp004base.sqc" sql_setdlist[2].sqlind = 0L; #line 48 "exp004base.sqc" sql_setdlist[3].sqltype = 480; sql_setdlist[3].sqllen = 8; #line 48 "exp004base.sqc" sql_setdlist[3].sqldata = (void*)&coordinates.y; #line 48 "exp004base.sqc" sql_setdlist[3].sqlind = 0L; #line 48 "exp004base.sqc" sqlasetdata(3,0,4,sql_setdlist,0L,0L); } #line 48 "exp004base.sqc" sqlacall((unsigned short)25,1,0,3,0L); #line 48 "exp004base.sqc" sqlastop(0L); } #line 48 "exp004base.sqc" while (sqlca.sqlcode != 100) { int i = coordinates.coord_id - 1; strncpy(S.gi_data[i], coordinates.gi.data, sizeof (S.gi_data[i])); S.base_vertices_data[i][0] = coordinates.x; S.base_vertices_data[i][1] = coordinates.y; if (S.base_vertices_data[i][0] < S.bb.min_x) S.bb.min_x = S.base_vertices_data[i][0]; if (S.base_vertices_data[i][0] > S.bb.max_x) S.bb.max_x = S.base_vertices_data[i][0]; if (S.base_vertices_data[i][1] < S.bb.min_y) S.bb.min_y = S.base_vertices_data[i][1]; if (S.base_vertices_data[i][1] > S.bb.max_y) S.bb.max_y = S.base_vertices_data[i][1]; /* * Deselected by default. */ S.selection.set[i] = false; S.base_colors_data[i][0] = DEFAULT_COLOR_R; S.base_colors_data[i][1] = DEFAULT_COLOR_G; S.base_colors_data[i][2] = DEFAULT_COLOR_B; S.base_colors_data[i][3] = DEFAULT_COLOR_A; /* EXEC SQL FETCH c2 INTO :coordinates; */ { #line 79 "exp004base.sqc" sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); #line 79 "exp004base.sqc" sqlaaloc(3,4,2,0L); { struct sqla_setdata_list sql_setdlist[4]; #line 79 "exp004base.sqc" sql_setdlist[0].sqltype = 496; sql_setdlist[0].sqllen = 4; #line 79 "exp004base.sqc" sql_setdlist[0].sqldata = (void*)&coordinates.coord_id; #line 79 "exp004base.sqc" sql_setdlist[0].sqlind = 0L; #line 79 "exp004base.sqc" sql_setdlist[1].sqltype = 448; sql_setdlist[1].sqllen = 50; #line 79 "exp004base.sqc" sql_setdlist[1].sqldata = (void*)&coordinates.gi; #line 79 "exp004base.sqc" sql_setdlist[1].sqlind = 0L; #line 79 "exp004base.sqc" sql_setdlist[2].sqltype = 480; sql_setdlist[2].sqllen = 8; #line 79 "exp004base.sqc" sql_setdlist[2].sqldata = (void*)&coordinates.x; #line 79 "exp004base.sqc" sql_setdlist[2].sqlind = 0L; #line 79 "exp004base.sqc" sql_setdlist[3].sqltype = 480; sql_setdlist[3].sqllen = 8; #line 79 "exp004base.sqc" sql_setdlist[3].sqldata = (void*)&coordinates.y; #line 79 "exp004base.sqc" sql_setdlist[3].sqlind = 0L; #line 79 "exp004base.sqc" sqlasetdata(3,0,4,sql_setdlist,0L,0L); } #line 79 "exp004base.sqc" sqlacall((unsigned short)25,1,0,3,0L); #line 79 "exp004base.sqc" sqlastop(0L); } #line 79 "exp004base.sqc" } /* EXEC SQL CLOSE c2; */ { #line 82 "exp004base.sqc" sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); #line 82 "exp004base.sqc" sqlacall((unsigned short)20,1,0,0,0L); #line 82 "exp004base.sqc" sqlastop(0L); } #line 82 "exp004base.sqc" /* EXEC SQL COMMIT; */ { #line 84 "exp004base.sqc" sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); #line 84 "exp004base.sqc" sqlacall((unsigned short)21,0,0,0,0L); #line 84 "exp004base.sqc" sqlastop(0L); } #line 84 "exp004base.sqc" /* * Find the largest axis and use it to setup the projection. This * is done to preserve the aspect ratio. The aspect ratio should be * preserved since relative distance is a meaningful indicator in * the map. */ // Min of min x or min y. if (S.bb.min_x <= S.bb.min_y) S.ortho_min = S.bb.min_x; else S.ortho_min = S.bb.min_y; S.ortho_min--; // Max of max x or max y. if (S.bb.max_x >= S.bb.max_y) S.ortho_max = S.bb.max_x; else S.ortho_max = S.bb.max_y; S.ortho_max++; // Invert the y coordinate to match up with the LGL Java viewer. for (int i = 0; i < ROWS; i++) S.base_vertices_data[i][1] = S.ortho_max - S.base_vertices_data[i][1]; // Move the origin (0,0) to the center of the data. S.ortho_min = 0.0; S.ortho_max = 0.0; for (int i = 0; i < ROWS; i++) { S.base_vertices_data[i][0] = S.base_vertices_data[i][0] - (0.5 * (S.bb.max_x - S.bb.min_x)); if (S.ortho_min > S.base_vertices_data[i][0]) S.ortho_min = S.base_vertices_data[i][0]; if (S.ortho_max < S.base_vertices_data[i][0]) S.ortho_max = S.base_vertices_data[i][0]; S.base_vertices_data[i][1] = S.base_vertices_data[i][1] - (0.5 * (S.bb.max_y - S.bb.min_y)); if (S.ortho_min > S.base_vertices_data[i][1]) S.ortho_min = S.base_vertices_data[i][1]; if (S.ortho_max < S.base_vertices_data[i][1]) S.ortho_max = S.base_vertices_data[i][1]; } glGenBuffers (2, S.buffers); glBindBuffer (GL_ARRAY_BUFFER, S.buffers[BASE_VERTICES]); glVertexPointer (2, GL_FLOAT, 0, 0); glBufferData (GL_ARRAY_BUFFER, sizeof (S.base_vertices_data), S.base_vertices_data, GL_STATIC_DRAW); glBindBuffer (GL_ARRAY_BUFFER, S.buffers[BASE_COLORS]); glColorPointer (4, GL_FLOAT, 0, 0); glBufferData (GL_ARRAY_BUFFER, sizeof (S.base_colors_data), S.base_colors_data, GL_STATIC_DRAW); return; }