Merge branch 'master' into blender2.8
[blender.git] / source / blender / editors / mesh / meshtools.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) 2004 by Blender Foundation
19  * All rights reserved.
20  *
21  * The Original Code is: all of this file.
22  *
23  * Contributor(s): none yet.
24  *
25  * ***** END GPL LICENSE BLOCK *****
26  */
27
28 /** \file blender/editors/mesh/meshtools.c
29  *  \ingroup edmesh
30  *
31  * meshtools.c: no editmode (violated already :), mirror & join),
32  * tools operating on meshes
33  */
34
35 #include "MEM_guardedalloc.h"
36
37 #include "DNA_key_types.h"
38 #include "DNA_material_types.h"
39 #include "DNA_mesh_types.h"
40 #include "DNA_meshdata_types.h"
41 #include "DNA_modifier_types.h"
42 #include "DNA_object_types.h"
43 #include "DNA_scene_types.h"
44 #include "DNA_screen_types.h"
45 #include "DNA_view3d_types.h"
46 #include "DNA_workspace_types.h"
47
48 #include "BLI_math.h"
49 #include "BLI_blenlib.h"
50
51 #include "BKE_context.h"
52 #include "BKE_deform.h"
53 #include "BKE_editmesh.h"
54 #include "BKE_key.h"
55 #include "BKE_layer.h"
56 #include "BKE_library.h"
57 #include "BKE_main.h"
58 #include "BKE_material.h"
59 #include "BKE_mesh.h"
60 #include "BKE_mesh_iterators.h"
61 #include "BKE_mesh_runtime.h"
62 #include "BKE_multires.h"
63 #include "BKE_object.h"
64 #include "BKE_object_deform.h"
65 #include "BKE_report.h"
66
67 #include "DEG_depsgraph.h"
68 #include "DEG_depsgraph_build.h"
69
70 #include "ED_mesh.h"
71 #include "ED_object.h"
72 #include "ED_view3d.h"
73
74 #include "WM_api.h"
75 #include "WM_types.h"
76
77 /* * ********************** no editmode!!! *********** */
78
79 /*********************** JOIN ***************************/
80
81 /* join selected meshes into the active mesh, context sensitive
82  * return 0 if no join is made (error) and 1 if the join is done */
83
84 static void join_mesh_single(
85         Depsgraph *depsgraph, Main *bmain, Scene *scene,
86         Object *ob_dst, Object *ob_src, float imat[4][4],
87         MVert **mvert_pp, MEdge **medge_pp, MLoop **mloop_pp, MPoly **mpoly_pp,
88         CustomData *vdata, CustomData *edata, CustomData *ldata, CustomData *pdata,
89         int totvert, int totedge, int totloop, int totpoly,
90         Key *key, Key *nkey,
91         Material **matar, int *matmap, int totcol,
92         int *vertofs, int *edgeofs, int *loopofs, int *polyofs)
93 {
94         int a, b;
95
96         Mesh *me = ob_src->data;
97         MVert *mvert = *mvert_pp;
98         MEdge *medge = *medge_pp;
99         MLoop *mloop = *mloop_pp;
100         MPoly *mpoly = *mpoly_pp;
101
102         if (me->totvert) {
103                 /* merge customdata flag */
104                 ((Mesh *)ob_dst->data)->cd_flag |= me->cd_flag;
105
106                 /* standard data */
107                 CustomData_merge(&me->vdata, vdata, CD_MASK_MESH, CD_DEFAULT, totvert);
108                 CustomData_copy_data_named(&me->vdata, vdata, 0, *vertofs, me->totvert);
109
110                 /* vertex groups */
111                 MDeformVert *dvert = CustomData_get(vdata, *vertofs, CD_MDEFORMVERT);
112                 MDeformVert *dvert_src = CustomData_get(&me->vdata, 0, CD_MDEFORMVERT);
113
114                 /* Remap to correct new vgroup indices, if needed. */
115                 if (dvert_src) {
116                         BLI_assert(dvert != NULL);
117
118                         /* Build src to merged mapping of vgroup indices. */
119                         int *vgroup_index_map;
120                         int vgroup_index_map_len;
121                         vgroup_index_map = BKE_object_defgroup_index_map_create(ob_src, ob_dst, &vgroup_index_map_len);
122                         BKE_object_defgroup_index_map_apply(dvert, me->totvert, vgroup_index_map, vgroup_index_map_len);
123                         if (vgroup_index_map != NULL) {
124                                 MEM_freeN(vgroup_index_map);
125                         }
126                 }
127
128                 /* if this is the object we're merging into, no need to do anything */
129                 if (ob_src != ob_dst) {
130                         float cmat[4][4];
131
132                         /* watch this: switch matmul order really goes wrong */
133                         mul_m4_m4m4(cmat, imat, ob_src->obmat);
134
135                         /* transform vertex coordinates into new space */
136                         for (a = 0, mvert = *mvert_pp; a < me->totvert; a++, mvert++) {
137                                 mul_m4_v3(cmat, mvert->co);
138                         }
139
140                         /* for each shapekey in destination mesh:
141                          * - if there's a matching one, copy it across (will need to transform vertices into new space...)
142                          * - otherwise, just copy own coordinates of mesh (no need to transform vertex coordinates into new space)
143                          */
144                         if (key) {
145                                 /* if this mesh has any shapekeys, check first, otherwise just copy coordinates */
146                                 for (KeyBlock *kb = key->block.first; kb; kb = kb->next) {
147                                         /* get pointer to where to write data for this mesh in shapekey's data array */
148                                         float (*cos)[3] = ((float (*)[3])kb->data) + *vertofs;
149
150                                         /* check if this mesh has such a shapekey */
151                                         KeyBlock *okb = me->key ? BKE_keyblock_find_name(me->key, kb->name) : NULL;
152                                         if (okb) {
153                                                 /* copy this mesh's shapekey to the destination shapekey (need to transform first) */
154                                                 float (*ocos)[3] = okb->data;
155                                                 for (a = 0; a < me->totvert; a++, cos++, ocos++) {
156                                                         copy_v3_v3(*cos, *ocos);
157                                                         mul_m4_v3(cmat, *cos);
158                                                 }
159                                         }
160                                         else {
161                                                 /* copy this mesh's vertex coordinates to the destination shapekey */
162                                                 for (a = 0, mvert = *mvert_pp; a < me->totvert; a++, cos++, mvert++) {
163                                                         copy_v3_v3(*cos, mvert->co);
164                                                 }
165                                         }
166                                 }
167                         }
168                 }
169                 else {
170                         /* for each shapekey in destination mesh:
171                          * - if it was an 'original', copy the appropriate data from nkey
172                          * - otherwise, copy across plain coordinates (no need to transform coordinates)
173                          */
174                         if (key) {
175                                 for (KeyBlock *kb = key->block.first; kb; kb = kb->next) {
176                                         /* get pointer to where to write data for this mesh in shapekey's data array */
177                                         float (*cos)[3] = ((float (*)[3])kb->data) + *vertofs;
178
179                                         /* check if this was one of the original shapekeys */
180                                         KeyBlock *okb = nkey ? BKE_keyblock_find_name(nkey, kb->name) : NULL;
181                                         if (okb) {
182                                                 /* copy this mesh's shapekey to the destination shapekey */
183                                                 float (*ocos)[3] = okb->data;
184                                                 for (a = 0; a < me->totvert; a++, cos++, ocos++) {
185                                                         copy_v3_v3(*cos, *ocos);
186                                                 }
187                                         }
188                                         else {
189                                                 /* copy base-coordinates to the destination shapekey */
190                                                 for (a = 0, mvert = *mvert_pp; a < me->totvert; a++, cos++, mvert++) {
191                                                         copy_v3_v3(*cos, mvert->co);
192                                                 }
193                                         }
194                                 }
195                         }
196                 }
197         }
198
199         if (me->totedge) {
200                 CustomData_merge(&me->edata, edata, CD_MASK_MESH, CD_DEFAULT, totedge);
201                 CustomData_copy_data_named(&me->edata, edata, 0, *edgeofs, me->totedge);
202
203                 for (a = 0; a < me->totedge; a++, medge++) {
204                         medge->v1 += *vertofs;
205                         medge->v2 += *vertofs;
206                 }
207         }
208
209         if (me->totloop) {
210                 if (ob_src != ob_dst) {
211                         MultiresModifierData *mmd;
212
213                         multiresModifier_prepare_join(depsgraph, scene, ob_src, ob_dst);
214
215                         if ((mmd = get_multires_modifier(scene, ob_src, true))) {
216                                 ED_object_iter_other(bmain, ob_src, true,
217                                                      ED_object_multires_update_totlevels_cb,
218                                                      &mmd->totlvl);
219                         }
220                 }
221
222                 CustomData_merge(&me->ldata, ldata, CD_MASK_MESH, CD_DEFAULT, totloop);
223                 CustomData_copy_data_named(&me->ldata, ldata, 0, *loopofs, me->totloop);
224
225                 for (a = 0; a < me->totloop; a++, mloop++) {
226                         mloop->v += *vertofs;
227                         mloop->e += *edgeofs;
228                 }
229         }
230
231         if (me->totpoly) {
232                 if (matmap) {
233                         /* make mapping for materials */
234                         for (a = 1; a <= ob_src->totcol; a++) {
235                                 Material *ma = give_current_material(ob_src, a);
236
237                                 for (b = 0; b < totcol; b++) {
238                                         if (ma == matar[b]) {
239                                                 matmap[a - 1] = b;
240                                                 break;
241                                         }
242                                 }
243                         }
244                 }
245
246                 CustomData_merge(&me->pdata, pdata, CD_MASK_MESH, CD_DEFAULT, totpoly);
247                 CustomData_copy_data_named(&me->pdata, pdata, 0, *polyofs, me->totpoly);
248
249                 for (a = 0; a < me->totpoly; a++, mpoly++) {
250                         mpoly->loopstart += *loopofs;
251                         mpoly->mat_nr = matmap ? matmap[mpoly->mat_nr] : 0;
252                 }
253         }
254
255         /* these are used for relinking (cannot be set earlier, or else reattaching goes wrong) */
256         *vertofs += me->totvert;
257         *mvert_pp += me->totvert;
258         *edgeofs += me->totedge;
259         *medge_pp += me->totedge;
260         *loopofs += me->totloop;
261         *mloop_pp += me->totloop;
262         *polyofs += me->totpoly;
263         *mpoly_pp += me->totpoly;
264 }
265
266 int join_mesh_exec(bContext *C, wmOperator *op)
267 {
268         Main *bmain = CTX_data_main(C);
269         Scene *scene = CTX_data_scene(C);
270         Object *ob = CTX_data_active_object(C);
271         Material **matar = NULL, *ma;
272         Mesh *me;
273         MVert *mvert = NULL;
274         MEdge *medge = NULL;
275         MPoly *mpoly = NULL;
276         MLoop *mloop = NULL;
277         Key *key, *nkey = NULL;
278         KeyBlock *kb, *kbn;
279         float imat[4][4];
280         int a, b, totcol, totmat = 0, totedge = 0, totvert = 0;
281         int totloop = 0, totpoly = 0, vertofs, *matmap = NULL;
282         int i, haskey = 0, edgeofs, loopofs, polyofs;
283         bool ok = false;
284         bDeformGroup *dg, *odg;
285         CustomData vdata, edata, fdata, ldata, pdata;
286
287         if (ob->mode & OB_MODE_EDIT) {
288                 BKE_report(op->reports, RPT_WARNING, "Cannot join while in edit mode");
289                 return OPERATOR_CANCELLED;
290         }
291
292         /* ob is the object we are adding geometry to */
293         if (!ob || ob->type != OB_MESH) {
294                 BKE_report(op->reports, RPT_WARNING, "Active object is not a mesh");
295                 return OPERATOR_CANCELLED;
296         }
297
298         Depsgraph *depsgraph = CTX_data_depsgraph(C);
299
300         /* count & check */
301         CTX_DATA_BEGIN (C, Object *, ob_iter, selected_editable_objects)
302         {
303                 if (ob_iter->type == OB_MESH) {
304                         me = ob_iter->data;
305
306                         totvert += me->totvert;
307                         totedge += me->totedge;
308                         totloop += me->totloop;
309                         totpoly += me->totpoly;
310                         totmat += ob_iter->totcol;
311
312                         if (ob_iter == ob)
313                                 ok = true;
314
315                         /* check for shapekeys */
316                         if (me->key)
317                                 haskey++;
318                 }
319         }
320         CTX_DATA_END;
321
322         /* that way the active object is always selected */
323         if (ok == false) {
324                 BKE_report(op->reports, RPT_WARNING, "Active object is not a selected mesh");
325                 return OPERATOR_CANCELLED;
326         }
327
328         /* only join meshes if there are verts to join, there aren't too many, and we only had one mesh selected */
329         me = (Mesh *)ob->data;
330         key = me->key;
331
332         if (totvert == 0 || totvert == me->totvert) {
333                 BKE_report(op->reports, RPT_WARNING, "No mesh data to join");
334                 return OPERATOR_CANCELLED;
335         }
336
337         if (totvert > MESH_MAX_VERTS) {
338                 BKE_reportf(op->reports, RPT_WARNING, "Joining results in %d vertices, limit is %ld", totvert, MESH_MAX_VERTS);
339                 return OPERATOR_CANCELLED;
340         }
341
342         /* remove tessface to ensure we don't hold references to invalid faces */
343         BKE_mesh_tessface_clear(me);
344
345         /* new material indices and material array */
346         if (totmat) {
347                 matar = MEM_callocN(sizeof(*matar) * totmat, "join_mesh matar");
348                 matmap = MEM_callocN(sizeof(*matmap) * totmat, "join_mesh matmap");
349         }
350         totcol = ob->totcol;
351
352         /* obact materials in new main array, is nicer start! */
353         for (a = 0; a < ob->totcol; a++) {
354                 matar[a] = give_current_material(ob, a + 1);
355                 id_us_plus((ID *)matar[a]);
356                 /* increase id->us : will be lowered later */
357         }
358
359         /* - if destination mesh had shapekeys, move them somewhere safe, and set up placeholders
360          *   with arrays that are large enough to hold shapekey data for all meshes
361          * - if destination mesh didn't have shapekeys, but we encountered some in the meshes we're
362          *   joining, set up a new keyblock and assign to the mesh
363          */
364         if (key) {
365                 /* make a duplicate copy that will only be used here... (must remember to free it!) */
366                 nkey = BKE_key_copy(bmain, key);
367
368                 /* for all keys in old block, clear data-arrays */
369                 for (kb = key->block.first; kb; kb = kb->next) {
370                         if (kb->data) MEM_freeN(kb->data);
371                         kb->data = MEM_callocN(sizeof(float) * 3 * totvert, "join_shapekey");
372                         kb->totelem = totvert;
373                 }
374         }
375         else if (haskey) {
376                 /* add a new key-block and add to the mesh */
377                 key = me->key = BKE_key_add(bmain, (ID *)me);
378                 key->type = KEY_RELATIVE;
379         }
380
381         /* first pass over objects - copying materials and vertexgroups across */
382         CTX_DATA_BEGIN (C, Object *, ob_iter, selected_editable_objects)
383         {
384                 /* only act if a mesh, and not the one we're joining to */
385                 if ((ob != ob_iter) && (ob_iter->type == OB_MESH)) {
386                         me = ob_iter->data;
387
388                         /* Join this object's vertex groups to the base one's */
389                         for (dg = ob_iter->defbase.first; dg; dg = dg->next) {
390                                 /* See if this group exists in the object (if it doesn't, add it to the end) */
391                                 if (!defgroup_find_name(ob, dg->name)) {
392                                         odg = MEM_callocN(sizeof(bDeformGroup), "join deformGroup");
393                                         memcpy(odg, dg, sizeof(bDeformGroup));
394                                         BLI_addtail(&ob->defbase, odg);
395                                 }
396                         }
397                         if (ob->defbase.first && ob->actdef == 0)
398                                 ob->actdef = 1;
399
400
401                         if (me->totvert) {
402                                 /* Add this object's materials to the base one's if they don't exist already (but only if limits not exceeded yet) */
403                                 if (totcol < MAXMAT) {
404                                         for (a = 1; a <= ob_iter->totcol; a++) {
405                                                 ma = give_current_material(ob_iter, a);
406
407                                                 for (b = 0; b < totcol; b++) {
408                                                         if (ma == matar[b]) {
409                                                                 break;
410                                                         }
411                                                 }
412                                                 if (b == totcol) {
413                                                         matar[b] = ma;
414                                                         if (ma) {
415                                                                 id_us_plus(&ma->id);
416                                                         }
417                                                         totcol++;
418                                                 }
419                                                 if (totcol >= MAXMAT) {
420                                                         break;
421                                                 }
422                                         }
423                                 }
424
425                                 /* if this mesh has shapekeys, check if destination mesh already has matching entries too */
426                                 if (me->key && key) {
427                                         /* for remapping KeyBlock.relative */
428                                         int      *index_map = MEM_mallocN(sizeof(int)        * me->key->totkey, __func__);
429                                         KeyBlock **kb_map   = MEM_mallocN(sizeof(KeyBlock *) * me->key->totkey, __func__);
430
431                                         for (kb = me->key->block.first, i = 0; kb; kb = kb->next, i++) {
432                                                 BLI_assert(i < me->key->totkey);
433
434                                                 kbn = BKE_keyblock_find_name(key, kb->name);
435                                                 /* if key doesn't exist in destination mesh, add it */
436                                                 if (kbn) {
437                                                         index_map[i] = BLI_findindex(&key->block, kbn);
438                                                 }
439                                                 else {
440                                                         index_map[i] = key->totkey;
441
442                                                         kbn = BKE_keyblock_add(key, kb->name);
443
444                                                         BKE_keyblock_copy_settings(kbn, kb);
445
446                                                         /* adjust settings to fit (allocate a new data-array) */
447                                                         kbn->data = MEM_callocN(sizeof(float) * 3 * totvert, "joined_shapekey");
448                                                         kbn->totelem = totvert;
449                                                 }
450
451                                                 kb_map[i] = kbn;
452                                         }
453
454                                         /* remap relative index values */
455                                         for (kb = me->key->block.first, i = 0; kb; kb = kb->next, i++) {
456                                                 if (LIKELY(kb->relative < me->key->totkey)) {  /* sanity check, should always be true */
457                                                         kb_map[i]->relative = index_map[kb->relative];
458                                                 }
459                                         }
460
461                                         MEM_freeN(index_map);
462                                         MEM_freeN(kb_map);
463                                 }
464                         }
465                 }
466         }
467         CTX_DATA_END;
468
469
470         /* setup new data for destination mesh */
471         CustomData_reset(&vdata);
472         CustomData_reset(&edata);
473         CustomData_reset(&fdata);
474         CustomData_reset(&ldata);
475         CustomData_reset(&pdata);
476
477         mvert = CustomData_add_layer(&vdata, CD_MVERT, CD_CALLOC, NULL, totvert);
478         medge = CustomData_add_layer(&edata, CD_MEDGE, CD_CALLOC, NULL, totedge);
479         mloop = CustomData_add_layer(&ldata, CD_MLOOP, CD_CALLOC, NULL, totloop);
480         mpoly = CustomData_add_layer(&pdata, CD_MPOLY, CD_CALLOC, NULL, totpoly);
481
482         vertofs = 0;
483         edgeofs = 0;
484         loopofs = 0;
485         polyofs = 0;
486
487         /* inverse transform for all selected meshes in this object */
488         invert_m4_m4(imat, ob->obmat);
489
490         /* Add back active mesh first. This allows to keep things similar as they were, as much as possible (i.e. data from
491          * active mesh will remain first ones in new result of the merge, in same order for CD layers, etc. See also T50084.
492          */
493         join_mesh_single(
494                     depsgraph, bmain, scene,
495                     ob, ob, imat,
496                     &mvert, &medge, &mloop, &mpoly,
497                     &vdata, &edata, &ldata, &pdata,
498                     totvert, totedge, totloop, totpoly,
499                     key, nkey,
500                     matar, matmap, totcol,
501                     &vertofs, &edgeofs, &loopofs, &polyofs);
502
503         CTX_DATA_BEGIN (C, Object *, ob_iter, selected_editable_objects)
504         {
505                 if (ob_iter == ob) {
506                         continue;
507                 }
508                 /* only join if this is a mesh */
509                 if (ob_iter->type == OB_MESH) {
510                         join_mesh_single(
511                                     depsgraph, bmain, scene,
512                                     ob, ob_iter, imat,
513                                     &mvert, &medge, &mloop, &mpoly,
514                                     &vdata, &edata, &ldata, &pdata,
515                                     totvert, totedge, totloop, totpoly,
516                                     key, nkey,
517                                     matar, matmap, totcol,
518                                     &vertofs, &edgeofs, &loopofs, &polyofs);
519
520                         /* free base, now that data is merged */
521                         if (ob_iter != ob) {
522                                 ED_object_base_free_and_unlink(bmain, scene, ob_iter);
523                         }
524                 }
525         }
526         CTX_DATA_END;
527
528         /* return to mesh we're merging to */
529         me = ob->data;
530
531         CustomData_free(&me->vdata, me->totvert);
532         CustomData_free(&me->edata, me->totedge);
533         CustomData_free(&me->ldata, me->totloop);
534         CustomData_free(&me->pdata, me->totpoly);
535
536         me->totvert = totvert;
537         me->totedge = totedge;
538         me->totloop = totloop;
539         me->totpoly = totpoly;
540
541         me->vdata = vdata;
542         me->edata = edata;
543         me->ldata = ldata;
544         me->pdata = pdata;
545
546         /* tessface data removed above, no need to update */
547         BKE_mesh_update_customdata_pointers(me, false);
548
549         /* update normals in case objects with non-uniform scale are joined */
550         BKE_mesh_calc_normals(me);
551
552         /* old material array */
553         for (a = 1; a <= ob->totcol; a++) {
554                 ma = ob->mat[a - 1];
555                 if (ma)
556                         id_us_min(&ma->id);
557         }
558         for (a = 1; a <= me->totcol; a++) {
559                 ma = me->mat[a - 1];
560                 if (ma)
561                         id_us_min(&ma->id);
562         }
563         MEM_SAFE_FREE(ob->mat);
564         MEM_SAFE_FREE(ob->matbits);
565         MEM_SAFE_FREE(me->mat);
566
567         if (totcol) {
568                 me->mat = matar;
569                 ob->mat = MEM_callocN(sizeof(*ob->mat) * totcol, "join obmatar");
570                 ob->matbits = MEM_callocN(sizeof(*ob->matbits) * totcol, "join obmatbits");
571                 MEM_freeN(matmap);
572         }
573
574         ob->totcol = me->totcol = totcol;
575
576         /* other mesh users */
577         test_all_objects_materials(bmain, (ID *)me);
578
579         /* free temp copy of destination shapekeys (if applicable) */
580         if (nkey) {
581                 /* We can assume nobody is using that ID currently. */
582                 BKE_libblock_free_ex(bmain, nkey, false, false);
583         }
584
585         /* ensure newly inserted keys are time sorted */
586         if (key && (key->type != KEY_RELATIVE)) {
587                 BKE_key_sort(key);
588         }
589
590         /* Due to dependnecy cycle some other object might access old derived data. */
591         BKE_object_free_derived_caches(ob);
592
593         DEG_relations_tag_update(bmain);   /* removed objects, need to rebuild dag */
594
595         DEG_id_tag_update(&ob->id, OB_RECALC_OB | OB_RECALC_DATA);
596
597         DEG_id_tag_update(&scene->id, DEG_TAG_SELECT_UPDATE);
598         WM_event_add_notifier(C, NC_SCENE | ND_OB_ACTIVE, scene);
599
600         return OPERATOR_FINISHED;
601 }
602
603 /*********************** JOIN AS SHAPES ***************************/
604
605 /* Append selected meshes vertex locations as shapes of the active mesh,
606  * return 0 if no join is made (error) and 1 of the join is done */
607
608 int join_mesh_shapes_exec(bContext *C, wmOperator *op)
609 {
610         Main *bmain = CTX_data_main(C);
611         Scene *scene = CTX_data_scene(C);
612         Object *ob_active = CTX_data_active_object(C);
613         Depsgraph *depsgraph = CTX_data_depsgraph(C);
614         Mesh *me = (Mesh *)ob_active->data;
615         Mesh *selme = NULL;
616         Mesh *me_deformed = NULL;
617         Key *key = me->key;
618         KeyBlock *kb;
619         bool ok = false, nonequal_verts = false;
620
621         CTX_DATA_BEGIN (C, Object *, ob_iter, selected_editable_objects)
622         {
623                 if (ob_iter == ob_active) {
624                         continue;
625                 }
626
627                 if (ob_iter->type == OB_MESH) {
628                         selme = (Mesh *)ob_iter->data;
629
630                         if (selme->totvert == me->totvert)
631                                 ok = true;
632                         else
633                                 nonequal_verts = 1;
634                 }
635         }
636         CTX_DATA_END;
637
638         if (!ok) {
639                 if (nonequal_verts)
640                         BKE_report(op->reports, RPT_WARNING, "Selected meshes must have equal numbers of vertices");
641                 else
642                         BKE_report(op->reports, RPT_WARNING, "No additional selected meshes with equal vertex count to join");
643                 return OPERATOR_CANCELLED;
644         }
645
646         if (key == NULL) {
647                 key = me->key = BKE_key_add(bmain, (ID *)me);
648                 key->type = KEY_RELATIVE;
649
650                 /* first key added, so it was the basis. initialize it with the existing mesh */
651                 kb = BKE_keyblock_add(key, NULL);
652                 BKE_keyblock_convert_from_mesh(me, key, kb);
653         }
654
655         /* now ready to add new keys from selected meshes */
656         CTX_DATA_BEGIN (C, Object *, ob_iter, selected_editable_objects)
657         {
658                 if (ob_iter == ob_active) {
659                         continue;
660                 }
661
662                 if (ob_iter->type == OB_MESH) {
663                         selme = (Mesh *)ob_iter->data;
664
665                         if (selme->totvert == me->totvert) {
666                                 me_deformed = mesh_get_eval_deform(depsgraph, scene, ob_iter, CD_MASK_BAREMESH);
667
668                                 if (!me_deformed) {
669                                         continue;
670                                 }
671
672                                 kb = BKE_keyblock_add(key, ob_iter->id.name + 2);
673
674                                 BKE_mesh_runtime_eval_to_meshkey(me_deformed, me, kb);
675                         }
676                 }
677         }
678         CTX_DATA_END;
679
680         DEG_id_tag_update(&scene->id, DEG_TAG_SELECT_UPDATE);
681         WM_event_add_notifier(C, NC_SCENE | ND_OB_ACTIVE, scene);
682
683         return OPERATOR_FINISHED;
684 }
685
686
687 /* -------------------------------------------------------------------- */
688 /* Mesh Mirror (Topology) */
689
690 /** \name Mesh Topology Mirror API
691  * \{ */
692
693 static MirrTopoStore_t mesh_topo_store = {NULL, -1. - 1, -1};
694
695 /* mode is 's' start, or 'e' end, or 'u' use */
696 /* if end, ob can be NULL */
697 /* note, is supposed return -1 on error, which callers are currently checking for, but is not used so far */
698 int ED_mesh_mirror_topo_table(Object *ob, Mesh *me_eval, char mode)
699 {
700         if (mode == 'u') {        /* use table */
701                 if (ED_mesh_mirrtopo_recalc_check(ob->data, me_eval, &mesh_topo_store)) {
702                         ED_mesh_mirror_topo_table(ob, me_eval, 's');
703                 }
704         }
705         else if (mode == 's') { /* start table */
706                 ED_mesh_mirrtopo_init(ob->data, me_eval, &mesh_topo_store, false);
707         }
708         else if (mode == 'e') { /* end table */
709                 ED_mesh_mirrtopo_free(&mesh_topo_store);
710         }
711         else {
712                 BLI_assert(0);
713         }
714
715         return 0;
716 }
717
718 /** \} */
719
720
721 static int mesh_get_x_mirror_vert_spatial(Object *ob, Mesh *mesh, int index)
722 {
723         Mesh *me = ob->data;
724         MVert *mvert = mesh ? mesh->mvert : me->mvert;
725         float vec[3];
726
727         mvert = &mvert[index];
728         vec[0] = -mvert->co[0];
729         vec[1] = mvert->co[1];
730         vec[2] = mvert->co[2];
731
732         return ED_mesh_mirror_spatial_table(ob, NULL, mesh, vec, 'u');
733 }
734
735 static int mesh_get_x_mirror_vert_topo(Object *ob, Mesh *mesh, int index)
736 {
737         if (ED_mesh_mirror_topo_table(ob, mesh, 'u') == -1)
738                 return -1;
739
740         return mesh_topo_store.index_lookup[index];
741 }
742
743 int mesh_get_x_mirror_vert(Object *ob, Mesh *me_eval, int index, const bool use_topology)
744 {
745         if (use_topology) {
746                 return mesh_get_x_mirror_vert_topo(ob, me_eval, index);
747         }
748         else {
749                 return mesh_get_x_mirror_vert_spatial(ob, me_eval, index);
750         }
751 }
752
753 static BMVert *editbmesh_get_x_mirror_vert_spatial(Object *ob, BMEditMesh *em, const float co[3])
754 {
755         float vec[3];
756         int i;
757
758         /* ignore nan verts */
759         if ((isfinite(co[0]) == false) ||
760             (isfinite(co[1]) == false) ||
761             (isfinite(co[2]) == false))
762         {
763                 return NULL;
764         }
765
766         vec[0] = -co[0];
767         vec[1] = co[1];
768         vec[2] = co[2];
769
770         i = ED_mesh_mirror_spatial_table(ob, em, NULL, vec, 'u');
771         if (i != -1) {
772                 return BM_vert_at_index(em->bm, i);
773         }
774         return NULL;
775 }
776
777 static BMVert *editbmesh_get_x_mirror_vert_topo(Object *ob, struct BMEditMesh *em, BMVert *eve, int index)
778 {
779         intptr_t poinval;
780         if (ED_mesh_mirror_topo_table(ob, NULL, 'u') == -1)
781                 return NULL;
782
783         if (index == -1) {
784                 BMIter iter;
785                 BMVert *v;
786
787                 index = 0;
788                 BM_ITER_MESH (v, &iter, em->bm, BM_VERTS_OF_MESH) {
789                         if (v == eve)
790                                 break;
791                         index++;
792                 }
793
794                 if (index == em->bm->totvert) {
795                         return NULL;
796                 }
797         }
798
799         poinval = mesh_topo_store.index_lookup[index];
800
801         if (poinval != -1)
802                 return (BMVert *)(poinval);
803         return NULL;
804 }
805
806 BMVert *editbmesh_get_x_mirror_vert(Object *ob, struct BMEditMesh *em, BMVert *eve, const float co[3], int index, const bool use_topology)
807 {
808         if (use_topology) {
809                 return editbmesh_get_x_mirror_vert_topo(ob, em, eve, index);
810         }
811         else {
812                 return editbmesh_get_x_mirror_vert_spatial(ob, em, co);
813         }
814 }
815
816 /**
817  * Wrapper for objectmode/editmode.
818  *
819  * call #BM_mesh_elem_table_ensure first for editmesh.
820  */
821 int ED_mesh_mirror_get_vert(Object *ob, int index)
822 {
823         Mesh *me = ob->data;
824         BMEditMesh *em = me->edit_btmesh;
825         bool use_topology = (me->editflag & ME_EDIT_MIRROR_TOPO) != 0;
826         int index_mirr;
827
828         if (em) {
829                 BMVert *eve, *eve_mirr;
830                 eve = BM_vert_at_index(em->bm, index);
831                 eve_mirr = editbmesh_get_x_mirror_vert(ob, em, eve, eve->co, index, use_topology);
832                 index_mirr = eve_mirr ? BM_elem_index_get(eve_mirr) : -1;
833         }
834         else {
835                 index_mirr = mesh_get_x_mirror_vert(ob, NULL, index, use_topology);
836         }
837
838         return index_mirr;
839 }
840
841 #if 0
842
843 static float *editmesh_get_mirror_uv(BMEditMesh *em, int axis, float *uv, float *mirrCent, float *face_cent)
844 {
845         float vec[2];
846         float cent_vec[2];
847         float cent[2];
848
849         /* ignore nan verts */
850         if (isnan(uv[0]) || !isfinite(uv[0]) ||
851             isnan(uv[1]) || !isfinite(uv[1])
852             )
853         {
854                 return NULL;
855         }
856
857         if (axis) {
858                 vec[0] = uv[0];
859                 vec[1] = -((uv[1]) - mirrCent[1]) + mirrCent[1];
860
861                 cent_vec[0] = face_cent[0];
862                 cent_vec[1] = -((face_cent[1]) - mirrCent[1]) + mirrCent[1];
863         }
864         else {
865                 vec[0] = -((uv[0]) - mirrCent[0]) + mirrCent[0];
866                 vec[1] = uv[1];
867
868                 cent_vec[0] = -((face_cent[0]) - mirrCent[0]) + mirrCent[0];
869                 cent_vec[1] = face_cent[1];
870         }
871
872         /* TODO - Optimize */
873         {
874                 BMIter iter;
875                 BMFace *efa;
876
877                 BM_ITER_MESH (efa, &iter, em->bm, BM_FACES_OF_MESH) {
878                         uv_poly_center(efa, cent, cd_loop_uv_offset);
879
880                         if ( (fabsf(cent[0] - cent_vec[0]) < 0.001f) && (fabsf(cent[1] - cent_vec[1]) < 0.001f) ) {
881                                 BMIter liter;
882                                 BMLoop *l;
883
884                                 BM_ITER_ELEM (l, &liter, efa, BM_LOOPS_OF_FACE) {
885                                         MLoopUV *luv = CustomData_bmesh_get(&em->bm->ldata, l->head.data, CD_MLOOPUV);
886                                         if ( (fabsf(luv->uv[0] - vec[0]) < 0.001f) && (fabsf(luv->uv[1] - vec[1]) < 0.001f) ) {
887                                                 return luv->uv;
888
889                                         }
890                                 }
891                         }
892                 }
893         }
894
895         return NULL;
896 }
897
898 #endif
899
900 static unsigned int mirror_facehash(const void *ptr)
901 {
902         const MFace *mf = ptr;
903         unsigned int v0, v1;
904
905         if (mf->v4) {
906                 v0 = MIN4(mf->v1, mf->v2, mf->v3, mf->v4);
907                 v1 = MAX4(mf->v1, mf->v2, mf->v3, mf->v4);
908         }
909         else {
910                 v0 = MIN3(mf->v1, mf->v2, mf->v3);
911                 v1 = MAX3(mf->v1, mf->v2, mf->v3);
912         }
913
914         return ((v0 * 39) ^ (v1 * 31));
915 }
916
917 static int mirror_facerotation(MFace *a, MFace *b)
918 {
919         if (b->v4) {
920                 if (a->v1 == b->v1 && a->v2 == b->v2 && a->v3 == b->v3 && a->v4 == b->v4)
921                         return 0;
922                 else if (a->v4 == b->v1 && a->v1 == b->v2 && a->v2 == b->v3 && a->v3 == b->v4)
923                         return 1;
924                 else if (a->v3 == b->v1 && a->v4 == b->v2 && a->v1 == b->v3 && a->v2 == b->v4)
925                         return 2;
926                 else if (a->v2 == b->v1 && a->v3 == b->v2 && a->v4 == b->v3 && a->v1 == b->v4)
927                         return 3;
928         }
929         else {
930                 if (a->v1 == b->v1 && a->v2 == b->v2 && a->v3 == b->v3)
931                         return 0;
932                 else if (a->v3 == b->v1 && a->v1 == b->v2 && a->v2 == b->v3)
933                         return 1;
934                 else if (a->v2 == b->v1 && a->v3 == b->v2 && a->v1 == b->v3)
935                         return 2;
936         }
937
938         return -1;
939 }
940
941 static bool mirror_facecmp(const void *a, const void *b)
942 {
943         return (mirror_facerotation((MFace *)a, (MFace *)b) == -1);
944 }
945
946 /* This is a Mesh-based copy of mesh_get_x_mirror_faces() */
947 int *mesh_get_x_mirror_faces(Object *ob, BMEditMesh *em, Mesh *me_eval)
948 {
949         Mesh *me = ob->data;
950         MVert *mv, *mvert;
951         MFace mirrormf, *mf, *hashmf, *mface;
952         GHash *fhash;
953         int *mirrorverts, *mirrorfaces;
954
955         BLI_assert(em == NULL);  /* Does not work otherwise, currently... */
956
957         const bool use_topology = (me->editflag & ME_EDIT_MIRROR_TOPO) != 0;
958         const int totvert = me_eval ? me_eval->totvert : me->totvert;
959         const int totface = me_eval ? me_eval->totface : me->totface;
960         int a;
961
962         mirrorverts = MEM_callocN(sizeof(int) * totvert, "MirrorVerts");
963         mirrorfaces = MEM_callocN(sizeof(int) * 2 * totface, "MirrorFaces");
964
965         mvert = me_eval ? me_eval->mvert : me->mvert;
966         mface = me_eval ? me_eval->mface : me->mface;
967
968         ED_mesh_mirror_spatial_table(ob, em, me_eval, NULL, 's');
969
970         for (a = 0, mv = mvert; a < totvert; a++, mv++)
971                 mirrorverts[a] = mesh_get_x_mirror_vert(ob, me_eval, a, use_topology);
972
973         ED_mesh_mirror_spatial_table(ob, em, me_eval, NULL, 'e');
974
975         fhash = BLI_ghash_new_ex(mirror_facehash, mirror_facecmp, "mirror_facehash gh", me->totface);
976         for (a = 0, mf = mface; a < totface; a++, mf++)
977                 BLI_ghash_insert(fhash, mf, mf);
978
979         for (a = 0, mf = mface; a < totface; a++, mf++) {
980                 mirrormf.v1 = mirrorverts[mf->v3];
981                 mirrormf.v2 = mirrorverts[mf->v2];
982                 mirrormf.v3 = mirrorverts[mf->v1];
983                 mirrormf.v4 = (mf->v4) ? mirrorverts[mf->v4] : 0;
984
985                 /* make sure v4 is not 0 if a quad */
986                 if (mf->v4 && mirrormf.v4 == 0) {
987                         SWAP(unsigned int, mirrormf.v1, mirrormf.v3);
988                         SWAP(unsigned int, mirrormf.v2, mirrormf.v4);
989                 }
990
991                 hashmf = BLI_ghash_lookup(fhash, &mirrormf);
992                 if (hashmf) {
993                         mirrorfaces[a * 2] = hashmf - mface;
994                         mirrorfaces[a * 2 + 1] = mirror_facerotation(&mirrormf, hashmf);
995                 }
996                 else
997                         mirrorfaces[a * 2] = -1;
998         }
999
1000         BLI_ghash_free(fhash, NULL, NULL);
1001         MEM_freeN(mirrorverts);
1002
1003         return mirrorfaces;
1004 }
1005
1006 /* selection, vertex and face */
1007 /* returns 0 if not found, otherwise 1 */
1008
1009 /**
1010  * Face selection in object mode,
1011  * currently only weight-paint and vertex-paint use this.
1012  *
1013  * \return boolean true == Found
1014  */
1015 bool ED_mesh_pick_face(bContext *C, Object *ob, const int mval[2], unsigned int *index, int size)
1016 {
1017         ViewContext vc;
1018         Mesh *me = ob->data;
1019
1020         BLI_assert(me && GS(me->id.name) == ID_ME);
1021
1022         if (!me || me->totpoly == 0)
1023                 return false;
1024
1025         ED_view3d_viewcontext_init(C, &vc);
1026
1027         if (size) {
1028                 /* sample rect to increase chances of selecting, so that when clicking
1029                  * on an edge in the backbuf, we can still select a face */
1030
1031                 float dummy_dist;
1032                 *index = ED_view3d_backbuf_sample_rect(&vc, mval, size, 1, me->totpoly + 1, &dummy_dist);
1033         }
1034         else {
1035                 /* sample only on the exact position */
1036                 *index = ED_view3d_backbuf_sample(&vc, mval[0], mval[1]);
1037         }
1038
1039         if ((*index) == 0 || (*index) > (unsigned int)me->totpoly)
1040                 return false;
1041
1042         (*index)--;
1043
1044         return true;
1045 }
1046 static void ed_mesh_pick_face_vert__mpoly_find(
1047         /* context */
1048         struct ARegion *ar, const float mval[2],
1049         /* mesh data (evaluated) */
1050         const MPoly *mp,
1051         const MVert *mvert, const MLoop *mloop,
1052         /* return values */
1053         float *r_len_best, int *r_v_idx_best)
1054 {
1055         const MLoop *ml;
1056         int j = mp->totloop;
1057         for (ml = &mloop[mp->loopstart]; j--; ml++) {
1058                 float sco[2];
1059                 const int v_idx = ml->v;
1060                 const float *co = mvert[v_idx].co;
1061                 if (ED_view3d_project_float_object(ar, co, sco, V3D_PROJ_TEST_NOP) == V3D_PROJ_RET_OK) {
1062                         const float len_test = len_manhattan_v2v2(mval, sco);
1063                         if (len_test < *r_len_best) {
1064                                 *r_len_best = len_test;
1065                                 *r_v_idx_best = v_idx;
1066                         }
1067                 }
1068         }
1069 }
1070 /**
1071  * Use when the back buffer stores face index values. but we want a vert.
1072  * This gets the face then finds the closest vertex to mval.
1073  */
1074 bool ED_mesh_pick_face_vert(bContext *C, Object *ob, const int mval[2], unsigned int *index, int size)
1075 {
1076         Depsgraph *depsgraph = CTX_data_depsgraph(C);
1077         unsigned int poly_index;
1078         Mesh *me = ob->data;
1079
1080         BLI_assert(me && GS(me->id.name) == ID_ME);
1081
1082         if (ED_mesh_pick_face(C, ob, mval, &poly_index, size)) {
1083                 Scene *scene = CTX_data_scene(C);
1084                 struct ARegion *ar = CTX_wm_region(C);
1085
1086                 /* derived mesh to find deformed locations */
1087                 Mesh *me_eval = mesh_get_eval_final(depsgraph, scene, ob, CD_MASK_BAREMESH | CD_MASK_ORIGINDEX);
1088
1089                 int v_idx_best = ORIGINDEX_NONE;
1090
1091                 /* find the vert closest to 'mval' */
1092                 const float mval_f[2] = {UNPACK2(mval)};
1093                 float len_best = FLT_MAX;
1094
1095                 MPoly *me_eval_mpoly;
1096                 MLoop *me_eval_mloop;
1097                 MVert *me_eval_mvert;
1098                 unsigned int me_eval_mpoly_len;
1099                 const int *index_mp_to_orig;
1100
1101                 me_eval_mpoly = me_eval->mpoly;
1102                 me_eval_mloop = me_eval->mloop;
1103                 me_eval_mvert = me_eval->mvert;
1104
1105                 me_eval_mpoly_len = me_eval->totpoly;
1106
1107                 index_mp_to_orig = CustomData_get_layer(&me_eval->pdata, CD_ORIGINDEX);
1108
1109                 /* tag all verts using this face */
1110                 if (index_mp_to_orig) {
1111                         unsigned int i;
1112
1113                         for (i = 0; i < me_eval_mpoly_len; i++) {
1114                                 if (index_mp_to_orig[i] == poly_index) {
1115                                         ed_mesh_pick_face_vert__mpoly_find(
1116                                                 ar, mval_f,
1117                                                 &me_eval_mpoly[i], me_eval_mvert, me_eval_mloop,
1118                                                 &len_best, &v_idx_best);
1119                                 }
1120                         }
1121                 }
1122                 else {
1123                         if (poly_index < me_eval_mpoly_len) {
1124                                 ed_mesh_pick_face_vert__mpoly_find(
1125                                         ar, mval_f,
1126                                         &me_eval_mpoly[poly_index], me_eval_mvert, me_eval_mloop,
1127                                         &len_best, &v_idx_best);
1128                         }
1129                 }
1130
1131                 /* map 'dm -> me' index if possible */
1132                 if (v_idx_best != ORIGINDEX_NONE) {
1133                         const int *index_mv_to_orig;
1134                         index_mv_to_orig = CustomData_get_layer(&me_eval->vdata, CD_ORIGINDEX);
1135                         if (index_mv_to_orig) {
1136                                 v_idx_best = index_mv_to_orig[v_idx_best];
1137                         }
1138                 }
1139
1140                 if ((v_idx_best != ORIGINDEX_NONE) && (v_idx_best < me->totvert)) {
1141                         *index = v_idx_best;
1142                         return true;
1143                 }
1144         }
1145
1146         return false;
1147 }
1148
1149 /**
1150  * Vertex selection in object mode,
1151  * currently only weight paint uses this.
1152  *
1153  * \return boolean true == Found
1154  */
1155 typedef struct VertPickData {
1156         const MVert *mvert;
1157         const float *mval_f;  /* [2] */
1158         ARegion *ar;
1159
1160         /* runtime */
1161         float len_best;
1162         int v_idx_best;
1163 } VertPickData;
1164
1165 static void ed_mesh_pick_vert__mapFunc(void *userData, int index, const float co[3],
1166                                        const float UNUSED(no_f[3]), const short UNUSED(no_s[3]))
1167 {
1168         VertPickData *data = userData;
1169         if ((data->mvert[index].flag & ME_HIDE) == 0) {
1170                 float sco[2];
1171
1172                 if (ED_view3d_project_float_object(data->ar, co, sco, V3D_PROJ_TEST_CLIP_DEFAULT) == V3D_PROJ_RET_OK) {
1173                         const float len = len_manhattan_v2v2(data->mval_f, sco);
1174                         if (len < data->len_best) {
1175                                 data->len_best = len;
1176                                 data->v_idx_best = index;
1177                         }
1178                 }
1179         }
1180 }
1181 bool ED_mesh_pick_vert(bContext *C, Object *ob, const int mval[2], unsigned int *index, int size, bool use_zbuf)
1182 {
1183         ViewContext vc;
1184         Mesh *me = ob->data;
1185
1186         BLI_assert(me && GS(me->id.name) == ID_ME);
1187
1188         if (!me || me->totvert == 0)
1189                 return false;
1190
1191         ED_view3d_viewcontext_init(C, &vc);
1192
1193         if (use_zbuf) {
1194                 if (size > 0) {
1195                         /* sample rect to increase chances of selecting, so that when clicking
1196                          * on an face in the backbuf, we can still select a vert */
1197
1198                         float dummy_dist;
1199                         *index = ED_view3d_backbuf_sample_rect(&vc, mval, size, 1, me->totvert + 1, &dummy_dist);
1200                 }
1201                 else {
1202                         /* sample only on the exact position */
1203                         *index = ED_view3d_backbuf_sample(&vc, mval[0], mval[1]);
1204                 }
1205
1206                 if ((*index) == 0 || (*index) > (unsigned int)me->totvert)
1207                         return false;
1208
1209                 (*index)--;
1210         }
1211         else {
1212                 /* derived mesh to find deformed locations */
1213                 Mesh *me_eval = mesh_get_eval_final(vc.depsgraph, vc.scene, ob, CD_MASK_BAREMESH);
1214                 ARegion *ar = vc.ar;
1215                 RegionView3D *rv3d = ar->regiondata;
1216
1217                 /* find the vert closest to 'mval' */
1218                 const float mval_f[2] = {(float)mval[0],
1219                                          (float)mval[1]};
1220
1221                 VertPickData data = {NULL};
1222
1223                 ED_view3d_init_mats_rv3d(ob, rv3d);
1224
1225                 if (me_eval == NULL) {
1226                         return false;
1227                 }
1228
1229                 /* setup data */
1230                 data.mvert = me->mvert;
1231                 data.ar = ar;
1232                 data.mval_f = mval_f;
1233                 data.len_best = FLT_MAX;
1234                 data.v_idx_best = -1;
1235
1236                 BKE_mesh_foreach_mapped_vert(me_eval, ed_mesh_pick_vert__mapFunc, &data, MESH_FOREACH_NOP);
1237
1238                 if (data.v_idx_best == -1) {
1239                         return false;
1240                 }
1241
1242                 *index = data.v_idx_best;
1243         }
1244
1245         return true;
1246 }
1247
1248
1249 MDeformVert *ED_mesh_active_dvert_get_em(Object *ob, BMVert **r_eve)
1250 {
1251         if (ob->mode & OB_MODE_EDIT && ob->type == OB_MESH && ob->defbase.first) {
1252                 Mesh *me = ob->data;
1253                 BMesh *bm = me->edit_btmesh->bm;
1254                 const int cd_dvert_offset = CustomData_get_offset(&bm->vdata, CD_MDEFORMVERT);
1255
1256                 if (cd_dvert_offset != -1) {
1257                         BMVert *eve = BM_mesh_active_vert_get(bm);
1258
1259                         if (eve) {
1260                                 if (r_eve) *r_eve = eve;
1261                                 return BM_ELEM_CD_GET_VOID_P(eve, cd_dvert_offset);
1262                         }
1263                 }
1264         }
1265
1266         if (r_eve) *r_eve = NULL;
1267         return NULL;
1268 }
1269
1270 MDeformVert *ED_mesh_active_dvert_get_ob(Object *ob, int *r_index)
1271 {
1272         Mesh *me = ob->data;
1273         int index = BKE_mesh_mselect_active_get(me, ME_VSEL);
1274         if (r_index) *r_index = index;
1275         if (index == -1 || me->dvert == NULL) {
1276                 return NULL;
1277         }
1278         else {
1279                 return me->dvert + index;
1280         }
1281 }
1282
1283 MDeformVert *ED_mesh_active_dvert_get_only(Object *ob)
1284 {
1285         if (ob->type == OB_MESH) {
1286                 if (ob->mode & OB_MODE_EDIT) {
1287                         return ED_mesh_active_dvert_get_em(ob, NULL);
1288                 }
1289                 else {
1290                         return ED_mesh_active_dvert_get_ob(ob, NULL);
1291                 }
1292         }
1293         else {
1294                 return NULL;
1295         }
1296 }
1297
1298 void EDBM_mesh_stats_multi(
1299         struct Object **objects, const uint objects_len,
1300         int totelem[3], int totelem_sel[3])
1301 {
1302         if (totelem) {
1303                 totelem[0] = 0;
1304                 totelem[1] = 0;
1305                 totelem[2] = 0;
1306         }
1307         if (totelem_sel) {
1308                 totelem_sel[0] = 0;
1309                 totelem_sel[1] = 0;
1310                 totelem_sel[2] = 0;
1311         }
1312
1313         for (uint ob_index = 0; ob_index < objects_len; ob_index++) {
1314                 Object *obedit = objects[ob_index];
1315                 BMEditMesh *em = BKE_editmesh_from_object(obedit);
1316                 BMesh *bm = em->bm;
1317                 if (totelem) {
1318                         totelem[0] += bm->totvert;
1319                         totelem[1] += bm->totedge;
1320                         totelem[2] += bm->totface;
1321                 }
1322                 if (totelem_sel) {
1323                         totelem_sel[0] += bm->totvertsel;
1324                         totelem_sel[1] += bm->totedgesel;
1325                         totelem_sel[2] += bm->totfacesel;
1326                 }
1327         }
1328 }
1329
1330
1331 void EDBM_mesh_elem_index_ensure_multi(Object **objects, const uint objects_len, const char htype)
1332 {
1333         int elem_offset[4] = {0, 0, 0, 0};
1334         for (uint ob_index = 0; ob_index < objects_len; ob_index++) {
1335                 Object *obedit = objects[ob_index];
1336                 BMEditMesh *em = BKE_editmesh_from_object(obedit);
1337                 BMesh *bm = em->bm;
1338                 BM_mesh_elem_index_ensure_ex(bm, htype, elem_offset);
1339         }
1340 }