add a useful comment
[mussa.git] / alg / glseqbrowser.cpp
1 #include "alg/glseqbrowser.hpp"
2 #include "mussa_exceptions.hpp"
3
4 #include <math.h>
5 #include <iostream>
6 #include <sstream>
7 #include <stdexcept>
8
9 using namespace std;
10
11 GlSeqBrowser::GlSeqBrowser()
12   : border_width(25),
13     cur_ortho(400.0, 0.0, 600.0, 0.0),
14     viewport_size(600, 400),
15     viewport_center((cur_ortho.right-cur_ortho.left)/2+cur_ortho.left),
16     zoom_level(2),
17     color_mapper(),
18     track_container()
19 {
20 }
21
22 GlSeqBrowser::GlSeqBrowser(const GlSeqBrowser& gt)
23   : border_width(gt.border_width),
24     cur_ortho(gt.cur_ortho),
25     viewport_size(gt.viewport_size),
26     viewport_center(gt.viewport_center),
27     zoom_level(gt.zoom_level),
28     color_mapper(gt.color_mapper),
29     track_container(gt.track_container),
30     path_segments(gt.path_segments)
31 {
32 }
33
34 void GlSeqBrowser::initializeGL()
35 {
36   glEnable(GL_DEPTH_TEST);
37   glClearColor(1.0, 1.0, 1.0, 0.0);
38   glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
39   glShadeModel(GL_FLAT);
40 }
41
42 void GlSeqBrowser::resizeGL(int width, int height)
43 {
44   viewport_size.x = width;
45   viewport_size.y = height;
46   glViewport(0, 0, (GLsizei)width, (GLsizei)height);
47   update_viewport(viewport_center, zoom_level);
48 }
49
50 void GlSeqBrowser::paintGL() const
51 {
52   glClear(GL_COLOR_BUFFER_BIT|GL_DEPTH_BUFFER_BIT);
53
54   glPushMatrix();
55   glMatrixMode(GL_PROJECTION);
56   glLoadIdentity();
57   glOrtho(cur_ortho.left, cur_ortho.right,
58           cur_ortho.bottom, cur_ortho.top,
59           -50.0, 50);
60
61   draw();
62
63   glPopMatrix();
64   glFlush();
65 }
66
67 void GlSeqBrowser::processSelection(GLuint hits, GLuint buffer[], GLuint bufsize, const rect<float>& r)
68 {
69   GLuint *ptr;
70   GLuint names;
71   GLuint consumed_names = 0;
72   float z1;
73   float z2;
74   GLuint objtype;
75   GLuint objid;
76   GLuint path_index = 0;
77   GLuint pair_key_0 = 0;
78   GLuint pair_key_1 = 0;
79   TrackRegion track;
80
81   selected_paths.clear();
82   selected_tracks.clear();
83
84   ptr = (GLuint *) buffer;
85   if (hits > 0)
86     selectedMode = true;
87   for (GLuint i=0; i < hits; ++i)
88   {
89     if ((i + 5) > bufsize) {
90       std::clog << "*** selection overflow***" << std::endl;
91     } else {
92       consumed_names = 0;
93       names = *ptr++;
94       z1 = ((float)*ptr++)/0x7fffffff;
95       z2 = ((float)*ptr++)/0x7fffffff;
96       objtype = *ptr++; ++consumed_names;
97       switch (objtype) {
98         case MussaSegment:
99           path_index = *ptr++; ++consumed_names;
100           pair_key_0 = *ptr++; ++consumed_names;
101           pair_key_1 = *ptr++; ++consumed_names;
102           if (path_index < path_segments.size()) {
103             segment_key k(pair_key_0, pair_key_1);
104             pair_segment_map::iterator psm_i;
105             psm_i = path_segments[path_index].find(k);
106             if (psm_i != path_segments[path_index].end()) {
107               Segment &seg = psm_i->second;
108               selected_paths.insert(seg.path_ids.begin(), seg.path_ids.end());
109             }
110             // else something else is wrong
111           } else {
112             // something wasn't right
113             clog << "invalid path_index " << path_index 
114                  << " should have been [0,"<<path_segments.size()
115                  << ") " << endl;
116           }
117           break;
118         case MussaTrack:
119         {
120           objid = *ptr++; ++consumed_names;
121
122           int left = track_container[objid]->leftbase(r.left);
123           int right = track_container[objid]->rightbase(r.right);
124           // the static_cast should be ok, since basepairs line up on 
125           // integral values
126           //TrackRegion track(objid, left, right); 
127           track.set(objid, left, right);
128           selected_tracks.push_back(track);
129           //clog << "selected track " << objid
130           //     << "(" << left << ", " << right << ")" << endl;
131         }
132         break;
133         default:
134           cout << "unknown type " << objtype << " ";
135           for(; consumed_names < names; ++consumed_names) {
136             cout << consumed_names << "," << *ptr++ << " ";
137           }
138           cout << endl;
139           break;
140       }
141     }
142   }
143 }
144
145 void GlSeqBrowser::selectRegion(int top, int left, int bottom, int right)
146 {
147   GLfloat x_scale = cur_ortho.width()/((float)viewport_size.x);
148   GLfloat y_scale = cur_ortho.height()/((float)viewport_size.y);
149   GLfloat x_left = cur_ortho.left + (left*x_scale);
150   GLfloat x_right = cur_ortho.left + (right * x_scale);
151
152   if (top > bottom) {
153     // woah, someone gave us a rectangle with the origin in the lower left
154     int temp = top;
155     bottom = top;
156     top = temp;
157   }
158   // swap the orientation of canvas coordinates
159   GLfloat y_top = cur_ortho.top-(bottom*y_scale);
160   GLfloat y_bottom = cur_ortho.top - top * y_scale;
161   selectedRegion = rect<float>(y_top, x_left, y_bottom, x_right);
162
163   // hopefully this will make a buffer big enough to receive 
164   // everything being selected
165   //const size_t pathz_count = mussaAnalysis->paths().refined_pathz.size();
166   //const GLuint select_buf_size = 1 + 5 * (pathz_count + sequences.size());
167   const GLuint select_buf_size = 500000;
168   GLuint selectBuf[select_buf_size];
169   glSelectBuffer(select_buf_size, selectBuf);
170   GLint hits;
171
172   (void)glRenderMode(GL_SELECT);
173   glPushMatrix();
174   glMatrixMode(GL_PROJECTION);
175   glLoadIdentity();
176   glOrtho(x_left, x_right, y_top, y_bottom, -50.0, 50.0);
177   glMatrixMode(GL_MODELVIEW);
178   glLoadIdentity();
179
180   draw();
181
182   glFlush();
183   glPopMatrix();
184   hits = glRenderMode(GL_RENDER);
185   processSelection(hits, selectBuf, select_buf_size, selectedRegion);
186 }
187
188 float GlSeqBrowser::border() const
189 {
190   return border_width;
191 }
192
193 float GlSeqBrowser::left() const
194
195   float left;
196   if (track_container.size() == 0)
197   {
198     return cur_ortho.left;
199   } else {
200     vector<boost::shared_ptr<GlSequence> >::const_iterator track_i = track_container.begin();    
201     left = (*track_i)->x();
202     for( ; track_i != track_container.end(); ++track_i)
203     {
204       if ((*track_i)->x() < left) {
205         left = (*track_i)->x();
206       }
207     }
208     return left-border_width;
209   }
210 }
211
212 float GlSeqBrowser::right() const
213
214   float right;
215   if (track_container.size() == 0) {
216     return cur_ortho.right;
217   } else {
218     vector<boost::shared_ptr<GlSequence> >::const_iterator track_i = track_container.begin();
219     right = (*track_i)->right();
220     for( ; track_i != track_container.end(); ++track_i) {
221       if ((*track_i)->right() > right)
222         right = (*track_i)->right();
223     }
224     return right+border_width;
225   }
226 }
227
228 float GlSeqBrowser::get_pixel_width() const
229 {
230   GLint viewport[4];
231   glGetIntegerv(GL_VIEWPORT, viewport);
232   GLint vp_width = viewport[3]; // grab the viewport width
233   
234   return round((cur_ortho.right-cur_ortho.left)/vp_width);
235 }  
236
237 void GlSeqBrowser::setViewportCenter(float x)
238 {
239   update_viewport(x, zoom_level);
240   viewport_center = x;
241 }
242
243 float GlSeqBrowser::viewportLeft() const
244
245   return cur_ortho.left; 
246 }
247
248 float GlSeqBrowser::viewportCenter() const
249 {
250   return viewport_center;
251 }
252
253 float GlSeqBrowser::viewportRight() const
254
255   return cur_ortho.right; 
256 }
257
258 float GlSeqBrowser::viewportHeight() const
259 {
260   return cur_ortho.top - cur_ortho.bottom;
261 }
262
263 float GlSeqBrowser::viewportWidth() const
264 {
265   return cur_ortho.right - cur_ortho.left;
266 }
267
268 int GlSeqBrowser::viewportPixelHeight() const
269 {
270   return viewport_size.y;
271 }
272
273 int GlSeqBrowser::viewportPixelWidth() const
274 {
275   return viewport_size.x;
276 }
277
278 double GlSeqBrowser::zoomOut()
279 {
280
281   if (right() - left() > 0) {
282     cur_ortho.left = left();
283     cur_ortho.right = right();
284     zoom_level =  (right() - left()) / (double)viewport_size.x;
285     return zoom_level;
286   } else {
287     // made up number representing 50 bp / pixel
288     return 50.0;
289   }
290 }
291
292 double GlSeqBrowser::zoomToSequence()
293 {
294   // (experimentally determined zoom level)
295   const double friendly_zoom = 0.10;
296   setZoom(friendly_zoom);
297   return friendly_zoom;
298 }
299
300 void GlSeqBrowser::setZoom(double new_zoom)
301 {
302   update_viewport(viewport_center, new_zoom);
303   zoom_level = new_zoom;
304 }
305
306 double GlSeqBrowser::zoom() const
307 {
308   return zoom_level;
309 }
310
311 void GlSeqBrowser::setColorMapper(boost::shared_ptr<AnnotationColors> cm)
312 {
313   color_mapper = cm;
314 }
315
316 const AnnotationColors& GlSeqBrowser::colorMapper()
317 {
318   return *color_mapper;
319 }
320
321 void GlSeqBrowser::clear()
322 {
323   clear_selection();
324   clear_links();
325   path_segments.clear();
326   track_container.clear();
327 }
328
329 void GlSeqBrowser::clear_selection()
330 {
331   selectedMode = false;
332   selectedRegion.clear();
333   selected_paths.clear();
334   selected_tracks.clear();
335 }
336
337 void GlSeqBrowser::push_sequence(const Sequence& s)
338 {
339   boost::shared_ptr<Sequence> seq_copy(new Sequence(s));
340   GlSequence gs(seq_copy, color_mapper);
341   push_sequence(gs);
342 }
343
344
345 void GlSeqBrowser::push_sequence(boost::shared_ptr<Sequence> s)
346 {
347   boost::shared_ptr<GlSequence> gs(new GlSequence(s, color_mapper));
348   push_sequence(gs);
349 }
350
351 void GlSeqBrowser::push_sequence(GlSequence gs)
352 {
353   boost::shared_ptr<GlSequence> new_gs(new GlSequence(gs));
354   push_sequence(new_gs);
355 }
356
357 void GlSeqBrowser::push_sequence(boost::shared_ptr<GlSequence> gs)
358 {
359   clear_links();
360   track_container.push_back(gs);
361   update_layout();
362   if (track_container.size() > 1)
363     path_segments.push_back(pair_segment_map());
364 }
365
366 const std::vector<boost::shared_ptr<GlSequence> >& GlSeqBrowser::sequences() const
367 {
368   return track_container;
369 }
370
371 void GlSeqBrowser::clear_links()
372 {
373   path_segments.clear();
374   for (int i = track_container.size()-1; i > 0; --i)
375   {
376     path_segments.push_back(pair_segment_map());
377   }
378   pathid = 0;
379 }
380
381 void 
382 GlSeqBrowser::link(const vector<int>& path, const vector<bool>& rc, int length)
383 {
384   if (path.size() < 2) {
385     // should i throw an error instead?
386     return;
387   }
388   if (path.size() != track_container.size() ) {
389     stringstream msg;
390     msg << "Path size [" << path.size() << "] and track size [" 
391         << track_container.size() << "] don't match" << endl;
392     throw mussa_error(msg.str());
393   }
394   if (path.size() != rc.size()) {
395     throw runtime_error("path and reverse compliment must be the same length");
396   }
397   vector<int>::const_iterator path_i = path.begin();
398   vector<bool>::const_iterator rc_i = rc.begin();
399   int track_i = 0;
400   int prev_x = *path_i; ++path_i;
401   bool prev_rc = *rc_i; ++rc_i;
402   while (path_i != path.end() and rc_i != rc.end())
403   {
404     segment_key p(prev_x, *path_i);
405     pair_segment_map::iterator found_segment = path_segments[track_i].find(p);
406     if (found_segment == path_segments[track_i].end()) {
407       // not already found
408       float y1 = track_container[track_i]->y();
409             y1 -= track_container[track_i]->height()/2;
410       float y2 = track_container[track_i+1]->y();
411             y2 += track_container[track_i+1]->height()/2;
412       
413       bool rcFlag = (prev_rc or *rc_i) and !(prev_rc and *rc_i);
414       Segment s(prev_x, y1, *path_i, y2, rcFlag, length);
415       s.path_ids.insert(pathid);
416       path_segments[track_i][p] = s;
417     } else {
418       //found
419       found_segment->second.path_ids.insert(pathid);
420       // make each segment the size of the largest of any link between these 
421       // two bases
422       if (found_segment->second.length < length) {
423         found_segment->second.length = length;
424       }
425     }
426     prev_x = *path_i;
427     prev_rc = *rc_i;
428     ++track_i;
429     ++path_i;
430     ++rc_i;
431   }
432   // pathid is reset by push_sequence
433   ++pathid;
434 }
435
436 void GlSeqBrowser::setSelectedPaths(std::vector<int> paths)
437 {
438   selected_paths.clear();
439   for(std::vector<int>::iterator itor = paths.begin();
440       itor != paths.end();
441       ++itor)
442   {
443     selected_paths.insert(*itor);
444   }
445 }
446
447 const set<int>& GlSeqBrowser::selectedPaths() const
448 {
449   return selected_paths;
450 }
451
452 void GlSeqBrowser::appendSelectedTrack(GLuint track, int start, int stop)
453 {
454   selected_tracks.push_back(TrackRegion(track, start, stop));
455 }
456
457 list<TrackRegion> GlSeqBrowser::selectedTracks() const 
458 {
459   return selected_tracks;
460 }
461
462 //! copy sequence from selected track using formating function
463 template<class Item>
464 size_t GlSeqBrowser::copySelectedTracks(std::list<Item>& result, 
465              Item (*formatter)(boost::shared_ptr<Sequence> s, 
466                                int left, 
467                                int right))
468 {
469   size_t base_pairs_copied = 0;
470   result.clear();
471
472   for(selected_track_iterator track_i = selected_tracks.begin();
473       track_i != selected_tracks.end();
474       ++track_i)
475   {
476     int track_index = track_i->track_id;
477     if (track_index >= track_container.size()) {
478       // should this be an exception instead?
479       clog << "track " << track_index << " > " << track_container.size() 
480            << endl;
481     } else {
482       // we should be safe
483       boost::shared_ptr<Sequence> seq = track_container[track_index]->sequence();
484       result.push_back(formatter(seq, track_i->left, track_i->right));
485       base_pairs_copied += max(track_i->right-track_i->left, 0);
486     }
487   }
488   return base_pairs_copied;
489 }
490
491 //! copy sequence from selected tracks as FASTA sequences
492 size_t GlSeqBrowser::copySelectedTracksAsFasta(std::string& copy_buffer)
493 {
494   std::list<std::string> result;
495   struct AsFasta {
496     static string formatter(boost::shared_ptr<Sequence> seq, 
497                             int left, 
498                             int right)
499     {
500       stringstream s;
501       s << ">" << seq->get_fasta_header() 
502         << "|" << "subregion=" << left << "-" << right+1
503         << std::endl
504         << seq->subseq(left, right-left+1) << std::endl;
505       return s.str();
506     }
507   };
508   size_t base_pairs_copied = copySelectedTracks(result, AsFasta::formatter);
509   // I wish there was some way to use for_each and bind here
510   for (list<string>::iterator result_i = result.begin();
511        result_i != result.end();
512        ++result_i)
513   {
514     copy_buffer.append(*result_i);
515   }
516   return base_pairs_copied;
517 }
518
519 //! copy sequence from selected tracks as new sequences
520 size_t GlSeqBrowser::copySelectedTracksAsSequences(std::list<Sequence>& result)
521 {
522   struct AsSequence {
523     static Sequence formatter(boost::shared_ptr<Sequence> seq, 
524                               int left, 
525                               int right)
526     {
527       return seq->subseq(left, right-left+1);
528     }
529   };
530   return copySelectedTracks(result, AsSequence::formatter);
531 }
532
533 size_t GlSeqBrowser::copySelectedTracksAsSeqLocation(
534     std::list<SequenceLocation>& result)
535 {
536   struct AsSeqLocation {
537     static SequenceLocation formatter(boost::shared_ptr<Sequence> seq, 
538                                       int left, 
539                                       int right)
540     {
541       return SequenceLocation(seq, left, right);
542     }
543   };
544   return copySelectedTracks(result, AsSeqLocation::formatter);
545 }
546
547 //! copy sequence from selected tracks as plain sequences
548 size_t GlSeqBrowser::copySelectedTracksAsString(std::string& copy_buffer)
549 {
550   std::list<string> result;
551   struct AsString {
552     static string formatter(boost::shared_ptr<Sequence> seq, 
553                             int left, 
554                             int right)
555     {
556       stringstream s;
557       s << seq->subseq(left, right-left+1);
558       return s.str();
559     }
560   };
561
562   size_t base_pairs_copied = copySelectedTracks(result, AsString::formatter);
563   // I wish there was some way to use for_each and bind here
564   for (list<string>::iterator result_i = result.begin();
565        result_i != result.end();
566        ++result_i)
567   {
568     copy_buffer.append(*result_i);
569   }
570   return base_pairs_copied;
571 }
572
573 void GlSeqBrowser::centerOnPath(const vector<int>& paths)
574 {
575   if (paths.size() != track_container.size()) {
576     throw mussa_error("Path length didn't match the number of sequences");
577   }
578
579   for(size_t track_i = 0; track_i != track_container.size(); ++track_i)
580   {
581     // -15 = shift more to the left
582     track_container[track_i]->setX((viewport_center-15) - paths[track_i]);
583   }
584 }
585
586 void GlSeqBrowser::update_viewport(float center, double new_zoom)
587 {
588   // limit how close we can get
589   if (new_zoom < 0.01) {
590     new_zoom = 0.01;
591   }
592   double new_width = (new_zoom * (float)viewport_size.x);
593   cur_ortho.left = center-new_width/2.0;
594   cur_ortho.right = center+new_width/2.0;
595 }
596
597 void GlSeqBrowser::update_layout()
598 {
599   typedef std::vector<boost::shared_ptr<GlSequence> >::iterator glseq_itor_type;
600   float available_height = (float)cur_ortho.top - 2 * (float)border_width;
601   float max_base_pairs = 0;
602   size_t track_count = track_container.size();
603
604   if (track_count > 1) {
605     // we have several sequences
606     float track_spacing = available_height / (track_count-1);
607     float y = available_height + (float)border_width;
608     for(glseq_itor_type seq_i = track_container.begin();
609         seq_i != track_container.end();
610         ++seq_i, y-=track_spacing)
611     {
612       (*seq_i)->setX(0);
613       (*seq_i)->setY(y);
614       if ((*seq_i)->size() > max_base_pairs)
615         max_base_pairs = (*seq_i)->size();
616     }
617   } else if (track_count == 1) {
618     // center the single track
619     glseq_itor_type seq_i = track_container.begin();
620     (*seq_i)->setX(0);
621     (*seq_i)->setY(viewport_size.x /2);
622     max_base_pairs = (*seq_i)->size();
623   } else {
624     // nothing to do as we're empty
625     return;
626   }
627   cur_ortho.right = max_base_pairs + border_width;
628   cur_ortho.left = -border_width;
629   cur_ortho.top = viewport_size.x;
630   cur_ortho.bottom = 0;
631   viewport_center = (cur_ortho.width()/2) + cur_ortho.left;
632   zoomOut();
633 }
634
635 void GlSeqBrowser::draw() const
636 {
637   glMatrixMode(GL_MODELVIEW);
638   glInitNames();
639   glPushName(MussaSegment);
640   draw_segments();
641   glLoadName(MussaTrack);
642   draw_tracks();
643   glPopName();
644   // a selection shouldn't have a glName associated with it
645   draw_selection();
646 }
647
648 void GlSeqBrowser::draw_selection() const
649 {
650   // draw selection box
651   glEnable(GL_BLEND);
652   glDepthMask(GL_FALSE);
653   if (selectedMode) {
654     glColor4f(0.6, 0.6, 0.6, 0.9);
655     glRectf(selectedRegion.left, selectedRegion.top, 
656             selectedRegion.right, selectedRegion.bottom);
657   }
658   glDepthMask(GL_TRUE);
659   glDisable(GL_BLEND);
660 }
661
662 void GlSeqBrowser::draw_tracks() const
663 {
664   for(size_t track_i = 0; track_i != track_container.size(); ++track_i)
665   {
666     glPushName(track_i);
667     track_container[track_i]->draw(cur_ortho.left, cur_ortho.right);
668     glPopName();
669   }
670 }
671
672 void GlSeqBrowser::draw_segments() const
673 {
674   glLineWidth(1);
675   glEnable(GL_BLEND);
676   glDepthMask(GL_FALSE);
677   const float zdepth = -1.0;
678   const float min_segment_width = max((float)(1.0), get_pixel_width());
679   
680   // each vector contains path_segment_maps of all the connections
681   // between this track and the next
682   path_segment_map_vector::const_iterator psmv_i;
683   for(psmv_i = path_segments.begin();
684       psmv_i != path_segments.end();
685       ++psmv_i)
686   {
687     path_segment_map_vector::difference_type path_index;
688     path_index = psmv_i - path_segments.begin();
689     // these maps contain the pair index (used so we dont keep drawing the
690     // same segment) and the actual segment structure.
691     pair_segment_map::const_iterator psm_i;
692     for(psm_i = psmv_i->begin();
693         psm_i != psmv_i->end();
694         ++psm_i)
695     {
696       // grab the index into our segment map
697       const segment_key& key = psm_i->first;
698       // the second element of our map pair is a segment
699       const Segment &s = psm_i->second;
700       // need to do something so we can detect our selection
701       vector<int> selected;
702       set_intersection(selected_paths.begin(), selected_paths.end(),
703                        s.path_ids.begin(), s.path_ids.end(),
704                        back_inserter(selected));
705
706       if (not s.reversed) {
707         // forward
708         if (selected_paths.size() == 0 or selected.size() > 0) {
709           glColor4f(1.0, 0.0, 0.0, 1.0);
710         } else {
711           glColor4f(1.0, 0.7, 0.7, 0.4);
712         }
713       } else { 
714         // reverse
715         if (selected_paths.size() == 0 or selected.size() > 0) {
716           glColor4f(0.0, 0.0, 1.0, 1.0);
717         } else {
718           glColor4f(0.7, 0.7, 1.0, 0.4);
719         }
720       }
721       // save the multipart name for our segment
722       glPushName(path_index); glPushName(key.first); glPushName(key.second);
723       float seq_start_x = s.start.x 
724                         + track_container[path_index]->x();
725       float seq_end_x = s.end.x
726                       + track_container[path_index+1]->x();
727       if (s.length <= min_segment_width) {
728         // use lines for elements of length <=1 or < 1 pixel.
729         // and try to center the line
730         const float offset = s.length * 0.5;
731         glBegin(GL_LINES);
732           glVertex3f(seq_start_x+offset, s.start.y, -1);
733           glVertex3f(seq_end_x  +offset, s.end.y, -1);
734         glEnd();
735       } else {
736         // otherwise use quads
737         // compute length
738         float seq_start_x_length = s.start.x 
739                                  + s.length
740                                  + track_container[path_index]->x();
741         float seq_end_x_length = s.end.x
742                                + s.length
743                                + track_container[path_index+1]->x();
744         glBegin(GL_QUADS);
745           glVertex3f(seq_start_x, s.start.y, zdepth);
746           glVertex3f(seq_end_x, s.end.y, zdepth);
747           glVertex3f(seq_end_x_length, s.end.y, zdepth);
748           glVertex3f(seq_start_x_length, s.start.y, zdepth);
749         glEnd();
750       }      
751       // clear the names
752       glPopName(); glPopName(); glPopName();
753     }
754   }
755   glDepthMask(GL_TRUE);
756   glDisable(GL_BLEND);
757 }