0022819: Redesign of OpenGl driver
[occt.git] / src / OpenGl / OpenGl_togl_markercontextgroup.cxx
1 /***********************************************************************
2
3 FONCTION :
4 ----------
5 File OpenGl_togl_markercontextgroup.c :
6
7
8 REMARQUES:
9 ---------- 
10
11 HISTORIQUE DES MODIFICATIONS   :
12 --------------------------------
13 xx-xx-xx : xxx ; Creation.
14 03-03-98 : CAL ; Modification des structures CALL_DEF_GROUP et STRUCTURE
15
16 ************************************************************************/
17
18
19 /*----------------------------------------------------------------------*/
20 /*
21 * Includes
22 */ 
23
24 #include <OpenGl_tgl_all.hxx>
25 #include <InterfaceGraphic_Graphic3d.hxx>
26 #include <OpenGl_context.hxx>
27 #include <OpenGl_tgl.hxx>
28 #include <OpenGl_tgl_funcs.hxx>
29 #include <OpenGl_tgl_subrs.hxx>
30 #include <OpenGl_tgl_utilgr.hxx>
31
32 /*----------------------------------------------------------------------*/
33
34 /*--------------------------------generate USERDEFINED marker--------begin-------*/
35 #ifdef WNT
36 #include <windows.h>
37 #endif
38
39 #include <GL/gl.h>
40 #include <GL/glu.h>
41
42 #ifdef HAVE_CONFIG_H
43 #include <config.h>
44 #endif
45 #ifdef HAVE_STDLIB_H
46 #include <stdlib.h>
47 #endif
48 #if defined(HAVE_MALLOC_H) || defined(WNT)
49 #include <malloc.h>
50 #endif
51
52 typedef struct
53 {
54   int*      IdList;
55   GLuint*   DisplayIdList;
56   int       Quantity; 
57 } UserDefineMarkerStruct;
58
59 static UserDefineMarkerStruct UDMS_Marker = { NULL, NULL, 0 };
60
61 int EXPORT GenerateMarkerBitmap( int theId, unsigned int theWidth, unsigned int theHeight, unsigned char* theArray )
62 {
63   int i = 0;
64   int anIndex = -1;
65   GLint w, h, size, k, l;
66
67   for( ; i < UDMS_Marker.Quantity; i++ )
68   {
69     if( UDMS_Marker.IdList[i] == theId )
70     {
71       anIndex = i;
72       glDeleteLists( UDMS_Marker.DisplayIdList[i], 1 ); 
73       if ( glGetError() != GL_NO_ERROR ) 
74         return -1;
75       break;
76     } 
77   }
78   if( anIndex == -1 )
79   {
80     anIndex = UDMS_Marker.Quantity;
81     if( anIndex == 0 )
82     {
83       UDMS_Marker.IdList = (int*)malloc( sizeof( int ) );
84       UDMS_Marker.DisplayIdList = (GLuint*)malloc( sizeof( GLuint ) );
85     }
86     else
87     {
88       UDMS_Marker.IdList = (int*) realloc( UDMS_Marker.IdList, (UDMS_Marker.Quantity + 1)*sizeof( int ) );
89       UDMS_Marker.DisplayIdList = (GLuint*) realloc( UDMS_Marker.DisplayIdList, (UDMS_Marker.Quantity + 1)*sizeof( GLuint ) );
90     }
91     UDMS_Marker.Quantity++;    
92   } 
93
94   UDMS_Marker.IdList[anIndex] = theId;
95   UDMS_Marker.DisplayIdList[anIndex] = glGenLists( 1 );
96   glNewList( UDMS_Marker.DisplayIdList[anIndex], GL_COMPILE );
97
98   w = ( GLsizei ) theWidth;
99   h = ( GLsizei ) theHeight;
100   glBitmap( w, h,
101     ( float )theWidth / ( float )2.0,
102     ( float )theHeight / ( float )2.0,
103     ( float )30.0, ( float )30.0, 
104     ( GLubyte* )theArray );
105
106   glEndList();
107
108   return 0;
109 }
110
111 GLuint EXPORT GetListIndex( int theId )
112 {
113   int i = 0;
114   for( ; i < UDMS_Marker.Quantity; i++ )
115   {
116     if( UDMS_Marker.IdList[i] == theId )
117       return UDMS_Marker.DisplayIdList[i];
118   }
119   return -1;
120 }
121
122 /*--------------------------------generate USERDEFINED marker---------end--------*/
123
124
125 void EXPORT
126 call_togl_markercontextgroup
127 (
128  CALL_DEF_GROUP * agroup,
129  int noinsert
130  )
131 {
132   /* for the group */
133   Tfloat        markr, markg, markb;
134   Tint        markertype;
135   Tfloat        markerscale;
136
137   /* for the structure */
138   Tfloat        Markr, Markg, Markb;
139   Tint        Markertype;
140   Tfloat        Markerscale;
141
142   /*
143   * Si le groupe est ouvert cela signifie que BeginPrimitives
144   * a ete utilise.
145   * Dans le cas des markers composes, il faut refermer temporairement
146   * le groupe pour eviter des insertions d'attributs aleatoires.
147   */
148   if (agroup->IsOpen) call_togl_closegroup (agroup);
149
150   if( agroup->ContextMarker.IsDef )
151   {
152     markr = agroup->ContextMarker.Color.r;
153     markg = agroup->ContextMarker.Color.g;
154     markb = agroup->ContextMarker.Color.b;
155     markertype = CALL_PHIGS_MARKER_CROSS;
156     switch( agroup->ContextMarker.MarkerType )
157     {
158     case 0 : /* Aspect_TOM_POINT */
159       markertype = CALL_PHIGS_MARKER_DOT;
160       break;
161     case 1 : /* Aspect_TOM_PLUS */
162       markertype = CALL_PHIGS_MARKER_PLUS;
163       break;
164     case 2 : /* Aspect_TOM_STAR */
165       markertype = CALL_PHIGS_MARKER_ASTERISK;
166       break;
167     case 3 : /* Aspect_TOM_O */
168       markertype = CALL_PHIGS_MARKER_CIRCLE;
169       break;
170     case 4 : /* Aspect_TOM_X */
171       markertype = CALL_PHIGS_MARKER_CROSS;
172       break;
173     case 13 : /* Aspect_TOM_USERDEFINED */
174       markertype = CALL_PHIGS_MARKER_USER_DEFINED;
175       break;
176     default :
177       break;
178     }
179     markerscale = (Tfloat)agroup->ContextMarker.Scale;
180
181     Markr = agroup->Struct->ContextMarker.Color.r;
182     Markg = agroup->Struct->ContextMarker.Color.g;
183     Markb = agroup->Struct->ContextMarker.Color.b;
184     Markertype = CALL_PHIGS_MARKER_CROSS;
185     switch( agroup->Struct->ContextMarker.MarkerType )
186     {
187     case 0 : /* Aspect_TOM_POINT */
188       Markertype = CALL_PHIGS_MARKER_DOT;
189       break;
190     case 1 : /* Aspect_TOM_PLUS */
191       Markertype = CALL_PHIGS_MARKER_PLUS;
192       break;
193     case 2 : /* Aspect_TOM_STAR */
194       Markertype = CALL_PHIGS_MARKER_ASTERISK;
195       break;
196     case 3 : /* Aspect_TOM_O */
197       Markertype = CALL_PHIGS_MARKER_CIRCLE;
198       break;
199     case 4 : /* Aspect_TOM_X */
200       Markertype = CALL_PHIGS_MARKER_CROSS;
201       break;
202     case 13 : /* Aspect_TOM_USERDEFINED*/
203       markertype = CALL_PHIGS_MARKER_USER_DEFINED;
204       break;
205     default :
206       break;
207     }
208     Markerscale = (Tfloat)agroup->Struct->ContextMarker.Scale;
209
210     if( noinsert )
211     {
212       if( agroup->ContextMarker.IsSet )
213         call_func_set_edit_mode( CALL_PHIGS_EDIT_REPLACE );
214       else
215         call_func_set_edit_mode( CALL_PHIGS_EDIT_INSERT );
216       call_func_open_struct( agroup->Struct->Id );
217
218       call_func_set_elem_ptr( 0 );
219       call_func_set_elem_ptr_label( agroup->LabelBegin );
220       if( agroup->PickId.IsSet )
221         call_func_offset_elem_ptr( 1 );
222       if( agroup->ContextLine.IsSet )
223         call_func_offset_elem_ptr( CALL_DEF_CONTEXTLINE_SIZE );
224       if( agroup->ContextFillArea.IsSet )
225         call_func_offset_elem_ptr( CALL_DEF_CONTEXTFILLAREA_SIZE );
226       if( agroup->ContextMarker.IsSet )
227         call_func_offset_elem_ptr( 1 );
228       call_subr_set_marker_colr( markr, markg, markb );
229       if( agroup->ContextMarker.IsSet )
230         call_func_offset_elem_ptr( 1 );
231       call_func_set_marker_type( markertype );
232       if( agroup->ContextMarker.IsSet )
233         call_func_offset_elem_ptr( 1 );
234       call_func_set_marker_size( markerscale );
235
236       call_func_set_elem_ptr_label( agroup->LabelEnd );
237       call_func_offset_elem_ptr(-call_util_context_group_place(agroup)-1);
238       if( agroup->ContextLine.IsSet )
239         call_func_offset_elem_ptr( CALL_DEF_CONTEXTLINE_SIZE );
240       if( agroup->ContextFillArea.IsSet )
241         call_func_offset_elem_ptr( CALL_DEF_CONTEXTFILLAREA_SIZE );
242       if( agroup->ContextMarker.IsSet )
243         call_func_offset_elem_ptr( 1 );
244       call_subr_set_marker_colr( Markr, Markg, Markb );
245       if( agroup->ContextMarker.IsSet )
246         call_func_offset_elem_ptr( 1 );
247       call_func_set_marker_type( Markertype );
248       if( agroup->ContextMarker.IsSet )
249         call_func_offset_elem_ptr( 1 );
250       call_func_set_marker_size( Markerscale );
251
252       call_func_close_struct();
253     } /* no insert */
254
255     if( noinsert == 0 )
256     {
257       call_func_set_edit_mode( CALL_PHIGS_EDIT_INSERT );
258       call_func_open_struct( agroup->Struct->Id );
259
260       call_func_set_elem_ptr( 0 );
261       call_func_set_elem_ptr_label( agroup->LabelEnd );
262       call_func_offset_elem_ptr(-call_util_context_group_place(agroup)-1);
263       call_subr_set_marker_colr( markr, markg, markb );
264       call_func_set_marker_type( markertype );
265       call_func_set_marker_size( markerscale );
266
267       if( agroup->ContextLine.IsSet )
268         call_func_offset_elem_ptr( CALL_DEF_CONTEXTLINE_SIZE );
269       if( agroup->ContextFillArea.IsSet )
270         call_func_offset_elem_ptr( CALL_DEF_CONTEXTFILLAREA_SIZE );
271       if( !agroup->ContextMarker.IsSet )
272       {
273         call_subr_set_marker_colr( Markr, Markg, Markb );
274         call_func_set_marker_type( Markertype );
275         call_func_set_marker_size( Markerscale );
276       }
277       call_func_close_struct();
278     } /* insert */
279   }
280   /* Voir commentaire en debut de fonction */
281   if (agroup->IsOpen) call_togl_opengroup (agroup);
282   return;
283 }