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