ref: 155aaa1821874e9f56d2ee672713bb27bad8e43a
dir: /src/list.c/
#include "zgl.h" static char *op_table_str[]= { #define ADD_OP(a,b,c) "gl" #a " " #c, #include "opinfo.h" }; static void (*op_table_func[])(GLContext *,GLParam *)= { #define ADD_OP(a,b,c) glop ## a , #include "opinfo.h" }; static int op_table_size[]= { #define ADD_OP(a,b,c) b + 1 , #include "opinfo.h" }; GLContext *gl_get_context(void) { return gl_ctx; } static GLList *find_list(GLContext *c,unsigned int list) { return c->shared_state.lists[list]; } static void delete_list(GLContext *c,int list) { GLParamBuffer *pb,*pb1; GLList *l; l=find_list(c,list); assert(l != NULL); /* free param buffer */ pb=l->first_op_buffer; while (pb!=NULL) { pb1=pb->next; gl_free(pb); pb=pb1; } gl_free(l); c->shared_state.lists[list]=NULL; } void glDeleteList(int list){ delete_list(gl_get_context(), list); } static GLList *alloc_list(GLContext *c,int list) { GLList *l; GLParamBuffer *ob; l=gl_zalloc(sizeof(GLList)); ob=gl_zalloc(sizeof(GLParamBuffer)); ob->next=NULL; l->first_op_buffer=ob; ob->ops[0].op=OP_EndList; c->shared_state.lists[list]=l; return l; } void gl_print_op(FILE *f,GLParam *p) { int op; char *s; op=p[0].op; p++; s=op_table_str[op]; while (*s != 0) { if (*s == '%') { s++; switch (*s++) { case 'f': fprintf(f,"%g",p[0].f); break; default: fprintf(f,"%d",p[0].i); break; } p++; } else { fputc(*s,f); s++; } } fprintf(f,"\n"); } void gl_compile_op(GLContext *c,GLParam *p) { int op,op_size; GLParamBuffer *ob,*ob1; int index,i; op=p[0].op; op_size=op_table_size[op]; index=c->current_op_buffer_index; ob=c->current_op_buffer; /* we should be able to add a NextBuffer opcode */ if ((index + op_size) > (OP_BUFFER_MAX_SIZE-2)) { ob1=gl_zalloc(sizeof(GLParamBuffer)); ob1->next=NULL; ob->next=ob1; ob->ops[index].op=OP_NextBuffer; ob->ops[index+1].p=(void *)ob1; c->current_op_buffer=ob1; ob=ob1; index=0; } for(i=0;i<op_size;i++) { ob->ops[index]=p[i]; index++; } c->current_op_buffer_index=index; } void gl_add_op(GLParam *p) { GLContext *c=gl_get_context(); int op; op=p[0].op; if (c->exec_flag) { op_table_func[op](c,p); } if (c->compile_flag) { gl_compile_op(c,p); } if (c->print_flag) { gl_print_op(stderr,p); } } /* this opcode is never called directly */ void glopEndList(GLContext *c,GLParam *p) { assert(0); } /* this opcode is never called directly */ void glopNextBuffer(GLContext *c,GLParam *p) { assert(0); } void glopCallList(GLContext *c,GLParam *p) { GLList *l; int list,op; list=p[1].ui; l=find_list(c,list); if (l == NULL) gl_fatal_error("list %d not defined",list); p=l->first_op_buffer->ops; while (1) { op=p[0].op; if (op == OP_EndList) break; if (op == OP_NextBuffer) { p=(GLParam *)p[1].p; } else { op_table_func[op](c,p); p+=op_table_size[op]; } } } void glNewList(unsigned int list,int mode) { GLList *l; GLContext *c=gl_get_context(); assert(mode == GL_COMPILE || mode == GL_COMPILE_AND_EXECUTE); assert(c->compile_flag == 0); l=find_list(c,list); if (l!=NULL) delete_list(c,list); l=alloc_list(c,list); c->current_op_buffer=l->first_op_buffer; c->current_op_buffer_index=0; c->compile_flag=1; c->exec_flag=(mode == GL_COMPILE_AND_EXECUTE); } void glEndList(void) { GLContext *c=gl_get_context(); GLParam p[1]; assert(c->compile_flag == 1); /* end of list */ p[0].op=OP_EndList; gl_compile_op(c,p); c->compile_flag=0; c->exec_flag=1; } int glIsList(unsigned int list) { GLContext *c=gl_get_context(); GLList *l; l=find_list(c,list); return (l != NULL); } unsigned int glGenLists(int range) { GLContext *c=gl_get_context(); int count,i,list; GLList **lists; lists=c->shared_state.lists; count=0; for(i=0;i<MAX_DISPLAY_LISTS;i++) { if (lists[i]==NULL) { count++; if (count == range) { list=i-range+1; for(i=0;i<range;i++) { alloc_list(c,list+i); } return list; } } else { count=0; } } return 0; }