source/blender/blenkernel/intern/scene.c

   1 /*  scene.c
   2  *
   3  *
   4  * $Id$
   5  *
   6  * ***** BEGIN GPL LICENSE BLOCK *****
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License
  10  * as published by the Free Software Foundation; either version 2
  11  * of the License, or (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software Foundation,
  20  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  21  *
  22  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
  23  * All rights reserved.
  24  *
  25  * The Original Code is: all of this file.
  26  *
  27  * Contributor(s): none yet.
  28  *
  29  * ***** END GPL LICENSE BLOCK *****
  30  */
  31
  32 #include <stdio.h>
  33 #include <string.h>
  34
  35 #ifdef HAVE_CONFIG_H
  36 #include <config.h>
  37 #endif
  38
  39 #ifndef WIN32
  40 #include <unistd.h>
  41 #else
  42 #include <io.h>
  43 #endif
  44 #include "MEM_guardedalloc.h"
  45
  46 #include "DNA_armature_types.h"
  47 #include "DNA_color_types.h"
  48 #include "DNA_constraint_types.h"
  49 #include "DNA_curve_types.h"
  50 #include "DNA_group_types.h"
  51 #include "DNA_lamp_types.h"
  52 #include "DNA_material_types.h"
  53 #include "DNA_meta_types.h"
  54 #include "DNA_object_types.h"
  55 #include "DNA_scene_types.h"
  56 #include "DNA_scriptlink_types.h"
  57 #include "DNA_texture_types.h"
  58 #include "DNA_userdef_types.h"
  59
  60 #include "BKE_action.h"
  61 #include "BKE_anim.h"
  62 #include "BKE_armature.h"
  63 #include "BKE_bad_level_calls.h"
  64 #include "BKE_colortools.h"
  65 #include "BKE_constraint.h"
  66 #include "BKE_depsgraph.h"
  67 #include "BKE_global.h"
  68 #include "BKE_group.h"
  69 #include "BKE_ipo.h"
  70 #include "BKE_idprop.h"
  71 #include "BKE_image.h"
  72 #include "BKE_key.h"
  73 #include "BKE_library.h"
  74 #include "BKE_main.h"
  75 #include "BKE_node.h"
  76 #include "BKE_object.h"
  77 #include "BKE_scene.h"
  78 #include "BKE_sculpt.h"
  79 #include "BKE_world.h"
  80 #include "BKE_utildefines.h"
  81
  82 #include "BIF_previewrender.h"
  83 #include "BIF_editseq.h"
  84
  85 #ifndef DISABLE_PYTHON
  86 #include "BPY_extern.h"
  87 #endif
  88
  89 #include "BLI_arithb.h"
  90 #include "BLI_blenlib.h"
  91
  92 #include "nla.h"
  93
  94 #ifdef WIN32
  95 #else
  96 #include <sys/time.h>
  97 #endif
  98
  99 void free_avicodecdata(AviCodecData *acd)
 100 {
 101         if (acd) {
 102                 if (acd->lpFormat){
 103                         MEM_freeN(acd->lpFormat);
 104                         acd->lpFormat = NULL;
 105                         acd->cbFormat = 0;
 106                 }
 107                 if (acd->lpParms){
 108                         MEM_freeN(acd->lpParms);
 109                         acd->lpParms = NULL;
 110                         acd->cbParms = 0;
 111                 }
 112         }
 113 }
 114
 115 void free_qtcodecdata(QuicktimeCodecData *qcd)
 116 {
 117         if (qcd) {
 118                 if (qcd->cdParms){
 119                         MEM_freeN(qcd->cdParms);
 120                         qcd->cdParms = NULL;
 121                         qcd->cdSize = 0;
 122                 }
 123         }
 124 }
 125
 126 /* copy_scene moved to src/header_info.c... should be back */
 127
 128 /* do not free scene itself */
 129 void free_scene(Scene *sce)
 130 {
 131         Base *base;
 132
 133         base= sce->base.first;
 134         while(base) {
 135                 base->object->id.us--;
 136                 base= base->next;
 137         }
 138         /* do not free objects! */
 139
 140         BLI_freelistN(&sce->base);
 141         free_editing(sce->ed);
 142         if(sce->radio) MEM_freeN(sce->radio);
 143         sce->radio= 0;
 144
 145 #ifndef DISABLE_PYTHON
 146         BPY_free_scriptlink(&sce->scriptlink);
 147 #endif
 148
 149         if (sce->r.avicodecdata) {
 150                 free_avicodecdata(sce->r.avicodecdata);
 151                 MEM_freeN(sce->r.avicodecdata);
 152                 sce->r.avicodecdata = NULL;
 153         }
 154         if (sce->r.qtcodecdata) {
 155                 free_qtcodecdata(sce->r.qtcodecdata);
 156                 MEM_freeN(sce->r.qtcodecdata);
 157                 sce->r.qtcodecdata = NULL;
 158         }
 159         if (sce->r.ffcodecdata.properties) {
 160                 IDP_FreeProperty(sce->r.ffcodecdata.properties);
 161                 MEM_freeN(sce->r.ffcodecdata.properties);
 162                 sce->r.ffcodecdata.properties = NULL;
 163         }
 164
 165         BLI_freelistN(&sce->markers);
 166         BLI_freelistN(&sce->transform_spaces);
 167         BLI_freelistN(&sce->r.layers);
 168
 169         if(sce->toolsettings){
 170                 MEM_freeN(sce->toolsettings);
 171                 sce->toolsettings = NULL;
 172         }
 173
 174         if (sce->theDag) {
 175                 free_forest(sce->theDag);
 176                 MEM_freeN(sce->theDag);
 177         }
 178
 179         if(sce->nodetree) {
 180                 ntreeFreeTree(sce->nodetree);
 181                 MEM_freeN(sce->nodetree);
 182         }
 183
 184         sculptdata_free(sce);
 185 }
 186
 187 Scene *add_scene(char *name)
 188 {
 189         Scene *sce;
 190         ParticleEditSettings *pset;
 191         int a;
 192
 193         sce= alloc_libblock(&G.main->scene, ID_SCE, name);
 194         sce->lay= 1;
 195         sce->selectmode= SCE_SELECT_VERTEX;
 196         sce->editbutsize= 0.1;
 197         sce->autokey_mode= U.autokey_mode;
 198
 199         sce->r.mode= R_GAMMA;
 200         sce->r.cfra= 1;
 201         sce->r.sfra= 1;
 202         sce->r.efra= 250;
 203         sce->r.xsch= 320;
 204         sce->r.ysch= 256;
 205         sce->r.xasp= 1;
 206         sce->r.yasp= 1;
 207         sce->r.xparts= 4;
 208         sce->r.yparts= 4;
 209         sce->r.size= 100;
 210         sce->r.planes= 24;
 211         sce->r.quality= 90;
 212         sce->r.framapto= 100;
 213         sce->r.images= 100;
 214         sce->r.framelen= 1.0;
 215         sce->r.frs_sec= 25;
 216         sce->r.frs_sec_base= 1;
 217         sce->r.ocres = 128;
 218
 219         sce->r.bake_mode= 1;    /* prevent to include render stuff here */
 220         sce->r.bake_filter= 2;
 221         sce->r.bake_osa= 5;
 222         sce->r.bake_flag= R_BAKE_CLEAR;
 223         sce->r.bake_normal_space= R_BAKE_SPACE_TANGENT;
 224
 225         sce->r.xplay= 640;
 226         sce->r.yplay= 480;
 227         sce->r.freqplay= 60;
 228         sce->r.depth= 32;
 229
 230         sce->r.threads= 1;
 231
 232         sce->r.stereomode = 1;  // no stereo
 233         sce->r.domeangle = 180;
 234         sce->r.domemode = 1;
 235         sce->r.domesize = 1.0f;
 236         sce->r.domeres = 4;
 237         sce->r.domeresbuf = 1.0f;
 238
 239         sce->r.simplify_subsurf= 6;
 240         sce->r.simplify_particles= 1.0f;
 241         sce->r.simplify_shadowsamples= 16;
 242         sce->r.simplify_aosss= 1.0f;
 243
 244         sce->r.cineonblack= 95;
 245         sce->r.cineonwhite= 685;
 246         sce->r.cineongamma= 1.7f;
 247
 248         sce->toolsettings = MEM_callocN(sizeof(struct ToolSettings),"Tool Settings Struct");
 249         sce->toolsettings->cornertype=1;
 250         sce->toolsettings->degr = 90;
 251         sce->toolsettings->step = 9;
 252         sce->toolsettings->turn = 1;
 253         sce->toolsettings->extr_offs = 1;
 254         sce->toolsettings->doublimit = 0.001;
 255         sce->toolsettings->segments = 32;
 256         sce->toolsettings->rings = 32;
 257         sce->toolsettings->vertices = 32;
 258         sce->toolsettings->editbutflag = 1;
 259         sce->toolsettings->uvcalc_radius = 1.0f;
 260         sce->toolsettings->uvcalc_cubesize = 1.0f;
 261         sce->toolsettings->uvcalc_mapdir = 1;
 262         sce->toolsettings->uvcalc_mapalign = 1;
 263         sce->toolsettings->unwrapper = 1;
 264         sce->toolsettings->select_thresh= 0.01f;
 265         sce->toolsettings->jointrilimit = 0.8f;
 266
 267         sce->toolsettings->skgen_resolution = 100;
 268         sce->toolsettings->skgen_threshold_internal     = 0.01f;
 269         sce->toolsettings->skgen_threshold_external     = 0.01f;
 270         sce->toolsettings->skgen_angle_limit                    = 45.0f;
 271         sce->toolsettings->skgen_length_ratio                   = 1.3f;
 272         sce->toolsettings->skgen_length_limit                   = 1.5f;
 273         sce->toolsettings->skgen_correlation_limit              = 0.98f;
 274         sce->toolsettings->skgen_symmetry_limit                 = 0.1f;
 275         sce->toolsettings->skgen_postpro = SKGEN_SMOOTH;
 276         sce->toolsettings->skgen_postpro_passes = 1;
 277         sce->toolsettings->skgen_options = SKGEN_FILTER_INTERNAL|SKGEN_FILTER_EXTERNAL|SKGEN_FILTER_SMART|SKGEN_HARMONIC|SKGEN_SUB_CORRELATION|SKGEN_STICK_TO_EMBEDDING;
 278         sce->toolsettings->skgen_subdivisions[0] = SKGEN_SUB_CORRELATION;
 279         sce->toolsettings->skgen_subdivisions[1] = SKGEN_SUB_LENGTH;
 280         sce->toolsettings->skgen_subdivisions[2] = SKGEN_SUB_ANGLE;
 281
 282         pset= &sce->toolsettings->particle;
 283         pset->flag= PE_KEEP_LENGTHS|PE_LOCK_FIRST|PE_DEFLECT_EMITTER;
 284         pset->emitterdist= 0.25f;
 285         pset->totrekey= 5;
 286         pset->totaddkey= 5;
 287         pset->brushtype= PE_BRUSH_NONE;
 288         for(a=0; a<PE_TOT_BRUSH; a++) {
 289                 pset->brush[a].strength= 50;
 290                 pset->brush[a].size= 50;
 291                 pset->brush[a].step= 10;
 292         }
 293         pset->brush[PE_BRUSH_CUT].strength= 100;
 294
 295         sce->jumpframe = 10;
 296         sce->audio.mixrate = 44100;
 297
 298         strcpy(sce->r.backbuf, "//backbuf");
 299         strcpy(sce->r.pic, U.renderdir);
 300
 301         BLI_init_rctf(&sce->r.safety, 0.1f, 0.9f, 0.1f, 0.9f);
 302         sce->r.osa= 8;
 303
 304         sculptdata_init(sce);
 305
 306         /* note; in header_info.c the scene copy happens..., if you add more to renderdata it has to be checked there */
 307         scene_add_render_layer(sce);
 308
 309         return sce;
 310 }
 311
 312 Base *object_in_scene(Object *ob, Scene *sce)
 313 {
 314         Base *base;
 315
 316         base= sce->base.first;
 317         while(base) {
 318                 if(base->object == ob) return base;
 319                 base= base->next;
 320         }
 321         return NULL;
 322 }
 323
 324 void set_scene_bg(Scene *sce)
 325 {
 326         Base *base;
 327         Object *ob;
 328         Group *group;
 329         GroupObject *go;
 330         int flag;
 331
 332         // Note: this here is defined in editseq.c (BIF_editseq.h), NOT in blenkernel!
 333         clear_last_seq();
 334
 335         G.scene= sce;
 336
 337         /* check for cyclic sets, for reading old files but also for definite security (py?) */
 338         scene_check_setscene(G.scene);
 339
 340         /* deselect objects (for dataselect) */
 341         for(ob= G.main->object.first; ob; ob= ob->id.next)
 342                 ob->flag &= ~(SELECT|OB_FROMGROUP);
 343
 344         /* group flags again */
 345         for(group= G.main->group.first; group; group= group->id.next) {
 346                 go= group->gobject.first;
 347                 while(go) {
 348                         if(go->ob) go->ob->flag |= OB_FROMGROUP;
 349                         go= go->next;
 350                 }
 351         }
 352
 353         /* sort baselist */
 354         DAG_scene_sort(sce);
 355
 356         /* ensure dags are built for sets */
 357         for(sce= sce->set; sce; sce= sce->set)
 358                 if(sce->theDag==NULL)
 359                         DAG_scene_sort(sce);
 360
 361         /* copy layers and flags from bases to objects */
 362         for(base= G.scene->base.first; base; base= base->next) {
 363                 ob= base->object;
 364                 ob->lay= base->lay;
 365
 366                 /* group patch... */
 367                 base->flag &= ~(OB_FROMGROUP);
 368                 flag= ob->flag & (OB_FROMGROUP);
 369                 base->flag |= flag;
 370
 371                 /* not too nice... for recovering objects with lost data */
 372                 if(ob->pose==NULL) base->flag &= ~OB_POSEMODE;
 373                 ob->flag= base->flag;
 374
 375                 ob->ctime= -1234567.0;  /* force ipo to be calculated later */
 376         }
 377         /* no full animation update, this to enable render code to work (render code calls own animation updates) */
 378
 379         /* do we need FRAMECHANGED in set_scene? */
 380 //      if (G.f & G_DOSCRIPTLINKS) BPY_do_all_scripts(SCRIPT_FRAMECHANGED, 0);
 381 }
 382
 383 /* called from creator.c */
 384 void set_scene_name(char *name)
 385 {
 386         Scene *sce;
 387
 388         for (sce= G.main->scene.first; sce; sce= sce->id.next) {
 389                 if (BLI_streq(name, sce->id.name+2)) {
 390                         set_scene_bg(sce);
 391                         return;
 392                 }
 393         }
 394
 395         error("Can't find scene: %s", name);
 396 }
 397
 398 /* used by metaballs
 399  * doesnt return the original duplicated object, only dupli's
 400  */
 401 int next_object(int val, Base **base, Object **ob)
 402 {
 403         static ListBase *duplilist= NULL;
 404         static DupliObject *dupob;
 405         static int fase;
 406         int run_again=1;
 407
 408         /* init */
 409         if(val==0) {
 410                 fase= F_START;
 411                 dupob= NULL;
 412         }
 413         else {
 414
 415                 /* run_again is set when a duplilist has been ended */
 416                 while(run_again) {
 417                         run_again= 0;
 418
 419                         /* the first base */
 420                         if(fase==F_START) {
 421                                 *base= G.scene->base.first;
 422                                 if(*base) {
 423                                         *ob= (*base)->object;
 424                                         fase= F_SCENE;
 425                                 }
 426                                 else {
 427                                     /* exception: empty scene */
 428                                         if(G.scene->set && G.scene->set->base.first) {
 429                                                 *base= G.scene->set->base.first;
 430                                                 *ob= (*base)->object;
 431                                                 fase= F_SET;
 432                                         }
 433                                 }
 434                         }
 435                         else {
 436                                 if(*base && fase!=F_DUPLI) {
 437                                         *base= (*base)->next;
 438                                         if(*base) *ob= (*base)->object;
 439                                         else {
 440                                                 if(fase==F_SCENE) {
 441                                                         /* scene is finished, now do the set */
 442                                                         if(G.scene->set && G.scene->set->base.first) {
 443                                                                 *base= G.scene->set->base.first;
 444                                                                 *ob= (*base)->object;
 445                                                                 fase= F_SET;
 446                                                         }
 447                                                 }
 448                                         }
 449                                 }
 450                         }
 451
 452                         if(*base == NULL) fase= F_START;
 453                         else {
 454                                 if(fase!=F_DUPLI) {
 455                                         if( (*base)->object->transflag & OB_DUPLI) {
 456                                                 /* groups cannot be duplicated for mballs yet,
 457                                                 this enters eternal loop because of
 458                                                 makeDispListMBall getting called inside of group_duplilist */
 459                                                 if((*base)->object->dup_group == NULL) {
 460                                                         duplilist= object_duplilist(G.scene, (*base)->object);
 461
 462                                                         dupob= duplilist->first;
 463
 464                                                         if(!dupob)
 465                                                                 free_object_duplilist(duplilist);
 466                                                 }
 467                                         }
 468                                 }
 469                                 /* handle dupli's */
 470                                 if(dupob) {
 471
 472                                         Mat4CpyMat4(dupob->ob->obmat, dupob->mat);
 473
 474                                         (*base)->flag |= OB_FROMDUPLI;
 475                                         *ob= dupob->ob;
 476                                         fase= F_DUPLI;
 477
 478                                         dupob= dupob->next;
 479                                 }
 480                                 else if(fase==F_DUPLI) {
 481                                         fase= F_SCENE;
 482                                         (*base)->flag &= ~OB_FROMDUPLI;
 483
 484                                         for(dupob= duplilist->first; dupob; dupob= dupob->next) {
 485                                                 Mat4CpyMat4(dupob->ob->obmat, dupob->omat);
 486                                         }
 487
 488                                         free_object_duplilist(duplilist);
 489                                         duplilist= NULL;
 490                                         run_again= 1;
 491                                 }
 492                         }
 493                 }
 494         }
 495
 496         return fase;
 497 }
 498
 499 Object *scene_find_camera(Scene *sc)
 500 {
 501         Base *base;
 502
 503         for (base= sc->base.first; base; base= base->next)
 504                 if (base->object->type==OB_CAMERA)
 505                         return base->object;
 506
 507         return NULL;
 508 }
 509
 510
 511 Base *scene_add_base(Scene *sce, Object *ob)
 512 {
 513         Base *b= MEM_callocN(sizeof(*b), "scene_add_base");
 514         BLI_addhead(&sce->base, b);
 515
 516         b->object= ob;
 517         b->flag= ob->flag;
 518         b->lay= ob->lay;
 519
 520         return b;
 521 }
 522
 523 void scene_deselect_all(Scene *sce)
 524 {
 525         Base *b;
 526
 527         for (b= sce->base.first; b; b= b->next) {
 528                 b->flag&= ~SELECT;
 529                 b->object->flag= b->flag;
 530         }
 531 }
 532
 533 void scene_select_base(Scene *sce, Base *selbase)
 534 {
 535         scene_deselect_all(sce);
 536
 537         selbase->flag |= SELECT;
 538         selbase->object->flag= selbase->flag;
 539
 540         sce->basact= selbase;
 541 }
 542
 543 /* checks for cycle, returns 1 if it's all OK */
 544 int scene_check_setscene(Scene *sce)
 545 {
 546         Scene *scene;
 547         int a, totscene;
 548
 549         if(sce->set==NULL) return 1;
 550
 551         totscene= 0;
 552         for(scene= G.main->scene.first; scene; scene= scene->id.next)
 553                 totscene++;
 554
 555         for(a=0, scene=sce; scene->set; scene=scene->set, a++) {
 556                 /* more iterations than scenes means we have a cycle */
 557                 if(a > totscene) {
 558                         /* the tested scene gets zero'ed, that's typically current scene */
 559                         sce->set= NULL;
 560                         return 0;
 561                 }
 562         }
 563
 564         return 1;
 565 }
 566
 567 static void scene_update(Scene *sce, unsigned int lay)
 568 {
 569         Base *base;
 570         Object *ob;
 571
 572         if(sce->theDag==NULL)
 573                 DAG_scene_sort(sce);
 574
 575         DAG_scene_update_flags(sce, lay);   // only stuff that moves or needs display still
 576
 577         for(base= sce->base.first; base; base= base->next) {
 578                 ob= base->object;
 579
 580                 object_handle_update(ob);   // bke_object.h
 581
 582                 /* only update layer when an ipo */
 583                 if(ob->ipo && has_ipo_code(ob->ipo, OB_LAY) ) {
 584                         base->lay= ob->lay;
 585                 }
 586         }
 587 }
 588
 589 /* applies changes right away, does all sets too */
 590 void scene_update_for_newframe(Scene *sce, unsigned int lay)
 591 {
 592         Scene *scene= sce;
 593
 594         /* clears all BONE_UNKEYED flags for every pose's pchans */
 595         framechange_poses_clear_unkeyed();
 596
 597         /* object ipos are calculated in where_is_object */
 598         do_all_data_ipos();
 599 #ifndef DISABLE_PYTHON
 600         if (G.f & G_DOSCRIPTLINKS) BPY_do_all_scripts(SCRIPT_FRAMECHANGED, 0);
 601 #endif
 602         /* sets first, we allow per definition current scene to have dependencies on sets */
 603         for(sce= sce->set; sce; sce= sce->set)
 604                 scene_update(sce, lay);
 605
 606         scene_update(scene, lay);
 607 }
 608
 609 /* return default layer, also used to patch old files */
 610 void scene_add_render_layer(Scene *sce)
 611 {
 612         SceneRenderLayer *srl;
 613         int tot= 1 + BLI_countlist(&sce->r.layers);
 614
 615         srl= MEM_callocN(sizeof(SceneRenderLayer), "new render layer");
 616         sprintf(srl->name, "%d RenderLayer", tot);
 617         BLI_addtail(&sce->r.layers, srl);
 618
 619         /* note, this is also in render, pipeline.c, to make layer when scenedata doesnt have it */
 620         srl->lay= (1<<20) -1;
 621         srl->layflag= 0x7FFF;   /* solid ztra halo edge strand */
 622         srl->passflag= SCE_PASS_COMBINED|SCE_PASS_Z;
 623 }
 624
 625 /* Initialize 'permanent' sculpt data that is saved with file kept after
 626    switching out of sculptmode. */
 627 void sculptdata_init(Scene *sce)
 628 {
 629         SculptData *sd;
 630
 631         if(!sce)
 632                 return;
 633
 634         sd= &sce->sculptdata;
 635
 636         if(sd->cumap) {
 637                 curvemapping_free(sd->cumap);
 638                 sd->cumap = NULL;
 639         }
 640
 641         memset(sd, 0, sizeof(SculptData));
 642
 643         sd->drawbrush.size = sd->smoothbrush.size = sd->pinchbrush.size =
 644                 sd->inflatebrush.size = sd->grabbrush.size =
 645                 sd->layerbrush.size = sd->flattenbrush.size = 50;
 646         sd->drawbrush.strength = sd->smoothbrush.strength =
 647                 sd->pinchbrush.strength = sd->inflatebrush.strength =
 648                 sd->grabbrush.strength = sd->layerbrush.strength =
 649                 sd->flattenbrush.strength = 25;
 650         sd->drawbrush.dir = sd->pinchbrush.dir = sd->inflatebrush.dir = sd->layerbrush.dir= 1;
 651         sd->drawbrush.flag = sd->smoothbrush.flag =
 652                 sd->pinchbrush.flag = sd->inflatebrush.flag =
 653                 sd->layerbrush.flag = sd->flattenbrush.flag = 0;
 654         sd->drawbrush.view= 0;
 655         sd->brush_type= DRAW_BRUSH;
 656         sd->texact= -1;
 657         sd->texfade= 1;
 658         sd->averaging= 1;
 659         sd->texsep= 0;
 660         sd->texrept= SCULPTREPT_DRAG;
 661         sd->flags= SCULPT_DRAW_BRUSH;
 662         sd->tablet_size=3;
 663         sd->tablet_strength=10;
 664         sd->rake=0;
 665         sculpt_reset_curve(sd);
 666 }
 667
 668 void sculptdata_free(Scene *sce)
 669 {
 670         SculptData *sd= &sce->sculptdata;
 671         int a;
 672
 673         sculptsession_free(sce);
 674
 675         for(a=0; a<MAX_MTEX; a++) {
 676                 MTex *mtex= sd->mtex[a];
 677                 if(mtex) {
 678                         if(mtex->tex) mtex->tex->id.us--;
 679                         MEM_freeN(mtex);
 680                 }
 681         }
 682
 683         curvemapping_free(sd->cumap);
 684         sd->cumap = NULL;
 685 }
 686
 687 void sculpt_vertexusers_free(SculptSession *ss)
 688 {
 689         if(ss && ss->vertex_users){
 690                 MEM_freeN(ss->vertex_users);
 691                 MEM_freeN(ss->vertex_users_mem);
 692                 ss->vertex_users= NULL;
 693                 ss->vertex_users_mem= NULL;
 694                 ss->vertex_users_size= 0;
 695         }
 696 }
 697
 698 void sculptsession_free(Scene *sce)
 699 {
 700         SculptSession *ss= sce->sculptdata.session;
 701         if(ss) {
 702                 if(ss->projverts)
 703                         MEM_freeN(ss->projverts);
 704                 if(ss->mats)
 705                         MEM_freeN(ss->mats);
 706
 707                 if(ss->radialcontrol)
 708                         MEM_freeN(ss->radialcontrol);
 709
 710                 sculpt_vertexusers_free(ss);
 711                 if(ss->texcache)
 712                         MEM_freeN(ss->texcache);
 713                 MEM_freeN(ss);
 714                 sce->sculptdata.session= NULL;
 715         }
 716 }
 717
 718 /*  Default curve approximates 0.5 * (cos(pi * x) + 1), with 0 <= x <= 1 */
 719 void sculpt_reset_curve(SculptData *sd)
 720 {
 721         CurveMap *cm = NULL;
 722
 723         if(!sd->cumap)
 724                 sd->cumap = curvemapping_add(1, 0, 0, 1, 1);
 725
 726         cm = sd->cumap->cm;
 727
 728         if(cm->curve)
 729                 MEM_freeN(cm->curve);
 730         cm->curve= MEM_callocN(6*sizeof(CurveMapPoint), "curve points");
 731         cm->flag &= ~CUMA_EXTEND_EXTRAPOLATE;
 732         cm->totpoint= 6;
 733         cm->curve[0].x= 0;
 734         cm->curve[0].y= 1;
 735         cm->curve[1].x= 0.1;
 736         cm->curve[1].y= 0.97553;
 737         cm->curve[2].x= 0.3;
 738         cm->curve[2].y= 0.79389;
 739         cm->curve[3].x= 0.9;
 740         cm->curve[3].y= 0.02447;
 741         cm->curve[4].x= 0.7;
 742         cm->curve[4].y= 0.20611;
 743         cm->curve[5].x= 1;
 744         cm->curve[5].y= 0;
 745
 746         curvemapping_changed(sd->cumap, 0);
 747 }
 748
 749 /* render simplification */
 750
 751 int get_render_subsurf_level(RenderData *r, int lvl)
 752 {
 753         if(G.rt == 1 && (r->mode & R_SIMPLIFY))
 754                 return MIN2(r->simplify_subsurf, lvl);
 755         else
 756                 return lvl;
 757 }
 758
 759 int get_render_child_particle_number(RenderData *r, int num)
 760 {
 761         if(G.rt == 1 && (r->mode & R_SIMPLIFY))
 762                 return (int)(r->simplify_particles*num);
 763         else
 764                 return num;
 765 }
 766
 767 int get_render_shadow_samples(RenderData *r, int samples)
 768 {
 769         if(G.rt == 1 && (r->mode & R_SIMPLIFY) && samples > 0)
 770                 return MIN2(r->simplify_shadowsamples, samples);
 771         else
 772                 return samples;
 773 }
 774
 775 float get_render_aosss_error(RenderData *r, float error)
 776 {
 777         if(G.rt == 1 && (r->mode & R_SIMPLIFY))
 778                 return ((1.0f-r->simplify_aosss)*10.0f + 1.0f)*error;
 779         else
 780                 return error;
 781 }
 782
 783 void free_dome_warp_text(struct Text *txt)
 784 {
 785         Scene *scene;
 786
 787         scene = G.main->scene.first;
 788         while(scene) {
 789                 if (scene->r.dometext == txt)
 790                         scene->r.dometext = NULL;
 791                 scene = scene->id.next;
 792         }
 793 }