log_trace.c

   1 #ifndef TRACE_C
   2 #define TRACE_C
   3 #include <stdarg.h>
   4 #include <stdio.h>
   5 /* TRACE {{{1 */
   6 /*############################################################################*/
   7 #ifndef TRACE_FILE
   8 #define TRACE_FILE "/run/log"
   9 #endif
  10 #define TRACE(...) trace((void*)__func__, __VA_ARGS__)
  11 #ifdef TRACE_ON
  12 #include <sys/file.h>
  13 static FILE *trace_file;
  14 static void trace_init(void)
  15 {
  16         trace_file = fopen(TRACE_FILE, "a");
  17         setvbuf(trace_file, NULL, _IONBF, 0);
  18         fcntl(fileno(trace_file), F_SETFL, fcntl(fileno(trace_file),
  19                                                         F_GETFL) | O_SYNC);
  20 }
  21 static void trace(void *fn, void *fmt, ...)
  22 {
  23         int r;
  24         size_t sz;
  25         va_list ap;
  26
  27         flock(fileno(trace_file), LOCK_EX); /* process level */
  28         flockfile(trace_file); /* thread level */
  29         fprintf(trace_file, "%d:%d:%s:", getpid(), gettid(), fn);
  30         va_start(ap, fmt);
  31         vfprintf(trace_file, fmt, ap);
  32         va_end(ap);
  33         fprintf(trace_file, "\n");
  34         fflush(trace_file);
  35         funlockfile(trace_file); /* thread level */
  36         flock(fileno(trace_file), LOCK_UN); /* process level */
  37 }
  38 #define STRING(x) case x: return #x
  39 static void *getstring_str(unsigned int e)
  40 {
  41         switch(e) {
  42         STRING(GL_VENDOR);
  43         STRING(GL_RENDERER);
  44         STRING(GL_VERSION);
  45         STRING(GL_SHADING_LANGUAGE_VERSION);
  46         /* unavailable thru glGetString in core profile */
  47         STRING(GL_EXTENSIONS);
  48         default:
  49                 return "UNKNOWN";
  50         }
  51
  52 }
  53 #undef STRING
  54 #define TARGET(x) case x: return #x
  55 static void *tex_target_str(GLenum target)
  56 {
  57         switch(target) {
  58         TARGET(GL_TEXTURE_2D);
  59         default:
  60                 return "UNKNOWN";
  61         }
  62 }
  63 #undef TARGET
  64 #define MODE_STR(x) case x: return #x
  65 static void *matrixmode_mode_str(unsigned int mode)
  66 {
  67         switch(mode) {
  68         MODE_STR(GL_MODELVIEW);
  69         MODE_STR(GL_PROJECTION);
  70         MODE_STR(GL_TEXTURE);
  71         MODE_STR(GL_COLOR);
  72         default:
  73                 return "UNKNOWN";
  74         }
  75 }
  76 #undef MODE_STR
  77 #define TARGET(x) case x: return #x
  78 static void *texenv_target_str(unsigned int t)
  79 {
  80         switch(t) {
  81         TARGET(GL_TEXTURE_ENV);
  82         TARGET(GL_TEXTURE_FILTER_CONTROL);
  83         TARGET(GL_POINT_SPRITE);
  84         default:
  85                 return "UNKNOWN";
  86         }
  87 }
  88 #undef TARGET
  89 #define PNAME(x) case x: return #x
  90 static void *texenv_pname_str(unsigned int pname)
  91 {
  92         switch(pname) {
  93         PNAME(GL_TEXTURE_ENV_MODE);
  94         default:
  95                 return "UNKNOWN";
  96         }
  97 }
  98 #undef PNAME
  99 #define MODE(x) case x: return #x
 100 static void *rendermode_str(unsigned int mode)
 101 {
 102         switch(mode) {
 103         MODE(GL_RENDER);
 104         MODE(GL_FEEDBACK);
 105         MODE(GL_SELECT);
 106         default:
 107                 return "UNKNOWN";
 108         }
 109 }
 110 #undef MODE
 111 #define PNAME(x) case x: return #x
 112 static void *getinteger_pname_str(unsigned int pname)
 113 {
 114         switch(pname) {
 115         PNAME(GL_VIEWPORT);
 116         PNAME(GL_NUM_EXTENSIONS);
 117         default:
 118                 return "UNKNOWN";
 119         }
 120 }
 121 #undef PNAME
 122 #define FMT(x) case x: return #x
 123 static void *tex_format_str(GLint fmt)
 124 {
 125         switch(fmt) {
 126         FMT(GL_RGBA8);
 127         FMT(GL_BGRA);
 128         FMT(GL_RGBA);
 129         default:
 130                 return "UNKNOWN";
 131         }
 132 }
 133 #undef FMT
 134 #define TYPE(x) case x: return #x
 135 static void *pixel_data_format_str(GLenum type)
 136 {
 137         switch(type) {
 138         TYPE(GL_UNSIGNED_BYTE);
 139         default:
 140                 return "UNKNOWN";
 141         }
 142 }
 143 #undef TYPE
 144 #define PNAME(x) case x: return #x
 145 static void *pixelstore_pname_str(GLenum pname)
 146 {
 147         switch(pname) {
 148         PNAME(GL_PACK_ALIGNMENT); /* alignment to write data to client */
 149         PNAME(GL_PACK_SWAP_BYTES);
 150         PNAME(GL_PACK_LSB_FIRST);
 151         PNAME(GL_PACK_ROW_LENGTH);
 152         PNAME(GL_PACK_IMAGE_HEIGHT);
 153         PNAME(GL_PACK_SKIP_PIXELS);
 154         PNAME(GL_PACK_SKIP_ROWS);
 155         PNAME(GL_PACK_SKIP_IMAGES);
 156         PNAME(GL_UNPACK_ALIGNMENT); /* alignment to read data from client */
 157         PNAME(GL_UNPACK_SWAP_BYTES);
 158         PNAME(GL_UNPACK_LSB_FIRST);
 159         PNAME(GL_UNPACK_ROW_LENGTH);
 160         PNAME(GL_UNPACK_IMAGE_HEIGHT);
 161         PNAME(GL_UNPACK_SKIP_PIXELS);
 162         PNAME(GL_UNPACK_SKIP_ROWS);
 163         default:
 164                 return "UNKNOWN";
 165         }
 166 }
 167 #undef PNAME
 168 #define MODE(x) case x: return #x
 169 static void *begin_mode(GLenum mode)
 170 {
 171         switch(mode) {
 172         MODE(GL_POINTS);
 173         MODE(GL_LINES);
 174         MODE(GL_LINE_LOOP);
 175         MODE(GL_LINE_STRIP);
 176         MODE(GL_TRIANGLES);
 177         MODE(GL_TRIANGLE_STRIP);
 178         MODE(GL_TRIANGLE_FAN);
 179         MODE(GL_QUADS);
 180         MODE(GL_QUAD_STRIP);
 181         MODE(GL_POLYGON);
 182         default:
 183                 return "UNKNOWN";
 184         }
 185 }
 186 #undef MODE
 187 #define PNAME(x) case x: return #x
 188 static void *texparameter_pname_str(GLenum pname)
 189 {
 190         switch(pname) {
 191         PNAME(GL_DEPTH_STENCIL_TEXTURE_MODE);
 192         PNAME(GL_TEXTURE_BASE_LEVEL);
 193         PNAME(GL_TEXTURE_COMPARE_FUNC);
 194         PNAME(GL_TEXTURE_COMPARE_MODE);
 195         PNAME(GL_TEXTURE_LOD_BIAS);
 196         PNAME(GL_TEXTURE_MIN_FILTER);
 197         PNAME(GL_TEXTURE_MAG_FILTER);
 198         PNAME(GL_TEXTURE_MIN_LOD);
 199         PNAME(GL_TEXTURE_MAX_LOD);
 200         PNAME(GL_TEXTURE_MAX_LEVEL);
 201         PNAME(GL_TEXTURE_SWIZZLE_R);
 202         PNAME(GL_TEXTURE_SWIZZLE_G);
 203         PNAME(GL_TEXTURE_SWIZZLE_B);
 204         PNAME(GL_TEXTURE_SWIZZLE_A);
 205         PNAME(GL_TEXTURE_WRAP_S);
 206         PNAME(GL_TEXTURE_WRAP_T);
 207         PNAME(GL_TEXTURE_WRAP_R);
 208         default:
 209                 return "UNKNOW";
 210         }
 211 }
 212 #undef PNAME
 213 static void *texparameterf_param_str(GLenum pname, GLfloat param)
 214 {
 215         if (pname == GL_TEXTURE_WRAP_S || pname == GL_TEXTURE_WRAP_T
 216                                                         || GL_TEXTURE_WRAP_R) {
 217                 int param_u;
 218
 219                 param_u = (int)param;
 220                 #define WRAP(x) case x: return #x
 221                 switch(param_u) {
 222                 WRAP(GL_CLAMP_TO_EDGE);
 223                 WRAP(GL_CLAMP_TO_BORDER);
 224                 WRAP(GL_MIRRORED_REPEAT);
 225                 WRAP(GL_REPEAT);
 226                 WRAP(GL_MIRROR_CLAMP_TO_EDGE);
 227                 default:
 228                         return "UNKOWN";
 229                 }
 230                 #undef WRAP
 231         }
 232         return "UNKNOWN";
 233 }
 234 #define CAP(x) case x: return #x
 235 static void *disable_enable_cap_str(GLenum cap)
 236 {
 237         switch(cap) {
 238         CAP(GL_ALPHA_TEST);
 239         CAP(GL_AUTO_NORMAL);
 240         CAP(GL_BLEND);
 241         CAP(GL_CLIP_PLANE0);
 242         CAP(GL_CLIP_PLANE1);
 243         CAP(GL_CLIP_PLANE2);
 244         CAP(GL_CLIP_PLANE3);
 245         CAP(GL_CLIP_PLANE4);
 246         CAP(GL_CLIP_PLANE5);
 247         CAP(GL_COLOR_LOGIC_OP);
 248         CAP(GL_COLOR_MATERIAL);
 249         CAP(GL_COLOR_SUM);
 250         CAP(GL_COLOR_TABLE);
 251         CAP(GL_CONVOLUTION_1D);
 252         CAP(GL_CONVOLUTION_2D);
 253         CAP(GL_CULL_FACE);
 254         CAP(GL_DEPTH_TEST);
 255         CAP(GL_DITHER);
 256         CAP(GL_FOG);
 257         CAP(GL_HISTOGRAM);
 258         CAP(GL_INDEX_LOGIC_OP);
 259         CAP(GL_LIGHT0);
 260         CAP(GL_LIGHT1);
 261         CAP(GL_LIGHT2);
 262         CAP(GL_LIGHT3);
 263         CAP(GL_LIGHT4);
 264         CAP(GL_LIGHT5);
 265         CAP(GL_LIGHT6);
 266         CAP(GL_LIGHT7);
 267         CAP(GL_LIGHTING);
 268         CAP(GL_LINE_SMOOTH);
 269         CAP(GL_LINE_STIPPLE);
 270         CAP(GL_MAP1_COLOR_4);
 271         CAP(GL_MAP1_INDEX);
 272         CAP(GL_MAP1_NORMAL);
 273         CAP(GL_MAP1_TEXTURE_COORD_1);
 274         CAP(GL_MAP1_TEXTURE_COORD_2);
 275         CAP(GL_MAP1_TEXTURE_COORD_3);
 276         CAP(GL_MAP1_TEXTURE_COORD_4);
 277         CAP(GL_MAP1_VERTEX_3);
 278         CAP(GL_MAP1_VERTEX_4);
 279         CAP(GL_MAP2_COLOR_4);
 280         CAP(GL_MAP2_INDEX);
 281         CAP(GL_MAP2_NORMAL);
 282         CAP(GL_MAP2_TEXTURE_COORD_1);
 283         CAP(GL_MAP2_TEXTURE_COORD_2);
 284         CAP(GL_MAP2_TEXTURE_COORD_3);
 285         CAP(GL_MAP2_TEXTURE_COORD_4);
 286         CAP(GL_MAP2_VERTEX_3);
 287         CAP(GL_MAP2_VERTEX_4);
 288         CAP(GL_MINMAX);
 289         CAP(GL_MULTISAMPLE);
 290         CAP(GL_NORMALIZE);
 291         CAP(GL_POINT_SMOOTH);
 292         CAP(GL_POINT_SPRITE);
 293         CAP(GL_POLYGON_OFFSET_FILL);
 294         CAP(GL_POLYGON_OFFSET_LINE);
 295         CAP(GL_POLYGON_OFFSET_POINT);
 296         CAP(GL_POLYGON_SMOOTH);
 297         CAP(GL_POLYGON_STIPPLE);
 298         CAP(GL_POST_COLOR_MATRIX_COLOR_TABLE);
 299         CAP(GL_POST_CONVOLUTION_COLOR_TABLE);
 300         CAP(GL_RESCALE_NORMAL);
 301         CAP(GL_SAMPLE_ALPHA_TO_COVERAGE);
 302         CAP(GL_SAMPLE_ALPHA_TO_ONE);
 303         CAP(GL_SAMPLE_COVERAGE);
 304         CAP(GL_SEPARABLE_2D);
 305         CAP(GL_SCISSOR_TEST);
 306         CAP(GL_STENCIL_TEST);
 307         CAP(GL_TEXTURE_1D);
 308         CAP(GL_TEXTURE_2D);
 309         CAP(GL_TEXTURE_3D);
 310         CAP(GL_TEXTURE_CUBE_MAP);
 311         CAP(GL_TEXTURE_GEN_Q);
 312         CAP(GL_TEXTURE_GEN_R);
 313         CAP(GL_TEXTURE_GEN_S);
 314         CAP(GL_TEXTURE_GEN_T);
 315         CAP(GL_VERTEX_PROGRAM_POINT_SIZE);
 316         CAP(GL_VERTEX_PROGRAM_TWO_SIDE);
 317         CAP(GL_VERTEX_PROGRAM_ARB);
 318         CAP(GL_FRAGMENT_PROGRAM_ARB);
 319         CAP(GL_COLOR_ARRAY);
 320         CAP(GL_EDGE_FLAG_ARRAY);
 321         CAP(GL_INDEX_ARRAY);
 322         CAP(GL_NORMAL_ARRAY);
 323         CAP(GL_TEXTURE_COORD_ARRAY);
 324         CAP(GL_VERTEX_ARRAY);
 325         default:
 326                 return "UNKNOWN";
 327         }
 328 }
 329 #define MODE(x) case x: return #x
 330 static void *shademodel_mode_str(GLenum mode)
 331 {
 332         switch(mode) {
 333         MODE(GL_FLAT);
 334         MODE(GL_SMOOTH);
 335         default:
 336                 return "UNKNOWN";
 337         }
 338 }
 339 #undef MODE
 340 #define FACTOR(x) case x: return #x
 341 static void *blendfunc_factor_str(GLenum factor)
 342 {
 343         switch(factor) {
 344         FACTOR(GL_ZERO);
 345         FACTOR(GL_ONE);
 346         FACTOR(GL_SRC_COLOR);
 347         FACTOR(GL_ONE_MINUS_SRC_COLOR);
 348         FACTOR(GL_DST_COLOR);
 349         FACTOR(GL_ONE_MINUS_DST_COLOR);
 350         FACTOR(GL_SRC_ALPHA);
 351         FACTOR(GL_ONE_MINUS_SRC_ALPHA);
 352         FACTOR(GL_DST_ALPHA);
 353         FACTOR(GL_ONE_MINUS_DST_ALPHA);
 354         FACTOR(GL_CONSTANT_COLOR);
 355         FACTOR(GL_ONE_MINUS_CONSTANT_COLOR);
 356         FACTOR(GL_CONSTANT_ALPHA);
 357         FACTOR(GL_ONE_MINUS_CONSTANT_ALPHA);
 358         FACTOR(GL_SRC_ALPHA_SATURATE);
 359         FACTOR(GL_SRC1_COLOR);
 360         FACTOR(GL_ONE_MINUS_SRC1_COLOR);
 361         FACTOR(GL_SRC1_ALPHA);
 362         FACTOR(GL_ONE_MINUS_SRC1_ALPHA);
 363         default:
 364                 return "UNKNOWN";
 365         }
 366 }
 367 #undef FACTOR
 368 static void *texenv_param_str(unsigned int pname, float param)
 369 {
 370         if (param == (float)GL_MODULATE)
 371                 return "GL_MODULATE";
 372         return "UNKNOWN";
 373 }
 374 static void printf_visualinfo(const void *str, XVisualInfo *i)
 375 {
 376         TRACE("%s:visualid=%lu", str, i->visualid);
 377         TRACE("%s:red_mask=%x", str, i->red_mask);
 378         TRACE("%s:green_mask=%x", str, i->green_mask);
 379         TRACE("%s:blue_mask=%x", str, i->blue_mask);
 380         TRACE("%s:class=%d", str, i->class);
 381         TRACE("%s:bits_per_rgb=%d", str, i->bits_per_rgb);
 382         TRACE("%s:depth=%u", str, i->depth);
 383         TRACE("%s:colormap_size=%u", str, i->colormap_size);
 384         TRACE("%s:screen=%d", str, i->screen);
 385 }
 386 static void attribList_parse(int *l)
 387 {
 388         if (l == 0)
 389                 return;
 390         loop {
 391                 if (*l == None)
 392                         return;
 393                 switch(*l) {
 394                 case GLX_USE_GL:
 395                         TRACE("attriblist:GLX_USE_GL");
 396                         ++l;
 397                         break;
 398                 case GLX_BUFFER_SIZE:
 399                         TRACE("attriblist:GLX_BUFFER_SIZE=%d", l[1]);
 400                         l += 2;
 401                         break;
 402                 case GLX_LEVEL:
 403                         TRACE("attriblist:GLX_LEVEL=%d", l[1]);
 404                         l += 2;
 405                         break;
 406                 case GLX_RGBA:
 407                         TRACE("attriblist:GLX_RGBA");
 408                         ++l;
 409                         break;
 410                 case GLX_DOUBLEBUFFER:
 411                         TRACE("attriblist:GLX_DOUBLEBUFFER");
 412                         ++l;
 413                         break;
 414                 case GLX_STEREO:
 415                         TRACE("attriblist:GLX_STEREO");
 416                         ++l;
 417                         break;
 418                 case GLX_AUX_BUFFERS:
 419                         TRACE("attriblist:GLX_AUX_BUFFERS=%d", l[1]);
 420                         l += 2;
 421                         break;
 422                 case GLX_RED_SIZE:
 423                         TRACE("attriblist:GLX_RED_SIZE=%d bits", l[1]);
 424                         l += 2;
 425                         break;
 426                 case GLX_GREEN_SIZE:
 427                         TRACE("attriblist:GLX_GREEN_SIZE=%d bits", l[1]);
 428                         l += 2;
 429                         break;
 430                 case GLX_BLUE_SIZE:
 431                         TRACE("attriblist:GLX_BLUE_SIZE=%d bits", l[1]);
 432                         l += 2;
 433                         break;
 434                 case GLX_ALPHA_SIZE:
 435                         TRACE("attriblist:GLX_ALPHA_SIZE=%d bits", l[1]);
 436                         l += 2;
 437                         break;
 438                 case GLX_DEPTH_SIZE:
 439                         TRACE("attriblist:GLX_DEPTH_SIZE=%d", l[1]);
 440                         l += 2;
 441                         break;
 442                 case GLX_STENCIL_SIZE:
 443                         TRACE("attriblist:GLX_STENCIL_SIZE=%d", l[1]);
 444                         l += 2;
 445                         break;
 446                 case GLX_ACCUM_RED_SIZE:
 447                         TRACE("attriblist:GLX_ACCUM_RED_SIZE=%d", l[1]);
 448                         l += 2;
 449                         break;
 450                 case GLX_ACCUM_GREEN_SIZE:
 451                         TRACE("attriblist:GLX_ACCUM_GREEN_SIZE=%d", l[1]);
 452                         l += 2;
 453                         break;
 454                 case GLX_ACCUM_BLUE_SIZE:
 455                         TRACE("attriblist:GLX_ACCUM_BLUE_SIZE=%d", l[1]);
 456                         l += 2;
 457                         break;
 458                 case GLX_ACCUM_ALPHA_SIZE:
 459                         TRACE("attriblist:GLX_ACCUM_ALPHA_SIZE=%d", l[1]);
 460                         l += 2;
 461                         break;
 462                 default:
 463                         TRACE("attriblist:UNKNOWN=%d", *l);
 464                         break;
 465                 }
 466         }
 467 }
 468 #undef TRACE_FILE
 469 #else /* !TRACE_ON */
 470 /*
 471  * we rely on dead code elimination... mmmmmh... we don't know if it is
 472  * a feature expensive for a naive and simple C89(with bits of C99) compiler
 473  */
 474 static void trace_init(){};
 475 static void trace(void *fn, void *fmt, ...){}
 476 static void attribList_parse(int *l){}
 477 static void printf_visualinfo(const void *str, XVisualInfo *i){}
 478 static void *getstring_str(unsigned int e){}
 479 static void *tex_target_str(GLenum target){}
 480 static void *matrixmode_mode_str(unsigned int mode){}
 481 static void *texenv_target_str(unsigned int t){}
 482 static void *texenv_pname_str(unsigned int pname){}
 483 static void *rendermode_str(unsigned int mode){}
 484 static void *getinteger_pname_str(unsigned int pname){}
 485 static void *tex_format_str(GLint fmt){}
 486 static void *pixel_data_format_str(GLenum type){}
 487 static void *pixelstore_pname_str(GLenum pname){}
 488 static void *begin_mode(GLenum mode){}
 489 static void *texparameter_pname_str(GLenum pname){}
 490 static void *texparameterf_param_str(GLenum pname, GLfloat param){}
 491 static void *disable_enable_cap_str(GLenum cap){}
 492 static void *shademodel_mode_str(GLenum mode){}
 493 static void *blendfunc_factor_str(GLenum factor){}
 494 static void *texenv_param_str(unsigned int pname, float param){}
 495 #endif
 496 /*############################################################################*/
 497 /* }}} */
 498 /* LOG {{{1 */
 499 /*############################################################################*/
 500 #define LOG(...) vlog((void*)__func__, __VA_ARGS__)
 501 static void vlog(void *fn, void *fmt, ...)
 502 {
 503         va_list ap;
 504 #if defined(TRACE_ON) && defined(REDIRECT_LOG_TO_TRACE_FILE)
 505         flock(fileno(trace_file), LOCK_EX); /* process level */
 506         flockfile(trace_file); /* thread level */
 507         fprintf(trace_file, "%d:%s:", getpid(), fn);
 508         va_start(ap, fmt);
 509         vfprintf(trace_file, fmt, ap);
 510         va_end(ap);
 511         fprintf(trace_file, "\n");
 512         fflush(trace_file);
 513         funlockfile(trace_file); /* thread level */
 514         flock(fileno(trace_file), LOCK_UN); /* process level */
 515 #else
 516         flockfile(stderr); /* thread level */
 517         fprintf(stderr, "MINI2DGL:%s:", fn);
 518         va_start(ap, fmt);
 519         vfprintf(stderr, fmt, ap);
 520         va_end(ap);
 521         fprintf(stderr, "\n");
 522         fflush(stderr);
 523         funlockfile(stderr); /* thread level */
 524 #endif
 525 }
 526 /*############################################################################*/
 527 /* }}} */
 528 #endif