27 files changed, 179 insertions, 549 deletions
diff --git a/src/model/base.c b/src/model/base.c deleted file mode 100644 index 649fec3..0000000 --- a/src/model/base.c +++ b/dev/null @@ -1,417 +0,0 @@ -static char sqla_program_id[292] = -{ - 172,0,65,69,65,78,65,73,86,65,78,55,78,82,73,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,66,65,83,69,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 -}; - -#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 "base.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 "base.h" -#include "../view/state0.h" -#include "../util/check_error.h" -#include <GL/glut.h> -#include <string.h> -#include <stdlib.h> -#include "sqlca.h" -extern struct sqlca sqlca; - -/* - * A simple alias to make the code more readable. - */ -#define S state0 - -void -base (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 "base.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 "base.sqc" - - sqlint32 rows; - -/* -EXEC SQL END DECLARE SECTION; -*/ - -#line 34 "base.sqc" - - - /* Determine how many nodes have coordinates assigned to them. */ - -/* -EXEC SQL SELECT COUNT (*) INTO:rows FROM coordinates; -*/ - -{ -#line 37 "base.sqc" - sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); -#line 37 "base.sqc" - sqlaaloc(3,1,1,0L); - { - struct sqla_setdata_list sql_setdlist[1]; -#line 37 "base.sqc" - sql_setdlist[0].sqltype = 496; sql_setdlist[0].sqllen = 4; -#line 37 "base.sqc" - sql_setdlist[0].sqldata = (void*)&rows; -#line 37 "base.sqc" - sql_setdlist[0].sqlind = 0L; -#line 37 "base.sqc" - sqlasetdata(3,0,1,sql_setdlist,0L,0L); - } -#line 37 "base.sqc" - sqlacall((unsigned short)24,1,0,3,0L); -#line 37 "base.sqc" - sqlastop(0L); -} - -#line 37 "base.sqc" - - - /* Free any existing coordinates and allocate memory to store the - new values. */ - S.rows = rows; - - free (S.selection.set); - S.selection.set = calloc (rows, sizeof (bool)); - - free (S.gi_data); - S.gi_data = calloc (rows, sizeof (char) * 20); - - free (S.base_vertices_data); - S.base_vertices_data = calloc (rows, sizeof (float) * 2); - - free (S.base_colors_data); - S.base_colors_data = calloc (rows, sizeof (float) * 4); - - -/* -EXEC SQL DECLARE c2 CURSOR FOR SELECT *FROM coordinates; -*/ - -#line 55 "base.sqc" - - - -/* -EXEC SQL OPEN c2; -*/ - -{ -#line 57 "base.sqc" - sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); -#line 57 "base.sqc" - sqlacall((unsigned short)26,2,0,0,0L); -#line 57 "base.sqc" - sqlastop(0L); -} - -#line 57 "base.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 67 "base.sqc" - sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); -#line 67 "base.sqc" - sqlaaloc(3,4,2,0L); - { - struct sqla_setdata_list sql_setdlist[4]; -#line 67 "base.sqc" - sql_setdlist[0].sqltype = 496; sql_setdlist[0].sqllen = 4; -#line 67 "base.sqc" - sql_setdlist[0].sqldata = (void*)&coordinates.coord_id; -#line 67 "base.sqc" - sql_setdlist[0].sqlind = 0L; -#line 67 "base.sqc" - sql_setdlist[1].sqltype = 448; sql_setdlist[1].sqllen = 50; -#line 67 "base.sqc" - sql_setdlist[1].sqldata = (void*)&coordinates.gi; -#line 67 "base.sqc" - sql_setdlist[1].sqlind = 0L; -#line 67 "base.sqc" - sql_setdlist[2].sqltype = 480; sql_setdlist[2].sqllen = 8; -#line 67 "base.sqc" - sql_setdlist[2].sqldata = (void*)&coordinates.x; -#line 67 "base.sqc" - sql_setdlist[2].sqlind = 0L; -#line 67 "base.sqc" - sql_setdlist[3].sqltype = 480; sql_setdlist[3].sqllen = 8; -#line 67 "base.sqc" - sql_setdlist[3].sqldata = (void*)&coordinates.y; -#line 67 "base.sqc" - sql_setdlist[3].sqlind = 0L; -#line 67 "base.sqc" - sqlasetdata(3,0,4,sql_setdlist,0L,0L); - } -#line 67 "base.sqc" - sqlacall((unsigned short)25,2,0,3,0L); -#line 67 "base.sqc" - sqlastop(0L); -} - -#line 67 "base.sqc" - - while (sqlca.sqlcode != 100) - { - int i = coordinates.coord_id - 1; - - strncpy (S.gi_data + i, coordinates.gi.data, sizeof (S.gi_data[i])); - - float *v = S.base_vertices_data + (i * 2); - *v = coordinates.x; - v++; - *v = coordinates.y; - - v = S.base_vertices_data + (i * 2); - if (*v < S.bb.min_x) - S.bb.min_x = *v; - if (*v > S.bb.max_x) - S.bb.max_x = *v; - - v++; - if (*v < S.bb.min_y) - S.bb.min_y = *v; - if (*v > S.bb.max_y) - S.bb.max_y = *v; - - /* - * Deselected by default. - */ - S.selection.set[i] = false; - - float *c = S.base_colors_data + (i * 4); - *c = DEFAULT_COLOR_R; - c++; - *c = DEFAULT_COLOR_G; - c++; - *c = DEFAULT_COLOR_B; - c++; - *c = DEFAULT_COLOR_A; - - -/* -EXEC SQL FETCH c2 INTO:coordinates; -*/ - -{ -#line 105 "base.sqc" - sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); -#line 105 "base.sqc" - sqlaaloc(3,4,3,0L); - { - struct sqla_setdata_list sql_setdlist[4]; -#line 105 "base.sqc" - sql_setdlist[0].sqltype = 496; sql_setdlist[0].sqllen = 4; -#line 105 "base.sqc" - sql_setdlist[0].sqldata = (void*)&coordinates.coord_id; -#line 105 "base.sqc" - sql_setdlist[0].sqlind = 0L; -#line 105 "base.sqc" - sql_setdlist[1].sqltype = 448; sql_setdlist[1].sqllen = 50; -#line 105 "base.sqc" - sql_setdlist[1].sqldata = (void*)&coordinates.gi; -#line 105 "base.sqc" - sql_setdlist[1].sqlind = 0L; -#line 105 "base.sqc" - sql_setdlist[2].sqltype = 480; sql_setdlist[2].sqllen = 8; -#line 105 "base.sqc" - sql_setdlist[2].sqldata = (void*)&coordinates.x; -#line 105 "base.sqc" - sql_setdlist[2].sqlind = 0L; -#line 105 "base.sqc" - sql_setdlist[3].sqltype = 480; sql_setdlist[3].sqllen = 8; -#line 105 "base.sqc" - sql_setdlist[3].sqldata = (void*)&coordinates.y; -#line 105 "base.sqc" - sql_setdlist[3].sqlind = 0L; -#line 105 "base.sqc" - sqlasetdata(3,0,4,sql_setdlist,0L,0L); - } -#line 105 "base.sqc" - sqlacall((unsigned short)25,2,0,3,0L); -#line 105 "base.sqc" - sqlastop(0L); -} - -#line 105 "base.sqc" - - } - - -/* -EXEC SQL CLOSE c2; -*/ - -{ -#line 108 "base.sqc" - sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); -#line 108 "base.sqc" - sqlacall((unsigned short)20,2,0,0,0L); -#line 108 "base.sqc" - sqlastop(0L); -} - -#line 108 "base.sqc" - - - -/* -EXEC SQL COMMIT; -*/ - -{ -#line 110 "base.sqc" - sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca); -#line 110 "base.sqc" - sqlacall((unsigned short)21,0,0,0,0L); -#line 110 "base.sqc" - sqlastop(0L); -} - -#line 110 "base.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. - float *v = S.base_vertices_data; - for (int i = 0; i < S.rows; i++) - { - v++; - *v = S.ortho_max - *v; - v++; - } - - // Move the origin (0,0) to the center of the data. - S.ortho_min = 0.0; - S.ortho_max = 0.0; - - v = S.base_vertices_data; - for (int i = 0; i < S.rows; i++) - { - *v = *v - (0.5 * (S.bb.max_x - S.bb.min_x)); - - if (S.ortho_min > *v) - S.ortho_min = *v; - - if (S.ortho_max < *v) - S.ortho_max = *v; - - v++; - - *v = *v - (0.5 * (S.bb.max_y - S.bb.min_y)); - - if (S.ortho_min > *v) - S.ortho_min = *v; - - if (S.ortho_max < *v) - S.ortho_max = *v; - - v++; - } - - 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; -} |
