552f4b3b954c136c4fb0e2846cdaff317a04c7d1
[blender.git] / source / blender / editors / mesh / editface.c
1 /*
2  * $Id$
3  *
4  * ***** BEGIN GPL LICENSE BLOCK *****
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software Foundation,
18  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
19  *
20  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
21  * All rights reserved.
22  *
23  * Contributor(s): Blender Foundation, Campbell Barton
24  *
25  * ***** END GPL LICENSE BLOCK *****
26  */
27
28
29 #include <math.h>
30 #include <string.h>
31
32 #include "MEM_guardedalloc.h"
33
34 #include "BLI_blenlib.h"
35 #include "BLI_math.h"
36 #include "BLI_heap.h"
37 #include "BLI_edgehash.h"
38 #include "BLI_editVert.h"
39 #include "BLI_utildefines.h"
40
41 #include "IMB_imbuf_types.h"
42 #include "IMB_imbuf.h"
43
44 #include "DNA_meshdata_types.h"
45 #include "DNA_object_types.h"
46 #include "DNA_scene_types.h"
47
48 #include "BKE_DerivedMesh.h"
49 #include "BKE_global.h"
50 #include "BKE_mesh.h"
51 #include "BKE_context.h"
52
53 #include "BIF_gl.h"
54
55 #include "ED_mesh.h"
56 #include "ED_screen.h"
57 #include "ED_view3d.h"
58
59 #include "WM_api.h"
60 #include "WM_types.h"
61
62 /* own include */
63 #include "mesh_intern.h"
64
65 /* copy the face flags, most importantly selection from the mesh to the final derived mesh,
66  * use in object mode when selecting faces (while painting) */
67 void paintface_flush_flags(Object *ob)
68 {
69         Mesh *me= get_mesh(ob);
70         DerivedMesh *dm= ob->derivedFinal;
71         MFace *faces, *mf, *mf_orig;
72         int *index_array = NULL;
73         int totface;
74         int i;
75         
76         if(me==NULL || dm==NULL)
77                 return;
78
79         index_array = dm->getFaceDataArray(dm, CD_ORIGINDEX);
80
81         if(!index_array)
82                 return;
83         
84         faces = dm->getFaceArray(dm);
85         totface = dm->getNumFaces(dm);
86         
87         mf= faces;
88         
89         for (i= 0; i<totface; i++, mf++) { /* loop over derived mesh faces */
90                 mf_orig= me->mface + index_array[i];
91                 mf->flag= mf_orig->flag;
92         }
93 }
94
95 /* returns 0 if not found, otherwise 1 */
96 static int facesel_face_pick(struct bContext *C, Mesh *me, short *mval, unsigned int *index, short rect)
97 {
98         ViewContext vc;
99         view3d_set_viewcontext(C, &vc);
100
101         if (!me || me->totface==0)
102                 return 0;
103
104 // XXX  if (v3d->flag & V3D_INVALID_BACKBUF) {
105 // XXX drawview.c!              check_backbuf();
106 // XXX          persp(PERSP_VIEW);
107 // XXX  }
108
109         if (rect) {
110                 /* sample rect to increase changes of selecting, so that when clicking
111                    on an edge in the backbuf, we can still select a face */
112
113                 int dist;
114                 *index = view3d_sample_backbuf_rect(&vc, mval, 3, 1, me->totface+1, &dist,0,NULL, NULL);
115         }
116         else {
117                 /* sample only on the exact position */
118                 *index = view3d_sample_backbuf(&vc, mval[0], mval[1]);
119         }
120
121         if ((*index)<=0 || (*index)>(unsigned int)me->totface)
122                 return 0;
123
124         (*index)--;
125         
126         return 1;
127 }
128
129 /* last_sel, use em->act_face otherwise get the last selected face in the editselections
130  * at the moment, last_sel is mainly useful for gaking sure the space image dosnt flicker */
131 MTFace *EM_get_active_mtface(EditMesh *em, EditFace **act_efa, MCol **mcol, int sloppy)
132 {
133         EditFace *efa = NULL;
134         
135         if(!EM_texFaceCheck(em))
136                 return NULL;
137         
138         efa = EM_get_actFace(em, sloppy);
139         
140         if (efa) {
141                 if (mcol) {
142                         if (CustomData_has_layer(&em->fdata, CD_MCOL))
143                                 *mcol = CustomData_em_get(&em->fdata, efa->data, CD_MCOL);
144                         else
145                                 *mcol = NULL;
146                 }
147                 if (act_efa) *act_efa = efa; 
148                 return CustomData_em_get(&em->fdata, efa->data, CD_MTFACE);
149         }
150         if (act_efa) *act_efa= NULL;
151         if(mcol) *mcol = NULL;
152         return NULL;
153 }
154
155 void paintface_hide(Object *ob, const int unselected)
156 {
157         Mesh *me;
158         MFace *mface;
159         int a;
160         
161         me= get_mesh(ob);
162         if(me==0 || me->totface==0) return;
163
164         mface= me->mface;
165         a= me->totface;
166         while(a--) {
167                 if((mface->flag & ME_HIDE) == 0) {
168                         if(unselected) {
169                                 if( (mface->flag & ME_FACE_SEL)==0) mface->flag |= ME_HIDE;
170                         }
171                         else {
172                                 if( (mface->flag & ME_FACE_SEL)) mface->flag |= ME_HIDE;
173                         }
174                 }
175                 if(mface->flag & ME_HIDE) mface->flag &= ~ME_FACE_SEL;
176                 
177                 mface++;
178         }
179         
180         paintface_flush_flags(ob);
181 }
182
183
184 void paintface_reveal(Object *ob)
185 {
186         Mesh *me;
187         MFace *mface;
188         int a;
189
190         me= get_mesh(ob);
191         if(me==0 || me->totface==0) return;
192
193         mface= me->mface;
194         a= me->totface;
195         while(a--) {
196                 if(mface->flag & ME_HIDE) {
197                         mface->flag |= ME_FACE_SEL;
198                         mface->flag -= ME_HIDE;
199                 }
200                 mface++;
201         }
202
203         paintface_flush_flags(ob);
204 }
205
206 /* Set tface seams based on edge data, uses hash table to find seam edges. */
207
208 static void hash_add_face(EdgeHash *ehash, MFace *mf)
209 {
210         BLI_edgehash_insert(ehash, mf->v1, mf->v2, NULL);
211         BLI_edgehash_insert(ehash, mf->v2, mf->v3, NULL);
212         if(mf->v4) {
213                 BLI_edgehash_insert(ehash, mf->v3, mf->v4, NULL);
214                 BLI_edgehash_insert(ehash, mf->v4, mf->v1, NULL);
215         }
216         else
217                 BLI_edgehash_insert(ehash, mf->v3, mf->v1, NULL);
218 }
219
220
221 static void select_linked_tfaces_with_seams(int mode, Mesh *me, unsigned int index)
222 {
223         MFace *mf;
224         int a, doit=1, mark=0;
225         char *linkflag;
226         EdgeHash *ehash, *seamhash;
227         MEdge *med;
228
229         ehash= BLI_edgehash_new();
230         seamhash = BLI_edgehash_new();
231         linkflag= MEM_callocN(sizeof(char)*me->totface, "linkflaguv");
232
233         for(med=me->medge, a=0; a < me->totedge; a++, med++)
234                 if(med->flag & ME_SEAM)
235                         BLI_edgehash_insert(seamhash, med->v1, med->v2, NULL);
236
237         if (mode==0 || mode==1) {
238                 /* only put face under cursor in array */
239                 mf= ((MFace*)me->mface) + index;
240                 hash_add_face(ehash, mf);
241                 linkflag[index]= 1;
242         }
243         else {
244                 /* fill array by selection */
245                 mf= me->mface;
246                 for(a=0; a<me->totface; a++, mf++) {
247                         if(mf->flag & ME_HIDE);
248                         else if(mf->flag & ME_FACE_SEL) {
249                                 hash_add_face(ehash, mf);
250                                 linkflag[a]= 1;
251                         }
252                 }
253         }
254
255         while(doit) {
256                 doit= 0;
257
258                 /* expand selection */
259                 mf= me->mface;
260                 for(a=0; a<me->totface; a++, mf++) {
261                         if(mf->flag & ME_HIDE)
262                                 continue;
263
264                         if(!linkflag[a]) {
265                                 mark= 0;
266
267                                 if(!BLI_edgehash_haskey(seamhash, mf->v1, mf->v2))
268                                         if(BLI_edgehash_haskey(ehash, mf->v1, mf->v2))
269                                                 mark= 1;
270                                 if(!BLI_edgehash_haskey(seamhash, mf->v2, mf->v3))
271                                         if(BLI_edgehash_haskey(ehash, mf->v2, mf->v3))
272                                                 mark= 1;
273                                 if(mf->v4) {
274                                         if(!BLI_edgehash_haskey(seamhash, mf->v3, mf->v4))
275                                                 if(BLI_edgehash_haskey(ehash, mf->v3, mf->v4))
276                                                         mark= 1;
277                                         if(!BLI_edgehash_haskey(seamhash, mf->v4, mf->v1))
278                                                 if(BLI_edgehash_haskey(ehash, mf->v4, mf->v1))
279                                                         mark= 1;
280                                 }
281                                 else if(!BLI_edgehash_haskey(seamhash, mf->v3, mf->v1))
282                                         if(BLI_edgehash_haskey(ehash, mf->v3, mf->v1))
283                                                 mark = 1;
284
285                                 if(mark) {
286                                         linkflag[a]= 1;
287                                         hash_add_face(ehash, mf);
288                                         doit= 1;
289                                 }
290                         }
291                 }
292
293         }
294
295         BLI_edgehash_free(ehash, NULL);
296         BLI_edgehash_free(seamhash, NULL);
297
298         if(mode==0 || mode==2) {
299                 for(a=0, mf=me->mface; a<me->totface; a++, mf++)
300                         if(linkflag[a])
301                                 mf->flag |= ME_FACE_SEL;
302                         else
303                                 mf->flag &= ~ME_FACE_SEL;
304         }
305         else if(mode==1) {
306                 for(a=0, mf=me->mface; a<me->totface; a++, mf++)
307                         if(linkflag[a] && (mf->flag & ME_FACE_SEL))
308                                 break;
309
310                 if (a<me->totface) {
311                         for(a=0, mf=me->mface; a<me->totface; a++, mf++)
312                                 if(linkflag[a])
313                                         mf->flag &= ~ME_FACE_SEL;
314                 }
315                 else {
316                         for(a=0, mf=me->mface; a<me->totface; a++, mf++)
317                                 if(linkflag[a])
318                                         mf->flag |= ME_FACE_SEL;
319                 }
320         }
321
322         MEM_freeN(linkflag);
323 }
324
325 void paintface_select_linked(bContext *UNUSED(C), Object *ob, short UNUSED(mval[2]), int mode)
326 {
327         Mesh *me;
328         unsigned int index=0;
329
330         me = get_mesh(ob);
331         if(me==0 || me->totface==0) return;
332
333         if (mode==0 || mode==1) {
334                 // XXX - Causes glitches, not sure why
335                 /*
336                 if (!facesel_face_pick(C, me, mval, &index, 1))
337                         return;
338                 */
339         }
340
341         select_linked_tfaces_with_seams(mode, me, index);
342
343         paintface_flush_flags(ob);
344 }
345
346 /* note: caller needs to run paintface_flush_flags(ob) after this */
347 void paintface_deselect_all_visible(Object *ob, int action, short flush_flags)
348 {
349         Mesh *me;
350         MFace *mface;
351         int a;
352
353         me= get_mesh(ob);
354         if(me==0) return;
355         
356         if(action == SEL_INVERT) {
357                 mface= me->mface;
358                 a= me->totface;
359                 while(a--) {
360                         if((mface->flag & ME_HIDE) == 0) {
361                                 mface->flag ^= ME_FACE_SEL;
362                         }
363                         mface++;
364                 }
365         }
366         else {
367                 if (action == SEL_TOGGLE) {
368                         action = SEL_SELECT;
369
370                         mface= me->mface;
371                         a= me->totface;
372                         while(a--) {
373                                 if((mface->flag & ME_HIDE) == 0 && mface->flag & ME_FACE_SEL) {
374                                         action = SEL_DESELECT;
375                                         break;
376                                 }
377                                 mface++;
378                         }
379                 }
380
381                 mface= me->mface;
382                 a= me->totface;
383                 while(a--) {
384                         if((mface->flag & ME_HIDE) == 0) {
385                                 switch (action) {
386                                 case SEL_SELECT:
387                                         mface->flag |= ME_FACE_SEL;
388                                         break;
389                                 case SEL_DESELECT:
390                                         mface->flag &= ~ME_FACE_SEL;
391                                         break;
392                                 case SEL_INVERT:
393                                         mface->flag ^= ME_FACE_SEL;
394                                         break;
395                                 }
396                         }
397                         mface++;
398                 }
399         }
400
401         if(flush_flags) {
402                 paintface_flush_flags(ob);
403         }
404 }
405
406 int paintface_minmax(Object *ob, float *min, float *max)
407 {
408         Mesh *me= get_mesh(ob);
409         MFace *mf;
410         MVert *mv;
411         int a, ok=0;
412         float vec[3];
413
414         if(me==NULL)
415                 return ok;
416
417         mv= me->mvert;
418         mf= me->mface;
419         for (a=me->totface; a>0; a--, mf++) {
420                 if ((mf->flag & ME_HIDE || !(mf->flag & ME_FACE_SEL)) == 0) {
421                         int i= mf->v4 ? 3:2;
422                         do {
423                                 mul_v3_m4v3(vec, ob->obmat, (mv + (*(&mf->v1 + i)))->co);
424                                 DO_MINMAX(vec, min, max);
425                         } while (i--);
426                         ok= 1;
427                 }
428         }
429         return ok;
430 }
431
432 /* ******************** edge loop shortest path ********************* */
433
434 #define ME_SEAM_DONE 2          /* reuse this flag */
435
436 static float edgetag_cut_cost(int e1, int e2, int vert)
437 {
438         EditVert *v = EM_get_vert_for_index(vert);
439         EditEdge *eed1 = EM_get_edge_for_index(e1), *eed2 = EM_get_edge_for_index(e2);
440         EditVert *v1 = EM_get_vert_for_index( (eed1->v1->tmp.l == vert)? eed1->v2->tmp.l: eed1->v1->tmp.l );
441         EditVert *v2 = EM_get_vert_for_index( (eed2->v1->tmp.l == vert)? eed2->v2->tmp.l: eed2->v1->tmp.l );
442         float cost, d1[3], d2[3];
443
444         cost = len_v3v3(v1->co, v->co);
445         cost += len_v3v3(v->co, v2->co);
446
447         sub_v3_v3v3(d1, v->co, v1->co);
448         sub_v3_v3v3(d2, v2->co, v->co);
449
450         cost = cost + 0.5f*cost*(2.0f - fabs(d1[0]*d2[0] + d1[1]*d2[1] + d1[2]*d2[2]));
451
452         return cost;
453 }
454
455 static void edgetag_add_adjacent(Heap *heap, int mednum, int vertnum, int *nedges, int *edges, int *prevedge, float *cost)
456 {
457         int startadj, endadj = nedges[vertnum+1];
458
459         for (startadj = nedges[vertnum]; startadj < endadj; startadj++) {
460                 int adjnum = edges[startadj];
461                 EditEdge *eedadj = EM_get_edge_for_index(adjnum);
462                 float newcost;
463
464                 if (eedadj->f2 & ME_SEAM_DONE)
465                         continue;
466
467                 newcost = cost[mednum] + edgetag_cut_cost(mednum, adjnum, vertnum);
468
469                 if (cost[adjnum] > newcost) {
470                         cost[adjnum] = newcost;
471                         prevedge[adjnum] = mednum;
472                         BLI_heap_insert(heap, newcost, SET_INT_IN_POINTER(adjnum));
473                 }
474         }
475 }
476
477 void edgetag_context_set(Scene *scene, EditEdge *eed, int val)
478 {
479         
480         switch (scene->toolsettings->edge_mode) {
481         case EDGE_MODE_SELECT:
482                 EM_select_edge(eed, val);
483                 break;
484         case EDGE_MODE_TAG_SEAM:
485                 if (val)                {eed->seam = 255;}
486                 else                    {eed->seam = 0;}
487                 break;
488         case EDGE_MODE_TAG_SHARP:
489                 if (val)                {eed->sharp = 1;}
490                 else                    {eed->sharp = 0;}
491                 break;                          
492         case EDGE_MODE_TAG_CREASE:      
493                 if (val)                {eed->crease = 1.0f;}
494                 else                    {eed->crease = 0.0f;}
495                 break;
496         case EDGE_MODE_TAG_BEVEL:
497                 if (val)                {eed->bweight = 1.0f;}
498                 else                    {eed->bweight = 0.0f;}
499                 break;
500         }
501 }
502
503 int edgetag_context_check(Scene *scene, EditEdge *eed)
504 {
505         switch (scene->toolsettings->edge_mode) {
506         case EDGE_MODE_SELECT:
507                 return (eed->f & SELECT) ? 1 : 0;
508         case EDGE_MODE_TAG_SEAM:
509                 return eed->seam ? 1 : 0;
510         case EDGE_MODE_TAG_SHARP:
511                 return eed->sharp ? 1 : 0;
512         case EDGE_MODE_TAG_CREASE:      
513                 return eed->crease ? 1 : 0;
514         case EDGE_MODE_TAG_BEVEL:
515                 return eed->bweight ? 1 : 0;
516         }
517         return 0;
518 }
519
520
521 int edgetag_shortest_path(Scene *scene, EditMesh *em, EditEdge *source, EditEdge *target)
522 {
523         EditEdge *eed;
524         EditVert *ev;
525         
526         Heap *heap;
527         float *cost;
528         int a, totvert=0, totedge=0, *nedges, *edges, *prevedge, mednum = -1, nedgeswap = 0;
529
530
531         /* we need the vert */
532         for (ev= em->verts.first, totvert=0; ev; ev= ev->next) {
533                 ev->tmp.l = totvert;
534                 totvert++;
535         }
536
537         for (eed= em->edges.first; eed; eed = eed->next) {
538                 eed->f2 = 0;
539                 if (eed->h) {
540                         eed->f2 |= ME_SEAM_DONE;
541                 }
542                 eed->tmp.l = totedge;
543                 totedge++;
544         }
545
546         /* alloc */
547         nedges = MEM_callocN(sizeof(*nedges)*totvert+1, "SeamPathNEdges");
548         edges = MEM_mallocN(sizeof(*edges)*totedge*2, "SeamPathEdges");
549         prevedge = MEM_mallocN(sizeof(*prevedge)*totedge, "SeamPathPrevious");
550         cost = MEM_mallocN(sizeof(*cost)*totedge, "SeamPathCost");
551
552         /* count edges, compute adjacent edges offsets and fill adjacent edges */
553         for (eed= em->edges.first; eed; eed = eed->next) {
554                 nedges[eed->v1->tmp.l+1]++;
555                 nedges[eed->v2->tmp.l+1]++;
556         }
557
558         for (a=1; a<totvert; a++) {
559                 int newswap = nedges[a+1];
560                 nedges[a+1] = nedgeswap + nedges[a];
561                 nedgeswap = newswap;
562         }
563         nedges[0] = nedges[1] = 0;
564
565         for (a=0, eed= em->edges.first; eed; a++, eed = eed->next) {
566                 edges[nedges[eed->v1->tmp.l+1]++] = a;
567                 edges[nedges[eed->v2->tmp.l+1]++] = a;
568
569                 cost[a] = 1e20f;
570                 prevedge[a] = -1;
571         }
572
573         /* regular dijkstra shortest path, but over edges instead of vertices */
574         heap = BLI_heap_new();
575         BLI_heap_insert(heap, 0.0f, SET_INT_IN_POINTER(source->tmp.l));
576         cost[source->tmp.l] = 0.0f;
577
578         EM_init_index_arrays(em, 1, 1, 0);
579
580
581         while (!BLI_heap_empty(heap)) {
582                 mednum = GET_INT_FROM_POINTER(BLI_heap_popmin(heap));
583                 eed = EM_get_edge_for_index( mednum );
584
585                 if (mednum == target->tmp.l)
586                         break;
587
588                 if (eed->f2 & ME_SEAM_DONE)
589                         continue;
590
591                 eed->f2 |= ME_SEAM_DONE;
592
593                 edgetag_add_adjacent(heap, mednum, eed->v1->tmp.l, nedges, edges, prevedge, cost);
594                 edgetag_add_adjacent(heap, mednum, eed->v2->tmp.l, nedges, edges, prevedge, cost);
595         }
596         
597         
598         MEM_freeN(nedges);
599         MEM_freeN(edges);
600         MEM_freeN(cost);
601         BLI_heap_free(heap, NULL);
602
603         for (eed= em->edges.first; eed; eed = eed->next) {
604                 eed->f2 &= ~ME_SEAM_DONE;
605         }
606
607         if (mednum != target->tmp.l) {
608                 MEM_freeN(prevedge);
609                 EM_free_index_arrays();
610                 return 0;
611         }
612
613         /* follow path back to source and mark as seam */
614         if (mednum == target->tmp.l) {
615                 short allseams = 1;
616
617                 mednum = target->tmp.l;
618                 do {
619                         eed = EM_get_edge_for_index( mednum );
620                         if (!edgetag_context_check(scene, eed)) {
621                                 allseams = 0;
622                                 break;
623                         }
624                         mednum = prevedge[mednum];
625                 } while (mednum != source->tmp.l);
626
627                 mednum = target->tmp.l;
628                 do {
629                         eed = EM_get_edge_for_index( mednum );
630                         if (allseams)
631                                 edgetag_context_set(scene, eed, 0);
632                         else
633                                 edgetag_context_set(scene, eed, 1);
634                         mednum = prevedge[mednum];
635                 } while (mednum != -1);
636         }
637
638         MEM_freeN(prevedge);
639         EM_free_index_arrays();
640         return 1;
641 }
642
643 /* *************************************** */
644 #if 0
645 static void seam_edgehash_insert_face(EdgeHash *ehash, MFace *mf)
646 {
647         BLI_edgehash_insert(ehash, mf->v1, mf->v2, NULL);
648         BLI_edgehash_insert(ehash, mf->v2, mf->v3, NULL);
649         if (mf->v4) {
650                 BLI_edgehash_insert(ehash, mf->v3, mf->v4, NULL);
651                 BLI_edgehash_insert(ehash, mf->v4, mf->v1, NULL);
652         }
653         else
654                 BLI_edgehash_insert(ehash, mf->v3, mf->v1, NULL);
655 }
656
657 void seam_mark_clear_tface(Scene *scene, short mode)
658 {
659         Mesh *me;
660         MFace *mf;
661         MEdge *med;
662         int a;
663         
664         me= get_mesh(OBACT);
665         if(me==0 ||  me->totface==0) return;
666
667         if (mode == 0)
668                 mode = pupmenu("Seams%t|Mark Border Seam %x1|Clear Seam %x2");
669
670         if (mode != 1 && mode != 2)
671                 return;
672
673         if (mode == 2) {
674                 EdgeHash *ehash = BLI_edgehash_new();
675
676                 for (a=0, mf=me->mface; a<me->totface; a++, mf++)
677                         if (!(mf->flag & ME_HIDE) && (mf->flag & ME_FACE_SEL))
678                                 seam_edgehash_insert_face(ehash, mf);
679
680                 for (a=0, med=me->medge; a<me->totedge; a++, med++)
681                         if (BLI_edgehash_haskey(ehash, med->v1, med->v2))
682                                 med->flag &= ~ME_SEAM;
683
684                 BLI_edgehash_free(ehash, NULL);
685         }
686         else {
687                 /* mark edges that are on both selected and deselected faces */
688                 EdgeHash *ehash1 = BLI_edgehash_new();
689                 EdgeHash *ehash2 = BLI_edgehash_new();
690
691                 for (a=0, mf=me->mface; a<me->totface; a++, mf++) {
692                         if ((mf->flag & ME_HIDE) || !(mf->flag & ME_FACE_SEL))
693                                 seam_edgehash_insert_face(ehash1, mf);
694                         else
695                                 seam_edgehash_insert_face(ehash2, mf);
696                 }
697
698                 for (a=0, med=me->medge; a<me->totedge; a++, med++)
699                         if (BLI_edgehash_haskey(ehash1, med->v1, med->v2) &&
700                                 BLI_edgehash_haskey(ehash2, med->v1, med->v2))
701                                 med->flag |= ME_SEAM;
702
703                 BLI_edgehash_free(ehash1, NULL);
704                 BLI_edgehash_free(ehash2, NULL);
705         }
706
707 // XXX  if (G.rt == 8)
708 //              unwrap_lscm(1);
709
710         me->drawflag |= ME_DRAWSEAMS;
711 }
712 #endif
713
714 int paintface_mouse_select(struct bContext *C, Object *ob, short mval[2], int extend)
715 {
716         Mesh *me;
717         MFace *mface, *msel;
718         unsigned int a, index;
719         
720         /* Get the face under the cursor */
721         me = get_mesh(ob);
722
723         if (!facesel_face_pick(C, me, mval, &index, 1))
724                 return 0;
725         
726         msel= (((MFace*)me->mface)+index);
727         if (msel->flag & ME_HIDE) return 0;
728         
729         /* clear flags */
730         mface = me->mface;
731         a = me->totface;
732         if (!extend) {
733                 while (a--) {
734                         mface->flag &= ~ME_FACE_SEL;
735                         mface++;
736                 }
737         }
738         
739         me->act_face = (int)index;
740
741         if (extend) {
742                 if (msel->flag & ME_FACE_SEL)
743                         msel->flag &= ~ME_FACE_SEL;
744                 else
745                         msel->flag |= ME_FACE_SEL;
746         }
747         else msel->flag |= ME_FACE_SEL;
748         
749         /* image window redraw */
750         
751         paintface_flush_flags(ob);
752         WM_event_add_notifier(C, NC_GEOM|ND_SELECT, ob->data);
753         ED_region_tag_redraw(CTX_wm_region(C)); // XXX - should redraw all 3D views
754         return 1;
755 }
756
757 int do_paintface_box_select(ViewContext *vc, rcti *rect, int select, int extend)
758 {
759         Mesh *me;
760         MFace *mface;
761         struct ImBuf *ibuf;
762         unsigned int *rt;
763         int a, index;
764         char *selar;
765         int sx= rect->xmax-rect->xmin+1;
766         int sy= rect->ymax-rect->ymin+1;
767
768         me= get_mesh(vc->obact);
769
770         if(me==NULL || me->totface==0 || sx*sy <= 0)
771                 return OPERATOR_CANCELLED;
772
773         selar= MEM_callocN(me->totface+1, "selar");
774
775         if (extend == 0 && select)
776                 paintface_deselect_all_visible(vc->obact, SEL_DESELECT, FALSE);
777
778         view3d_validate_backbuf(vc);
779
780         ibuf = IMB_allocImBuf(sx,sy,32,IB_rect);
781         rt = ibuf->rect;
782         glReadPixels(rect->xmin+vc->ar->winrct.xmin,  rect->ymin+vc->ar->winrct.ymin, sx, sy, GL_RGBA, GL_UNSIGNED_BYTE,  ibuf->rect);
783         if(ENDIAN_ORDER==B_ENDIAN) IMB_convert_rgba_to_abgr(ibuf);
784
785         a= sx*sy;
786         while(a--) {
787                 if(*rt) {
788                         index= WM_framebuffer_to_index(*rt);
789                         if(index<=me->totface) selar[index]= 1;
790                 }
791                 rt++;
792         }
793
794         mface= me->mface;
795         for(a=1; a<=me->totface; a++, mface++) {
796                 if(selar[a]) {
797                         if(mface->flag & ME_HIDE);
798                         else {
799                                 if(select) mface->flag |= ME_FACE_SEL;
800                                 else mface->flag &= ~ME_FACE_SEL;
801                         }
802                 }
803         }
804
805         IMB_freeImBuf(ibuf);
806         MEM_freeN(selar);
807
808 #ifdef __APPLE__        
809         glReadBuffer(GL_BACK);
810 #endif
811
812         paintface_flush_flags(vc->obact);
813
814         return OPERATOR_FINISHED;
815 }