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