Subversion Repositories Kolibri OS

Rev

Rev 6017 | Rev 6523 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. include 'opengl_const.inc'
  2. include 'zbuffer.inc'
  3. include 'zmath.inc'
  4.  
  5. offs_X equ 0
  6. offs_Y equ 4
  7. offs_Z equ 8
  8. offs_W equ 12
  9.  
  10. ;enum { OP_ ## a , ... }
  11. sum1 equ 0
  12. macro ADD_OP a,b,c
  13. {
  14.         OP_#a equ sum1
  15.         sum1 equ (sum1+1)
  16. }
  17. include 'opinfo.inc'
  18.  
  19.  
  20. ;initially # of allocated GLVertexes (will grow when necessary)
  21. POLYGON_MAX_VERTEX equ 16
  22.  
  23. ;Max # of specular light pow buffers
  24. MAX_SPECULAR_BUFFERS equ 8
  25. ;# of entries in specular buffer
  26. SPECULAR_BUFFER_SIZE equ 1024
  27. ;specular buffer granularity
  28. SPECULAR_BUFFER_RESOLUTION equ 1024
  29.  
  30.  
  31. MAX_MODELVIEW_STACK_DEPTH  equ 32
  32. MAX_PROJECTION_STACK_DEPTH equ 8
  33. MAX_TEXTURE_STACK_DEPTH    equ 8
  34. MAX_NAME_STACK_DEPTH equ 64
  35. MAX_TEXTURE_LEVELS   equ 11
  36. MAX_LIGHTS equ 16
  37.  
  38. VERTEX_HASH_SIZE equ 1031
  39.  
  40. MAX_DISPLAY_LISTS equ 1024
  41. OP_BUFFER_MAX_SIZE equ 512
  42.  
  43. TGL_OFFSET_FILL    equ 0x1
  44. TGL_OFFSET_LINE    equ 0x2
  45. TGL_OFFSET_POINT   equ 0x4
  46.  
  47. struct GLSpecBuf
  48.         shininess_i dd ? ;int
  49.         last_used dd ? ;int
  50.         buf rd SPECULAR_BUFFER_SIZE+1 ;float[SPECULAR_BUFFER_SIZE+1]
  51.         next dd ? ;struct GLSpecBuf*
  52. ends
  53.  
  54. offs_spec_shininess_i equ 0
  55. offs_spec_last_used equ 4
  56. offs_spec_buf equ 8
  57. offs_spec_next equ 8+4*(SPECULAR_BUFFER_SIZE+1)
  58.  
  59. struct GLLight
  60.         ambient V4
  61.         diffuse V4
  62.         specular V4
  63.         position V4    
  64.         spot_direction V3
  65.         spot_exponent dd ? ;float
  66.         spot_cutoff dd ? ;float
  67.         attenuation rd 3 ;float[3]
  68.         ; precomputed values
  69.         cos_spot_cutoff dd ? ;float
  70.         norm_spot_direction V3
  71.         norm_position V3
  72.         ; we use a linked list to know which are the enabled lights
  73.         enabled dd ? ;int
  74.         next dd ? ;struct GLLight*
  75.         prev dd ? ;struct GLLight*
  76. ends
  77.  
  78. offs_ligh_ambient equ 0 ;V4
  79. offs_ligh_diffuse equ 16 ;V4
  80. offs_ligh_specular equ 32 ;V4
  81. offs_ligh_position equ 48 ;V4  
  82. offs_ligh_spot_direction equ 64 ;V3
  83. offs_ligh_spot_exponent equ 76 ;dd ?
  84. offs_ligh_spot_cutoff equ 80 ;dd ?
  85. offs_ligh_attenuation equ 84 ;rd 3
  86. offs_ligh_cos_spot_cutoff equ 96 ;dd ?
  87. offs_ligh_norm_spot_direction equ 100 ;V3
  88. offs_ligh_norm_position equ 112 ;V3
  89. offs_ligh_enabled equ 124 ;dd ?
  90. offs_ligh_next equ 128 ;dd ?
  91. offs_ligh_prev equ 132 ;dd ?
  92.  
  93. struct GLMaterial
  94.         emission V4
  95.         ambient  V4
  96.         diffuse  V4
  97.         specular V4
  98.         shininess dd ? ;float
  99.  
  100.         ; computed values
  101.         shininess_i dd ? ;int
  102.         do_specular dd ? ;int
  103. ends
  104.  
  105. offs_mate_emission   equ 0 ;V4
  106. offs_mate_ambient   equ 16 ;V4
  107. offs_mate_diffuse   equ 32 ;V4
  108. offs_mate_specular  equ 48 ;V4
  109. offs_mate_shininess equ 64 ;dd
  110. offs_mate_shininess_i equ 68 ;dd
  111. offs_mate_do_specular equ 72 ;dd
  112.  
  113. struct GLViewport
  114.         xmin dd ? ;int
  115.         ymin dd ? ;int
  116.         xsize dd ? ;int
  117.         ysize dd ? ;int
  118.         scale V3
  119.         trans V3
  120.         updated dd ? ;int
  121. ends
  122.  
  123. offs_vpor_xmin   equ 0
  124. offs_vpor_ymin   equ 4
  125. offs_vpor_xsize  equ 8
  126. offs_vpor_ysize equ 12
  127. offs_vpor_scale equ 16
  128. offs_vpor_trans equ 28
  129. offs_vpor_updated equ 40
  130.  
  131. struct GLParamBuffer
  132.         ops rd OP_BUFFER_MAX_SIZE ;GLParam[OP_BUFFER_MAX_SIZE]
  133.         next dd ? ;struct GLParamBuffer*
  134. ends
  135.  
  136. offs_gpbu_ops equ 0
  137. offs_gpbu_next equ 4*OP_BUFFER_MAX_SIZE
  138.  
  139. struct GLList
  140.         first_op_buffer dd ? ;GLParamBuffer*
  141.         ; TODO: extensions for an hash table or a better allocating scheme
  142. ends
  143.  
  144. struct GLVertex
  145.         edge_flag dd ? ;int
  146.         normal V3
  147.         coord V4
  148.         tex_coord V4
  149.         color V4
  150.  
  151.         ; computed values
  152.         ec V4 ; eye coordinates
  153.         pc V4 ; coordinates in the normalized volume
  154.         clip_code dd ? ;int ; clip code
  155.         zp ZBufferPoint ; integer coordinates for the rasterization
  156. ends
  157.  
  158. offs_vert_edge_flag  equ 0
  159. offs_vert_normal     equ 4
  160. offs_vert_coord     equ 16
  161. offs_vert_tex_coord equ 32
  162. offs_vert_color     equ 48
  163. offs_vert_ec        equ 64
  164. offs_vert_pc        equ 80
  165. offs_vert_clip_code equ 96
  166. offs_vert_zp       equ 100
  167.  
  168. struct GLImage
  169.         pixmap dd ? ;void*
  170.         xsize dd ? ;int
  171.         ysize dd ? ;int
  172. ends
  173.  
  174. offs_imag_pixmap equ 0
  175. offs_imag_xsize equ 4
  176. offs_imag_ysize equ 8
  177.  
  178. ; textures
  179.  
  180. TEXTURE_HASH_TABLE_SIZE equ 256 ;должно быть кратное 2, в коде берется остаток от деления (через and быстрее чем div)
  181.  
  182. struct GLTexture
  183.         images rb sizeof.GLImage * MAX_TEXTURE_LEVELS ;GLImage[MAX_TEXTURE_LEVELS]
  184.         handle dd ? ;int
  185.         next dd ? ;struct GLTexture*
  186.         prev dd ? ;struct GLTexture*
  187. ends
  188.  
  189. offs_text_images equ 0
  190. offs_text_handle equ sizeof.GLImage*MAX_TEXTURE_LEVELS
  191. offs_text_next equ 4+offs_text_handle
  192. offs_text_prev equ 8+offs_text_handle
  193.  
  194. ; shared state
  195.  
  196. struct GLSharedState
  197.         lists dd ? ;GLList**
  198.         texture_hash_table dd ? ;GLTexture**
  199. ends
  200.  
  201.  
  202. ; display context
  203.  
  204. struct GLContext
  205.         ; Z buffer
  206.         zb dd ? ;ZBuffer*
  207.  
  208.         ; lights
  209.         lights rb sizeof.GLLight * MAX_LIGHTS ;GLLight[MAX_LIGHTS]
  210.         first_light dd ? ;GLLight*
  211.         ambient_light_model V4
  212.         local_light_model dd ? ;int
  213.         lighting_enabled dd ? ;int
  214.         light_model_two_side dd ? ;int
  215.  
  216.         ; materials
  217.         materials rb sizeof.GLMaterial * 2 ;GLMaterial[2]
  218.         color_material_enabled dd ? ;int
  219.         current_color_material_mode dd ? ;int
  220.         current_color_material_type dd ? ;int
  221.  
  222.         ; textures
  223.         current_texture dd ? ;GLTexture*
  224.         texture_2d_enabled dd ? ;int
  225.  
  226.         ; shared state
  227.         shared_state GLSharedState
  228.  
  229.         ; current list
  230.         current_op_buffer dd ? ;GLParamBuffer*
  231.         current_op_buffer_index dd ? ;int
  232.         exec_flag dd ? ;int
  233.         compile_flag dd ? ;int
  234.         print_flag dd ? ;int
  235.  
  236.         ; matrix
  237.  
  238.         matrix_mode dd ? ;int режим активного вида матрицы (один из 3-х: GL_MODELVIEW, GL_PROJECTION, GL_TEXTURE)
  239.         matrix_stack rd 3 ;*M4[3] указатель на начало массива матриц
  240.         matrix_stack_ptr rd 3 ;*M4[3] указатель на активную матрицу из массива
  241.         matrix_stack_depth_max rd 3 ;int[3] максимальное число матриц в массивах matrix_stack
  242.  
  243.         matrix_model_view_inv M4
  244.         matrix_model_projection M4
  245.         matrix_model_projection_updated dd ? ;int
  246.         matrix_model_projection_no_w_transform dd ? ;int
  247.         apply_texture_matrix dd ? ;int
  248.  
  249.         ; viewport
  250.         viewport GLViewport
  251.  
  252.         ; current state
  253.         polygon_mode_back dd ? ;int
  254.         polygon_mode_front dd ? ;int
  255.  
  256.         current_front_face dd ? ;int
  257.         current_shade_model dd ? ;int
  258.         current_cull_face dd ? ;int
  259.         cull_face_enabled dd ? ;int
  260.         normalize_enabled dd ? ;int
  261.         draw_triangle_front dd ? ;gl_draw_triangle_func
  262.         draw_triangle_back  dd ? ;gl_draw_triangle_func
  263.  
  264.         ; selection
  265.         render_mode dd ? ;int
  266.         select_buffer dd ? ;unsigned int*
  267.         select_size dd ? ;int
  268.         select_ptr dd ? ;unsigned int*
  269.         select_hit dd ? ;unsigned int*
  270.         select_overflow dd ? ;int
  271.         select_hits dd ? ;int
  272.  
  273.         ; names
  274.         name_stack rd MAX_NAME_STACK_DEPTH ;unsigned int[MAX_NAME_STACK_DEPTH]
  275.         name_stack_size dd ? ;int
  276.  
  277.         ; clear
  278.         clear_depth dd ? ;float
  279.         clear_color V4
  280.  
  281.         ; current vertex state
  282.         current_color V4
  283.         longcurrent_color rd 3 ;unsigned int[3] ;precomputed integer color
  284.         current_normal V4
  285.         current_tex_coord V4
  286.         current_edge_flag dd ? ;int
  287.  
  288.         ; glBegin / glEnd
  289.         in_begin dd ? ;int
  290.         begin_type dd ? ;int
  291.         vertex_n dd ? ;int
  292.         vertex_cnt dd ? ;int
  293.         vertex_max dd ? ;int
  294.         vertex dd ? ;GLVertex*
  295.  
  296.         ; opengl 1.1 arrays
  297.         vertex_array dd ? ;float*
  298.         vertex_array_size dd ? ;int
  299.         vertex_array_stride dd ? ;int
  300.         normal_array dd ? ;float*
  301.         normal_array_stride dd ? ;int
  302.         color_array dd ? ;float*
  303.         color_array_size dd ? ;int
  304.         color_array_stride dd ? ;int
  305.         texcoord_array dd ? ;float*
  306.         texcoord_array_size dd ? ;int
  307.         texcoord_array_stride dd ? ;int
  308.         client_states dd ? ;int
  309.  
  310.         ; opengl 1.1 polygon offset
  311.         offset_factor dd ? ;float
  312.         offset_units dd ? ;float
  313.         offset_states dd ? ;int
  314.  
  315.         ; specular buffer. could probably be shared between contexts,
  316.         ; but that wouldn't be 100% thread safe
  317.         specbuf_first dd ? ;GLSpecBuf*
  318.         specbuf_used_counter dd ? ;int
  319.         specbuf_num_buffers dd ? ;int
  320.  
  321.         ; opaque structure for user's use
  322.         opaque dd ? ;void*
  323.         ; resize viewport function
  324.         gl_resize_viewport dd ? ;(struct GLContext *c,int *xsize,int *ysize)
  325.  
  326.         ; depth test
  327.         depth_test dd ? ;int
  328. ends
  329.  
  330. offs_cont_s0 equ (4 + sizeof.GLLight * MAX_LIGHTS)
  331. offs_cont_s1 equ (32 + offs_cont_s0 + sizeof.GLMaterial * 2)
  332. offs_cont_s2 equ (228 + offs_cont_s1 + sizeof.GLViewport)
  333. offs_cont_s3 equ (64 + offs_cont_s2 + MAX_NAME_STACK_DEPTH * 4)
  334.  
  335. offs_cont_zb          equ 0 ;ZBuffer*
  336. offs_cont_lights      equ 4 ;GLLight[MAX_LIGHTS]
  337. offs_cont_first_light equ offs_cont_s0 ;GLLight*
  338. offs_cont_ambient_light_model  equ 4+offs_cont_s0 ;V4
  339. offs_cont_local_light_model    equ 20+offs_cont_s0 ;int
  340. offs_cont_lighting_enabled     equ 24+offs_cont_s0 ;int
  341. offs_cont_light_model_two_side  equ 28+offs_cont_s0 ;int
  342. offs_cont_materials              equ 32+offs_cont_s0 ;GLMaterial[2]
  343. offs_cont_color_material_enabled  equ offs_cont_s1 ;int
  344. offs_cont_current_color_material_mode equ 4+offs_cont_s1 ;int
  345. offs_cont_current_color_material_type equ 8+offs_cont_s1 ;int
  346. offs_cont_current_texture         equ 12+offs_cont_s1 ;GLTexture*
  347. offs_cont_texture_2d_enabled      equ 16+offs_cont_s1 ;int
  348. offs_cont_shared_state            equ 20+offs_cont_s1 ;GLSharedState
  349. offs_cont_current_op_buffer       equ 28+offs_cont_s1 ;GLParamBuffer*
  350. offs_cont_current_op_buffer_index equ 32+offs_cont_s1 ;int
  351. offs_cont_exec_flag               equ 36+offs_cont_s1 ;int
  352. offs_cont_compile_flag            equ 40+offs_cont_s1 ;int
  353. offs_cont_print_flag              equ 44+offs_cont_s1 ;int
  354. offs_cont_matrix_mode             equ 48+offs_cont_s1 ;int
  355. offs_cont_matrix_stack            equ 52+offs_cont_s1 ;*M4[3]
  356. offs_cont_matrix_stack_ptr        equ 64+offs_cont_s1 ;*M4[3]
  357. offs_cont_matrix_stack_depth_max  equ 76+offs_cont_s1 ;int[3]
  358. offs_cont_matrix_model_view_inv   equ 88+offs_cont_s1 ;M4
  359. offs_cont_matrix_model_projection equ 152+offs_cont_s1 ;M4
  360. offs_cont_matrix_model_projection_updated equ 216+offs_cont_s1 ;int
  361. offs_cont_matrix_model_projection_no_w_transform equ 220+offs_cont_s1 ;int
  362. offs_cont_apply_texture_matrix    equ 224+offs_cont_s1 ;int
  363. offs_cont_viewport               equ 228+offs_cont_s1 ;GLViewport
  364. offs_cont_polygon_mode_back     equ offs_cont_s2 ;int
  365. offs_cont_polygon_mode_front   equ 4+offs_cont_s2 ;int
  366. offs_cont_current_front_face   equ 8+offs_cont_s2 ;int
  367. offs_cont_current_shade_model  equ 12+offs_cont_s2 ;int
  368. offs_cont_current_cull_face    equ 16+offs_cont_s2 ;int
  369. offs_cont_cull_face_enabled    equ 20+offs_cont_s2 ;int
  370. offs_cont_normalize_enabled    equ 24+offs_cont_s2 ;int
  371. offs_cont_draw_triangle_front  equ 28+offs_cont_s2 ;gl_draw_triangle_func
  372. offs_cont_draw_triangle_back   equ 32+offs_cont_s2 ;gl_draw_triangle_func
  373. offs_cont_render_mode          equ 36+offs_cont_s2 ;int
  374. offs_cont_select_buffer        equ 40+offs_cont_s2 ;unsigned int*
  375. offs_cont_select_size          equ 44+offs_cont_s2 ;int
  376. offs_cont_select_ptr           equ 48+offs_cont_s2 ;unsigned int*
  377. offs_cont_select_hit           equ 52+offs_cont_s2 ;unsigned int*
  378. offs_cont_select_overflow      equ 56+offs_cont_s2 ;int
  379. offs_cont_select_hits          equ 60+offs_cont_s2 ;int
  380. offs_cont_name_stack           equ 64+offs_cont_s2 ;unsigned int[MAX_NAME_STACK_DEPTH]
  381. offs_cont_name_stack_size     equ offs_cont_s3 ;int
  382. offs_cont_clear_depth        equ 4+offs_cont_s3 ;float
  383. offs_cont_clear_color       equ 8+offs_cont_s3 ;V4
  384. offs_cont_current_color     equ 24+offs_cont_s3 ;V4
  385. offs_cont_longcurrent_color equ 40+offs_cont_s3 ;unsigned int[3]
  386. offs_cont_current_normal    equ 52+offs_cont_s3 ;V4
  387. offs_cont_current_tex_coord equ 68+offs_cont_s3 ;V4
  388. offs_cont_current_edge_flag equ 84+offs_cont_s3 ;int
  389. offs_cont_in_begin          equ 88+offs_cont_s3 ;int
  390. offs_cont_begin_type        equ 92+offs_cont_s3 ;int
  391. offs_cont_vertex_n          equ 96+offs_cont_s3 ;int
  392. offs_cont_vertex_cnt        equ 100+offs_cont_s3 ;int
  393. offs_cont_vertex_max        equ 104+offs_cont_s3 ;int
  394. offs_cont_vertex            equ 108+offs_cont_s3 ;GLVertex*
  395. offs_cont_vertex_array      equ 112+offs_cont_s3 ;float*
  396. offs_cont_vertex_array_size  equ 116+offs_cont_s3 ;int
  397. offs_cont_vertex_array_stride equ 120+offs_cont_s3 ;int
  398. offs_cont_normal_array        equ 124+offs_cont_s3 ;float*
  399. offs_cont_normal_array_stride equ 128+offs_cont_s3 ;int
  400. offs_cont_color_array         equ 132+offs_cont_s3 ;float*
  401. offs_cont_color_array_size    equ 136+offs_cont_s3 ;int
  402. offs_cont_color_array_stride  equ 140+offs_cont_s3 ;int
  403. offs_cont_texcoord_array      equ 144+offs_cont_s3 ;float*
  404. offs_cont_texcoord_array_size  equ 148+offs_cont_s3 ;int
  405. offs_cont_texcoord_array_stride equ 152+offs_cont_s3 ;int
  406. offs_cont_client_states        equ 156+offs_cont_s3 ;int
  407. offs_cont_offset_factor        equ 160+offs_cont_s3 ;float
  408. offs_cont_offset_units         equ 164+offs_cont_s3 ;float
  409. offs_cont_offset_states        equ 168+offs_cont_s3 ;int
  410. offs_cont_specbuf_first        equ 172+offs_cont_s3 ;GLSpecBuf*
  411. offs_cont_specbuf_used_counter equ 176+offs_cont_s3 ;int
  412. offs_cont_specbuf_num_buffers  equ 180+offs_cont_s3 ;int
  413. offs_cont_opaque                   equ 184+offs_cont_s3 ;void*
  414. offs_cont_gl_resize_viewport   equ 188+offs_cont_s3 ;(struct GLContext *c,int *xsize,int *ysize)
  415. offs_cont_depth_test           equ 192+offs_cont_s3 ;int
  416.  
  417. align 16
  418. gl_ctx dd ? ;extern GLContext*
  419.  
  420. align 16
  421. proc gl_get_context
  422.         mov eax,[gl_ctx]
  423.         ret
  424. endp
  425.  
  426. ; this clip epsilon is needed to avoid some rounding errors after
  427. ; several clipping stages
  428.  
  429. CLIP_EPSILON dd 1.0e-5
  430.  
  431. align 4
  432. proc gl_clipcode uses ebx, x:dword, y:dword, z:dword, w1:dword
  433.         xor ebx,ebx
  434.  
  435.         fld1
  436.         fadd dword[CLIP_EPSILON]
  437.         fmul dword[w1]
  438.  
  439.         fcom dword[x]
  440.         fstsw ax
  441.         sahf
  442.         ja @f
  443.                 or ebx,2
  444.         @@:
  445.         fcom dword[y]
  446.         fstsw ax
  447.         sahf
  448.         ja @f
  449.                 or ebx,8
  450.         @@:
  451.         fcom dword[z]
  452.         fstsw ax
  453.         sahf
  454.         ja @f
  455.                 or ebx,32
  456.         @@:
  457.  
  458.         fchs
  459.         fcom dword[x]
  460.         fstsw ax
  461.         sahf
  462.         jbe @f
  463.                 or ebx,1
  464.         @@:
  465.         fcom dword[y]
  466.         fstsw ax
  467.         sahf
  468.         jbe @f
  469.                 or ebx,4
  470.         @@:
  471.         fcom dword[z]
  472.         fstsw ax
  473.         sahf
  474.         jbe @f
  475.                 or ebx,16
  476.         @@:
  477.  
  478.         ffree st0
  479.         fincstp
  480.  
  481.         mov eax,ebx
  482.         ret
  483. endp
  484.  
  485. ;input:
  486. ; rf,gf,bf - значения float
  487. ; ri,gi,bi - адреса куда будут записаны rf,gf,bf преобразованые в int
  488. align 4
  489. proc RGBFtoRGBI uses eax, rf:dword,gf:dword,bf:dword, ri:dword,gi:dword,bi:dword
  490. locals
  491.         s dd ?
  492. endl
  493.         mov dword[s],(ZB_POINT_RED_MAX - ZB_POINT_RED_MIN)
  494.         fild dword[s]
  495.         fmul dword[rf]
  496.         mov eax,[ri]
  497.         fistp dword[eax]
  498.         add dword[eax],ZB_POINT_RED_MIN
  499.  
  500.         mov dword[s],(ZB_POINT_GREEN_MAX - ZB_POINT_GREEN_MIN)
  501.         fild dword[s]
  502.         fmul dword[gf]
  503.         mov eax,[gi]
  504.         fistp dword[eax]
  505.         add dword[eax],ZB_POINT_GREEN_MIN
  506.  
  507.         ;bi = (unsigned int) (bf * (ZB_POINT_BLUE_MAX - ZB_POINT_BLUE_MIN) + ZB_POINT_BLUE_MIN);
  508.         mov dword[s],(ZB_POINT_BLUE_MAX - ZB_POINT_BLUE_MIN)
  509.         fild dword[s]
  510.         fmul dword[bf]
  511.         mov eax,[bi]
  512.         fistp dword[eax]
  513.         add dword[eax],ZB_POINT_BLUE_MIN
  514.         ret
  515. endp
  516.