diff options
author | Hans Goudey <h.goudey@me.com> | 2021-04-26 23:11:53 +0300 |
---|---|---|
committer | Hans Goudey <h.goudey@me.com> | 2021-04-26 23:11:53 +0300 |
commit | 7e17dbfcf385a89ffe9012b86b14a21ea0a737fd (patch) | |
tree | 2a466b98fc5f52c9499177f1a1680686a101d8c8 /source/blender/blenkernel/intern/displist.c | |
parent | e032ca2e25bf2e305b660da7a6026834e2e5006f (diff) |
Cleanup: Move displist.cc to C++
This is a change split from the geometry nodes curves branch. Since
curve object modifier evaluation happens in this file, moving it to C++
will be quite helpful to support the `GeometrySet` type. Other than
that, the code in the branch intends to replace a fair amount of this
file anyway, so I don't plan to do any further cleanup here.
Differential Revision: https://developer.blender.org/D11078
Diffstat (limited to 'source/blender/blenkernel/intern/displist.c')
-rw-r--r-- | source/blender/blenkernel/intern/displist.c | 1818 |
1 files changed, 0 insertions, 1818 deletions
diff --git a/source/blender/blenkernel/intern/displist.c b/source/blender/blenkernel/intern/displist.c deleted file mode 100644 index ad8939fa5d1..00000000000 --- a/source/blender/blenkernel/intern/displist.c +++ /dev/null @@ -1,1818 +0,0 @@ -/* - * This program is free software; you can redistribute it and/or - * modify it under the terms of the GNU General Public License - * as published by the Free Software Foundation; either version 2 - * of the License, or (at your option) any later version. - * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program; if not, write to the Free Software Foundation, - * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. - * - * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV. - * All rights reserved. - */ - -/** \file - * \ingroup bke - */ - -#include <math.h> -#include <stdio.h> -#include <string.h> - -#include "MEM_guardedalloc.h" - -#include "DNA_curve_types.h" -#include "DNA_mesh_types.h" -#include "DNA_object_types.h" -#include "DNA_scene_types.h" -#include "DNA_vfont_types.h" - -#include "BLI_bitmap.h" -#include "BLI_linklist.h" -#include "BLI_listbase.h" -#include "BLI_math.h" -#include "BLI_memarena.h" -#include "BLI_scanfill.h" -#include "BLI_string.h" -#include "BLI_utildefines.h" - -#include "BKE_anim_path.h" -#include "BKE_curve.h" -#include "BKE_displist.h" -#include "BKE_font.h" -#include "BKE_key.h" -#include "BKE_lattice.h" -#include "BKE_lib_id.h" -#include "BKE_mball.h" -#include "BKE_mball_tessellate.h" -#include "BKE_mesh.h" -#include "BKE_modifier.h" -#include "BKE_object.h" - -#include "BLI_sys_types.h" // for intptr_t support - -#include "DEG_depsgraph.h" -#include "DEG_depsgraph_query.h" - -static void boundbox_displist_object(Object *ob); - -void BKE_displist_elem_free(DispList *dl) -{ - if (dl) { - if (dl->verts) { - MEM_freeN(dl->verts); - } - if (dl->nors) { - MEM_freeN(dl->nors); - } - if (dl->index) { - MEM_freeN(dl->index); - } - MEM_freeN(dl); - } -} - -void BKE_displist_free(ListBase *lb) -{ - DispList *dl; - - while ((dl = BLI_pophead(lb))) { - BKE_displist_elem_free(dl); - } -} - -DispList *BKE_displist_find_or_create(ListBase *lb, int type) -{ - LISTBASE_FOREACH (DispList *, dl, lb) { - if (dl->type == type) { - return dl; - } - } - - DispList *dl = MEM_callocN(sizeof(DispList), "find_disp"); - dl->type = type; - BLI_addtail(lb, dl); - - return dl; -} - -DispList *BKE_displist_find(ListBase *lb, int type) -{ - LISTBASE_FOREACH (DispList *, dl, lb) { - if (dl->type == type) { - return dl; - } - } - - return NULL; -} - -bool BKE_displist_has_faces(const ListBase *lb) -{ - LISTBASE_FOREACH (const DispList *, dl, lb) { - if (ELEM(dl->type, DL_INDEX3, DL_INDEX4, DL_SURF)) { - return true; - } - } - - return false; -} - -void BKE_displist_copy(ListBase *lbn, const ListBase *lb) -{ - BKE_displist_free(lbn); - - LISTBASE_FOREACH (const DispList *, dl, lb) { - DispList *dln = MEM_dupallocN(dl); - BLI_addtail(lbn, dln); - dln->verts = MEM_dupallocN(dl->verts); - dln->nors = MEM_dupallocN(dl->nors); - dln->index = MEM_dupallocN(dl->index); - } -} - -void BKE_displist_normals_add(ListBase *lb) -{ - float *vdata, *ndata, nor[3]; - float *v1, *v2, *v3, *v4; - float *n1, *n2, *n3, *n4; - int a, b, p1, p2, p3, p4; - - LISTBASE_FOREACH (DispList *, dl, lb) { - if (dl->type == DL_INDEX3) { - if (dl->nors == NULL) { - dl->nors = MEM_callocN(sizeof(float[3]), "dlnors"); - - if (dl->flag & DL_BACK_CURVE) { - dl->nors[2] = -1.0f; - } - else { - dl->nors[2] = 1.0f; - } - } - } - else if (dl->type == DL_SURF) { - if (dl->nors == NULL) { - dl->nors = MEM_callocN(sizeof(float[3]) * dl->nr * dl->parts, "dlnors"); - - vdata = dl->verts; - ndata = dl->nors; - - for (a = 0; a < dl->parts; a++) { - - if (BKE_displist_surfindex_get(dl, a, &b, &p1, &p2, &p3, &p4) == 0) { - break; - } - - v1 = vdata + 3 * p1; - n1 = ndata + 3 * p1; - v2 = vdata + 3 * p2; - n2 = ndata + 3 * p2; - v3 = vdata + 3 * p3; - n3 = ndata + 3 * p3; - v4 = vdata + 3 * p4; - n4 = ndata + 3 * p4; - - for (; b < dl->nr; b++) { - normal_quad_v3(nor, v1, v3, v4, v2); - - add_v3_v3(n1, nor); - add_v3_v3(n2, nor); - add_v3_v3(n3, nor); - add_v3_v3(n4, nor); - - v2 = v1; - v1 += 3; - v4 = v3; - v3 += 3; - n2 = n1; - n1 += 3; - n4 = n3; - n3 += 3; - } - } - a = dl->parts * dl->nr; - v1 = ndata; - while (a--) { - normalize_v3(v1); - v1 += 3; - } - } - } - } -} - -void BKE_displist_count(const ListBase *lb, int *totvert, int *totface, int *tottri) -{ - LISTBASE_FOREACH (const DispList *, dl, lb) { - int vert_tot = 0; - int face_tot = 0; - int tri_tot = 0; - bool cyclic_u = dl->flag & DL_CYCL_U; - bool cyclic_v = dl->flag & DL_CYCL_V; - - switch (dl->type) { - case DL_SURF: { - int segments_u = dl->nr - (cyclic_u == false); - int segments_v = dl->parts - (cyclic_v == false); - vert_tot = dl->nr * dl->parts; - face_tot = segments_u * segments_v; - tri_tot = face_tot * 2; - break; - } - case DL_INDEX3: { - vert_tot = dl->nr; - face_tot = dl->parts; - tri_tot = face_tot; - break; - } - case DL_INDEX4: { - vert_tot = dl->nr; - face_tot = dl->parts; - tri_tot = face_tot * 2; - break; - } - case DL_POLY: - case DL_SEGM: { - vert_tot = dl->nr * dl->parts; - break; - } - } - - *totvert += vert_tot; - *totface += face_tot; - *tottri += tri_tot; - } -} - -bool BKE_displist_surfindex_get( - const DispList *dl, int a, int *b, int *p1, int *p2, int *p3, int *p4) -{ - if ((dl->flag & DL_CYCL_V) == 0 && a == (dl->parts) - 1) { - return false; - } - - if (dl->flag & DL_CYCL_U) { - (*p1) = dl->nr * a; - (*p2) = (*p1) + dl->nr - 1; - (*p3) = (*p1) + dl->nr; - (*p4) = (*p2) + dl->nr; - (*b) = 0; - } - else { - (*p2) = dl->nr * a; - (*p1) = (*p2) + 1; - (*p4) = (*p2) + dl->nr; - (*p3) = (*p1) + dl->nr; - (*b) = 1; - } - - if ((dl->flag & DL_CYCL_V) && a == dl->parts - 1) { - (*p3) -= dl->nr * dl->parts; - (*p4) -= dl->nr * dl->parts; - } - - return true; -} - -/* ****************** make displists ********************* */ -#ifdef __INTEL_COMPILER -/* ICC with the optimization -02 causes crashes. */ -# pragma intel optimization_level 1 -#endif - -static void curve_to_displist(const Curve *cu, - const ListBase *nubase, - const bool for_render, - ListBase *r_dispbase) -{ - const bool editmode = (!for_render && (cu->editnurb || cu->editfont)); - - LISTBASE_FOREACH (Nurb *, nu, nubase) { - if (nu->hide != 0 && editmode) { - continue; - } - if (!BKE_nurb_check_valid_u(nu)) { - continue; - } - - const int resolution = (for_render && cu->resolu_ren != 0) ? cu->resolu_ren : nu->resolu; - const bool is_cyclic = nu->flagu & CU_NURB_CYCLIC; - const BezTriple *bezt_first = &nu->bezt[0]; - const BezTriple *bezt_last = &nu->bezt[nu->pntsu - 1]; - - if (nu->type == CU_BEZIER) { - int samples_len = 0; - for (int i = 1; i < nu->pntsu; i++) { - const BezTriple *prevbezt = &nu->bezt[i - 1]; - const BezTriple *bezt = &nu->bezt[i]; - if (prevbezt->h2 == HD_VECT && bezt->h1 == HD_VECT) { - samples_len++; - } - else { - samples_len += resolution; - } - } - if (is_cyclic) { - /* If the curve is cyclic, sample the last edge between the last and first points. */ - if (bezt_first->h1 == HD_VECT && bezt_last->h2 == HD_VECT) { - samples_len++; - } - else { - samples_len += resolution; - } - } - else { - /* Otherwise, we only need one additional sample to complete the last edge. */ - samples_len++; - } - - /* Check that there are more than two points so the curve doesn't loop back on itself. This - * needs to be separate from `is_cyclic` because cyclic sampling can work with two points - * and resolution > 1. */ - const bool use_cyclic_sample = is_cyclic && (samples_len != 2); - - DispList *dl = MEM_callocN(sizeof(DispList), __func__); - /* Add one to the length because of 'BKE_curve_forward_diff_bezier'. */ - dl->verts = MEM_mallocN(sizeof(float[3]) * (samples_len + 1), "dlverts"); - BLI_addtail(r_dispbase, dl); - dl->parts = 1; - dl->nr = samples_len; - dl->col = nu->mat_nr; - dl->charidx = nu->charidx; - - dl->type = use_cyclic_sample ? DL_POLY : DL_SEGM; - - float *data = dl->verts; - for (int i = 1; i < nu->pntsu; i++) { - const BezTriple *prevbezt = &nu->bezt[i - 1]; - const BezTriple *bezt = &nu->bezt[i]; - - if (prevbezt->h2 == HD_VECT && bezt->h1 == HD_VECT) { - copy_v3_v3(data, prevbezt->vec[1]); - data += 3; - } - else { - for (int j = 0; j < 3; j++) { - BKE_curve_forward_diff_bezier(prevbezt->vec[1][j], - prevbezt->vec[2][j], - bezt->vec[0][j], - bezt->vec[1][j], - data + j, - resolution, - sizeof(float[3])); - } - data += 3 * resolution; - } - } - if (is_cyclic) { - if (bezt_first->h1 == HD_VECT && bezt_last->h2 == HD_VECT) { - copy_v3_v3(data, bezt_last->vec[1]); - } - else { - for (int j = 0; j < 3; j++) { - BKE_curve_forward_diff_bezier(bezt_last->vec[1][j], - bezt_last->vec[2][j], - bezt_first->vec[0][j], - bezt_first->vec[1][j], - data + j, - resolution, - sizeof(float[3])); - } - } - } - else { - copy_v3_v3(data, bezt_last->vec[1]); - } - } - else if (nu->type == CU_NURBS) { - const int len = (resolution * SEGMENTSU(nu)); - DispList *dl = MEM_callocN(sizeof(DispList), __func__); - dl->verts = MEM_mallocN(len * sizeof(float[3]), "dlverts"); - BLI_addtail(r_dispbase, dl); - dl->parts = 1; - dl->nr = len; - dl->col = nu->mat_nr; - dl->charidx = nu->charidx; - dl->type = is_cyclic ? DL_POLY : DL_SEGM; - - BKE_nurb_makeCurve(nu, dl->verts, NULL, NULL, NULL, resolution, sizeof(float[3])); - } - else if (nu->type == CU_POLY) { - const int len = nu->pntsu; - DispList *dl = MEM_callocN(sizeof(DispList), __func__); - dl->verts = MEM_mallocN(len * sizeof(float[3]), "dlverts"); - BLI_addtail(r_dispbase, dl); - dl->parts = 1; - dl->nr = len; - dl->col = nu->mat_nr; - dl->charidx = nu->charidx; - dl->type = (is_cyclic && (dl->nr != 2)) ? DL_POLY : DL_SEGM; - - float(*coords)[3] = (float(*)[3])dl->verts; - for (int i = 0; i < len; i++) { - const BPoint *bp = &nu->bp[i]; - copy_v3_v3(coords[i], bp->vec); - } - } - } -} - -/** - * \param normal_proj: Optional normal that's used to project the scanfill verts into 2d coords. - * Pass this along if known since it saves time calculating the normal. - * This is also used to initialize #DispList.nors (one normal per display list). - * \param flipnormal: Flip the normal (same as passing \a normal_proj negated) - */ -void BKE_displist_fill(const ListBase *dispbase, - ListBase *to, - const float normal_proj[3], - const bool flip_normal) -{ - if (dispbase == NULL) { - return; - } - if (BLI_listbase_is_empty(dispbase)) { - return; - } - - const int scanfill_flag = BLI_SCANFILL_CALC_REMOVE_DOUBLES | BLI_SCANFILL_CALC_POLYS | - BLI_SCANFILL_CALC_HOLES; - - MemArena *sf_arena = BLI_memarena_new(BLI_SCANFILL_ARENA_SIZE, __func__); - - short colnr = 0; - int charidx = 0; - bool should_continue = true; - while (should_continue) { - should_continue = false; - bool nextcol = false; - - ScanFillContext sf_ctx; - BLI_scanfill_begin_arena(&sf_ctx, sf_arena); - - int totvert = 0; - short dl_flag_accum = 0; - short dl_rt_accum = 0; - LISTBASE_FOREACH (const DispList *, dl, dispbase) { - if (dl->type == DL_POLY) { - if (charidx < dl->charidx) { - should_continue = true; - } - else if (charidx == dl->charidx) { /* character with needed index */ - if (colnr == dl->col) { - - sf_ctx.poly_nr++; - - /* Make verts and edges. */ - ScanFillVert *sf_vert = NULL; - ScanFillVert *sf_vert_last = NULL; - ScanFillVert *sf_vert_new = NULL; - for (int i = 0; i < dl->nr; i++) { - sf_vert_last = sf_vert; - sf_vert = BLI_scanfill_vert_add(&sf_ctx, &dl->verts[3 * i]); - totvert++; - if (sf_vert_last == NULL) { - sf_vert_new = sf_vert; - } - else { - BLI_scanfill_edge_add(&sf_ctx, sf_vert_last, sf_vert); - } - } - - if (sf_vert != NULL && sf_vert_new != NULL) { - BLI_scanfill_edge_add(&sf_ctx, sf_vert, sf_vert_new); - } - } - else if (colnr < dl->col) { - /* got poly with next material at current char */ - should_continue = true; - nextcol = true; - } - } - dl_flag_accum |= dl->flag; - dl_rt_accum |= dl->rt; - } - } - - const int triangles_len = BLI_scanfill_calc_ex(&sf_ctx, scanfill_flag, normal_proj); - if (totvert != 0 && triangles_len != 0) { - DispList *dlnew = MEM_callocN(sizeof(DispList), "filldisplist"); - dlnew->type = DL_INDEX3; - dlnew->flag = (dl_flag_accum & (DL_BACK_CURVE | DL_FRONT_CURVE)); - dlnew->rt = (dl_rt_accum & CU_SMOOTH); - dlnew->col = colnr; - dlnew->nr = totvert; - dlnew->parts = triangles_len; - - dlnew->index = MEM_mallocN(sizeof(int[3]) * triangles_len, "dlindex"); - dlnew->verts = MEM_mallocN(sizeof(float[3]) * totvert, "dlverts"); - - /* vert data */ - int i; - LISTBASE_FOREACH_INDEX (ScanFillVert *, sf_vert, &sf_ctx.fillvertbase, i) { - copy_v3_v3(&dlnew->verts[3 * i], sf_vert->co); - sf_vert->tmp.i = i; /* Index number. */ - } - - /* index data */ - int *index = dlnew->index; - LISTBASE_FOREACH (ScanFillFace *, sf_tri, &sf_ctx.fillfacebase) { - index[0] = sf_tri->v1->tmp.i; - index[1] = flip_normal ? sf_tri->v3->tmp.i : sf_tri->v2->tmp.i; - index[2] = flip_normal ? sf_tri->v2->tmp.i : sf_tri->v3->tmp.i; - index += 3; - } - - BLI_addhead(to, dlnew); - } - BLI_scanfill_end_arena(&sf_ctx, sf_arena); - - if (nextcol) { - /* stay at current char but fill polys with next material */ - colnr++; - } - else { - /* switch to next char and start filling from first material */ - charidx++; - colnr = 0; - } - } - - BLI_memarena_free(sf_arena); - /* do not free polys, needed for wireframe display */ -} - -static void bevels_to_filledpoly(const Curve *cu, ListBase *dispbase) -{ - ListBase front = {NULL, NULL}; - ListBase back = {NULL, NULL}; - - LISTBASE_FOREACH (const DispList *, dl, dispbase) { - if (dl->type == DL_SURF) { - if ((dl->flag & DL_CYCL_V) && (dl->flag & DL_CYCL_U) == 0) { - if ((cu->flag & CU_BACK) && (dl->flag & DL_BACK_CURVE)) { - DispList *dlnew = MEM_callocN(sizeof(DispList), __func__); - BLI_addtail(&front, dlnew); - dlnew->verts = MEM_mallocN(sizeof(float[3]) * dl->parts, __func__); - dlnew->nr = dl->parts; - dlnew->parts = 1; - dlnew->type = DL_POLY; - dlnew->flag = DL_BACK_CURVE; - dlnew->col = dl->col; - dlnew->charidx = dl->charidx; - - const float *old_verts = dl->verts; - float *new_verts = dlnew->verts; - for (int i = 0; i < dl->parts; i++) { - copy_v3_v3(new_verts, old_verts); - new_verts += 3; - old_verts += 3 * dl->nr; - } - } - if ((cu->flag & CU_FRONT) && (dl->flag & DL_FRONT_CURVE)) { - DispList *dlnew = MEM_callocN(sizeof(DispList), __func__); - BLI_addtail(&back, dlnew); - dlnew->verts = MEM_mallocN(sizeof(float[3]) * dl->parts, __func__); - dlnew->nr = dl->parts; - dlnew->parts = 1; - dlnew->type = DL_POLY; - dlnew->flag = DL_FRONT_CURVE; - dlnew->col = dl->col; - dlnew->charidx = dl->charidx; - - const float *old_verts = dl->verts + 3 * (dl->nr - 1); - float *new_verts = dlnew->verts; - for (int i = 0; i < dl->parts; i++) { - copy_v3_v3(new_verts, old_verts); - new_verts += 3; - old_verts += 3 * dl->nr; - } - } - } - } - } - - const float z_up[3] = {0.0f, 0.0f, -1.0f}; - BKE_displist_fill(&front, dispbase, z_up, true); - BKE_displist_fill(&back, dispbase, z_up, false); - - BKE_displist_free(&front); - BKE_displist_free(&back); - - BKE_displist_fill(dispbase, dispbase, z_up, false); -} - -static void curve_to_filledpoly(const Curve *cu, ListBase *dispbase) -{ - if (!CU_DO_2DFILL(cu)) { - return; - } - - if (dispbase->first && ((DispList *)dispbase->first)->type == DL_SURF) { - bevels_to_filledpoly(cu, dispbase); - } - else { - const float z_up[3] = {0.0f, 0.0f, -1.0f}; - BKE_displist_fill(dispbase, dispbase, z_up, false); - } -} - -/* taper rules: - * - only 1 curve - * - first point left, last point right - * - based on subdivided points in original curve, not on points in taper curve (still) - */ -static float displist_calc_taper(Depsgraph *depsgraph, - const Scene *scene, - Object *taperobj, - float fac) -{ - DispList *dl; - - if (taperobj == NULL || taperobj->type != OB_CURVE) { - return 1.0; - } - - dl = taperobj->runtime.curve_cache ? taperobj->runtime.curve_cache->disp.first : NULL; - if (dl == NULL) { - BKE_displist_make_curveTypes(depsgraph, scene, taperobj, false, false); - dl = taperobj->runtime.curve_cache->disp.first; - } - if (dl) { - float minx, dx, *fp; - int a; - - /* horizontal size */ - minx = dl->verts[0]; - dx = dl->verts[3 * (dl->nr - 1)] - minx; - if (dx > 0.0f) { - fp = dl->verts; - for (a = 0; a < dl->nr; a++, fp += 3) { - if ((fp[0] - minx) / dx >= fac) { - /* interpolate with prev */ - if (a > 0) { - float fac1 = (fp[-3] - minx) / dx; - float fac2 = (fp[0] - minx) / dx; - if (fac1 != fac2) { - return fp[1] * (fac1 - fac) / (fac1 - fac2) + fp[-2] * (fac - fac2) / (fac1 - fac2); - } - } - return fp[1]; - } - } - return fp[-2]; // last y coord - } - } - - return 1.0; -} - -float BKE_displist_calc_taper( - Depsgraph *depsgraph, const Scene *scene, Object *taperobj, int cur, int tot) -{ - float fac = ((float)cur) / (float)(tot - 1); - - return displist_calc_taper(depsgraph, scene, taperobj, fac); -} - -void BKE_displist_make_mball(Depsgraph *depsgraph, Scene *scene, Object *ob) -{ - if (!ob || ob->type != OB_MBALL) { - return; - } - - if (ob == BKE_mball_basis_find(scene, ob)) { - if (ob->runtime.curve_cache) { - BKE_displist_free(&(ob->runtime.curve_cache->disp)); - } - else { - ob->runtime.curve_cache = MEM_callocN(sizeof(CurveCache), "CurveCache for MBall"); - } - - BKE_mball_polygonize(depsgraph, scene, ob, &ob->runtime.curve_cache->disp); - BKE_mball_texspace_calc(ob); - - object_deform_mball(ob, &ob->runtime.curve_cache->disp); - - /* NOP for MBALLs anyway... */ - boundbox_displist_object(ob); - } -} - -void BKE_displist_make_mball_forRender(Depsgraph *depsgraph, - Scene *scene, - Object *ob, - ListBase *dispbase) -{ - BKE_mball_polygonize(depsgraph, scene, ob, dispbase); - BKE_mball_texspace_calc(ob); - - object_deform_mball(ob, dispbase); -} - -static ModifierData *curve_get_tessellate_point(const Scene *scene, - const Object *ob, - const bool for_render, - const bool editmode) -{ - VirtualModifierData virtualModifierData; - ModifierData *md = BKE_modifiers_get_virtual_modifierlist(ob, &virtualModifierData); - ModifierData *pretessellatePoint; - int required_mode; - - if (for_render) { - required_mode = eModifierMode_Render; - } - else { - required_mode = eModifierMode_Realtime; - } - - if (editmode) { - required_mode |= eModifierMode_Editmode; - } - - pretessellatePoint = NULL; - for (; md; md = md->next) { - const ModifierTypeInfo *mti = BKE_modifier_get_info(md->type); - - if (!BKE_modifier_is_enabled(scene, md, required_mode)) { - continue; - } - if (mti->type == eModifierTypeType_Constructive) { - return pretessellatePoint; - } - - if (ELEM(md->type, eModifierType_Hook, eModifierType_Softbody, eModifierType_MeshDeform)) { - pretessellatePoint = md; - - /* this modifiers are moving point of tessellation automatically - * (some of them even can't be applied on tessellated curve), set flag - * for information button in modifier's header - */ - md->mode |= eModifierMode_ApplyOnSpline; - } - else if (md->mode & eModifierMode_ApplyOnSpline) { - pretessellatePoint = md; - } - } - - return pretessellatePoint; -} - -/* Return true if any modifier was applied. */ -bool BKE_curve_calc_modifiers_pre(Depsgraph *depsgraph, - const Scene *scene, - Object *ob, - ListBase *source_nurb, - ListBase *target_nurb, - const bool for_render) -{ - VirtualModifierData virtualModifierData; - ModifierData *md = BKE_modifiers_get_virtual_modifierlist(ob, &virtualModifierData); - ModifierData *pretessellatePoint; - Curve *cu = ob->data; - int numElems = 0, numVerts = 0; - const bool editmode = (!for_render && (cu->editnurb || cu->editfont)); - ModifierApplyFlag apply_flag = 0; - float(*deformedVerts)[3] = NULL; - float *keyVerts = NULL; - int required_mode; - bool modified = false; - - BKE_modifiers_clear_errors(ob); - - if (editmode) { - apply_flag |= MOD_APPLY_USECACHE; - } - if (for_render) { - apply_flag |= MOD_APPLY_RENDER; - required_mode = eModifierMode_Render; - } - else { - required_mode = eModifierMode_Realtime; - } - - const ModifierEvalContext mectx = {depsgraph, ob, apply_flag}; - - pretessellatePoint = curve_get_tessellate_point(scene, ob, for_render, editmode); - - if (editmode) { - required_mode |= eModifierMode_Editmode; - } - - if (!editmode) { - keyVerts = BKE_key_evaluate_object(ob, &numElems); - - if (keyVerts) { - BLI_assert(BKE_keyblock_curve_element_count(source_nurb) == numElems); - - /* split coords from key data, the latter also includes - * tilts, which is passed through in the modifier stack. - * this is also the reason curves do not use a virtual - * shape key modifier yet. */ - deformedVerts = BKE_curve_nurbs_key_vert_coords_alloc(source_nurb, keyVerts, &numVerts); - } - } - - if (pretessellatePoint) { - for (; md; md = md->next) { - const ModifierTypeInfo *mti = BKE_modifier_get_info(md->type); - - if (!BKE_modifier_is_enabled(scene, md, required_mode)) { - continue; - } - if (mti->type != eModifierTypeType_OnlyDeform) { - continue; - } - - if (!deformedVerts) { - deformedVerts = BKE_curve_nurbs_vert_coords_alloc(source_nurb, &numVerts); - } - - mti->deformVerts(md, &mectx, NULL, deformedVerts, numVerts); - modified = true; - - if (md == pretessellatePoint) { - break; - } - } - } - - if (deformedVerts) { - BKE_curve_nurbs_vert_coords_apply(target_nurb, deformedVerts, false); - MEM_freeN(deformedVerts); - } - if (keyVerts) { /* these are not passed through modifier stack */ - BKE_curve_nurbs_key_vert_tilts_apply(target_nurb, keyVerts); - } - - if (keyVerts) { - MEM_freeN(keyVerts); - } - return modified; -} - -static float (*displist_vert_coords_alloc(ListBase *dispbase, int *r_vert_len))[3] -{ - float(*allverts)[3], *fp; - - *r_vert_len = 0; - - LISTBASE_FOREACH (DispList *, dl, dispbase) { - *r_vert_len += (dl->type == DL_INDEX3) ? dl->nr : dl->parts * dl->nr; - } - - allverts = MEM_mallocN(sizeof(float[3]) * (*r_vert_len), "displist_vert_coords_alloc allverts"); - fp = (float *)allverts; - LISTBASE_FOREACH (DispList *, dl, dispbase) { - int ofs = 3 * ((dl->type == DL_INDEX3) ? dl->nr : dl->parts * dl->nr); - memcpy(fp, dl->verts, sizeof(float) * ofs); - fp += ofs; - } - - return allverts; -} - -static void displist_vert_coords_apply(ListBase *dispbase, const float (*allverts)[3]) -{ - const float *fp; - - fp = (float *)allverts; - LISTBASE_FOREACH (DispList *, dl, dispbase) { - int ofs = 3 * ((dl->type == DL_INDEX3) ? dl->nr : dl->parts * dl->nr); - memcpy(dl->verts, fp, sizeof(float) * ofs); - fp += ofs; - } -} - -static void curve_calc_modifiers_post(Depsgraph *depsgraph, - const Scene *scene, - Object *ob, - ListBase *dispbase, - Mesh **r_final, - const bool for_render, - const bool force_mesh_conversion) -{ - VirtualModifierData virtualModifierData; - ModifierData *md = BKE_modifiers_get_virtual_modifierlist(ob, &virtualModifierData); - ModifierData *pretessellatePoint; - const Curve *cu = ob->data; - int required_mode = 0, totvert = 0; - const bool editmode = (!for_render && (cu->editnurb || cu->editfont)); - Mesh *modified = NULL, *mesh_applied; - float(*vertCos)[3] = NULL; - int useCache = !for_render; - ModifierApplyFlag apply_flag = 0; - - if (for_render) { - apply_flag |= MOD_APPLY_RENDER; - required_mode = eModifierMode_Render; - } - else { - required_mode = eModifierMode_Realtime; - } - - const ModifierEvalContext mectx_deform = { - depsgraph, ob, editmode ? apply_flag | MOD_APPLY_USECACHE : apply_flag}; - const ModifierEvalContext mectx_apply = { - depsgraph, ob, useCache ? apply_flag | MOD_APPLY_USECACHE : apply_flag}; - - pretessellatePoint = curve_get_tessellate_point(scene, ob, for_render, editmode); - - if (editmode) { - required_mode |= eModifierMode_Editmode; - } - - if (pretessellatePoint) { - md = pretessellatePoint->next; - } - - if (r_final && *r_final) { - BKE_id_free(NULL, *r_final); - } - - for (; md; md = md->next) { - const ModifierTypeInfo *mti = BKE_modifier_get_info(md->type); - - if (!BKE_modifier_is_enabled(scene, md, required_mode)) { - continue; - } - - /* If we need normals, no choice, have to convert to mesh now. */ - bool need_normal = mti->dependsOnNormals != NULL && mti->dependsOnNormals(md); - /* XXX 2.8 : now that batch cache is stored inside the ob->data - * we need to create a Mesh for each curve that uses modifiers. */ - if (modified == NULL /* && need_normal */) { - if (vertCos != NULL) { - displist_vert_coords_apply(dispbase, vertCos); - } - - if (ELEM(ob->type, OB_CURVE, OB_FONT) && (cu->flag & CU_DEFORM_FILL)) { - curve_to_filledpoly(cu, dispbase); - } - - modified = BKE_mesh_new_nomain_from_curve_displist(ob, dispbase); - } - - if (mti->type == eModifierTypeType_OnlyDeform || - (mti->type == eModifierTypeType_DeformOrConstruct && !modified)) { - if (modified) { - if (!vertCos) { - vertCos = BKE_mesh_vert_coords_alloc(modified, &totvert); - } - if (need_normal) { - BKE_mesh_ensure_normals(modified); - } - mti->deformVerts(md, &mectx_deform, modified, vertCos, totvert); - } - else { - if (!vertCos) { - vertCos = displist_vert_coords_alloc(dispbase, &totvert); - } - mti->deformVerts(md, &mectx_deform, NULL, vertCos, totvert); - } - } - else { - if (!r_final) { - /* makeDisplistCurveTypes could be used for beveling, where derived mesh - * is totally unnecessary, so we could stop modifiers applying - * when we found constructive modifier but derived mesh is unwanted result - */ - break; - } - - if (modified) { - if (vertCos) { - Mesh *temp_mesh = (Mesh *)BKE_id_copy_ex( - NULL, &modified->id, NULL, LIB_ID_COPY_LOCALIZE); - BKE_id_free(NULL, modified); - modified = temp_mesh; - - BKE_mesh_vert_coords_apply(modified, vertCos); - } - } - else { - if (vertCos) { - displist_vert_coords_apply(dispbase, vertCos); - } - - if (ELEM(ob->type, OB_CURVE, OB_FONT) && (cu->flag & CU_DEFORM_FILL)) { - curve_to_filledpoly(cu, dispbase); - } - - modified = BKE_mesh_new_nomain_from_curve_displist(ob, dispbase); - } - - if (vertCos) { - /* Vertex coordinates were applied to necessary data, could free it */ - MEM_freeN(vertCos); - vertCos = NULL; - } - - if (need_normal) { - BKE_mesh_ensure_normals(modified); - } - mesh_applied = mti->modifyMesh(md, &mectx_apply, modified); - - if (mesh_applied) { - /* Modifier returned a new derived mesh */ - - if (modified && modified != mesh_applied) { /* Modifier */ - BKE_id_free(NULL, modified); - } - modified = mesh_applied; - } - } - } - - if (vertCos) { - if (modified) { - Mesh *temp_mesh = (Mesh *)BKE_id_copy_ex(NULL, &modified->id, NULL, LIB_ID_COPY_LOCALIZE); - BKE_id_free(NULL, modified); - modified = temp_mesh; - - BKE_mesh_vert_coords_apply(modified, vertCos); - BKE_mesh_calc_normals_mapping_simple(modified); - - MEM_freeN(vertCos); - } - else { - displist_vert_coords_apply(dispbase, vertCos); - MEM_freeN(vertCos); - vertCos = NULL; - } - } - - if (r_final) { - if (force_mesh_conversion && !modified) { - /* XXX 2.8 : This is a workaround for by some deeper technical debts: - * - DRW Batch cache is stored inside the ob->data. - * - Curve data is not COWed for instances that use different modifiers. - * This can causes the modifiers to be applied on all user of the same data-block - * (see T71055) - * - * The easy workaround is to force to generate a Mesh that will be used for display data - * since a Mesh output is already used for generative modifiers. - * However it does not fix problems with actual edit data still being shared. - * - * The right solution would be to COW the Curve data block at the input of the modifier - * stack just like what the mesh modifier does. - */ - modified = BKE_mesh_new_nomain_from_curve_displist(ob, dispbase); - } - - if (modified) { - - /* XXX2.8(Sybren): make sure the face normals are recalculated as well */ - BKE_mesh_ensure_normals(modified); - - /* Special tweaks, needed since neither BKE_mesh_new_nomain_from_template() nor - * BKE_mesh_new_nomain_from_curve_displist() properly duplicate mat info... - */ - BLI_strncpy(modified->id.name, cu->id.name, sizeof(modified->id.name)); - *((short *)modified->id.name) = ID_ME; - MEM_SAFE_FREE(modified->mat); - /* Set flag which makes it easier to see what's going on in a debugger. */ - modified->id.tag |= LIB_TAG_COPIED_ON_WRITE_EVAL_RESULT; - modified->mat = MEM_dupallocN(cu->mat); - modified->totcol = cu->totcol; - - (*r_final) = modified; - } - else { - (*r_final) = NULL; - } - } - else if (modified != NULL) { - /* Pretty stupid to generate that whole mesh if it's unused, yet we have to free it. */ - BKE_id_free(NULL, modified); - } -} - -static void displist_surf_indices(DispList *dl) -{ - int a, b, p1, p2, p3, p4; - int *index; - - dl->totindex = 0; - - index = dl->index = MEM_mallocN(sizeof(int[4]) * (dl->parts + 1) * (dl->nr + 1), - "index array nurbs"); - - for (a = 0; a < dl->parts; a++) { - - if (BKE_displist_surfindex_get(dl, a, &b, &p1, &p2, &p3, &p4) == 0) { - break; - } - - for (; b < dl->nr; b++, index += 4) { - index[0] = p1; - index[1] = p2; - index[2] = p4; - index[3] = p3; - - dl->totindex++; - - p2 = p1; - p1++; - p4 = p3; - p3++; - } - } -} - -void BKE_displist_make_surf(Depsgraph *depsgraph, - const Scene *scene, - Object *ob, - ListBase *dispbase, - Mesh **r_final, - const bool for_render, - const bool for_orco) -{ - ListBase nubase = {NULL, NULL}; - Curve *cu = ob->data; - DispList *dl; - float *data; - int len; - bool force_mesh_conversion = false; - - if (!for_render && cu->editnurb) { - BKE_nurbList_duplicate(&nubase, BKE_curve_editNurbs_get(cu)); - } - else { - BKE_nurbList_duplicate(&nubase, &cu->nurb); - } - - if (!for_orco) { - force_mesh_conversion = BKE_curve_calc_modifiers_pre( - depsgraph, scene, ob, &nubase, &nubase, for_render); - } - - LISTBASE_FOREACH (Nurb *, nu, &nubase) { - if (!(for_render || nu->hide == 0) || !BKE_nurb_check_valid_uv(nu)) { - continue; - } - - int resolu = nu->resolu, resolv = nu->resolv; - - if (for_render) { - if (cu->resolu_ren) { - resolu = cu->resolu_ren; - } - if (cu->resolv_ren) { - resolv = cu->resolv_ren; - } - } - - if (nu->pntsv == 1) { - len = SEGMENTSU(nu) * resolu; - - dl = MEM_callocN(sizeof(DispList), "makeDispListsurf"); - dl->verts = MEM_mallocN(len * sizeof(float[3]), "dlverts"); - - BLI_addtail(dispbase, dl); - dl->parts = 1; - dl->nr = len; - dl->col = nu->mat_nr; - dl->charidx = nu->charidx; - - /* dl->rt will be used as flag for render face and */ - /* CU_2D conflicts with R_NOPUNOFLIP */ - dl->rt = nu->flag; - - data = dl->verts; - if (nu->flagu & CU_NURB_CYCLIC) { - dl->type = DL_POLY; - } - else { - dl->type = DL_SEGM; - } - - BKE_nurb_makeCurve(nu, data, NULL, NULL, NULL, resolu, sizeof(float[3])); - } - else { - len = (nu->pntsu * resolu) * (nu->pntsv * resolv); - - dl = MEM_callocN(sizeof(DispList), "makeDispListsurf"); - dl->verts = MEM_mallocN(len * sizeof(float[3]), "dlverts"); - BLI_addtail(dispbase, dl); - - dl->col = nu->mat_nr; - dl->charidx = nu->charidx; - - /* dl->rt will be used as flag for render face and */ - /* CU_2D conflicts with R_NOPUNOFLIP */ - dl->rt = nu->flag; - - data = dl->verts; - dl->type = DL_SURF; - - dl->parts = (nu->pntsu * resolu); /* in reverse, because makeNurbfaces works that way */ - dl->nr = (nu->pntsv * resolv); - if (nu->flagv & CU_NURB_CYCLIC) { - dl->flag |= DL_CYCL_U; /* reverse too! */ - } - if (nu->flagu & CU_NURB_CYCLIC) { - dl->flag |= DL_CYCL_V; - } - - BKE_nurb_makeFaces(nu, data, 0, resolu, resolv); - - /* gl array drawing: using indices */ - displist_surf_indices(dl); - } - } - - if (!for_orco) { - BKE_nurbList_duplicate(&ob->runtime.curve_cache->deformed_nurbs, &nubase); - curve_calc_modifiers_post( - depsgraph, scene, ob, dispbase, r_final, for_render, force_mesh_conversion); - } - - BKE_nurbList_free(&nubase); -} - -static void rotateBevelPiece(const Curve *cu, - const BevPoint *bevp, - const BevPoint *nbevp, - const DispList *dlb, - const float bev_blend, - const float widfac, - const float radius_factor, - float **r_data) -{ - float *data = *r_data; - const float *fp = dlb->verts; - for (int b = 0; b < dlb->nr; b++, fp += 3, data += 3) { - if (cu->flag & CU_3D) { - float vec[3], quat[4]; - - vec[0] = fp[1] + widfac; - vec[1] = fp[2]; - vec[2] = 0.0; - - if (nbevp == NULL) { - copy_v3_v3(data, bevp->vec); - copy_qt_qt(quat, bevp->quat); - } - else { - interp_v3_v3v3(data, bevp->vec, nbevp->vec, bev_blend); - interp_qt_qtqt(quat, bevp->quat, nbevp->quat, bev_blend); - } - - mul_qt_v3(quat, vec); - - data[0] += radius_factor * vec[0]; - data[1] += radius_factor * vec[1]; - data[2] += radius_factor * vec[2]; - } - else { - float sina, cosa; - - if (nbevp == NULL) { - copy_v3_v3(data, bevp->vec); - sina = bevp->sina; - cosa = bevp->cosa; - } - else { - interp_v3_v3v3(data, bevp->vec, nbevp->vec, bev_blend); - - /* perhaps we need to interpolate angles instead. but the thing is - * cosa and sina are not actually sine and cosine - */ - sina = nbevp->sina * bev_blend + bevp->sina * (1.0f - bev_blend); - cosa = nbevp->cosa * bev_blend + bevp->cosa * (1.0f - bev_blend); - } - - data[0] += radius_factor * (widfac + fp[1]) * sina; - data[1] += radius_factor * (widfac + fp[1]) * cosa; - data[2] += radius_factor * fp[2]; - } - } - - *r_data = data; -} - -static void fillBevelCap(const Nurb *nu, - const DispList *dlb, - const float *prev_fp, - ListBase *dispbase) -{ - DispList *dl; - - dl = MEM_callocN(sizeof(DispList), "makeDispListbev2"); - dl->verts = MEM_mallocN(sizeof(float[3]) * dlb->nr, "dlverts"); - memcpy(dl->verts, prev_fp, sizeof(float[3]) * dlb->nr); - - dl->type = DL_POLY; - - dl->parts = 1; - dl->nr = dlb->nr; - dl->col = nu->mat_nr; - dl->charidx = nu->charidx; - - /* dl->rt will be used as flag for render face and */ - /* CU_2D conflicts with R_NOPUNOFLIP */ - dl->rt = nu->flag; - - BLI_addtail(dispbase, dl); -} - -static void calc_bevfac_segment_mapping( - const BevList *bl, float bevfac, float spline_length, int *r_bev, float *r_blend) -{ - float normlen, normsum = 0.0f; - float *seglen = bl->seglen; - int *segbevcount = bl->segbevcount; - int bevcount = 0, nr = bl->nr; - - float bev_fl = bevfac * (bl->nr - 1); - *r_bev = (int)bev_fl; - - while (bevcount < nr - 1) { - normlen = *seglen / spline_length; - if (normsum + normlen > bevfac) { - bev_fl = bevcount + (bevfac - normsum) / normlen * *segbevcount; - *r_bev = (int)bev_fl; - *r_blend = bev_fl - *r_bev; - break; - } - normsum += normlen; - bevcount += *segbevcount; - segbevcount++; - seglen++; - } -} - -static void calc_bevfac_spline_mapping( - const BevList *bl, float bevfac, float spline_length, int *r_bev, float *r_blend) -{ - const float len_target = bevfac * spline_length; - BevPoint *bevp = bl->bevpoints; - float len_next = 0.0f, len = 0.0f; - int i = 0, nr = bl->nr; - - while (nr--) { - bevp++; - len_next = len + bevp->offset; - if (len_next > len_target) { - break; - } - len = len_next; - i++; - } - - *r_bev = i; - *r_blend = (len_target - len) / bevp->offset; -} - -static void calc_bevfac_mapping_default( - const BevList *bl, int *r_start, float *r_firstblend, int *r_steps, float *r_lastblend) -{ - *r_start = 0; - *r_steps = bl->nr; - *r_firstblend = 1.0f; - *r_lastblend = 1.0f; -} - -static void calc_bevfac_mapping(const Curve *cu, - const BevList *bl, - const Nurb *nu, - int *r_start, - float *r_firstblend, - int *r_steps, - float *r_lastblend) -{ - float tmpf, total_length = 0.0f; - int end = 0, i; - - if ((BKE_nurb_check_valid_u(nu) == false) || - /* not essential, but skips unnecessary calculation */ - (min_ff(cu->bevfac1, cu->bevfac2) == 0.0f && max_ff(cu->bevfac1, cu->bevfac2) == 1.0f)) { - calc_bevfac_mapping_default(bl, r_start, r_firstblend, r_steps, r_lastblend); - return; - } - - if (ELEM(cu->bevfac1_mapping, CU_BEVFAC_MAP_SEGMENT, CU_BEVFAC_MAP_SPLINE) || - ELEM(cu->bevfac2_mapping, CU_BEVFAC_MAP_SEGMENT, CU_BEVFAC_MAP_SPLINE)) { - for (i = 0; i < SEGMENTSU(nu); i++) { - total_length += bl->seglen[i]; - } - } - - switch (cu->bevfac1_mapping) { - case CU_BEVFAC_MAP_RESOLU: { - const float start_fl = cu->bevfac1 * (bl->nr - 1); - *r_start = (int)start_fl; - *r_firstblend = 1.0f - (start_fl - (*r_start)); - break; - } - case CU_BEVFAC_MAP_SEGMENT: { - calc_bevfac_segment_mapping(bl, cu->bevfac1, total_length, r_start, r_firstblend); - *r_firstblend = 1.0f - *r_firstblend; - break; - } - case CU_BEVFAC_MAP_SPLINE: { - calc_bevfac_spline_mapping(bl, cu->bevfac1, total_length, r_start, r_firstblend); - *r_firstblend = 1.0f - *r_firstblend; - break; - } - } - - switch (cu->bevfac2_mapping) { - case CU_BEVFAC_MAP_RESOLU: { - const float end_fl = cu->bevfac2 * (bl->nr - 1); - end = (int)end_fl; - - *r_steps = 2 + end - *r_start; - *r_lastblend = end_fl - end; - break; - } - case CU_BEVFAC_MAP_SEGMENT: { - calc_bevfac_segment_mapping(bl, cu->bevfac2, total_length, &end, r_lastblend); - *r_steps = end - *r_start + 2; - break; - } - case CU_BEVFAC_MAP_SPLINE: { - calc_bevfac_spline_mapping(bl, cu->bevfac2, total_length, &end, r_lastblend); - *r_steps = end - *r_start + 2; - break; - } - } - - if (end < *r_start || (end == *r_start && *r_lastblend < 1.0f - *r_firstblend)) { - SWAP(int, *r_start, end); - tmpf = *r_lastblend; - *r_lastblend = 1.0f - *r_firstblend; - *r_firstblend = 1.0f - tmpf; - *r_steps = end - *r_start + 2; - } - - if (*r_start + *r_steps > bl->nr) { - *r_steps = bl->nr - *r_start; - *r_lastblend = 1.0f; - } -} - -static void do_makeDispListCurveTypes(Depsgraph *depsgraph, - const Scene *scene, - Object *ob, - ListBase *dispbase, - const bool for_render, - const bool for_orco, - Mesh **r_final) -{ - Curve *cu = ob->data; - - /* we do allow duplis... this is only displist on curve level */ - if (!ELEM(ob->type, OB_SURF, OB_CURVE, OB_FONT)) { - return; - } - - if (ob->type == OB_SURF) { - BKE_displist_make_surf(depsgraph, scene, ob, dispbase, r_final, for_render, for_orco); - } - else if (ELEM(ob->type, OB_CURVE, OB_FONT)) { - ListBase dlbev; - ListBase nubase = {NULL, NULL}; - bool force_mesh_conversion = false; - - BKE_curve_bevelList_free(&ob->runtime.curve_cache->bev); - - /* We only re-evaluate path if evaluation is not happening for orco. - * If the calculation happens for orco, we should never free data which - * was needed before and only not needed for orco calculation. - */ - if (!for_orco) { - if (ob->runtime.curve_cache->anim_path_accum_length) { - MEM_freeN((void *)ob->runtime.curve_cache->anim_path_accum_length); - } - ob->runtime.curve_cache->anim_path_accum_length = NULL; - } - - if (ob->type == OB_FONT) { - BKE_vfont_to_curve_nubase(ob, FO_EDIT, &nubase); - } - else { - BKE_nurbList_duplicate(&nubase, BKE_curve_nurbs_get(cu)); - } - - if (!for_orco) { - force_mesh_conversion = BKE_curve_calc_modifiers_pre( - depsgraph, scene, ob, &nubase, &nubase, for_render); - } - - BKE_curve_bevelList_make(ob, &nubase, for_render); - - /* If curve has no bevel will return nothing */ - BKE_curve_bevel_make(ob, &dlbev); - - /* no bevel or extrude, and no width correction? */ - if (!dlbev.first && cu->width == 1.0f) { - curve_to_displist(cu, &nubase, for_render, dispbase); - } - else { - const float widfac = cu->width - 1.0f; - BevList *bl = ob->runtime.curve_cache->bev.first; - Nurb *nu = nubase.first; - - for (; bl && nu; bl = bl->next, nu = nu->next) { - float *data; - - if (bl->nr == 0) { /* blank bevel lists can happen */ - continue; - } - - /* exception handling; curve without bevel or extrude, with width correction */ - if (BLI_listbase_is_empty(&dlbev)) { - DispList *dl = MEM_callocN(sizeof(DispList), "makeDispListbev"); - dl->verts = MEM_mallocN(sizeof(float[3]) * bl->nr, "dlverts"); - BLI_addtail(dispbase, dl); - - if (bl->poly != -1) { - dl->type = DL_POLY; - } - else { - dl->type = DL_SEGM; - dl->flag = (DL_FRONT_CURVE | DL_BACK_CURVE); - } - - dl->parts = 1; - dl->nr = bl->nr; - dl->col = nu->mat_nr; - dl->charidx = nu->charidx; - - /* dl->rt will be used as flag for render face and */ - /* CU_2D conflicts with R_NOPUNOFLIP */ - dl->rt = nu->flag; - - int a = dl->nr; - BevPoint *bevp = bl->bevpoints; - data = dl->verts; - while (a--) { - data[0] = bevp->vec[0] + widfac * bevp->sina; - data[1] = bevp->vec[1] + widfac * bevp->cosa; - data[2] = bevp->vec[2]; - bevp++; - data += 3; - } - } - else { - ListBase bottom_capbase = {NULL, NULL}; - ListBase top_capbase = {NULL, NULL}; - float bottom_no[3] = {0.0f}; - float top_no[3] = {0.0f}; - float first_blend = 0.0f, last_blend = 0.0f; - int start, steps = 0; - - if (nu->flagu & CU_NURB_CYCLIC) { - calc_bevfac_mapping_default(bl, &start, &first_blend, &steps, &last_blend); - } - else { - if (fabsf(cu->bevfac2 - cu->bevfac1) < FLT_EPSILON) { - continue; - } - - calc_bevfac_mapping(cu, bl, nu, &start, &first_blend, &steps, &last_blend); - } - - LISTBASE_FOREACH (DispList *, dlb, &dlbev) { - /* for each part of the bevel use a separate displblock */ - DispList *dl = MEM_callocN(sizeof(DispList), "makeDispListbev1"); - dl->verts = data = MEM_mallocN(sizeof(float[3]) * dlb->nr * steps, "dlverts"); - BLI_addtail(dispbase, dl); - - dl->type = DL_SURF; - - dl->flag = dlb->flag & (DL_FRONT_CURVE | DL_BACK_CURVE); - if (dlb->type == DL_POLY) { - dl->flag |= DL_CYCL_U; - } - if ((bl->poly >= 0) && (steps > 2)) { - dl->flag |= DL_CYCL_V; - } - - dl->parts = steps; - dl->nr = dlb->nr; - dl->col = nu->mat_nr; - dl->charidx = nu->charidx; - - /* dl->rt will be used as flag for render face and */ - /* CU_2D conflicts with R_NOPUNOFLIP */ - dl->rt = nu->flag; - - /* for each point of poly make a bevel piece */ - BevPoint *bevp_first = bl->bevpoints; - BevPoint *bevp_last = &bl->bevpoints[bl->nr - 1]; - BevPoint *bevp = &bl->bevpoints[start]; - for (int i = start, a = 0; a < steps; i++, bevp++, a++) { - float radius_factor = 1.0; - float *cur_data = data; - - if (cu->taperobj == NULL) { - radius_factor = bevp->radius; - } - else { - float taper_factor; - if (cu->flag & CU_MAP_TAPER) { - float len = (steps - 3) + first_blend + last_blend; - - if (a == 0) { - taper_factor = 0.0f; - } - else if (a == steps - 1) { - taper_factor = 1.0f; - } - else { - taper_factor = ((float)a - (1.0f - first_blend)) / len; - } - } - else { - float len = bl->nr - 1; - taper_factor = (float)i / len; - - if (a == 0) { - taper_factor += (1.0f - first_blend) / len; - } - else if (a == steps - 1) { - taper_factor -= (1.0f - last_blend) / len; - } - } - - radius_factor = displist_calc_taper(depsgraph, scene, cu->taperobj, taper_factor); - - if (cu->taper_radius_mode == CU_TAPER_RADIUS_MULTIPLY) { - radius_factor *= bevp->radius; - } - else if (cu->taper_radius_mode == CU_TAPER_RADIUS_ADD) { - radius_factor += bevp->radius; - } - } - - /* rotate bevel piece and write in data */ - if ((a == 0) && (bevp != bevp_last)) { - rotateBevelPiece( - cu, bevp, bevp + 1, dlb, 1.0f - first_blend, widfac, radius_factor, &data); - } - else if ((a == steps - 1) && (bevp != bevp_first)) { - rotateBevelPiece( - cu, bevp, bevp - 1, dlb, 1.0f - last_blend, widfac, radius_factor, &data); - } - else { - rotateBevelPiece(cu, bevp, NULL, dlb, 0.0f, widfac, radius_factor, &data); - } - - if ((cu->flag & CU_FILL_CAPS) && !(nu->flagu & CU_NURB_CYCLIC)) { - if (a == 1) { - fillBevelCap(nu, dlb, cur_data - 3 * dlb->nr, &bottom_capbase); - copy_v3_v3(bottom_no, bevp->dir); - } - if (a == steps - 1) { - fillBevelCap(nu, dlb, cur_data, &top_capbase); - negate_v3_v3(top_no, bevp->dir); - } - } - } - - /* gl array drawing: using indices */ - displist_surf_indices(dl); - } - - if (bottom_capbase.first) { - BKE_displist_fill(&bottom_capbase, dispbase, bottom_no, false); - BKE_displist_fill(&top_capbase, dispbase, top_no, false); - BKE_displist_free(&bottom_capbase); - BKE_displist_free(&top_capbase); - } - } - } - BKE_displist_free(&dlbev); - } - - if (!(cu->flag & CU_DEFORM_FILL)) { - curve_to_filledpoly(cu, dispbase); - } - - if (!for_orco) { - if ((cu->flag & CU_PATH) || - DEG_get_eval_flags_for_id(depsgraph, &ob->id) & DAG_EVAL_NEED_CURVE_PATH) { - BKE_anim_path_calc_data(ob); - } - - BKE_nurbList_duplicate(&ob->runtime.curve_cache->deformed_nurbs, &nubase); - curve_calc_modifiers_post( - depsgraph, scene, ob, dispbase, r_final, for_render, force_mesh_conversion); - } - - if (cu->flag & CU_DEFORM_FILL && !ob->runtime.data_eval) { - curve_to_filledpoly(cu, dispbase); - } - - BKE_nurbList_free(&nubase); - } -} - -void BKE_displist_make_curveTypes(Depsgraph *depsgraph, - const Scene *scene, - Object *ob, - const bool for_render, - const bool for_orco) -{ - ListBase *dispbase; - - /* The same check for duplis as in do_makeDispListCurveTypes. - * Happens when curve used for constraint/bevel was converted to mesh. - * check there is still needed for render displist and orco displists. */ - if (!ELEM(ob->type, OB_SURF, OB_CURVE, OB_FONT)) { - return; - } - - BKE_object_free_derived_caches(ob); - - if (!ob->runtime.curve_cache) { - ob->runtime.curve_cache = MEM_callocN(sizeof(CurveCache), "CurveCache for curve types"); - } - - dispbase = &(ob->runtime.curve_cache->disp); - - Mesh *mesh_eval = NULL; - do_makeDispListCurveTypes(depsgraph, scene, ob, dispbase, for_render, for_orco, &mesh_eval); - - if (mesh_eval != NULL) { - BKE_object_eval_assign_data(ob, &mesh_eval->id, true); - } - - boundbox_displist_object(ob); -} - -void BKE_displist_make_curveTypes_forRender(Depsgraph *depsgraph, - const Scene *scene, - Object *ob, - ListBase *dispbase, - Mesh **r_final, - const bool for_orco) -{ - if (ob->runtime.curve_cache == NULL) { - ob->runtime.curve_cache = MEM_callocN(sizeof(CurveCache), "CurveCache for Curve"); - } - - do_makeDispListCurveTypes(depsgraph, scene, ob, dispbase, true, for_orco, r_final); -} - -void BKE_displist_minmax(const ListBase *dispbase, float min[3], float max[3]) -{ - const float *vert; - int a, tot = 0; - int doit = 0; - - LISTBASE_FOREACH (const DispList *, dl, dispbase) { - tot = (dl->type == DL_INDEX3) ? dl->nr : dl->nr * dl->parts; - vert = dl->verts; - for (a = 0; a < tot; a++, vert += 3) { - minmax_v3v3_v3(min, max, vert); - } - doit |= (tot != 0); - } - - if (!doit) { - /* there's no geometry in displist, use zero-sized boundbox */ - zero_v3(min); - zero_v3(max); - } -} - -/* this is confusing, there's also min_max_object, applying the obmat... */ -static void boundbox_displist_object(Object *ob) -{ - if (ELEM(ob->type, OB_CURVE, OB_SURF, OB_FONT)) { - /* Curve's BB is already calculated as a part of modifier stack, - * here we only calculate object BB based on final display list. - */ - - /* object's BB is calculated from final displist */ - if (ob->runtime.bb == NULL) { - ob->runtime.bb = MEM_callocN(sizeof(BoundBox), "boundbox"); - } - - Mesh *mesh_eval = BKE_object_get_evaluated_mesh(ob); - if (mesh_eval) { - BKE_object_boundbox_calc_from_mesh(ob, mesh_eval); - } - else { - float min[3], max[3]; - - INIT_MINMAX(min, max); - BKE_displist_minmax(&ob->runtime.curve_cache->disp, min, max); - BKE_boundbox_init_from_minmax(ob->runtime.bb, min, max); - - ob->runtime.bb->flag &= ~BOUNDBOX_DIRTY; - } - } -} |