0024437: Visualization - silhouette edges based on OpenGL
[occt.git] / src / OpenGl / OpenGl_PrimitiveArray.cxx
1 // Created on: 2011-07-13
2 // Created by: Sergey ZERCHANINOV
3 // Copyright (c) 2011-2013 OPEN CASCADE SAS
4 //
5 // This file is part of Open CASCADE Technology software library.
6 //
7 // This library is free software; you can redistribute it and/or modify it under
8 // the terms of the GNU Lesser General Public License version 2.1 as published
9 // by the Free Software Foundation, with special exception defined in the file
10 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 // distribution for complete text of the license and disclaimer of any warranty.
12 //
13 // Alternatively, this file may be used under the terms of Open CASCADE
14 // commercial license or contractual agreement.
15
16 #include <OpenGl_AspectFace.hxx>
17 #include <OpenGl_Context.hxx>
18 #include <OpenGl_GraphicDriver.hxx>
19 #include <OpenGl_IndexBuffer.hxx>
20 #include <OpenGl_PointSprite.hxx>
21 #include <OpenGl_PrimitiveArray.hxx>
22 #include <OpenGl_Sampler.hxx>
23 #include <OpenGl_ShaderManager.hxx>
24 #include <OpenGl_ShaderProgram.hxx>
25 #include <OpenGl_Structure.hxx>
26 #include <OpenGl_VertexBufferCompat.hxx>
27 #include <OpenGl_View.hxx>
28 #include <OpenGl_Workspace.hxx>
29 #include <Graphic3d_TextureParams.hxx>
30 #include <NCollection_AlignedAllocator.hxx>
31
32 namespace
33 {
34   //! Convert data type to GL info
35   inline GLenum toGlDataType (const Graphic3d_TypeOfData theType,
36                               GLint&                     theNbComp)
37   {
38     switch (theType)
39     {
40       case Graphic3d_TOD_USHORT:
41         theNbComp = 1;
42         return GL_UNSIGNED_SHORT;
43       case Graphic3d_TOD_UINT:
44         theNbComp = 1;
45         return GL_UNSIGNED_INT;
46       case Graphic3d_TOD_VEC2:
47         theNbComp = 2;
48         return GL_FLOAT;
49       case Graphic3d_TOD_VEC3:
50         theNbComp = 3;
51         return GL_FLOAT;
52       case Graphic3d_TOD_VEC4:
53         theNbComp = 4;
54         return GL_FLOAT;
55       case Graphic3d_TOD_VEC4UB:
56         theNbComp = 4;
57         return GL_UNSIGNED_BYTE;
58       case Graphic3d_TOD_FLOAT:
59         theNbComp = 1;
60         return GL_FLOAT;
61     }
62     theNbComp = 0;
63     return GL_NONE;
64   }
65
66 }
67
68 //! Auxiliary template for VBO with interleaved attributes.
69 template<class TheBaseClass, int NbAttributes>
70 class OpenGl_VertexBufferT : public TheBaseClass
71 {
72 public:
73
74   //! Create uninitialized VBO.
75   OpenGl_VertexBufferT (const Graphic3d_Buffer& theAttribs)
76   : Stride (theAttribs.IsInterleaved() ? theAttribs.Stride : 0)
77   {
78     memcpy (Attribs, theAttribs.AttributesArray(), sizeof(Graphic3d_Attribute) * NbAttributes);
79   }
80
81   virtual bool HasColorAttribute() const
82   {
83     for (Standard_Integer anAttribIter = 0; anAttribIter < NbAttributes; ++anAttribIter)
84     {
85       const Graphic3d_Attribute& anAttrib = Attribs[anAttribIter];
86       if (anAttrib.Id == Graphic3d_TOA_COLOR)
87       {
88         return true;
89       }
90     }
91     return false;
92   }
93
94   virtual bool HasNormalAttribute() const
95   {
96     for (Standard_Integer anAttribIter = 0; anAttribIter < NbAttributes; ++anAttribIter)
97     {
98       const Graphic3d_Attribute& anAttrib = Attribs[anAttribIter];
99       if (anAttrib.Id == Graphic3d_TOA_NORM)
100       {
101         return true;
102       }
103     }
104     return false;
105   }
106
107   virtual void BindPositionAttribute (const Handle(OpenGl_Context)& theGlCtx) const
108   {
109     if (!TheBaseClass::IsValid())
110     {
111       return;
112     }
113
114     TheBaseClass::Bind (theGlCtx);
115     GLint aNbComp;
116     const GLubyte* anOffset = TheBaseClass::myOffset;
117     const Standard_Size aMuliplier = Stride != 0 ? 1 : TheBaseClass::myElemsNb;
118     for (Standard_Integer anAttribIter = 0; anAttribIter < NbAttributes; ++anAttribIter)
119     {
120       const Graphic3d_Attribute& anAttrib = Attribs[anAttribIter];
121       const GLenum   aDataType = toGlDataType (anAttrib.DataType, aNbComp);
122       if (anAttrib.Id == Graphic3d_TOA_POS
123        && aDataType != GL_NONE)
124       {
125         TheBaseClass::bindAttribute (theGlCtx, Graphic3d_TOA_POS, aNbComp, aDataType, Stride, anOffset);
126         break;
127       }
128
129       anOffset += aMuliplier * Graphic3d_Attribute::Stride (anAttrib.DataType);
130     }
131   }
132
133   virtual void BindAllAttributes (const Handle(OpenGl_Context)& theGlCtx) const
134   {
135     if (!TheBaseClass::IsValid())
136     {
137       return;
138     }
139
140     TheBaseClass::Bind (theGlCtx);
141     GLint aNbComp;
142     const GLubyte* anOffset = TheBaseClass::myOffset;
143     const Standard_Size aMuliplier = Stride != 0 ? 1 : TheBaseClass::myElemsNb;
144     for (Standard_Integer anAttribIter = 0; anAttribIter < NbAttributes; ++anAttribIter)
145     {
146       const Graphic3d_Attribute& anAttrib = Attribs[anAttribIter];
147       const GLenum   aDataType = toGlDataType (anAttrib.DataType, aNbComp);
148       if (aDataType != GL_NONE)
149       {
150         TheBaseClass::bindAttribute (theGlCtx, anAttrib.Id, aNbComp, aDataType, Stride, anOffset);
151       }
152       anOffset += aMuliplier * Graphic3d_Attribute::Stride (anAttrib.DataType);
153     }
154   }
155
156   virtual void UnbindAllAttributes (const Handle(OpenGl_Context)& theGlCtx) const
157   {
158     if (!TheBaseClass::IsValid())
159     {
160       return;
161     }
162     TheBaseClass::Unbind (theGlCtx);
163
164     for (Standard_Integer anAttribIter = 0; anAttribIter < NbAttributes; ++anAttribIter)
165     {
166       const Graphic3d_Attribute& anAttrib = Attribs[anAttribIter];
167       TheBaseClass::unbindAttribute (theGlCtx, anAttrib.Id);
168     }
169   }
170
171 private:
172
173   Graphic3d_Attribute Attribs[NbAttributes];
174   Standard_Integer    Stride;
175
176 };
177
178 // =======================================================================
179 // function : clearMemoryGL
180 // purpose  :
181 // =======================================================================
182 void OpenGl_PrimitiveArray::clearMemoryGL (const Handle(OpenGl_Context)& theGlCtx) const
183 {
184   if (!myVboIndices.IsNull())
185   {
186     myVboIndices->Release (theGlCtx.operator->());
187     myVboIndices.Nullify();
188   }
189   if (!myVboAttribs.IsNull())
190   {
191     myVboAttribs->Release (theGlCtx.operator->());
192     myVboAttribs.Nullify();
193   }
194 }
195
196 // =======================================================================
197 // function : initNormalVbo
198 // purpose  :
199 // =======================================================================
200 Standard_Boolean OpenGl_PrimitiveArray::initNormalVbo (const Handle(OpenGl_Context)& theCtx) const
201 {
202   switch (myAttribs->NbAttributes)
203   {
204     case 1:  myVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBuffer, 1> (*myAttribs); break;
205     case 2:  myVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBuffer, 2> (*myAttribs); break;
206     case 3:  myVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBuffer, 3> (*myAttribs); break;
207     case 4:  myVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBuffer, 4> (*myAttribs); break;
208     case 5:  myVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBuffer, 5> (*myAttribs); break;
209     case 6:  myVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBuffer, 6> (*myAttribs); break;
210     case 7:  myVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBuffer, 7> (*myAttribs); break;
211     case 8:  myVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBuffer, 8> (*myAttribs); break;
212     case 9:  myVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBuffer, 9> (*myAttribs); break;
213     case 10: myVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBuffer, 10>(*myAttribs); break;
214   }
215
216   const Standard_Boolean isAttribMutable     = myAttribs->IsMutable();
217   const Standard_Boolean isAttribInterleaved = myAttribs->IsInterleaved();
218   if (myAttribs->NbElements != myAttribs->NbMaxElements()
219    && myIndices.IsNull()
220    && (!isAttribInterleaved || isAttribMutable))
221   {
222     throw Standard_ProgramError ("OpenGl_PrimitiveArray::buildVBO() - vertex attribute data with reserved size is not supported");
223   }
224
225   // specify data type as Byte and NbComponents as Stride, so that OpenGl_VertexBuffer::EstimatedDataSize() will return correct value
226   const Standard_Integer aNbVertexes = (isAttribMutable || !isAttribInterleaved) ? myAttribs->NbMaxElements() : myAttribs->NbElements;
227   if (!myVboAttribs->init (theCtx, myAttribs->Stride, aNbVertexes, myAttribs->Data(), GL_UNSIGNED_BYTE, myAttribs->Stride))
228   {
229     TCollection_ExtendedString aMsg = TCollection_ExtendedString("VBO creation for Primitive Array has failed for ") + aNbVertexes + " vertices. Out of memory?";
230     theCtx->PushMessage (GL_DEBUG_SOURCE_APPLICATION, GL_DEBUG_TYPE_PERFORMANCE, 0, GL_DEBUG_SEVERITY_LOW, aMsg);
231
232     clearMemoryGL (theCtx);
233     return Standard_False;
234   }
235   else if (myIndices.IsNull())
236   {
237     if (isAttribMutable && isAttribInterleaved)
238     {
239       // for mutable interlaced array we can change dynamically number of vertexes (they will be just skipped at the end of buffer);
240       // this doesn't matter in case if we have indexed array
241       myVboAttribs->SetElemsNb (myAttribs->NbElements);
242     }
243     return Standard_True;
244   }
245
246   const Standard_Integer aNbIndexes = !myIndices->IsMutable() ? myIndices->NbElements : myIndices->NbMaxElements();
247   myVboIndices = new OpenGl_IndexBuffer();
248   bool isOk = false;
249   switch (myIndices->Stride)
250   {
251     case 2:
252     {
253       isOk = myVboIndices->Init (theCtx, 1, aNbIndexes, reinterpret_cast<const GLushort*> (myIndices->Data()));
254       myVboIndices->SetElemsNb (myIndices->NbElements);
255       myIndices->Validate();
256       break;
257     }
258     case 4:
259     {
260       isOk = myVboIndices->Init (theCtx, 1, aNbIndexes, reinterpret_cast<const GLuint*> (myIndices->Data()));
261       myVboIndices->SetElemsNb (myIndices->NbElements);
262       myIndices->Validate();
263       break;
264     }
265     default:
266     {
267       clearMemoryGL (theCtx);
268       return Standard_False;
269     }
270   }
271   if (!isOk)
272   {
273     TCollection_ExtendedString aMsg = TCollection_ExtendedString("VBO creation for Primitive Array has failed for ") + aNbIndexes + " indices. Out of memory?";
274     theCtx->PushMessage (GL_DEBUG_SOURCE_APPLICATION, GL_DEBUG_TYPE_PERFORMANCE, 0, GL_DEBUG_SEVERITY_LOW, aMsg);
275     clearMemoryGL (theCtx);
276     return Standard_False;
277   }
278   return Standard_True;
279 }
280
281 // =======================================================================
282 // function : buildVBO
283 // purpose  :
284 // =======================================================================
285 Standard_Boolean OpenGl_PrimitiveArray::buildVBO (const Handle(OpenGl_Context)& theCtx,
286                                                   const Standard_Boolean        theToKeepData) const
287 {
288   bool isNormalMode = theCtx->ToUseVbo();
289   clearMemoryGL (theCtx);
290   if (myAttribs.IsNull()
291    || myAttribs->IsEmpty()
292    || myAttribs->NbElements < 1
293    || myAttribs->NbAttributes < 1
294    || myAttribs->NbAttributes > 10)
295   {
296     // vertices should be always defined - others are optional
297     return Standard_False;
298   }
299
300   if (isNormalMode
301    && initNormalVbo (theCtx))
302   {
303     if (!theCtx->caps->keepArrayData
304      && !theToKeepData
305      && !myAttribs->IsMutable())
306     {
307       myIndices.Nullify();
308       myAttribs.Nullify();
309     }
310     else
311     {
312       myAttribs->Validate();
313     }
314     return Standard_True;
315   }
316
317   Handle(OpenGl_VertexBufferCompat) aVboAttribs;
318   switch (myAttribs->NbAttributes)
319   {
320     case 1:  aVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBufferCompat, 1> (*myAttribs); break;
321     case 2:  aVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBufferCompat, 2> (*myAttribs); break;
322     case 3:  aVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBufferCompat, 3> (*myAttribs); break;
323     case 4:  aVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBufferCompat, 4> (*myAttribs); break;
324     case 5:  aVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBufferCompat, 5> (*myAttribs); break;
325     case 6:  aVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBufferCompat, 6> (*myAttribs); break;
326     case 7:  aVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBufferCompat, 7> (*myAttribs); break;
327     case 8:  aVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBufferCompat, 8> (*myAttribs); break;
328     case 9:  aVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBufferCompat, 9> (*myAttribs); break;
329     case 10: aVboAttribs = new OpenGl_VertexBufferT<OpenGl_VertexBufferCompat, 10>(*myAttribs); break;
330   }
331   aVboAttribs->initLink (myAttribs, 0, myAttribs->NbElements, GL_NONE);
332   if (!myIndices.IsNull())
333   {
334     Handle(OpenGl_VertexBufferCompat) aVboIndices = new OpenGl_VertexBufferCompat();
335     switch (myIndices->Stride)
336     {
337       case 2:
338       {
339         aVboIndices->initLink (myIndices, 1, myIndices->NbElements, GL_UNSIGNED_SHORT);
340         break;
341       }
342       case 4:
343       {
344         aVboIndices->initLink (myIndices, 1, myIndices->NbElements, GL_UNSIGNED_INT);
345         break;
346       }
347       default:
348       {
349         return Standard_False;
350       }
351     }
352     myVboIndices = aVboIndices;
353   }
354   myVboAttribs = aVboAttribs;
355   if (!theCtx->caps->keepArrayData
356    && !theToKeepData)
357   {
358     // does not make sense for compatibility mode
359     //myIndices.Nullify();
360     //myAttribs.Nullify();
361   }
362
363   return Standard_True;
364 }
365
366 // =======================================================================
367 // function : updateVBO
368 // purpose  :
369 // =======================================================================
370 void OpenGl_PrimitiveArray::updateVBO (const Handle(OpenGl_Context)& theCtx) const
371 {
372   if (!myAttribs.IsNull())
373   {
374     Graphic3d_BufferRange aRange = myAttribs->InvalidatedRange();
375     if (!aRange.IsEmpty()
376      &&  myVboAttribs->IsValid()
377      && !myVboAttribs->IsVirtual())
378     {
379       myVboAttribs->Bind (theCtx);
380       theCtx->core15fwd->glBufferSubData (myVboAttribs->GetTarget(),
381                                           aRange.Start,
382                                           aRange.Length,
383                                           myAttribs->Data() + aRange.Start);
384       myVboAttribs->Unbind (theCtx);
385       if (myAttribs->IsInterleaved())
386       {
387         myVboAttribs->SetElemsNb (myAttribs->NbElements);
388       }
389     }
390     myAttribs->Validate();
391   }
392   if (!myIndices.IsNull())
393   {
394     Graphic3d_BufferRange aRange = myIndices->InvalidatedRange();
395     if (!aRange.IsEmpty()
396      &&  myVboIndices->IsValid()
397      && !myVboIndices->IsVirtual())
398     {
399       myVboIndices->Bind (theCtx);
400       theCtx->core15fwd->glBufferSubData (myVboIndices->GetTarget(),
401                                           aRange.Start,
402                                           aRange.Length,
403                                           myIndices->Data() + aRange.Start);
404       myVboIndices->Unbind (theCtx);
405       myVboIndices->SetElemsNb (myIndices->NbElements);
406     }
407     myIndices->Validate();
408   }
409 }
410
411 // =======================================================================
412 // function : drawArray
413 // purpose  :
414 // =======================================================================
415 void OpenGl_PrimitiveArray::drawArray (const Handle(OpenGl_Workspace)& theWorkspace,
416                                        const Graphic3d_Vec4*           theFaceColors,
417                                        const Standard_Boolean          theHasVertColor) const
418 {
419   if (myVboAttribs.IsNull())
420   {
421   #if !defined(GL_ES_VERSION_2_0)
422     if (myDrawMode == GL_POINTS)
423     {
424       // extreme compatibility mode - without sprites but with markers
425       drawMarkers (theWorkspace);
426     }
427   #endif
428     return;
429   }
430
431   const Handle(OpenGl_Context)& aGlContext = theWorkspace->GetGlContext();
432   const bool                    toHilight  = theWorkspace->ToHighlight();
433   const GLenum aDrawMode = !aGlContext->ActiveProgram().IsNull()
434                          && aGlContext->ActiveProgram()->HasTessellationStage()
435                          ? GL_PATCHES
436                          : myDrawMode;
437   myVboAttribs->BindAllAttributes (aGlContext);
438   if (theHasVertColor && toHilight)
439   {
440     // disable per-vertex color
441     OpenGl_VertexBuffer::unbindAttribute (aGlContext, Graphic3d_TOA_COLOR);
442   }
443   if (!myVboIndices.IsNull())
444   {
445     myVboIndices->Bind (aGlContext);
446     GLubyte* anOffset = myVboIndices->GetDataOffset();
447     if (!myBounds.IsNull())
448     {
449       // draw primitives by vertex count with the indices
450       const size_t aStride = myVboIndices->GetDataType() == GL_UNSIGNED_SHORT ? sizeof(unsigned short) : sizeof(unsigned int);
451       for (Standard_Integer aGroupIter = 0; aGroupIter < myBounds->NbBounds; ++aGroupIter)
452       {
453         const GLint aNbElemsInGroup = myBounds->Bounds[aGroupIter];
454         if (theFaceColors != NULL) aGlContext->SetColor4fv (theFaceColors[aGroupIter]);
455         glDrawElements (aDrawMode, aNbElemsInGroup, myVboIndices->GetDataType(), anOffset);
456         anOffset += aStride * aNbElemsInGroup;
457       }
458     }
459     else
460     {
461       // draw one (or sequential) primitive by the indices
462       glDrawElements (aDrawMode, myVboIndices->GetElemsNb(), myVboIndices->GetDataType(), anOffset);
463     }
464     myVboIndices->Unbind (aGlContext);
465   }
466   else if (!myBounds.IsNull())
467   {
468     GLint aFirstElem = 0;
469     for (Standard_Integer aGroupIter = 0; aGroupIter < myBounds->NbBounds; ++aGroupIter)
470     {
471       const GLint aNbElemsInGroup = myBounds->Bounds[aGroupIter];
472       if (theFaceColors != NULL) aGlContext->SetColor4fv (theFaceColors[aGroupIter]);
473       glDrawArrays (aDrawMode, aFirstElem, aNbElemsInGroup);
474       aFirstElem += aNbElemsInGroup;
475     }
476   }
477   else
478   {
479     if (myDrawMode == GL_POINTS)
480     {
481       drawMarkers (theWorkspace);
482     }
483     else
484     {
485       glDrawArrays (aDrawMode, 0, myVboAttribs->GetElemsNb());
486     }
487   }
488
489   // bind with 0
490   myVboAttribs->UnbindAllAttributes (aGlContext);
491 }
492
493 // =======================================================================
494 // function : drawEdges
495 // purpose  :
496 // =======================================================================
497 void OpenGl_PrimitiveArray::drawEdges (const OpenGl_Vec4&              theEdgeColour,
498                                        const Handle(OpenGl_Workspace)& theWorkspace) const
499 {
500   const Handle(OpenGl_Context)& aGlContext = theWorkspace->GetGlContext();
501   if (myVboAttribs.IsNull())
502   {
503     return;
504   }
505
506   const OpenGl_AspectLine* anAspectLineOld = theWorkspace->SetAspectLine (theWorkspace->AspectFace()->AspectEdge());
507   const OpenGl_AspectLine* anAspect = theWorkspace->ApplyAspectLine();
508 #if !defined(GL_ES_VERSION_2_0)
509   const Standard_Integer aPolyModeOld = aGlContext->SetPolygonMode (GL_LINE);
510 #endif
511
512   if (aGlContext->core20fwd != NULL)
513   {
514     aGlContext->ShaderManager()->BindLineProgram (Handle(OpenGl_TextureSet)(), anAspect->Aspect()->Type(),
515                                                   Graphic3d_TOSM_UNLIT, Graphic3d_AlphaMode_Opaque, Standard_False,
516                                                   anAspect->ShaderProgramRes (aGlContext));
517   }
518   const GLenum aDrawMode = !aGlContext->ActiveProgram().IsNull()
519                          && aGlContext->ActiveProgram()->HasTessellationStage()
520                          ? GL_PATCHES
521                          : myDrawMode;
522 #if !defined(GL_ES_VERSION_2_0)
523   if (aGlContext->ActiveProgram().IsNull()
524    && aGlContext->core11 != NULL)
525   {
526     glDisable (GL_LIGHTING);
527   }
528 #endif
529
530   /// OCC22236 NOTE: draw edges for all situations:
531   /// 1) draw elements with GL_LINE style as edges from myPArray->bufferVBO[VBOEdges] indices array
532   /// 2) draw elements from vertex array, when bounds defines count of primitive's vertices.
533   /// 3) draw primitive's edges by vertexes if no edges and bounds array is specified
534   myVboAttribs->BindPositionAttribute (aGlContext);
535
536   aGlContext->SetColor4fv   (theEdgeColour);
537   aGlContext->SetTypeOfLine (anAspect->Aspect()->Type());
538   aGlContext->SetLineWidth  (anAspect->Aspect()->Width());
539
540   if (!myVboIndices.IsNull())
541   {
542     myVboIndices->Bind (aGlContext);
543     GLubyte* anOffset = myVboIndices->GetDataOffset();
544
545     // draw primitives by vertex count with the indices
546     if (!myBounds.IsNull())
547     {
548       const size_t aStride = myVboIndices->GetDataType() == GL_UNSIGNED_SHORT ? sizeof(unsigned short) : sizeof(unsigned int);
549       for (Standard_Integer aGroupIter = 0; aGroupIter < myBounds->NbBounds; ++aGroupIter)
550       {
551         const GLint aNbElemsInGroup = myBounds->Bounds[aGroupIter];
552         glDrawElements (aDrawMode, aNbElemsInGroup, myVboIndices->GetDataType(), anOffset);
553         anOffset += aStride * aNbElemsInGroup;
554       }
555     }
556     // draw one (or sequential) primitive by the indices
557     else
558     {
559       glDrawElements (aDrawMode, myVboIndices->GetElemsNb(), myVboIndices->GetDataType(), anOffset);
560     }
561     myVboIndices->Unbind (aGlContext);
562   }
563   else if (!myBounds.IsNull())
564   {
565     GLint aFirstElem = 0;
566     for (Standard_Integer aGroupIter = 0; aGroupIter < myBounds->NbBounds; ++aGroupIter)
567     {
568       const GLint aNbElemsInGroup = myBounds->Bounds[aGroupIter];
569       glDrawArrays (aDrawMode, aFirstElem, aNbElemsInGroup);
570       aFirstElem += aNbElemsInGroup;
571     }
572   }
573   else
574   {
575     glDrawArrays (aDrawMode, 0, !myVboAttribs.IsNull() ? myVboAttribs->GetElemsNb() : myAttribs->NbElements);
576   }
577
578   // unbind buffers
579   myVboAttribs->UnbindAttribute (aGlContext, Graphic3d_TOA_POS);
580
581   // restore line context
582   theWorkspace->SetAspectLine (anAspectLineOld);
583 #if !defined(GL_ES_VERSION_2_0)
584   aGlContext->SetPolygonMode (aPolyModeOld);
585 #endif
586 }
587
588 // =======================================================================
589 // function : drawMarkers
590 // purpose  :
591 // =======================================================================
592 void OpenGl_PrimitiveArray::drawMarkers (const Handle(OpenGl_Workspace)& theWorkspace) const
593 {
594   const OpenGl_AspectMarker* anAspectMarker = theWorkspace->ApplyAspectMarker();
595   const Handle(OpenGl_Context)&     aCtx    = theWorkspace->GetGlContext();
596   const GLenum aDrawMode = !aCtx->ActiveProgram().IsNull()
597                          && aCtx->ActiveProgram()->HasTessellationStage()
598                          ? GL_PATCHES
599                          : myDrawMode;
600
601   const Handle(OpenGl_TextureSet)& aSpriteNormRes = anAspectMarker->SpriteRes (aCtx);
602   const OpenGl_PointSprite* aSpriteNorm = !aSpriteNormRes.IsNull() ? dynamic_cast<const OpenGl_PointSprite*> (aSpriteNormRes->First().get()) : NULL;
603   if (aSpriteNorm != NULL
604   && !aSpriteNorm->IsDisplayList())
605   {
606     // Textured markers will be drawn with the point sprites
607     aCtx->SetPointSize (anAspectMarker->MarkerSize());
608     aCtx->SetPointSpriteOrigin();
609   #if !defined(GL_ES_VERSION_2_0)
610     if (aCtx->core11 != NULL)
611     {
612       aCtx->core11fwd->glEnable (GL_ALPHA_TEST);
613       aCtx->core11fwd->glAlphaFunc (GL_GEQUAL, 0.1f);
614     }
615   #endif
616
617     aCtx->core11fwd->glEnable (GL_BLEND);
618     aCtx->core11fwd->glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
619
620     aCtx->core11fwd->glDrawArrays (aDrawMode, 0, !myVboAttribs.IsNull() ? myVboAttribs->GetElemsNb() : myAttribs->NbElements);
621
622     aCtx->core11fwd->glDisable (GL_BLEND);
623   #if !defined(GL_ES_VERSION_2_0)
624     if (aCtx->core11 != NULL)
625     {
626       if (aCtx->ShaderManager()->MaterialState().AlphaCutoff() >= ShortRealLast())
627       {
628         aCtx->core11fwd->glDisable (GL_ALPHA_TEST);
629       }
630       else
631       {
632         aCtx->core11fwd->glAlphaFunc (GL_GEQUAL, aCtx->ShaderManager()->MaterialState().AlphaCutoff());
633       }
634     }
635   #endif
636     aCtx->SetPointSize (1.0f);
637     return;
638   }
639   else if (anAspectMarker->Aspect()->Type() == Aspect_TOM_POINT)
640   {
641     aCtx->SetPointSize (anAspectMarker->MarkerSize());
642     aCtx->core11fwd->glDrawArrays (aDrawMode, 0, !myVboAttribs.IsNull() ? myVboAttribs->GetElemsNb() : myAttribs->NbElements);
643     aCtx->SetPointSize (1.0f);
644   }
645 #if !defined(GL_ES_VERSION_2_0)
646   // Textured markers will be drawn with the glBitmap
647   else if (anAspectMarker->Aspect()->Type() != Aspect_TOM_POINT
648         && aSpriteNorm != NULL)
649   {
650     /**if (!isHilight && (myPArray->vcolours != NULL))
651     {
652       for (Standard_Integer anIter = 0; anIter < myAttribs->NbElements; anIter++)
653       {
654         glColor4ubv    (myPArray->vcolours[anIter].GetData());
655         glRasterPos3fv (myAttribs->Value<Graphic3d_Vec3> (anIter).GetData());
656         aSpriteNorm->DrawBitmap (theWorkspace->GetGlContext());
657       }
658     }
659     else*/
660     {
661       for (Standard_Integer anIter = 0; anIter < myAttribs->NbElements; anIter++)
662       {
663         aCtx->core11->glRasterPos3fv (myAttribs->Value<Graphic3d_Vec3> (anIter).GetData());
664         aSpriteNorm->DrawBitmap (theWorkspace->GetGlContext());
665       }
666     }
667   }
668 #endif
669 }
670
671 // =======================================================================
672 // function : OpenGl_PrimitiveArray
673 // purpose  :
674 // =======================================================================
675 OpenGl_PrimitiveArray::OpenGl_PrimitiveArray (const OpenGl_GraphicDriver* theDriver)
676
677 : myDrawMode  (DRAW_MODE_NONE),
678   myIsFillType(Standard_False),
679   myIsVboInit (Standard_False)
680 {
681   if (theDriver != NULL)
682   {
683     myUID = theDriver->GetNextPrimitiveArrayUID();
684   }
685 }
686
687 // =======================================================================
688 // function : OpenGl_PrimitiveArray
689 // purpose  :
690 // =======================================================================
691 OpenGl_PrimitiveArray::OpenGl_PrimitiveArray (const OpenGl_GraphicDriver*          theDriver,
692                                               const Graphic3d_TypeOfPrimitiveArray theType,
693                                               const Handle(Graphic3d_IndexBuffer)& theIndices,
694                                               const Handle(Graphic3d_Buffer)&      theAttribs,
695                                               const Handle(Graphic3d_BoundBuffer)& theBounds)
696
697 : myIndices   (theIndices),
698   myAttribs   (theAttribs),
699   myBounds    (theBounds),
700   myDrawMode  (DRAW_MODE_NONE),
701   myIsFillType(Standard_False),
702   myIsVboInit (Standard_False)
703 {
704   if (!myIndices.IsNull()
705     && myIndices->NbElements < 1)
706   {
707     // dummy index buffer?
708     myIndices.Nullify();
709   }
710
711   if (theDriver != NULL)
712   {
713     myUID = theDriver->GetNextPrimitiveArrayUID();
714   #if defined (GL_ES_VERSION_2_0)
715     const Handle(OpenGl_Context)& aCtx = theDriver->GetSharedContext();
716     if (!aCtx.IsNull())
717     {
718       processIndices (aCtx);
719     }
720   #endif
721   }
722
723   setDrawMode (theType);
724 }
725
726 // =======================================================================
727 // function : ~OpenGl_PrimitiveArray
728 // purpose  :
729 // =======================================================================
730 OpenGl_PrimitiveArray::~OpenGl_PrimitiveArray()
731 {
732   //
733 }
734
735 // =======================================================================
736 // function : Release
737 // purpose  :
738 // =======================================================================
739 void OpenGl_PrimitiveArray::Release (OpenGl_Context* theContext)
740 {
741   myIsVboInit = Standard_False;
742   if (!myVboIndices.IsNull())
743   {
744     if (theContext)
745     {
746       theContext->DelayedRelease (myVboIndices);
747     }
748     myVboIndices.Nullify();
749   }
750   if (!myVboAttribs.IsNull())
751   {
752     if (theContext)
753     {
754       theContext->DelayedRelease (myVboAttribs);
755     }
756     myVboAttribs.Nullify();
757   }
758 }
759
760 // =======================================================================
761 // function : Render
762 // purpose  :
763 // =======================================================================
764 void OpenGl_PrimitiveArray::Render (const Handle(OpenGl_Workspace)& theWorkspace) const
765 {
766   if (myDrawMode == DRAW_MODE_NONE)
767   {
768     return;
769   }
770
771   const OpenGl_AspectFace*   anAspectFace   = theWorkspace->ApplyAspectFace();
772   const OpenGl_AspectLine*   anAspectLine   = theWorkspace->ApplyAspectLine();
773   const OpenGl_AspectMarker* anAspectMarker = myDrawMode == GL_POINTS
774                                             ? theWorkspace->ApplyAspectMarker()
775                                             : theWorkspace->AspectMarker();
776
777   const Handle(OpenGl_Context)& aCtx = theWorkspace->GetGlContext();
778
779   Handle(OpenGl_TextureSet) aTextureBack;
780   bool toDrawArray = true;
781   int toDrawInteriorEdges = 0; // 0 - no edges, 1 - glsl edges, 2 - polygonMode
782   if (myIsFillType)
783   {
784     toDrawArray = anAspectFace->Aspect()->InteriorStyle() != Aspect_IS_EMPTY;
785     if (anAspectFace->Aspect()->ToDrawEdges())
786     {
787       toDrawInteriorEdges = 1;
788       toDrawArray = true;
789     #if !defined(GL_ES_VERSION_2_0)
790       if (anAspectFace->Aspect()->EdgeLineType() != Aspect_TOL_SOLID
791        || aCtx->hasGeometryStage == OpenGl_FeatureNotAvailable
792        || aCtx->caps->usePolygonMode)
793       {
794         toDrawInteriorEdges = 2;
795         if (anAspectFace->Aspect()->InteriorStyle() == Aspect_IS_EMPTY)
796         {
797           if (anAspectFace->Aspect()->EdgeLineType() != Aspect_TOL_SOLID)
798           {
799             toDrawArray = false;
800           }
801           else
802           {
803             aCtx->SetPolygonMode (GL_LINE);
804           }
805         }
806       }
807     #endif
808     }
809   }
810   else
811   {
812     if (myDrawMode == GL_POINTS)
813     {
814       if (anAspectMarker->Aspect()->Type() == Aspect_TOM_EMPTY)
815       {
816         return;
817       }
818     }
819     else
820     {
821       if (anAspectLine->Aspect()->Type() == Aspect_TOL_EMPTY)
822       {
823         return;
824       }
825     }
826
827     // Temporarily disable environment mapping
828     aTextureBack = aCtx->BindTextures (Handle(OpenGl_TextureSet)());
829   }
830
831   // create VBOs on first render call
832   if (!myIsVboInit)
833   {
834     // compatibility - keep data to draw markers using display lists
835     Standard_Boolean toKeepData = Standard_False;
836     if (myDrawMode == GL_POINTS)
837     {
838       const Handle(OpenGl_TextureSet)& aSpriteNormRes = anAspectMarker->SpriteRes (aCtx);
839       const OpenGl_PointSprite* aSpriteNorm = !aSpriteNormRes.IsNull() ? dynamic_cast<const OpenGl_PointSprite*> (aSpriteNormRes->First().get()) : NULL;
840       toKeepData = aSpriteNorm != NULL
841                &&  aSpriteNorm->IsDisplayList();
842     }
843   #if defined (GL_ES_VERSION_2_0)
844     processIndices (aCtx);
845   #endif
846     buildVBO (aCtx, toKeepData);
847     myIsVboInit = Standard_True;
848   }
849   else if ((!myAttribs.IsNull()
850          &&  myAttribs->IsMutable())
851         || (!myIndices.IsNull()
852          &&  myIndices->IsMutable()))
853   {
854     updateVBO (aCtx);
855   }
856
857   Graphic3d_TypeOfShadingModel aShadingModel = Graphic3d_TOSM_UNLIT;
858   if (toDrawArray)
859   {
860     const bool hasColorAttrib = !myVboAttribs.IsNull()
861                               && myVboAttribs->HasColorAttribute();
862     const bool toHilight    = theWorkspace->ToHighlight();
863     const bool hasVertColor = hasColorAttrib && !toHilight;
864     const bool hasVertNorm  = !myVboAttribs.IsNull() && myVboAttribs->HasNormalAttribute();
865     switch (myDrawMode)
866     {
867       case GL_POINTS:
868       {
869         aShadingModel = aCtx->ShaderManager()->ChooseMarkerShadingModel (anAspectFace->ShadingModel(), hasVertNorm);
870         const Handle(OpenGl_TextureSet)& aSpriteNormRes = anAspectMarker->SpriteRes (aCtx);
871         const OpenGl_PointSprite* aSpriteNorm = !aSpriteNormRes.IsNull() ? dynamic_cast<const OpenGl_PointSprite*> (aSpriteNormRes->First().get()) : NULL;
872         if (aSpriteNorm != NULL
873         && !aSpriteNorm->IsDisplayList())
874         {
875           const Handle(OpenGl_TextureSet)& aSprite = toHilight && anAspectMarker->SpriteHighlightRes (aCtx)->First()->IsValid()
876                                                    ? anAspectMarker->SpriteHighlightRes (aCtx)
877                                                    : aSpriteNormRes;
878           aCtx->BindTextures (aSprite);
879           aCtx->ShaderManager()->BindMarkerProgram (aSprite, aShadingModel, Graphic3d_AlphaMode_Opaque, hasVertColor, anAspectMarker->ShaderProgramRes (aCtx));
880         }
881         else
882         {
883           aCtx->ShaderManager()->BindMarkerProgram (Handle(OpenGl_TextureSet)(), aShadingModel, Graphic3d_AlphaMode_Opaque, hasVertColor, anAspectMarker->ShaderProgramRes (aCtx));
884         }
885         break;
886       }
887       case GL_LINES:
888       case GL_LINE_STRIP:
889       {
890         aShadingModel = aCtx->ShaderManager()->ChooseLineShadingModel (anAspectFace->ShadingModel(), hasVertNorm);
891         aCtx->ShaderManager()->BindLineProgram (NULL,
892                                                 anAspectLine->Aspect()->Type(),
893                                                 aShadingModel,
894                                                 Graphic3d_AlphaMode_Opaque,
895                                                 hasVertColor,
896                                                 anAspectLine->ShaderProgramRes (aCtx));
897         break;
898       }
899       default:
900       {
901         aShadingModel = aCtx->ShaderManager()->ChooseFaceShadingModel (anAspectFace->ShadingModel(), hasVertNorm);
902         const Handle(OpenGl_TextureSet)& aTextures = aCtx->ActiveTextures();
903         const Standard_Boolean toEnableEnvMap = (!aTextures.IsNull() && (aTextures == theWorkspace->EnvironmentTexture()));
904         aCtx->ShaderManager()->BindFaceProgram (aTextures,
905                                                 aShadingModel,
906                                                 aCtx->ShaderManager()->MaterialState().HasAlphaCutoff() ? Graphic3d_AlphaMode_Mask : Graphic3d_AlphaMode_Opaque,
907                                                 toDrawInteriorEdges == 1 ? anAspectFace->Aspect()->InteriorStyle() : Aspect_IS_SOLID,
908                                                 hasVertColor,
909                                                 toEnableEnvMap,
910                                                 toDrawInteriorEdges == 1,
911                                                 anAspectFace->ShaderProgramRes (aCtx));
912         if (toDrawInteriorEdges == 1)
913         {
914           aCtx->ShaderManager()->PushInteriorState (aCtx->ActiveProgram(), anAspectFace->Aspect());
915         }
916         break;
917       }
918     }
919
920   #if !defined(GL_ES_VERSION_2_0)
921     // manage FFP lighting
922     if (aCtx->ActiveProgram().IsNull()
923      && aCtx->core11 != NULL)
924     {
925       if (aShadingModel == Graphic3d_TOSM_UNLIT)
926       {
927         glDisable (GL_LIGHTING);
928       }
929       else
930       {
931         glEnable (GL_LIGHTING);
932       }
933     }
934   #endif
935
936     if (!aCtx->ActiveTextures().IsNull()
937      && !aCtx->ActiveTextures()->IsEmpty()
938      && !aCtx->ActiveTextures()->First().IsNull()
939      && myDrawMode != GL_POINTS) // transformation is not supported within point sprites
940     {
941       aCtx->SetTextureMatrix (aCtx->ActiveTextures()->First()->Sampler()->Parameters());
942     }
943
944     const Graphic3d_Vec4* aFaceColors = !myBounds.IsNull() && !toHilight && anAspectFace->Aspect()->InteriorStyle() != Aspect_IS_HIDDENLINE
945                                       ?  myBounds->Colors
946                                       :  NULL;
947     if (!myIsFillType)
948     {
949       const OpenGl_Vec4& aLineColor = myDrawMode == GL_POINTS ? theWorkspace->MarkerColor() : theWorkspace->LineColor();
950       aCtx->SetColor4fv (aLineColor);
951       if (myDrawMode == GL_LINES
952        || myDrawMode == GL_LINE_STRIP)
953       {
954         aCtx->SetTypeOfLine (anAspectLine->Aspect()->Type());
955         aCtx->SetLineWidth  (anAspectLine->Aspect()->Width());
956       }
957
958       drawArray (theWorkspace, aFaceColors, hasColorAttrib);
959       aCtx->BindTextures (aTextureBack);
960       return;
961     }
962
963     const OpenGl_Vec4& anInteriorColor = theWorkspace->InteriorColor();
964     aCtx->SetColor4fv (anInteriorColor);
965     drawArray (theWorkspace, aFaceColors, hasColorAttrib);
966
967     // draw outline - only closed triangulation with defined vertex normals can be drawn in this way
968     if (anAspectFace->Aspect()->ToDrawSilhouette()
969      && aCtx->ToCullBackFaces()
970      && aCtx->ShaderManager()->BindOutlineProgram())
971     {
972       const Graphic3d_Vec2i aViewSize (aCtx->Viewport()[2], aCtx->Viewport()[3]);
973       const Standard_Integer aMin = aViewSize.minComp();
974       const GLfloat anEdgeWidth  = (GLfloat )anAspectFace->Aspect()->EdgeWidth() * aCtx->LineWidthScale() / (GLfloat )aMin;
975       const GLfloat anOrthoScale = theWorkspace->View()->Camera()->IsOrthographic() ? (GLfloat )theWorkspace->View()->Camera()->Scale() : -1.0f;
976
977       const Handle(OpenGl_ShaderProgram)& anOutlineProgram = aCtx->ActiveProgram();
978       anOutlineProgram->SetUniform (aCtx, anOutlineProgram->GetStateLocation (OpenGl_OCCT_SILHOUETTE_THICKNESS), anEdgeWidth);
979       anOutlineProgram->SetUniform (aCtx, anOutlineProgram->GetStateLocation (OpenGl_OCCT_ORTHO_SCALE),          anOrthoScale);
980       aCtx->SetColor4fv (anAspectFace->Aspect()->EdgeColorRGBA());
981
982       aCtx->core11fwd->glCullFace (GL_FRONT);
983       drawArray (theWorkspace, NULL, false);
984
985       aCtx->core11fwd->glCullFace (GL_BACK);
986     }
987   }
988
989 #if !defined(GL_ES_VERSION_2_0)
990   // draw triangulation edges using Polygon Mode
991   if (toDrawInteriorEdges == 2)
992   {
993     if (anAspectFace->Aspect()->InteriorStyle() == Aspect_IS_HOLLOW
994      && anAspectFace->Aspect()->EdgeLineType()  == Aspect_TOL_SOLID)
995     {
996       aCtx->SetPolygonMode (GL_FILL);
997     }
998     else
999     {
1000       const OpenGl_Vec4& anEdgeColor = theWorkspace->EdgeColor();
1001       drawEdges (anEdgeColor, theWorkspace);
1002     }
1003   }
1004 #endif
1005 }
1006
1007 // =======================================================================
1008 // function : setDrawMode
1009 // purpose  :
1010 // =======================================================================
1011 void OpenGl_PrimitiveArray::setDrawMode (const Graphic3d_TypeOfPrimitiveArray theType)
1012 {
1013   if (myAttribs.IsNull())
1014   {
1015     myDrawMode = DRAW_MODE_NONE;
1016     myIsFillType = false;
1017     return;
1018   }
1019
1020   switch (theType)
1021   {
1022     case Graphic3d_TOPA_POINTS:
1023       myDrawMode   = GL_POINTS;
1024       myIsFillType = false;
1025       break;
1026     case Graphic3d_TOPA_SEGMENTS:
1027       myDrawMode   = GL_LINES;
1028       myIsFillType = false;
1029       break;
1030     case Graphic3d_TOPA_POLYLINES:
1031       myDrawMode   = GL_LINE_STRIP;
1032       myIsFillType = false;
1033       break;
1034     case Graphic3d_TOPA_TRIANGLES:
1035       myDrawMode   = GL_TRIANGLES;
1036       myIsFillType = true;
1037       break;
1038     case Graphic3d_TOPA_TRIANGLESTRIPS:
1039       myDrawMode   = GL_TRIANGLE_STRIP;
1040       myIsFillType = true;
1041       break;
1042     case Graphic3d_TOPA_TRIANGLEFANS:
1043       myDrawMode   = GL_TRIANGLE_FAN;
1044       myIsFillType = true;
1045       break;
1046     //
1047     case Graphic3d_TOPA_LINES_ADJACENCY:
1048       myDrawMode = GL_LINES_ADJACENCY;
1049       myIsFillType = false;
1050       break;
1051     case Graphic3d_TOPA_LINE_STRIP_ADJACENCY:
1052       myDrawMode   = GL_LINE_STRIP_ADJACENCY;
1053       myIsFillType = false;
1054       break;
1055     case Graphic3d_TOPA_TRIANGLES_ADJACENCY:
1056       myDrawMode   = GL_TRIANGLES_ADJACENCY;
1057       myIsFillType = true;
1058       break;
1059     case Graphic3d_TOPA_TRIANGLE_STRIP_ADJACENCY:
1060       myDrawMode   = GL_TRIANGLE_STRIP_ADJACENCY;
1061       myIsFillType = true;
1062       break;
1063     //
1064   #if !defined(GL_ES_VERSION_2_0)
1065     case Graphic3d_TOPA_QUADRANGLES:
1066       myDrawMode   = GL_QUADS;
1067       myIsFillType = true;
1068       break;
1069     case Graphic3d_TOPA_QUADRANGLESTRIPS:
1070       myDrawMode   = GL_QUAD_STRIP;
1071       myIsFillType = true;
1072       break;
1073     case Graphic3d_TOPA_POLYGONS:
1074       myDrawMode   = GL_POLYGON;
1075       myIsFillType = true;
1076       break;
1077   #else
1078     case Graphic3d_TOPA_QUADRANGLES:
1079     case Graphic3d_TOPA_QUADRANGLESTRIPS:
1080     case Graphic3d_TOPA_POLYGONS:
1081   #endif
1082     case Graphic3d_TOPA_UNDEFINED:
1083       myDrawMode   = DRAW_MODE_NONE;
1084       myIsFillType = false;
1085       break;
1086   }
1087 }
1088
1089 // =======================================================================
1090 // function : processIndices
1091 // purpose  :
1092 // =======================================================================
1093 Standard_Boolean OpenGl_PrimitiveArray::processIndices (const Handle(OpenGl_Context)& theContext) const
1094 {
1095   if (myIndices.IsNull()
1096    || myAttribs.IsNull()
1097    || theContext->hasUintIndex)
1098   {
1099     return Standard_True;
1100   }
1101
1102   if (myAttribs->NbElements > std::numeric_limits<GLushort>::max())
1103   {
1104     Handle(Graphic3d_Buffer) anAttribs = new Graphic3d_Buffer (new NCollection_AlignedAllocator (16));
1105     if (!anAttribs->Init (myIndices->NbElements, myAttribs->AttributesArray(), myAttribs->NbAttributes))
1106     {
1107       return Standard_False; // failed to initialize attribute array
1108     }
1109
1110     for (Standard_Integer anIdxIdx = 0; anIdxIdx < myIndices->NbElements; ++anIdxIdx)
1111     {
1112       const Standard_Integer anIndex = myIndices->Index (anIdxIdx);
1113       memcpy (anAttribs->ChangeData() + myAttribs->Stride * anIdxIdx,
1114               myAttribs->Data()       + myAttribs->Stride * anIndex,
1115               myAttribs->Stride);
1116     }
1117
1118     myIndices.Nullify();
1119     myAttribs = anAttribs;
1120   }
1121
1122   return Standard_True;
1123 }
1124
1125 // =======================================================================
1126 // function : InitBuffers
1127 // purpose  :
1128 // =======================================================================
1129 void OpenGl_PrimitiveArray::InitBuffers (const Handle(OpenGl_Context)&        theContext,
1130                                          const Graphic3d_TypeOfPrimitiveArray theType,
1131                                          const Handle(Graphic3d_IndexBuffer)& theIndices,
1132                                          const Handle(Graphic3d_Buffer)&      theAttribs,
1133                                          const Handle(Graphic3d_BoundBuffer)& theBounds)
1134 {
1135   // Release old graphic resources
1136   Release (theContext.operator->());
1137
1138   myIndices = theIndices;
1139   myAttribs = theAttribs;
1140   myBounds = theBounds;
1141 #if defined(GL_ES_VERSION_2_0)
1142   processIndices (theContext);
1143 #endif
1144
1145   setDrawMode (theType);
1146 }