src/modules/fastpath/coregl_fastpath.c

   1 #include "coregl_fastpath.h"
   2
   3 #include <stdlib.h>
   4 #include <string.h>
   5 #include <sys/time.h>
   6
   7 #include <sys/types.h>
   8 #include <unistd.h>
   9
  10 #define _COREGL_SYMBOL(IS_EXTENSION, RET_TYPE, FUNC_NAME, PARAM_LIST)     RET_TYPE (*_orig_fastpath_##FUNC_NAME) PARAM_LIST = NULL;
  11 #include "../../headers/sym.h"
  12 #undef _COREGL_SYMBOL
  13
  14 Fastpath_Opt_Flag   fp_opt = FP_UNKNOWN_PATH;
  15
  16 int                 debug_nofp = 0;
  17 FILE               *trace_fp = NULL;
  18
  19 GLenum              FPGL_Error = GL_NO_ERROR;
  20
  21 GLGlueContext_List *gctx_list = NULL;
  22
  23 Mutex               init_context_mutex = MUTEX_INITIALIZER;
  24 GLGlueContext      *initial_ctx = NULL;
  25
  26 Mutex               ctx_list_access_mutex = MUTEX_INITIALIZER;
  27
  28 GLContext_List     *glctx_list = NULL;
  29
  30 static void
  31 _get_texture_states(GLenum pname, GLint *params)
  32 {
  33         GLuint cur_active_tex = 0;
  34
  35         AST(initial_ctx != NULL);
  36
  37         _orig_fastpath_glGetIntegerv(GL_ACTIVE_TEXTURE, (GLint *)&cur_active_tex);
  38         int i;
  39         for (i = 0; i < initial_ctx->gl_num_tex_units[0]; i++)
  40         {
  41                 _orig_fastpath_glActiveTexture(GL_TEXTURE0 + i);
  42                 _orig_fastpath_glGetIntegerv(pname, &(((GLint *)params)[i]));
  43         }
  44         _orig_fastpath_glActiveTexture(cur_active_tex);
  45 }
  46
  47 void
  48 init_modules_fastpath()
  49 {
  50         int fastpath_opt = 0;
  51         int fastpath_force_off_opt = 0;
  52
  53         COREGL_LOG("[CoreGL] <Fastpath> : ");
  54
  55         fastpath_opt = atoi(get_env_setting("COREGL_FASTPATH"));
  56         fastpath_force_off_opt = atoi(get_env_setting("COREGL_FASTPATH_FORCE_OFF"));
  57
  58         if (fastpath_force_off_opt == 1)
  59         {
  60                 COREGL_LOG("\E[40;31;1m(DISABLED by force option)\E[0m ");
  61                 fastpath_opt = 0;
  62         }
  63
  64         switch (fastpath_opt)
  65         {
  66                 case 1:
  67                         COREGL_LOG("(%d) Fastpath enabled...\n", fastpath_opt);
  68                         fp_opt = FP_FAST_PATH;
  69                         break;
  70                 default:
  71                         COREGL_LOG("(%d) Default API path enabled...\n", fastpath_opt);
  72                         fp_opt = FP_NORMAL_PATH;
  73                         break;
  74         }
  75
  76         debug_nofp = atoi(get_env_setting("COREGL_DEBUG_NOFP"));
  77
  78 }
  79
  80 void
  81 deinit_modules_fastpath()
  82 {
  83         GLContext_List *current = NULL;
  84
  85         AST(mutex_lock(&ctx_list_access_mutex) == 1);
  86
  87         // Destroy remained context & Detect leaks
  88         int retry_destroy = 0;
  89
  90         while (1)
  91         {
  92                 retry_destroy = 0;
  93                 current = glctx_list;
  94                 while (current)
  95                 {
  96                         if (current->cstate != NULL)
  97                         {
  98                                 COREGL_WRN("\E[40;31;1mContext attached to [dpy=%p|rctx=%p] has not been completely destroyed.(leak)\E[0m\n", current->cstate->rdpy, current->cstate->rctx);
  99
 100                                 _orig_fastpath_eglMakeCurrent(current->cstate->rdpy, EGL_NO_SURFACE, EGL_NO_SURFACE, EGL_NO_CONTEXT);
 101                                 _orig_fastpath_eglDestroyContext(current->cstate->rdpy, current->cstate->rctx);
 102
 103                                 fastpath_remove_context_states_from_list(current->cstate, NULL);
 104                                 retry_destroy = 1;
 105                                 break;
 106                         }
 107
 108                         glctx_list = current->next;
 109                         free(current);
 110                         current = glctx_list;
 111                 }
 112                 if (retry_destroy == 0) break;
 113         }
 114         goto finish;
 115
 116 finish:
 117         AST(mutex_unlock(&ctx_list_access_mutex) == 1);
 118 }
 119
 120 void
 121 init_modules_tstate_fastpath(GLThreadState *tstate)
 122 {
 123         MY_MODULE_TSTATE *tstate_mt = NULL;
 124
 125         tstate_mt = (MY_MODULE_TSTATE *)calloc(1, sizeof(MY_MODULE_TSTATE));
 126
 127         tstate_mt->binded_api = EGL_OPENGL_ES_API;
 128
 129         tstate->module_data[MY_MODULE_ID] = tstate_mt;
 130 }
 131
 132 void
 133 deinit_modules_tstate_fastpath(GLThreadState *tstate)
 134 {
 135         if (tstate->module_data[MY_MODULE_ID] != NULL)
 136         {
 137                 free(tstate->module_data[MY_MODULE_ID]);
 138                 tstate->module_data[MY_MODULE_ID] = NULL;
 139         }
 140 }
 141
 142 void
 143 fastpath_apply_overrides()
 144 {
 145         switch(fp_opt)
 146         {
 147                 case FP_FAST_PATH:
 148                         fastpath_apply_overrides_egl(1);
 149                         fastpath_apply_overrides_gl(1);
 150                         break;
 151                 case FP_NORMAL_PATH:
 152                         break;
 153                 default:
 154                         COREGL_ERR("Invalide GL Override Option!!!\n");
 155                         break;
 156         }
 157 }
 158
 159
 160 void
 161 fastpath_apply_overrides_egl(int enable)
 162 {
 163 #define _COREGL_SYMBOL(IS_EXTENSION, RET_TYPE, FUNC_NAME, PARAM_LIST)     COREGL_INIT_ORIGINAL(_orig_fastpath_, FUNC_NAME);
 164 # include "../../headers/sym_egl.h"
 165 #undef _COREGL_SYMBOL
 166
 167         COREGL_OVERRIDE(fastpath_, eglGetProcAddress);
 168
 169         COREGL_OVERRIDE(fastpath_, eglBindAPI);
 170         COREGL_OVERRIDE(fastpath_, eglQueryAPI);
 171
 172         COREGL_OVERRIDE(fastpath_, eglCreateContext);
 173         COREGL_OVERRIDE(fastpath_, eglCreateImageKHR);
 174         COREGL_OVERRIDE(fastpath_, eglMakeCurrent);
 175         COREGL_OVERRIDE(fastpath_, eglDestroyContext);
 176         COREGL_OVERRIDE(fastpath_, eglQueryContext);
 177         COREGL_OVERRIDE(fastpath_, eglGetCurrentContext);
 178         COREGL_OVERRIDE(fastpath_, eglReleaseThread);
 179         COREGL_OVERRIDE(fastpath_, eglGetCurrentSurface);
 180         COREGL_OVERRIDE(fastpath_, eglTerminate);
 181
 182 }
 183
 184 void
 185 fastpath_apply_overrides_gl(int enable)
 186 {
 187 #define _COREGL_SYMBOL(IS_EXTENSION, RET_TYPE, FUNC_NAME, PARAM_LIST)     COREGL_INIT_ORIGINAL(_orig_fastpath_, FUNC_NAME);
 188 # include "../../headers/sym_gl.h"
 189 #undef _COREGL_SYMBOL
 190
 191         if (debug_nofp != 1)
 192         {
 193                 COREGL_OVERRIDE(fastpath_, glGetError);
 194
 195                 COREGL_OVERRIDE(fastpath_, glGetIntegerv);
 196                 COREGL_OVERRIDE(fastpath_, glGetFloatv);
 197                 COREGL_OVERRIDE(fastpath_, glGetBooleanv);
 198
 199                 COREGL_OVERRIDE(fastpath_, glActiveTexture);
 200                 COREGL_OVERRIDE(fastpath_, glGenTextures);
 201                 COREGL_OVERRIDE(fastpath_, glBindTexture);
 202                 COREGL_OVERRIDE(fastpath_, glIsTexture);
 203                 COREGL_OVERRIDE(fastpath_, glDeleteTextures);
 204                 COREGL_OVERRIDE(fastpath_, glFramebufferTexture2D);
 205
 206                 COREGL_OVERRIDE(fastpath_, glGenBuffers);
 207                 COREGL_OVERRIDE(fastpath_, glBindBuffer);
 208                 COREGL_OVERRIDE(fastpath_, glIsBuffer);
 209                 COREGL_OVERRIDE(fastpath_, glDeleteBuffers);
 210
 211                 COREGL_OVERRIDE(fastpath_, glGenFramebuffers);
 212                 COREGL_OVERRIDE(fastpath_, glBindFramebuffer);
 213                 COREGL_OVERRIDE(fastpath_, glIsFramebuffer);
 214                 COREGL_OVERRIDE(fastpath_, glDeleteFramebuffers);
 215                 COREGL_OVERRIDE(fastpath_, glGetFramebufferAttachmentParameteriv);
 216
 217                 COREGL_OVERRIDE(fastpath_, glGenRenderbuffers);
 218                 COREGL_OVERRIDE(fastpath_, glBindRenderbuffer);
 219                 COREGL_OVERRIDE(fastpath_, glFramebufferRenderbuffer);
 220                 COREGL_OVERRIDE(fastpath_, glIsRenderbuffer);
 221                 COREGL_OVERRIDE(fastpath_, glDeleteRenderbuffers);
 222
 223                 COREGL_OVERRIDE(fastpath_, glCreateShader);
 224                 COREGL_OVERRIDE(fastpath_, glCreateProgram);
 225                 COREGL_OVERRIDE(fastpath_, glAttachShader);
 226                 COREGL_OVERRIDE(fastpath_, glCompileShader);
 227                 COREGL_OVERRIDE(fastpath_, glShaderBinary);
 228                 COREGL_OVERRIDE(fastpath_, glDeleteShader);
 229                 COREGL_OVERRIDE(fastpath_, glDetachShader);
 230                 COREGL_OVERRIDE(fastpath_, glGetShaderiv);
 231                 COREGL_OVERRIDE(fastpath_, glGetShaderInfoLog);
 232                 COREGL_OVERRIDE(fastpath_, glGetShaderSource);
 233                 COREGL_OVERRIDE(fastpath_, glIsShader);
 234                 COREGL_OVERRIDE(fastpath_, glShaderSource);
 235                 COREGL_OVERRIDE(fastpath_, glBindAttribLocation);
 236                 COREGL_OVERRIDE(fastpath_, glDeleteProgram);
 237                 COREGL_OVERRIDE(fastpath_, glGetActiveAttrib);
 238                 COREGL_OVERRIDE(fastpath_, glGetActiveUniform);
 239                 COREGL_OVERRIDE(fastpath_, glGetAttachedShaders);
 240                 COREGL_OVERRIDE(fastpath_, glGetAttribLocation);
 241                 COREGL_OVERRIDE(fastpath_, glGetProgramiv);
 242                 COREGL_OVERRIDE(fastpath_, glGetProgramInfoLog);
 243                 COREGL_OVERRIDE(fastpath_, glGetUniformfv);
 244                 COREGL_OVERRIDE(fastpath_, glGetUniformiv);
 245                 COREGL_OVERRIDE(fastpath_, glGetUniformLocation);
 246                 COREGL_OVERRIDE(fastpath_, glIsProgram);
 247                 COREGL_OVERRIDE(fastpath_, glLinkProgram);
 248                 COREGL_OVERRIDE(fastpath_, glUseProgram);
 249                 COREGL_OVERRIDE(fastpath_, glValidateProgram);
 250
 251                 COREGL_OVERRIDE(fastpath_, glBlendColor);
 252                 COREGL_OVERRIDE(fastpath_, glBlendEquation);
 253                 COREGL_OVERRIDE(fastpath_, glBlendEquationSeparate);
 254                 COREGL_OVERRIDE(fastpath_, glBlendFunc);
 255                 COREGL_OVERRIDE(fastpath_, glBlendFuncSeparate);
 256                 COREGL_OVERRIDE(fastpath_, glClearColor);
 257                 COREGL_OVERRIDE(fastpath_, glClearDepthf);
 258                 COREGL_OVERRIDE(fastpath_, glClearStencil);
 259                 COREGL_OVERRIDE(fastpath_, glColorMask);
 260                 COREGL_OVERRIDE(fastpath_, glCullFace);
 261                 COREGL_OVERRIDE(fastpath_, glDepthFunc);
 262                 COREGL_OVERRIDE(fastpath_, glDepthMask);
 263                 COREGL_OVERRIDE(fastpath_, glDepthRangef);
 264                 COREGL_OVERRIDE(fastpath_, glDisable);
 265                 COREGL_OVERRIDE(fastpath_, glDisableVertexAttribArray);
 266                 COREGL_OVERRIDE(fastpath_, glEnable);
 267                 COREGL_OVERRIDE(fastpath_, glEnableVertexAttribArray);
 268                 COREGL_OVERRIDE(fastpath_, glFrontFace);
 269                 COREGL_OVERRIDE(fastpath_, glHint);
 270                 COREGL_OVERRIDE(fastpath_, glLineWidth);
 271                 COREGL_OVERRIDE(fastpath_, glPixelStorei);
 272                 COREGL_OVERRIDE(fastpath_, glPolygonOffset);
 273                 COREGL_OVERRIDE(fastpath_, glSampleCoverage);
 274                 COREGL_OVERRIDE(fastpath_, glScissor);
 275                 COREGL_OVERRIDE(fastpath_, glStencilFunc);
 276                 COREGL_OVERRIDE(fastpath_, glStencilFuncSeparate);
 277                 COREGL_OVERRIDE(fastpath_, glStencilMask);
 278                 COREGL_OVERRIDE(fastpath_, glStencilMaskSeparate);
 279                 COREGL_OVERRIDE(fastpath_, glStencilOp);
 280                 COREGL_OVERRIDE(fastpath_, glStencilOpSeparate);
 281                 COREGL_OVERRIDE(fastpath_, glVertexAttrib1f);
 282                 COREGL_OVERRIDE(fastpath_, glVertexAttrib1fv);
 283                 COREGL_OVERRIDE(fastpath_, glVertexAttrib2f);
 284                 COREGL_OVERRIDE(fastpath_, glVertexAttrib2fv);
 285                 COREGL_OVERRIDE(fastpath_, glVertexAttrib3f);
 286                 COREGL_OVERRIDE(fastpath_, glVertexAttrib3fv);
 287                 COREGL_OVERRIDE(fastpath_, glVertexAttrib4f);
 288                 COREGL_OVERRIDE(fastpath_, glVertexAttrib4fv);
 289                 COREGL_OVERRIDE(fastpath_, glVertexAttribPointer);
 290                 COREGL_OVERRIDE(fastpath_, glViewport);
 291
 292                 COREGL_OVERRIDE(fastpath_, glFramebufferTexture2DMultisampleEXT);
 293                 COREGL_OVERRIDE(fastpath_, glGetProgramBinaryOES);
 294                 COREGL_OVERRIDE(fastpath_, glProgramBinaryOES);
 295                 COREGL_OVERRIDE(fastpath_, glProgramParameteriEXT);
 296                 COREGL_OVERRIDE(fastpath_, glEGLImageTargetTexture2DOES);
 297                 COREGL_OVERRIDE(fastpath_, glFramebufferTexture3DOES);
 298
 299         }
 300         else
 301         {
 302                 COREGL_LOG("\E[40;35;1m[CoreGL] SKIP GL FASTPATH...\E[0m\n");
 303         }
 304 }
 305
 306 #undef OVERRIDE
 307
 308 static inline GL_Object_Hash_Base *
 309 _get_shared_object_hash(GL_Shared_Object_State *sostate, GL_Object_Type type)
 310 {
 311         switch (type)
 312         {
 313                 case GL_OBJECT_TYPE_TEXTURE:
 314                         return &sostate->texture;
 315                 case GL_OBJECT_TYPE_BUFFER:
 316                         return &sostate->buffer;
 317                 case GL_OBJECT_TYPE_FRAMEBUFFER:
 318                         return &sostate->framebuffer;
 319                 case GL_OBJECT_TYPE_RENDERBUFFER:
 320                         return &sostate->renderbuffer;
 321                 case GL_OBJECT_TYPE_PROGRAM:
 322                         return &sostate->program;
 323                 default:
 324                         return NULL;
 325         }
 326 }
 327
 328 static inline GL_Object_Hash_Base *
 329 _get_shared_object_hash_real(GL_Shared_Object_State *sostate, GL_Object_Type type)
 330 {
 331         switch (type)
 332         {
 333                 case GL_OBJECT_TYPE_TEXTURE:
 334                         return &sostate->texture_real;
 335                 case GL_OBJECT_TYPE_BUFFER:
 336                         return &sostate->buffer_real;
 337                 case GL_OBJECT_TYPE_FRAMEBUFFER:
 338                         return &sostate->framebuffer_real;
 339                 case GL_OBJECT_TYPE_RENDERBUFFER:
 340                         return &sostate->renderbuffer_real;
 341                 case GL_OBJECT_TYPE_PROGRAM:
 342                         return &sostate->program_real;
 343                 default:
 344                         return NULL;
 345         }
 346 }
 347
 348 int
 349 fastpath_add_context_state_to_list(const void *option, const int option_len, GLContextState *cstate, Mutex *mtx)
 350 {
 351         int ret = 0;
 352         int tid = 0;
 353         GLContext_List *current = NULL;
 354         GLContext_List *newitm = NULL;
 355
 356         if (mtx != NULL) AST(mutex_lock(mtx) == 1);
 357
 358         AST(cstate != NULL);
 359
 360         tid = get_current_thread();
 361
 362         current = glctx_list;
 363         while (current != NULL)
 364         {
 365                 if (current->option_len == option_len &&
 366                     memcmp(current->option, option, option_len) == 0 &&
 367                     current->thread_id == tid)
 368                 {
 369                         AST(current->cstate == cstate);
 370                         goto finish;
 371                 }
 372                 current = current->next;
 373         }
 374
 375         newitm = (GLContext_List *)calloc(1, sizeof(GLContext_List));
 376         if (newitm == NULL)
 377         {
 378                 COREGL_ERR("Failed to create context list.\n");
 379                 goto finish;
 380         }
 381
 382         newitm->cstate = cstate;
 383         newitm->thread_id = tid;
 384         newitm->option_len = option_len;
 385         newitm->option = (void *)malloc(option_len);
 386         memcpy(newitm->option, option, option_len);
 387
 388         if (glctx_list != NULL)
 389                 newitm->next = glctx_list;
 390
 391         glctx_list = newitm;
 392
 393         ret = 1;
 394         goto finish;
 395
 396 finish:
 397         if (ret != 1)
 398         {
 399                 if (newitm != NULL)
 400                 {
 401                         free(newitm);
 402                         newitm = NULL;
 403                 }
 404                 if (cstate != NULL)
 405                 {
 406                         free(cstate);
 407                         cstate = NULL;
 408                 }
 409         }
 410         if (mtx != NULL) AST(mutex_unlock(mtx) == 1);
 411
 412         return ret;
 413 }
 414
 415 GLContextState *
 416 fastpath_get_context_state_from_list(const void *option, const int option_len, Mutex *mtx)
 417 {
 418         GLContextState *ret = NULL;
 419         GLContext_List *current = NULL;
 420         int tid = 0;
 421
 422         if (mtx != NULL) AST(mutex_lock(mtx) == 1);
 423
 424         tid = get_current_thread();
 425
 426         current = glctx_list;
 427         while (current != NULL)
 428         {
 429                 if (current->option_len == option_len &&
 430                     memcmp(current->option, option, option_len) == 0 &&
 431                     current->thread_id == tid)
 432                 {
 433                         ret = current->cstate;
 434                         goto finish;
 435                 }
 436                 current = current->next;
 437         }
 438         goto finish;
 439
 440 finish:
 441         if (mtx != NULL) AST(mutex_unlock(mtx) == 1);
 442         return ret;
 443 }
 444
 445 int
 446 fastpath_remove_context_states_from_list(GLContextState *cstate, Mutex *mtx)
 447 {
 448         int ret = 0;
 449         int tid = 0;
 450         GLContext_List *olditm = NULL;
 451         GLContext_List *current = NULL;
 452
 453         if (mtx != NULL) AST(mutex_lock(mtx) == 1);
 454
 455         AST(cstate != NULL);
 456
 457         tid = get_current_thread();
 458         current = glctx_list;
 459
 460         while (current != NULL)
 461         {
 462                 if (current->cstate == cstate)
 463                 {
 464                         GLContext_List *nextitm = NULL;
 465                         if (olditm != NULL)
 466                         {
 467                                 olditm->next = current->next;
 468                                 nextitm = olditm->next;
 469                         }
 470                         else
 471                         {
 472                                 glctx_list = current->next;
 473                                 nextitm = glctx_list;
 474                         }
 475                         if (current->option != NULL)
 476                         {
 477                                 AST(current->option_len > 0);
 478                                 free(current->option);
 479                                 current->option = NULL;
 480                                 current->option_len = 0;
 481                         }
 482                         free(current);
 483                         ret = 1;
 484                         current = nextitm;
 485                         continue;
 486                 }
 487                 olditm = current;
 488                 current = current->next;
 489         }
 490         goto finish;
 491
 492 finish:
 493         if (mtx != NULL) AST(mutex_unlock(mtx) == 1);
 494         return ret;
 495 }
 496
 497 void
 498 fastpath_sostate_init(GL_Shared_Object_State *sostate)
 499 {
 500 #define HASH_INIT(hash_base) \
 501         hash_base.hash_field = (GL_Object_Hash **)calloc(1, sizeof(GL_Object_Hash *) * GL_OBJECT_HASH_BASE); \
 502         hash_base.hash_size = GL_OBJECT_HASH_BASE;
 503
 504         HASH_INIT(sostate->texture);
 505         HASH_INIT(sostate->buffer);
 506         HASH_INIT(sostate->framebuffer);
 507         HASH_INIT(sostate->renderbuffer);
 508         HASH_INIT(sostate->program);
 509
 510         HASH_INIT(sostate->texture_real);
 511         HASH_INIT(sostate->buffer_real);
 512         HASH_INIT(sostate->framebuffer_real);
 513         HASH_INIT(sostate->renderbuffer_real);
 514         HASH_INIT(sostate->program_real);
 515
 516 #undef HASH_INIT
 517 }
 518
 519 static void
 520 _add_hash(GL_Object_Hash_Base *hash_base, GL_Object_Hash *data)
 521 {
 522         int array_idx = data->hash_key & (hash_base->hash_size - 1);
 523         if (hash_base->hash_field[array_idx] == NULL)
 524         {
 525                 hash_base->hash_field[array_idx] = data;
 526         }
 527         else
 528         {
 529                 GL_Object_Hash *current = hash_base->hash_field[array_idx];
 530                 while(current->next)
 531                 {
 532                         AST(current->hash_key != data->hash_key);
 533                         current = current->next;
 534                 }
 535                 current->next = data;
 536         }
 537         data->next = NULL;
 538         hash_base->item_size++;
 539 }
 540
 541 static int
 542 _remove_hash(GL_Object_Hash_Base *hash_base, GLuint hash)
 543 {
 544         int ret = 0;
 545         int array_idx = hash & (hash_base->hash_size - 1);
 546
 547         GL_Object_Hash *current = hash_base->hash_field[array_idx];
 548         GL_Object_Hash *prev = NULL;
 549
 550         while(current)
 551         {
 552                 if (current->hash_key == hash)
 553                 {
 554                         if (prev != NULL)
 555                                 prev->next = current->next;
 556                         else
 557                                 hash_base->hash_field[array_idx] = current->next;
 558                         hash_base->item_size--;
 559                         ret = 1;
 560                         break;
 561                 }
 562                 prev = current;
 563                 current = current->next;
 564         }
 565
 566         return ret;
 567 }
 568
 569 static void
 570 _free_hash_list(GL_Object_Hash_Base *hash_base, int free_data)
 571 {
 572         if (hash_base->item_size == 0) return;
 573
 574         for (int i = 0; i < hash_base->hash_size; i++)
 575         {
 576                 if (hash_base->hash_field[i] != NULL)
 577                 {
 578                         GL_Object_Hash *current = hash_base->hash_field[i];
 579
 580                         while (current != NULL)
 581                         {
 582                                 GL_Object_Hash *current_next = current->next;
 583
 584                                 if (free_data == 1 && current->item != NULL)
 585                                 {
 586                                         free(current->item);
 587                                 }
 588
 589                                 free(current);
 590                                 hash_base->item_size--;
 591                                 current = current_next;
 592                         }
 593                 }
 594         }
 595 }
 596
 597 void
 598 fastpath_sostate_deinit(GL_Shared_Object_State *sostate)
 599 {
 600 #define HASH_DEINIT(hash_base, free_data) \
 601         _free_hash_list(&hash_base, free_data); \
 602         free(hash_base.hash_field); \
 603         hash_base.hash_size = 0;
 604
 605         HASH_DEINIT(sostate->texture, 1);
 606         HASH_DEINIT(sostate->buffer, 1);
 607         HASH_DEINIT(sostate->framebuffer, 1);
 608         HASH_DEINIT(sostate->renderbuffer, 1);
 609         HASH_DEINIT(sostate->program, 1);
 610
 611         HASH_DEINIT(sostate->texture_real, 0);
 612         HASH_DEINIT(sostate->buffer_real, 0);
 613         HASH_DEINIT(sostate->framebuffer_real, 0);
 614         HASH_DEINIT(sostate->renderbuffer_real, 0);
 615         HASH_DEINIT(sostate->program_real, 0);
 616
 617 #undef HASH_DEINIT
 618 }
 619
 620 #define FIND_HASH(hash_base, key, ret) \
 621 { \
 622         GL_Object_Hash *fh_current = hash_base->hash_field[(key) & (hash_base->hash_size - 1)]; \
 623         while(fh_current) \
 624         { \
 625                 if (fh_current->hash_key == (key)) \
 626                 { \
 627                         ret = fh_current; \
 628                         break; \
 629                 } \
 630                 fh_current = fh_current->next; \
 631         } \
 632 }
 633
 634 void
 635 _sostate_hash_check(GL_Object_Hash_Base *hash_base)
 636 {
 637         if (hash_base->item_size + 1 < hash_base->hash_size)
 638                 return;
 639
 640         int oldsize = hash_base->hash_size;
 641         GL_Object_Hash **oldfield = hash_base->hash_field;
 642
 643         hash_base->hash_size = oldsize << 1;
 644         hash_base->hash_field = (GL_Object_Hash **)calloc(1, sizeof(GL_Object_Hash *) * hash_base->hash_size);
 645         AST(hash_base->hash_field != NULL);
 646
 647         for (int i = 0; i < oldsize; i++)
 648         {
 649                 if (oldfield[i] != NULL)
 650                 {
 651                         GL_Object_Hash *current = oldfield[i];
 652
 653                         while (current != NULL)
 654                         {
 655                                 GL_Object_Hash *current_next = current->next;
 656                                 _add_hash(hash_base, current);
 657                                 hash_base->item_size--;
 658                                 current = current_next;
 659                         }
 660                 }
 661         }
 662         free(oldfield);
 663
 664 }
 665
 666 GLuint
 667 fastpath_sostate_create_object(GL_Shared_Object_State *sostate, GL_Object_Type type, GLuint real_name)
 668 {
 669         GLuint ret = _COREGL_INT_INIT_VALUE;
 670
 671         GL_Object_Hash_Base *hash_base = NULL;
 672         GL_Object_Hash_Base *hash_base_real = NULL;
 673         int newid = _COREGL_INT_INIT_VALUE;
 674
 675         hash_base = _get_shared_object_hash(sostate, type);
 676         hash_base_real = _get_shared_object_hash_real(sostate, type);
 677
 678         newid = hash_base->last_id + 1;
 679         if (newid >= hash_base->hash_size)
 680         {
 681                 hash_base->is_looped = 1;
 682                 newid = 1;
 683                 hash_base->last_id = 1;
 684         }
 685
 686         if (hash_base->is_looped != 0)
 687         {
 688                 int i;
 689                 int findingid = newid;
 690                 newid = -1;
 691                 for (i = 0; i < hash_base->hash_size; i++)
 692                 {
 693                         GL_Object_Hash *exist_hash = NULL;
 694                         FIND_HASH(hash_base, findingid, exist_hash);
 695                         if (exist_hash == NULL)
 696                         {
 697                                 newid = findingid;
 698                                 break;
 699                         }
 700                         findingid++;
 701                         if (findingid >= hash_base->hash_size) findingid = 1;
 702                 }
 703                 AST(newid != -1);
 704         }
 705         hash_base->last_id = newid;
 706
 707         {
 708                 GL_Object *newobj = (GL_Object *)calloc(1, sizeof(GL_Object));
 709                 AST(newobj != NULL);
 710                 newobj->id = (int)type + newid;
 711                 newobj->real_id = real_name;
 712                 newobj->ref_count = 1;
 713                 ret = newobj->id;
 714
 715                 GL_Object_Hash *newobj_hash = (GL_Object_Hash *)calloc(1, sizeof(GL_Object_Hash));
 716                 AST(newobj_hash != NULL);
 717                 newobj_hash->item = newobj;
 718                 newobj_hash->hash_key = newid;
 719                 _add_hash(hash_base, newobj_hash);
 720
 721                 GL_Object_Hash *newobj_hash_real = (GL_Object_Hash *)calloc(1, sizeof(GL_Object_Hash));
 722                 AST(newobj_hash_real != NULL);
 723                 newobj_hash_real->item = newobj;
 724                 newobj_hash_real->hash_key = real_name;
 725                 _add_hash(hash_base_real, newobj_hash_real);
 726         }
 727
 728         _sostate_hash_check(hash_base);
 729         _sostate_hash_check(hash_base_real);
 730
 731         goto finish;
 732
 733 finish:
 734         return ret;
 735 }
 736
 737 #define FIND_OBJ_FROM_HASH_WITH_VERIFY(hash_base, hash, object) \
 738         if ((hash) < 0) { ret = 0; goto finish; } \
 739         { \
 740                 GL_Object_Hash *object_hash = NULL; \
 741                 FIND_HASH((hash_base), (hash), object_hash); \
 742                 if (object_hash == NULL) { ret = 0; goto finish; } \
 743                 (object) = object_hash->item; \
 744                 if ((object) == NULL) { ret = 0; goto finish; } \
 745         }
 746
 747 GLuint
 748 fastpath_sostate_remove_object(GL_Shared_Object_State *sostate, GL_Object_Type type, GLuint glue_name)
 749 {
 750         GLuint ret = _COREGL_INT_INIT_VALUE;
 751
 752         GL_Object_Hash_Base *hash_base = NULL;
 753         GL_Object_Hash_Base *hash_base_real = NULL;
 754         GL_Object *object = NULL;
 755
 756         hash_base = _get_shared_object_hash(sostate, type);
 757         hash_base_real = _get_shared_object_hash_real(sostate, type);
 758
 759         FIND_OBJ_FROM_HASH_WITH_VERIFY(hash_base, glue_name - (int)type, object);
 760
 761         object->ref_count--;
 762
 763         if (object->ref_count <= 0)
 764         {
 765                 GL_Object_Hash *object_hash = NULL;
 766
 767                 FIND_HASH(hash_base, object->id - (int)type, object_hash);
 768                 AST(object_hash != NULL);
 769                 _remove_hash(hash_base, object->id - (int)type);
 770                 free(object_hash);
 771                 object_hash = NULL;
 772
 773                 FIND_HASH(hash_base_real, object->real_id, object_hash);
 774                 AST(object_hash != NULL);
 775                 _remove_hash(hash_base_real, object->real_id);
 776                 free(object_hash);
 777                 object_hash = NULL;
 778
 779                 free(object);
 780                 object = NULL;
 781         }
 782
 783         ret = 1;
 784         goto finish;
 785
 786 finish:
 787         return ret;
 788 }
 789
 790 GLuint
 791 fastpath_sostate_get_object(GL_Shared_Object_State *sostate, GL_Object_Type type, GLuint glue_name)
 792 {
 793         GLuint ret = _COREGL_INT_INIT_VALUE;
 794
 795         GL_Object_Hash_Base *hash_base = NULL;
 796         GL_Object *object = NULL;
 797
 798         hash_base = _get_shared_object_hash(sostate, type);
 799
 800         FIND_OBJ_FROM_HASH_WITH_VERIFY(hash_base, glue_name - (int)type, object);
 801
 802         ret = object->real_id;
 803         goto finish;
 804
 805 finish:
 806         return ret;
 807 }
 808
 809 GLint
 810 fastpath_sostate_set_object_tag(GL_Shared_Object_State *sostate, GL_Object_Type type, GLuint glue_name, GLvoid *tag)
 811 {
 812         GLint ret = _COREGL_INT_INIT_VALUE;
 813
 814         GL_Object_Hash_Base *hash_base = NULL;
 815         GL_Object *object = NULL;
 816         int hash = _COREGL_INT_INIT_VALUE;
 817
 818         hash_base = _get_shared_object_hash(sostate, type);
 819
 820         hash = glue_name - (int)type;
 821
 822         FIND_OBJ_FROM_HASH_WITH_VERIFY(hash_base, hash, object);
 823
 824         AST(object->tag == NULL);
 825         object->tag = tag;
 826         ret = 1;
 827         goto finish;
 828
 829 finish:
 830         return ret;
 831 }
 832
 833 GLvoid *
 834 fastpath_sostate_get_object_tag(GL_Shared_Object_State *sostate, GL_Object_Type type, GLuint glue_name)
 835 {
 836         GLvoid *ret = NULL;
 837
 838         GL_Object_Hash_Base *hash_base = NULL;
 839         GL_Object *object = NULL;
 840
 841         hash_base = _get_shared_object_hash(sostate, type);
 842
 843         FIND_OBJ_FROM_HASH_WITH_VERIFY(hash_base, glue_name - (int)type, object);
 844
 845         ret = object->tag;
 846         goto finish;
 847
 848 finish:
 849         return ret;
 850 }
 851
 852 GLuint
 853 fastpath_sostate_find_object(GL_Shared_Object_State *sostate, GL_Object_Type type, GLuint real_name)
 854 {
 855         GLuint ret = _COREGL_INT_INIT_VALUE;
 856
 857         GL_Object_Hash_Base *hash_base_real = NULL;
 858         GL_Object *object = NULL;
 859
 860         hash_base_real = _get_shared_object_hash_real(sostate, type);
 861
 862         FIND_OBJ_FROM_HASH_WITH_VERIFY(hash_base_real, real_name, object);
 863
 864         ret = object->id;
 865         goto finish;
 866
 867 finish:
 868         return ret;
 869 }
 870
 871 GLint
 872 fastpath_sostate_use_object(GL_Shared_Object_State *sostate, GL_Object_Type type, GLuint glue_name)
 873 {
 874         GLint ret = _COREGL_INT_INIT_VALUE;
 875
 876         GL_Object_Hash_Base *hash_base = NULL;
 877         GL_Object *object = NULL;
 878
 879         hash_base = _get_shared_object_hash(sostate, type);
 880
 881         FIND_OBJ_FROM_HASH_WITH_VERIFY(hash_base, glue_name - (int)type, object);
 882
 883         object->ref_count++;
 884         ret = 1;
 885         goto finish;
 886
 887 finish:
 888         return ret;
 889 }
 890
 891 void
 892 fastpath_dump_context_states(GLGlueContext *ctx, int force_output)
 893 {
 894         static struct timeval tv_last = { 0, 0 };
 895
 896         if (unlikely(trace_state_flag != 1)) return;
 897
 898         if (!force_output)
 899         {
 900                 struct timeval tv_now = { 0, 0 };
 901                 AST(gettimeofday(&tv_now, NULL) == 0);
 902                 if (tv_now.tv_sec - tv_last.tv_sec < _COREGL_TRACE_OUTPUT_INTERVAL_SEC)
 903                 {
 904                         goto finish;
 905                 }
 906                 tv_last = tv_now;
 907         }
 908
 909         TRACE("\n");
 910         TRACE("\E[0;40;34m========================================================================================================================\E[0m\n");
 911         TRACE("\E[40;32;1m  State info \E[1;37;1m: <PID = %d> GlueCTX = %p\E[0m\n", getpid(), ctx);
 912         TRACE("\E[0;40;34m========================================================================================================================\E[0m\n");
 913
 914 #define PRINTF_CHAR_GLenum "%10d"
 915 #define PRINTF_CHAR_GLboolean "%10d"
 916 #define PRINTF_CHAR_GLint "%10d"
 917 #define PRINTF_CHAR_GLsizei "%10u"
 918 #define PRINTF_CHAR_GLuint "%10u"
 919 #define PRINTF_CHAR_GLuintmask "0x%8X"
 920
 921 #define PRINTF_CHAR_GLclampf "%10.6f"
 922 #define PRINTF_CHAR_GLfloat "%10.6f"
 923
 924 #define PRINTF_CHAR_GLvoidptr "%10p"
 925
 926 #define PRINTF_CHAR(type) PRINTF_CHAR_##type
 927
 928 #define INITIAL_CTX initial_ctx
 929 #define GLUE_STATE(TYPE, NAME, SIZE, ARRAY_SIZE, DEFAULT_STMT, GET_STMT)  \
 930    { \
 931       TYPE valuedata[SIZE]; \
 932       TYPE *value = NULL; \
 933       value = valuedata; GET_STMT; value = valuedata; \
 934       TRACE("\E[40;37;1m %-30.30s : (\E[0m ", #NAME); \
 935       for (int i = 0; i < SIZE; i++) \
 936       { \
 937          if (i > 0) { \
 938             if (i % 4 == 0) \
 939                TRACE("\n %-30.30s     ", "");\
 940             else \
 941                TRACE(", "); \
 942          } \
 943          TRACE(PRINTF_CHAR(TYPE), ctx->NAME[i]); \
 944          TRACE("["PRINTF_CHAR(TYPE)"]", value[i]); \
 945       } \
 946       TRACE(" \E[40;37;1m)\E[0m\n"); \
 947    }
 948 # include "coregl_fastpath_state.h"
 949 #undef GLUE_STATE
 950 #undef INITIAL_CTX
 951
 952         TRACE("\E[0;40;34m========================================================================================================================\E[0m\n");
 953         TRACE("\n");
 954
 955         TRACE_END();
 956
 957 finish:
 958         return;
 959 }
 960
 961 int
 962 fastpath_init_context_states(GLGlueContext *ctx)
 963 {
 964         int ret = 0;
 965
 966         AST(mutex_lock(&init_context_mutex) == 1);
 967
 968         if (ctx == NULL)
 969         {
 970                 COREGL_ERR("Context NULL\n");
 971                 ret = 0;
 972                 goto finish;
 973         }
 974
 975         AST(ctx->initialized == 0);
 976         AST(ctx->sostate != NULL);
 977
 978         if (initial_ctx == NULL)
 979         {
 980                 initial_ctx = (GLGlueContext *)calloc(1, sizeof(GLGlueContext));
 981                 AST(initial_ctx != NULL);
 982
 983 //#define FORCE_DEFAULT_VALUE
 984 #ifdef FORCE_DEFAULT_VALUE
 985 # define INITIAL_CTX initial_ctx
 986 # define GLUE_STATE(TYPE, NAME, SIZE, ARRAY_SIZE, DEFAULT_STMT, GET_STMT)  \
 987       { \
 988          int i; \
 989          TYPE valuedata[SIZE]; \
 990          TYPE *value = NULL; \
 991          memset(valuedata, 0xcc, sizeof(TYPE) * SIZE); \
 992          value = valuedata; DEFAULT_STMT; value = valuedata; \
 993          for (i = 0; i < SIZE; i++) \
 994          { \
 995             if (*((char *)(&value[i])) == 0xcc) \
 996             { \
 997                memset(&value[i], 0xaa, sizeof(TYPE)); \
 998                value = valuedata; DEFAULT_STMT; value = valuedata; \
 999                if (*((char *)(&value[i])) == 0xaa) \
1000                { \
1001                   COREGL_WRN("\E[40;31;1mGL-state '"#NAME"' cannot be retrieved\E[0m\n"); \
1002                   break; \
1003                } \
1004             } \
1005             initial_ctx->NAME[i] = value[i]; \
1006          } \
1007       }
1008 #  include "coregl_fastpath_state.h"
1009 # undef GLUE_STATE
1010 # undef INITIAL_CTX
1011 #else
1012 # define INITIAL_CTX initial_ctx
1013 # define SET_GLUE_VALUE(DEFAULT_STMT, FALLBACK_STMT) \
1014       if (try_step == 1) \
1015       { \
1016          value = valuedata; DEFAULT_STMT; value = valuedata; \
1017       } \
1018       else \
1019       { \
1020          value = valuedata; FALLBACK_STMT; value = valuedata; \
1021       }
1022
1023 # define GLUE_STATE(TYPE, NAME, SIZE, ARRAY_SIZE, DEFAULT_STMT, GET_STMT)  \
1024       { \
1025          int i; \
1026          int try_step = 0;\
1027          TYPE valuedata[SIZE]; \
1028          TYPE *value = NULL; \
1029          memset(valuedata, 0xcc, sizeof(TYPE) * SIZE); \
1030          do { \
1031             try_step++; \
1032             SET_GLUE_VALUE(GET_STMT, DEFAULT_STMT); \
1033             for (i = 0; i < SIZE; i++) \
1034             { \
1035                if (*((char *)(&value[i])) == 0xcc) \
1036                { \
1037                   memset(&value[i], 0xaa, sizeof(TYPE)); \
1038                   SET_GLUE_VALUE(GET_STMT, DEFAULT_STMT); \
1039                   if (*((char *)(&value[i])) == 0xaa) \
1040                   { \
1041                      try_step++; \
1042                      if (try_step == 2) \
1043                      { \
1044                         COREGL_WRN("\E[40;31;1mGL-state '"#NAME"' cannot be retrieved\E[0m\n"); \
1045                      } \
1046                      break; \
1047                   } \
1048                } \
1049                initial_ctx->NAME[i] = value[i]; \
1050             } \
1051             if (try_step != 2) \
1052             { \
1053                value = valuedata; DEFAULT_STMT; value = valuedata; \
1054                for (i = 0; i < SIZE; i++) \
1055                { \
1056                   if (initial_ctx->NAME[i] != value[i]) \
1057                   { \
1058                      COREGL_WRN("GL-state '"#NAME"'[%d] value ["PRINTF_CHAR(TYPE)"] is different from SPEC-DEFAULT ["PRINTF_CHAR(TYPE)"]\n", i, initial_ctx->NAME[i], value[i]); \
1059                   } \
1060                } \
1061             } \
1062          } \
1063          while (try_step == 2); \
1064       }
1065 #  include "coregl_fastpath_state.h"
1066 # undef SET_GLUE_VALUE
1067 # undef GLUE_STATE
1068 # undef INITIAL_CTX
1069 #endif
1070
1071                 if (initial_ctx->gl_num_vertex_attribs[0] > MAX_VERTEX_ATTRIBS)
1072                 {
1073                         COREGL_WRN("\E[40;31;1mNumber of vertex attrib is too big! (%d-%d)\E[0m\n", MAX_VERTEX_ATTRIBS, initial_ctx->gl_num_vertex_attribs[0]);
1074                 }
1075                 if (initial_ctx->gl_num_tex_units[0] > MAX_TEXTURE_UNITS)
1076                 {
1077                         COREGL_WRN("\E[40;31;1mNumber of texture unit is too big! (%d-%d)\E[0m\n", MAX_TEXTURE_UNITS, initial_ctx->gl_num_tex_units[0]);
1078                 }
1079         }
1080
1081         {
1082                 int i;
1083 #define INITIAL_CTX initial_ctx
1084 #define GLUE_STATE(TYPE, NAME, SIZE, ARRAY_SIZE, DEFAULT_STMT, GET_STMT)  \
1085          for (i = 0; i < SIZE; i++) \
1086          { \
1087             ctx->NAME[i] = initial_ctx->NAME[i]; \
1088          }
1089 # include "coregl_fastpath_state.h"
1090 #undef GLUE_STATE
1091 #undef INITIAL_CTX
1092         }
1093
1094         ctx->initialized = 1;
1095         ret = 1;
1096         goto finish;
1097
1098 finish:
1099         AST(mutex_unlock(&init_context_mutex) == 1);
1100
1101         return ret;
1102 }
1103
1104 #ifdef COREGL_USE_MODULE_TRACEPATH
1105 extern void *tracepath_api_trace_begin(const char *name, void *hint, int trace_total_time);
1106 extern void *tracepath_api_trace_end(const char *name, void *hint, int trace_total_time);
1107 #endif
1108
1109 #define CHECK_GL_ERROR(func) \
1110         { \
1111                 func; \
1112                 int err = _orig_fastpath_glGetError(); \
1113                 if (err != GL_NO_ERROR) \
1114                 { \
1115                         COREGL_ERR("\E[40;31;1m(GL %p) : %s returns GL error 0x%X\E[0m\n", oldctx->cstate, #func, err); \
1116                         goto finish; \
1117                 } \
1118         }
1119
1120 int
1121 fastpath_make_context_current(GLGlueContext *oldctx, GLGlueContext *newctx)
1122 {
1123         int ret = 0;
1124         unsigned char flag = 0;
1125         int i = 0;
1126
1127         if (debug_nofp == 1)
1128         {
1129                 ret = 1;
1130                 goto finish;
1131         }
1132
1133         // Return if they're the same
1134         if (oldctx == newctx)
1135         {
1136                 ret = 1;
1137                 goto finish;
1138         }
1139
1140 #define STATE_COMPARE(state) \
1141    if ((oldctx->state) != (newctx->state))
1142
1143 #define STATES_COMPARE(state_ptr, bytes) \
1144    if ((memcmp((oldctx->state_ptr), (newctx->state_ptr), (bytes))) != 0)
1145
1146
1147 #ifdef COREGL_USE_MODULE_TRACEPATH
1148         static void *trace_hint_glfinish = NULL;
1149         trace_hint_glfinish = tracepath_api_trace_begin("eglMakeCurrent(FP glFinish)", trace_hint_glfinish, 0);
1150 #endif // COREGL_USE_MODULE_TRACEPATH
1151
1152         {
1153                 int err = _orig_fastpath_glGetError();
1154                 if (err != GL_NO_ERROR && oldctx->gl_error == GL_NO_ERROR)
1155                         oldctx->gl_error = err;
1156         }
1157
1158         CHECK_GL_ERROR(_orig_fastpath_glFlush())
1159
1160 #ifdef COREGL_USE_MODULE_TRACEPATH
1161         tracepath_api_trace_end("eglMakeCurrent(FP glFinish)", trace_hint_glfinish, 0);
1162 #endif // COREGL_USE_MODULE_TRACEPATH
1163
1164 #ifdef COREGL_USE_MODULE_TRACEPATH
1165         static void *trace_hint_bindbuffers = NULL;
1166         trace_hint_bindbuffers = tracepath_api_trace_begin("eglMakeCurrent(FP bind buffers)", trace_hint_bindbuffers, 0);
1167 #endif // COREGL_USE_MODULE_TRACEPATH
1168
1169
1170         //------------------//
1171         // _bind_flag
1172         flag = oldctx->_bind_flag | newctx->_bind_flag;
1173         if (flag)
1174         {
1175                 STATE_COMPARE(gl_array_buffer_binding[0])
1176                 {
1177                         CHECK_GL_ERROR(_orig_fastpath_glBindBuffer(GL_ARRAY_BUFFER, newctx->gl_array_buffer_binding[0]))
1178                 }
1179                 STATE_COMPARE(gl_element_array_buffer_binding[0])
1180                 {
1181                         CHECK_GL_ERROR(_orig_fastpath_glBindBuffer(GL_ELEMENT_ARRAY_BUFFER, newctx->gl_element_array_buffer_binding[0]))
1182                 }
1183                 STATE_COMPARE(gl_framebuffer_binding[0])
1184                 {
1185                         CHECK_GL_ERROR(_orig_fastpath_glBindFramebuffer(GL_FRAMEBUFFER, newctx->gl_framebuffer_binding[0]))
1186                 }
1187                 STATE_COMPARE(gl_renderbuffer_binding[0])
1188                 {
1189                         CHECK_GL_ERROR(_orig_fastpath_glBindRenderbuffer(GL_RENDERBUFFER, newctx->gl_renderbuffer_binding[0]))
1190                 }
1191         }
1192
1193 #ifdef COREGL_USE_MODULE_TRACEPATH
1194         tracepath_api_trace_end("eglMakeCurrent(FP bind buffers)", trace_hint_bindbuffers, 0);
1195 #endif // COREGL_USE_MODULE_TRACEPATH
1196
1197
1198         //------------------//
1199         // Enable States
1200         // _enable_flag1
1201 #ifdef COREGL_USE_MODULE_TRACEPATH
1202         static void *trace_hint_enable_states = NULL;
1203         trace_hint_enable_states = tracepath_api_trace_begin("eglMakeCurrent(FP enable states)", trace_hint_enable_states, 0);
1204 #endif // COREGL_USE_MODULE_TRACEPATH
1205
1206         flag = oldctx->_enable_flag1 | newctx->_enable_flag1;
1207         if (flag)
1208         {
1209                 STATE_COMPARE(gl_blend[0])
1210                 {
1211                         if (newctx->gl_blend[0])
1212                         {
1213                                 CHECK_GL_ERROR(_orig_fastpath_glEnable(GL_BLEND))
1214                         }
1215                         else
1216                                 CHECK_GL_ERROR(_orig_fastpath_glDisable(GL_BLEND))
1217                         }
1218                 STATE_COMPARE(gl_cull_face[0])
1219                 {
1220                         if (newctx->gl_cull_face[0])
1221                         {
1222                                 CHECK_GL_ERROR(_orig_fastpath_glEnable(GL_CULL_FACE))
1223                         }
1224                         else
1225                                 CHECK_GL_ERROR(_orig_fastpath_glDisable(GL_CULL_FACE))
1226                         }
1227                 STATE_COMPARE(gl_depth_test[0])
1228                 {
1229                         if (newctx->gl_depth_test[0])
1230                         {
1231                                 CHECK_GL_ERROR(_orig_fastpath_glEnable(GL_DEPTH_TEST))
1232                         }
1233                         else
1234                                 CHECK_GL_ERROR(_orig_fastpath_glDisable(GL_DEPTH_TEST))
1235                         }
1236                 STATE_COMPARE(gl_dither[0])
1237                 {
1238                         if (newctx->gl_dither[0])
1239                         {
1240                                 CHECK_GL_ERROR(_orig_fastpath_glEnable(GL_DITHER))
1241                         }
1242                         else
1243                                 CHECK_GL_ERROR(_orig_fastpath_glDisable(GL_DITHER))
1244                         }
1245         }
1246
1247         // _enable_flag2
1248         flag = oldctx->_enable_flag2 | newctx->_enable_flag2;
1249         if (flag)
1250         {
1251                 STATE_COMPARE(gl_polygon_offset_fill[0])
1252                 {
1253                         if (newctx->gl_polygon_offset_fill[0])
1254                         {
1255                                 CHECK_GL_ERROR(_orig_fastpath_glEnable(GL_POLYGON_OFFSET_FILL))
1256                         }
1257                         else
1258                                 CHECK_GL_ERROR(_orig_fastpath_glDisable(GL_POLYGON_OFFSET_FILL))
1259                         }
1260                 STATE_COMPARE(gl_sample_alpha_to_coverage[0])
1261                 {
1262                         if (newctx->gl_sample_alpha_to_coverage[0])
1263                         {
1264                                 CHECK_GL_ERROR(_orig_fastpath_glEnable(GL_SAMPLE_ALPHA_TO_COVERAGE))
1265                         }
1266                         else
1267                                 CHECK_GL_ERROR(_orig_fastpath_glDisable(GL_SAMPLE_ALPHA_TO_COVERAGE))
1268                         }
1269                 STATE_COMPARE(gl_sample_coverage[0])
1270                 {
1271                         if (newctx->gl_sample_coverage[0])
1272                         {
1273                                 CHECK_GL_ERROR(_orig_fastpath_glEnable(GL_SAMPLE_COVERAGE))
1274                         }
1275                         else
1276                                 CHECK_GL_ERROR(_orig_fastpath_glDisable(GL_SAMPLE_COVERAGE))
1277                         }
1278                 STATE_COMPARE(gl_scissor_test[0])
1279                 {
1280                         if (newctx->gl_scissor_test[0])
1281                         {
1282                                 CHECK_GL_ERROR(_orig_fastpath_glEnable(GL_SCISSOR_TEST))
1283                         }
1284                         else
1285                                 CHECK_GL_ERROR(_orig_fastpath_glDisable(GL_SCISSOR_TEST))
1286                         }
1287                 STATE_COMPARE(gl_stencil_test[0])
1288                 {
1289                         if (newctx->gl_stencil_test[0])
1290                         {
1291                                 CHECK_GL_ERROR(_orig_fastpath_glEnable(GL_STENCIL_TEST))
1292                         }
1293                         else
1294                                 CHECK_GL_ERROR(_orig_fastpath_glDisable(GL_STENCIL_TEST))
1295                         }
1296         }
1297
1298 #ifdef COREGL_USE_MODULE_TRACEPATH
1299         tracepath_api_trace_end("eglMakeCurrent(FP enable states)", trace_hint_enable_states, 0);
1300 #endif // COREGL_USE_MODULE_TRACEPATH
1301
1302         //------------------//
1303         // _clear_flag1
1304 #ifdef COREGL_USE_MODULE_TRACEPATH
1305         static void *trace_hint_clear_viewport = NULL;
1306         trace_hint_clear_viewport = tracepath_api_trace_begin("eglMakeCurrent(FP clear/viewport)", trace_hint_clear_viewport, 0);
1307 #endif // COREGL_USE_MODULE_TRACEPATH
1308
1309         flag = oldctx->_clear_flag1 | newctx->_clear_flag1;
1310         if (flag)
1311         {
1312                 // Viewport.
1313                 STATES_COMPARE(gl_viewport, 4 * sizeof(GLint))
1314                 {
1315                         CHECK_GL_ERROR(_orig_fastpath_glViewport(newctx->gl_viewport[0],
1316                                        newctx->gl_viewport[1],
1317                                        newctx->gl_viewport[2],
1318                                        newctx->gl_viewport[3]))
1319                 }
1320
1321                 STATE_COMPARE(gl_current_program[0])
1322                 {
1323                         CHECK_GL_ERROR(_orig_fastpath_glUseProgram(newctx->gl_current_program[0]))
1324                 }
1325                 STATES_COMPARE(gl_color_clear_value, 4 * sizeof(GLclampf))
1326                 {
1327                         CHECK_GL_ERROR(_orig_fastpath_glClearColor(newctx->gl_color_clear_value[0],
1328                                        newctx->gl_color_clear_value[1],
1329                                        newctx->gl_color_clear_value[2],
1330                                        newctx->gl_color_clear_value[3]))
1331                 }
1332         }
1333
1334
1335         // _clear_flag2
1336         flag = oldctx->_clear_flag2 | newctx->_clear_flag2;
1337         if (flag)
1338         {
1339                 STATES_COMPARE(gl_color_writemask, 4 * sizeof(GLboolean))
1340                 {
1341                         CHECK_GL_ERROR(_orig_fastpath_glColorMask(newctx->gl_color_writemask[0],
1342                                        newctx->gl_color_writemask[1],
1343                                        newctx->gl_color_writemask[2],
1344                                        newctx->gl_color_writemask[3]))
1345                 }
1346                 STATES_COMPARE(gl_depth_range, 2 * sizeof(GLclampf))
1347                 {
1348                         CHECK_GL_ERROR(_orig_fastpath_glDepthRangef(newctx->gl_depth_range[0],
1349                                        newctx->gl_depth_range[1]))
1350                 }
1351                 STATE_COMPARE(gl_depth_clear_value[0])
1352                 {
1353                         CHECK_GL_ERROR(_orig_fastpath_glClearDepthf(newctx->gl_depth_clear_value[0]))
1354                 }
1355                 STATE_COMPARE(gl_depth_func[0])
1356                 {
1357                         CHECK_GL_ERROR(_orig_fastpath_glDepthFunc(newctx->gl_depth_func[0]))
1358                 }
1359                 STATE_COMPARE(gl_depth_writemask[0])
1360                 {
1361                         CHECK_GL_ERROR(_orig_fastpath_glDepthMask(newctx->gl_depth_writemask[0]))
1362                 }
1363                 STATE_COMPARE(gl_cull_face_mode[0])
1364                 {
1365                         CHECK_GL_ERROR(_orig_fastpath_glCullFace(newctx->gl_cull_face_mode[0]))
1366                 }
1367
1368         }
1369
1370 #ifdef COREGL_USE_MODULE_TRACEPATH
1371         tracepath_api_trace_end("eglMakeCurrent(FP clear/viewport)", trace_hint_clear_viewport, 0);
1372 #endif // COREGL_USE_MODULE_TRACEPATH
1373
1374         //------------------//
1375         // Texture here...
1376 #ifdef COREGL_USE_MODULE_TRACEPATH
1377         static void *trace_hint_bind_textures = NULL;
1378         trace_hint_bind_textures = tracepath_api_trace_begin("eglMakeCurrent(FP bind textures)", trace_hint_bind_textures, 0);
1379 #endif // COREGL_USE_MODULE_TRACEPATH
1380
1381         flag = oldctx->_tex_flag1 | newctx->_tex_flag1;
1382         if (flag)
1383         {
1384
1385                 for (i = 0; i < oldctx->gl_num_tex_units[0]; i++)
1386                 {
1387                         STATE_COMPARE(gl_tex_2d_state[i])
1388                         {
1389                                 CHECK_GL_ERROR(_orig_fastpath_glActiveTexture(GL_TEXTURE0 + i))
1390                                 CHECK_GL_ERROR(_orig_fastpath_glBindTexture(GL_TEXTURE_2D, newctx->gl_tex_2d_state[i]))
1391                         }
1392
1393                         STATE_COMPARE(gl_tex_cube_state[i])
1394                         {
1395                                 CHECK_GL_ERROR(_orig_fastpath_glActiveTexture(GL_TEXTURE0 + i))
1396                                 CHECK_GL_ERROR(_orig_fastpath_glBindTexture(GL_TEXTURE_CUBE_MAP, newctx->gl_tex_cube_state[i]))
1397                         }
1398                 }
1399
1400                 // Restore active texture
1401                 CHECK_GL_ERROR(_orig_fastpath_glActiveTexture(newctx->gl_active_texture[0]))
1402
1403                 STATE_COMPARE(gl_generate_mipmap_hint[0])
1404                 {
1405                         CHECK_GL_ERROR(_orig_fastpath_glHint(GL_GENERATE_MIPMAP_HINT, newctx->gl_generate_mipmap_hint[0]))
1406                 }
1407         }
1408 #ifdef COREGL_USE_MODULE_TRACEPATH
1409         tracepath_api_trace_end("eglMakeCurrent(FP bind textures)", trace_hint_bind_textures, 0);
1410 #endif // COREGL_USE_MODULE_TRACEPATH
1411
1412         //------------------//
1413 #ifdef COREGL_USE_MODULE_TRACEPATH
1414         static void *trace_hint_etc = NULL;
1415         trace_hint_etc = tracepath_api_trace_begin("eglMakeCurrent(FP etc.)", trace_hint_etc, 0);
1416 #endif // COREGL_USE_MODULE_TRACEPATH
1417
1418         flag = oldctx->_blend_flag | newctx->_blend_flag;
1419         if (flag)
1420         {
1421                 STATES_COMPARE(gl_blend_color, 4 * sizeof(GLclampf))
1422                 {
1423                         CHECK_GL_ERROR(_orig_fastpath_glBlendColor(newctx->gl_blend_color[0],
1424                                        newctx->gl_blend_color[1],
1425                                        newctx->gl_blend_color[2],
1426                                        newctx->gl_blend_color[3]))
1427                 }
1428                 if ((oldctx->gl_blend_src_rgb[0] != newctx->gl_blend_src_rgb[0]) ||
1429                     (oldctx->gl_blend_dst_rgb[0] != newctx->gl_blend_dst_rgb[0]) ||
1430                     (oldctx->gl_blend_src_alpha[0] != newctx->gl_blend_src_alpha[0]) ||
1431                     (oldctx->gl_blend_dst_alpha[0] != newctx->gl_blend_dst_alpha[0]))
1432                 {
1433                         CHECK_GL_ERROR(_orig_fastpath_glBlendFuncSeparate(newctx->gl_blend_src_rgb[0],
1434                                        newctx->gl_blend_dst_rgb[0],
1435                                        newctx->gl_blend_src_alpha[0],
1436                                        newctx->gl_blend_dst_alpha[0]))
1437                 }
1438                 if ((oldctx->gl_blend_equation_rgb[0] != newctx->gl_blend_equation_rgb[0]) ||
1439                     (oldctx->gl_blend_equation_alpha[0] != newctx->gl_blend_equation_alpha[0]))
1440                 {
1441                         CHECK_GL_ERROR(_orig_fastpath_glBlendEquationSeparate(newctx->gl_blend_equation_rgb[0], newctx->gl_blend_equation_alpha[0]))
1442                 }
1443
1444         }
1445
1446         //------------------//
1447         // _stencil_flag1
1448         flag = oldctx->_stencil_flag1 | newctx->_stencil_flag1;
1449         if (flag)
1450         {
1451                 if ((oldctx->gl_stencil_func[0] != newctx->gl_stencil_func[0]) ||
1452                     (oldctx->gl_stencil_ref[0]  != newctx->gl_stencil_ref[0])  ||
1453                     (oldctx->gl_stencil_value_mask[0] != newctx->gl_stencil_value_mask[0]))
1454                 {
1455                         CHECK_GL_ERROR(_orig_fastpath_glStencilFuncSeparate(GL_FRONT,
1456                                        newctx->gl_stencil_func[0],
1457                                        newctx->gl_stencil_ref[0],
1458                                        newctx->gl_stencil_value_mask[0]))
1459                 }
1460                 if ((oldctx->gl_stencil_fail[0] != newctx->gl_stencil_fail[0]) ||
1461                     (oldctx->gl_stencil_pass_depth_fail[0] != newctx->gl_stencil_pass_depth_fail[0]) ||
1462                     (oldctx->gl_stencil_pass_depth_pass[0] != newctx->gl_stencil_pass_depth_pass[0]))
1463                 {
1464                         CHECK_GL_ERROR(_orig_fastpath_glStencilOpSeparate(GL_FRONT,
1465                                        newctx->gl_stencil_fail[0],
1466                                        newctx->gl_stencil_pass_depth_fail[0],
1467                                        newctx->gl_stencil_pass_depth_pass[0]))
1468                 }
1469
1470                 STATE_COMPARE(gl_stencil_writemask[0])
1471                 {
1472                         CHECK_GL_ERROR(_orig_fastpath_glStencilMaskSeparate(GL_FRONT, newctx->gl_stencil_writemask[0]))
1473                 }
1474         }
1475
1476
1477         // _stencil_flag1
1478         flag = oldctx->_stencil_flag2 | newctx->_stencil_flag2;
1479         if (flag)
1480         {
1481                 if ((oldctx->gl_stencil_back_func[0] != newctx->gl_stencil_back_func[0]) ||
1482                     (oldctx->gl_stencil_back_ref[0]  != newctx->gl_stencil_back_ref[0])  ||
1483                     (oldctx->gl_stencil_back_value_mask[0] != newctx->gl_stencil_back_value_mask[0]))
1484                 {
1485                         CHECK_GL_ERROR(_orig_fastpath_glStencilFuncSeparate(GL_BACK,
1486                                        newctx->gl_stencil_back_func[0],
1487                                        newctx->gl_stencil_back_ref[0],
1488                                        newctx->gl_stencil_back_value_mask[0]))
1489                 }
1490                 if ((oldctx->gl_stencil_back_fail[0] != newctx->gl_stencil_back_fail[0]) ||
1491                     (oldctx->gl_stencil_back_pass_depth_fail[0] != newctx->gl_stencil_back_pass_depth_fail[0]) ||
1492                     (oldctx->gl_stencil_back_pass_depth_pass[0] != newctx->gl_stencil_back_pass_depth_pass[0]))
1493                 {
1494                         CHECK_GL_ERROR(_orig_fastpath_glStencilOpSeparate(GL_BACK,
1495                                        newctx->gl_stencil_back_fail[0],
1496                                        newctx->gl_stencil_back_pass_depth_fail[0],
1497                                        newctx->gl_stencil_back_pass_depth_pass[0]))
1498                 }
1499
1500                 STATE_COMPARE(gl_stencil_back_writemask[0])
1501                 {
1502                         CHECK_GL_ERROR(_orig_fastpath_glStencilMaskSeparate(GL_BACK, newctx->gl_stencil_back_writemask[0]))
1503                 }
1504                 STATE_COMPARE(gl_stencil_clear_value[0])
1505                 {
1506                         CHECK_GL_ERROR(_orig_fastpath_glClearStencil(newctx->gl_stencil_clear_value[0]))
1507                 }
1508         }
1509
1510         //------------------//
1511         // _misc_flag1
1512         flag = oldctx->_misc_flag1 | newctx->_misc_flag1;
1513         if (flag)
1514         {
1515                 STATE_COMPARE(gl_front_face[0])
1516                 {
1517                         CHECK_GL_ERROR(_orig_fastpath_glFrontFace(newctx->gl_front_face[0]))
1518                 }
1519                 STATE_COMPARE(gl_line_width[0])
1520                 {
1521                         CHECK_GL_ERROR(_orig_fastpath_glLineWidth(newctx->gl_line_width[0]))
1522                 }
1523                 if ((oldctx->gl_polygon_offset_factor[0] != newctx->gl_polygon_offset_factor[0]) ||
1524                     (oldctx->gl_polygon_offset_units[0]  != newctx->gl_polygon_offset_units[0]))
1525                 {
1526                         CHECK_GL_ERROR(_orig_fastpath_glPolygonOffset(newctx->gl_polygon_offset_factor[0],
1527                                        newctx->gl_polygon_offset_units[0]))
1528                 }
1529                 if ((oldctx->gl_sample_coverage_value[0]  != newctx->gl_sample_coverage_value[0]) ||
1530                     (oldctx->gl_sample_coverage_invert[0] != newctx->gl_sample_coverage_invert[0]))
1531                 {
1532                         CHECK_GL_ERROR(_orig_fastpath_glSampleCoverage(newctx->gl_sample_coverage_value[0],
1533                                        newctx->gl_sample_coverage_invert[0]))
1534                 }
1535                 STATE_COMPARE(gl_fragment_shader_derivative_hint[0])
1536                 {
1537                         CHECK_GL_ERROR(_orig_fastpath_glHint(GL_FRAGMENT_SHADER_DERIVATIVE_HINT_OES, newctx->gl_fragment_shader_derivative_hint[0]))
1538                 }
1539         }
1540
1541         // _misc_flag2
1542         flag = oldctx->_misc_flag2 | newctx->_misc_flag2;
1543         if (flag)
1544         {
1545                 STATES_COMPARE(gl_scissor_box, 4 * sizeof(GLint))
1546                 {
1547                         CHECK_GL_ERROR(_orig_fastpath_glScissor(newctx->gl_scissor_box[0],
1548                                                                 newctx->gl_scissor_box[1],
1549                                                                 newctx->gl_scissor_box[2],
1550                                                                 newctx->gl_scissor_box[3]))
1551                 }
1552                 STATE_COMPARE(gl_pack_alignment[0])
1553                 {
1554                         CHECK_GL_ERROR(_orig_fastpath_glPixelStorei(GL_PACK_ALIGNMENT, newctx->gl_pack_alignment[0]))
1555                 }
1556                 STATE_COMPARE(gl_unpack_alignment[0])
1557                 {
1558                         CHECK_GL_ERROR(_orig_fastpath_glPixelStorei(GL_UNPACK_ALIGNMENT, newctx->gl_unpack_alignment[0]))
1559                 }
1560         }
1561 #ifdef COREGL_USE_MODULE_TRACEPATH
1562         tracepath_api_trace_end("eglMakeCurrent(FP etc.)", trace_hint_etc, 0);
1563 #endif // COREGL_USE_MODULE_TRACEPATH
1564
1565         // _varray_flag
1566 #ifdef COREGL_USE_MODULE_TRACEPATH
1567         static void *trace_hint_vertex_attrib = NULL;
1568         trace_hint_vertex_attrib = tracepath_api_trace_begin("eglMakeCurrent(FP vertex attrib)", trace_hint_vertex_attrib, 0);
1569 #endif // COREGL_USE_MODULE_TRACEPATH
1570
1571         flag = oldctx->_vattrib_flag | newctx->_vattrib_flag;
1572         if (flag)
1573         {
1574                 for (i = 0; i < oldctx->gl_num_vertex_attribs[0]; i++)
1575                 {
1576                         if (newctx->gl_vertex_array_buf_id[i] != oldctx->gl_vertex_array_buf_id[i])
1577                         {
1578                                 CHECK_GL_ERROR(_orig_fastpath_glBindBuffer(GL_ARRAY_BUFFER, newctx->gl_vertex_array_buf_id[i]))
1579                         }
1580                         else
1581                         {
1582                                 CHECK_GL_ERROR(_orig_fastpath_glBindBuffer(GL_ARRAY_BUFFER, 0))
1583                         }
1584
1585                         CHECK_GL_ERROR(_orig_fastpath_glVertexAttribPointer(i,
1586                                        newctx->gl_vertex_array_size[i],
1587                                        newctx->gl_vertex_array_type[i],
1588                                        newctx->gl_vertex_array_normalized[i],
1589                                        newctx->gl_vertex_array_stride[i],
1590                                        newctx->gl_vertex_array_pointer[i]))
1591
1592                         STATES_COMPARE(gl_vertex_attrib_value + 4 * i, 4 * sizeof(GLfloat))
1593                         {
1594                                 CHECK_GL_ERROR(_orig_fastpath_glVertexAttrib4fv(i, &newctx->gl_vertex_attrib_value[4 * i]))
1595                         }
1596
1597                         if (newctx->gl_vertex_array_enabled[i] == GL_TRUE)
1598                         {
1599                                 CHECK_GL_ERROR(_orig_fastpath_glEnableVertexAttribArray(i))
1600                         }
1601                         else
1602                         {
1603                                 CHECK_GL_ERROR(_orig_fastpath_glDisableVertexAttribArray(i))
1604                         }
1605                 }
1606
1607                 STATE_COMPARE(gl_array_buffer_binding[0])
1608                 {
1609                         CHECK_GL_ERROR(_orig_fastpath_glBindBuffer(GL_ARRAY_BUFFER, newctx->gl_array_buffer_binding[0]))
1610                 }
1611                 STATE_COMPARE(gl_element_array_buffer_binding[0])
1612                 {
1613                         CHECK_GL_ERROR(_orig_fastpath_glBindBuffer(GL_ELEMENT_ARRAY_BUFFER, newctx->gl_element_array_buffer_binding[0]))
1614                 }
1615
1616         }
1617
1618 #ifdef COREGL_USE_MODULE_TRACEPATH
1619         tracepath_api_trace_end("eglMakeCurrent(FP vertex attrib)", trace_hint_vertex_attrib, 0);
1620 #endif // COREGL_USE_MODULE_TRACEPATH
1621
1622         ret = 1;
1623         goto finish;
1624
1625 finish:
1626
1627 #ifdef COREGL_FASTPATH_TRACE_STATE_INFO
1628         if (unlikely(trace_state_flag == 1))
1629                 fastpath_dump_context_states(newctx, 0);
1630 #endif // COREGL_FASTPATH_TRACE_STATE_INFO
1631         return ret;
1632 #undef STATE_COMPARE
1633 #undef STATES_COMPARE
1634 }
1635