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