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