svn merge ^/trunk/blender -r43294:43338
[blender.git] / source / blender / editors / transform / transform_generics.c
1 /*
2  * ***** BEGIN GPL LICENSE BLOCK *****
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software Foundation,
16  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17  *
18  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
19  * All rights reserved.
20  *
21  * The Original Code is: all of this file.
22  *
23  * Contributor(s): none yet.
24  *
25  * ***** END GPL LICENSE BLOCK *****
26  */
27
28 /** \file blender/editors/transform/transform_generics.c
29  *  \ingroup edtransform
30  */
31
32
33 #include <string.h>
34 #include <math.h>
35
36 #include "MEM_guardedalloc.h"
37
38 #include "BLO_sys_types.h" // for intptr_t support
39
40 #include "DNA_anim_types.h"
41 #include "DNA_armature_types.h"
42 #include "DNA_lattice_types.h"
43 #include "DNA_screen_types.h"
44 #include "DNA_space_types.h"
45 #include "DNA_scene_types.h"
46 #include "DNA_object_types.h"
47 #include "DNA_meshdata_types.h"
48 #include "DNA_view3d_types.h"
49 #include "DNA_modifier_types.h"
50 #include "DNA_movieclip_types.h"
51
52 #include "RNA_access.h"
53
54 //#include "BIF_screen.h"
55 //#include "BIF_mywindow.h"
56 #include "BIF_gl.h"
57 #include "BIF_glutil.h"
58 //#include "BIF_editmesh.h"
59 //#include "BIF_editsima.h"
60 //#include "BIF_editparticle.h"
61 //#include "BIF_meshtools.h"
62
63 #include "BKE_animsys.h"
64 #include "BKE_action.h"
65 #include "BKE_armature.h"
66 #include "BKE_curve.h"
67 #include "BKE_depsgraph.h"
68 #include "BKE_displist.h"
69 #include "BKE_fcurve.h"
70 #include "BKE_lattice.h"
71 #include "BKE_mesh.h"
72 #include "BKE_nla.h"
73 #include "BKE_context.h"
74 #include "BKE_tessmesh.h"
75 #include "BKE_tracking.h"
76
77 #include "ED_anim_api.h"
78 #include "ED_armature.h"
79 #include "ED_image.h"
80 #include "ED_keyframing.h"
81 #include "ED_markers.h"
82 #include "ED_mesh.h"
83 #include "ED_particle.h"
84 #include "ED_screen_types.h"
85 #include "ED_space_api.h"
86 #include "ED_uvedit.h"
87 #include "ED_view3d.h"
88 #include "ED_curve.h" /* for curve_editnurbs */
89 #include "ED_clip.h"
90
91 //#include "BDR_unwrapper.h"
92
93 #include "BLI_math.h"
94 #include "BLI_blenlib.h"
95 #include "BLI_editVert.h"
96 #include "BLI_rand.h"
97 #include "BLI_utildefines.h"
98
99 #include "WM_types.h"
100 #include "WM_api.h"
101
102 #include "UI_resources.h"
103
104 //#include "blendef.h"
105 //
106 //#include "mydevice.h"
107
108 #include "transform.h"
109
110 extern ListBase editelems;
111
112 /* ************************** Functions *************************** */
113
114 void getViewVector(TransInfo *t, float coord[3], float vec[3])
115 {
116         if (t->persp != RV3D_ORTHO)
117         {
118                 float p1[4], p2[4];
119                 
120                 copy_v3_v3(p1, coord);
121                 p1[3] = 1.0f;
122                 copy_v3_v3(p2, p1);
123                 p2[3] = 1.0f;
124                 mul_m4_v4(t->viewmat, p2);
125                 
126                 p2[0] = 2.0f * p2[0];
127                 p2[1] = 2.0f * p2[1];
128                 p2[2] = 2.0f * p2[2];
129                 
130                 mul_m4_v4(t->viewinv, p2);
131                 
132                 sub_v3_v3v3(vec, p1, p2);
133         }
134         else {
135                 copy_v3_v3(vec, t->viewinv[2]);
136         }
137         normalize_v3(vec);
138 }
139
140 /* ************************** GENERICS **************************** */
141
142 static void clipMirrorModifier(TransInfo *t, Object *ob)
143 {
144         ModifierData *md= ob->modifiers.first;
145         float tolerance[3] = {0.0f, 0.0f, 0.0f};
146         int axis = 0;
147         
148         for (; md; md=md->next) {
149                 if ((md->type==eModifierType_Mirror) && (md->mode & eModifierMode_Realtime)) {
150                         MirrorModifierData *mmd = (MirrorModifierData*) md;
151                         
152                         if(mmd->flag & MOD_MIR_CLIPPING) {
153                                 axis = 0;
154                                 if(mmd->flag & MOD_MIR_AXIS_X) {
155                                         axis |= 1;
156                                         tolerance[0] = mmd->tolerance;
157                                 }
158                                 if(mmd->flag & MOD_MIR_AXIS_Y) {
159                                         axis |= 2;
160                                         tolerance[1] = mmd->tolerance;
161                                 }
162                                 if(mmd->flag & MOD_MIR_AXIS_Z) {
163                                         axis |= 4;
164                                         tolerance[2] = mmd->tolerance;
165                                 }
166                                 if (axis) {
167                                         float mtx[4][4], imtx[4][4];
168                                         int i;
169                                         TransData *td = t->data;
170                                         
171                                         if (mmd->mirror_ob) {
172                                                 float obinv[4][4];
173                                                 
174                                                 invert_m4_m4(obinv, mmd->mirror_ob->obmat);
175                                                 mult_m4_m4m4(mtx, obinv, ob->obmat);
176                                                 invert_m4_m4(imtx, mtx);
177                                         }
178                                         
179                                         for(i = 0 ; i < t->total; i++, td++) {
180                                                 int clip;
181                                                 float loc[3], iloc[3];
182                                                 
183                                                 if (td->flag & TD_NOACTION)
184                                                         break;
185                                                 if (td->loc==NULL)
186                                                         break;
187                                                 
188                                                 if (td->flag & TD_SKIP)
189                                                         continue;
190                                                 
191                                                 copy_v3_v3(loc,  td->loc);
192                                                 copy_v3_v3(iloc, td->iloc);
193                                                 
194                                                 if (mmd->mirror_ob) {
195                                                         mul_m4_v3(mtx, loc);
196                                                         mul_m4_v3(mtx, iloc);
197                                                 }
198                                                 
199                                                 clip = 0;
200                                                 if(axis & 1) {
201                                                         if(fabsf(iloc[0])<=tolerance[0] ||
202                                                            loc[0]*iloc[0]<0.0f)
203                                                         {
204                                                                 loc[0]= 0.0f;
205                                                                 clip = 1;
206                                                         }
207                                                 }
208                                                 
209                                                 if(axis & 2) {
210                                                         if(fabs(iloc[1])<=tolerance[1] ||
211                                                            loc[1]*iloc[1]<0.0f)
212                                                         {
213                                                                 loc[1]= 0.0f;
214                                                                 clip = 1;
215                                                         }
216                                                 }
217                                                 if(axis & 4) {
218                                                         if(fabs(iloc[2])<=tolerance[2] ||
219                                                            loc[2]*iloc[2]<0.0f)
220                                                         {
221                                                                 loc[2]= 0.0f;
222                                                                 clip = 1;
223                                                         }
224                                                 }
225                                                 if (clip) {
226                                                         if (mmd->mirror_ob) {
227                                                                 mul_m4_v3(imtx, loc);
228                                                         }
229                                                         copy_v3_v3(td->loc, loc);
230                                                 }
231                                         }
232                                 }
233                                 
234                         }
235                 }
236         }
237 }
238
239 /* assumes obedit set to mesh object */
240 static void editbmesh_apply_to_mirror(TransInfo *t)
241 {
242         TransData *td = t->data;
243         BMVert *eve;
244         int i;
245         
246         for(i = 0 ; i < t->total; i++, td++) {
247                 if (td->flag & TD_NOACTION)
248                         break;
249                 if (td->loc==NULL)
250                         break;
251                 if (td->flag & TD_SKIP)
252                         continue;
253                 
254                 eve = td->extra;
255                 if (eve) {
256                         eve->co[0]= -td->loc[0];
257                         eve->co[1]= td->loc[1];
258                         eve->co[2]= td->loc[2];
259                 }
260                 
261                 if (td->flag & TD_MIRROR_EDGE)
262                 {
263                         td->loc[0] = 0;
264                 }
265         }
266 }
267
268 /* for the realtime animation recording feature, handle overlapping data */
269 static void animrecord_check_state (Scene *scene, ID *id, wmTimer *animtimer)
270 {
271         ScreenAnimData *sad= (animtimer) ? animtimer->customdata : NULL;
272         
273         /* sanity checks */
274         if ELEM3(NULL, scene, id, sad)
275                 return;
276         
277         /* check if we need a new strip if:
278          *      - if animtimer is running 
279          *      - we're not only keying for available channels
280          *      - the option to add new actions for each round is not enabled
281          */
282         if (IS_AUTOKEY_FLAG(scene, INSERTAVAIL)==0 && (scene->toolsettings->autokey_flag & ANIMRECORD_FLAG_WITHNLA)) {
283                 /* if playback has just looped around, we need to add a new NLA track+strip to allow a clean pass to occur */
284                 if ((sad) && (sad->flag & ANIMPLAY_FLAG_JUMPED)) {
285                         AnimData *adt= BKE_animdata_from_id(id);
286                         
287                         /* perform push-down manually with some differences 
288                          * NOTE: BKE_nla_action_pushdown() sync warning...
289                          */
290                         if ((adt->action) && !(adt->flag & ADT_NLA_EDIT_ON)) {
291                                 float astart, aend;
292                                 
293                                 /* only push down if action is more than 1-2 frames long */
294                                 calc_action_range(adt->action, &astart, &aend, 1);
295                                 if (aend > astart+2.0f) {
296                                         NlaStrip *strip= add_nlastrip_to_stack(adt, adt->action);
297                                         
298                                         /* clear reference to action now that we've pushed it onto the stack */
299                                         adt->action->id.us--;
300                                         adt->action= NULL;
301                                         
302                                         /* adjust blending + extend so that they will behave correctly */
303                                         strip->extendmode= NLASTRIP_EXTEND_NOTHING;
304                                         strip->flag &= ~(NLASTRIP_FLAG_AUTO_BLENDS|NLASTRIP_FLAG_SELECT|NLASTRIP_FLAG_ACTIVE);
305                                         
306                                         /* also, adjust the AnimData's action extend mode to be on 
307                                          * 'nothing' so that previous result still play 
308                                          */
309                                         adt->act_extendmode= NLASTRIP_EXTEND_NOTHING;
310                                 }
311                         }
312                 }
313         }
314 }
315
316 static int fcu_test_selected(FCurve *fcu)
317 {
318         BezTriple *bezt= fcu->bezt;
319         unsigned int i;
320
321         if (bezt==NULL) /* ignore baked */
322                 return 0;
323
324         for (i=0; i < fcu->totvert; i++, bezt++) {
325                 if (BEZSELECTED(bezt)) return 1;
326         }
327
328         return 0;
329 }
330
331 /* helper for recalcData() - for Action Editor transforms */
332 static void recalcData_actedit(TransInfo *t)
333 {
334         Scene *scene= t->scene;
335         SpaceAction *saction= (SpaceAction *)t->sa->spacedata.first;
336         
337         bAnimContext ac= {NULL};
338         ListBase anim_data = {NULL, NULL};
339         bAnimListElem *ale;
340         int filter;
341         
342         /* initialise relevant anim-context 'context' data from TransInfo data */
343                 /* NOTE: sync this with the code in ANIM_animdata_get_context() */
344         ac.scene= t->scene;
345         ac.obact= OBACT;
346         ac.sa= t->sa;
347         ac.ar= t->ar;
348         ac.sl= (t->sa)? t->sa->spacedata.first : NULL;
349         ac.spacetype= (t->sa)? t->sa->spacetype : 0;
350         ac.regiontype= (t->ar)? t->ar->regiontype : 0;
351         
352         ANIM_animdata_context_getdata(&ac);
353         
354         /* perform flush */
355         if (ac.datatype == ANIMCONT_GPENCIL) {
356                 /* flush transform values back to actual coordinates */
357                 flushTransGPactionData(t);
358         }
359         else {
360                 /* get animdata blocks visible in editor, assuming that these will be the ones where things changed */
361                 filter= (ANIMFILTER_DATA_VISIBLE | ANIMFILTER_ANIMDATA);
362                 ANIM_animdata_filter(&ac, &anim_data, filter, ac.data, ac.datatype);
363                 
364                 /* just tag these animdata-blocks to recalc, assuming that some data there changed 
365                  * BUT only do this if realtime updates are enabled
366                  */
367                 if ((saction->flag & SACTION_NOREALTIMEUPDATES) == 0) {
368                         for (ale= anim_data.first; ale; ale= ale->next) {
369                                 /* set refresh tags for objects using this animation */
370                                 ANIM_list_elem_update(t->scene, ale);
371                         }
372                 }
373                 
374                 /* now free temp channels */
375                 BLI_freelistN(&anim_data);
376         }
377 }
378 /* helper for recalcData() - for Graph Editor transforms */
379 static void recalcData_graphedit(TransInfo *t)
380 {
381         SpaceIpo *sipo= (SpaceIpo *)t->sa->spacedata.first;
382         Scene *scene;
383         
384         ListBase anim_data = {NULL, NULL};
385         bAnimContext ac= {NULL};
386         int filter;
387         
388         bAnimListElem *ale;
389         int dosort = 0;
390         
391         
392         /* initialise relevant anim-context 'context' data from TransInfo data */
393                 /* NOTE: sync this with the code in ANIM_animdata_get_context() */
394         scene= ac.scene= t->scene;
395         ac.obact= OBACT;
396         ac.sa= t->sa;
397         ac.ar= t->ar;
398         ac.sl= (t->sa)? t->sa->spacedata.first : NULL;
399         ac.spacetype= (t->sa)? t->sa->spacetype : 0;
400         ac.regiontype= (t->ar)? t->ar->regiontype : 0;
401         
402         ANIM_animdata_context_getdata(&ac);
403         
404         /* do the flush first */
405         flushTransGraphData(t);
406         
407         /* get curves to check if a re-sort is needed */
408         filter= (ANIMFILTER_DATA_VISIBLE | ANIMFILTER_FOREDIT | ANIMFILTER_CURVE_VISIBLE);
409         ANIM_animdata_filter(&ac, &anim_data, filter, ac.data, ac.datatype);
410         
411         /* now test if there is a need to re-sort */
412         for (ale= anim_data.first; ale; ale= ale->next) {
413                 FCurve *fcu= (FCurve *)ale->key_data;
414                 
415                 /* ignore unselected fcurves */
416                 if (!fcu_test_selected(fcu))
417                         continue;
418                 
419                 // fixme: only do this for selected verts...
420                 ANIM_unit_mapping_apply_fcurve(ac.scene, ale->id, ale->key_data, ANIM_UNITCONV_ONLYSEL|ANIM_UNITCONV_SELVERTS|ANIM_UNITCONV_RESTORE);
421                 
422                 
423                 /* watch it: if the time is wrong: do not correct handles yet */
424                 if (test_time_fcurve(fcu))
425                         dosort++;
426                 else
427                         calchandles_fcurve(fcu);
428                 
429                 /* set refresh tags for objects using this animation,
430                  * BUT only if realtime updates are enabled  
431                  */
432                 if ((sipo->flag & SIPO_NOREALTIMEUPDATES) == 0)
433                         ANIM_list_elem_update(t->scene, ale);
434         }
435         
436         /* do resort and other updates? */
437         if (dosort) remake_graph_transdata(t, &anim_data);
438         
439         /* now free temp channels */
440         BLI_freelistN(&anim_data);
441 }
442
443 /* helper for recalcData() - for NLA Editor transforms */
444 static void recalcData_nla(TransInfo *t)
445 {
446         TransDataNla *tdn= (TransDataNla *)t->customData;
447         SpaceNla *snla= (SpaceNla *)t->sa->spacedata.first;
448         Scene *scene= t->scene;
449         double secf= FPS;
450         int i;
451         
452         /* for each strip we've got, perform some additional validation of the values that got set before
453          * using RNA to set the value (which does some special operations when setting these values to make
454          * sure that everything works ok)
455          */
456         for (i = 0; i < t->total; i++, tdn++) {
457                 NlaStrip *strip= tdn->strip;
458                 PointerRNA strip_ptr;
459                 short pExceeded, nExceeded, iter;
460                 int delta_y1, delta_y2;
461                 
462                 /* if this tdn has no handles, that means it is just a dummy that should be skipped */
463                 if (tdn->handle == 0)
464                         continue;
465                 
466                 /* set refresh tags for objects using this animation,
467                  * BUT only if realtime updates are enabled  
468                  */
469                 if ((snla->flag & SNLA_NOREALTIMEUPDATES) == 0)
470                         ANIM_id_update(t->scene, tdn->id);
471                 
472                 /* if cancelling transform, just write the values without validating, then move on */
473                 if (t->state == TRANS_CANCEL) {
474                         /* clear the values by directly overwriting the originals, but also need to restore
475                          * endpoints of neighboring transition-strips
476                          */
477                         
478                         /* start */
479                         strip->start= tdn->h1[0];
480                         
481                         if ((strip->prev) && (strip->prev->type == NLASTRIP_TYPE_TRANSITION))
482                                 strip->prev->end= tdn->h1[0];
483                         
484                         /* end */
485                         strip->end= tdn->h2[0];
486                         
487                         if ((strip->next) && (strip->next->type == NLASTRIP_TYPE_TRANSITION))
488                                 strip->next->start= tdn->h2[0];
489                         
490                         /* flush transforms to child strips (since this should be a meta) */
491                         BKE_nlameta_flush_transforms(strip);
492                         
493                         /* restore to original track (if needed) */
494                         if (tdn->oldTrack != tdn->nlt) {
495                                 /* just append to end of list for now, since strips get sorted in special_aftertrans_update() */
496                                 BLI_remlink(&tdn->nlt->strips, strip);
497                                 BLI_addtail(&tdn->oldTrack->strips, strip);
498                         }
499                         
500                         continue;
501                 }
502                 
503                 /* firstly, check if the proposed transform locations would overlap with any neighbouring strips
504                  * (barring transitions) which are absolute barriers since they are not being moved
505                  *
506                  * this is done as a iterative procedure (done 5 times max for now)
507                  */
508                 for (iter=0; iter < 5; iter++) {
509                         pExceeded= ((strip->prev) && (strip->prev->type != NLASTRIP_TYPE_TRANSITION) && (tdn->h1[0] < strip->prev->end));
510                         nExceeded= ((strip->next) && (strip->next->type != NLASTRIP_TYPE_TRANSITION) && (tdn->h2[0] > strip->next->start));
511                         
512                         if ((pExceeded && nExceeded) || (iter == 4) ) {
513                                 /* both endpoints exceeded (or iteration ping-pong'd meaning that we need a compromise)
514                                  *      - simply crop strip to fit within the bounds of the strips bounding it
515                                  *      - if there were no neighbours, clear the transforms (make it default to the strip's current values)
516                                  */
517                                 if (strip->prev && strip->next) {
518                                         tdn->h1[0]= strip->prev->end;
519                                         tdn->h2[0]= strip->next->start;
520                                 }
521                                 else {
522                                         tdn->h1[0]= strip->start;
523                                         tdn->h2[0]= strip->end;
524                                 }
525                         }
526                         else if (nExceeded) {
527                                 /* move backwards */
528                                 float offset= tdn->h2[0] - strip->next->start;
529                                 
530                                 tdn->h1[0] -= offset;
531                                 tdn->h2[0] -= offset;
532                         }
533                         else if (pExceeded) {
534                                 /* more forwards */
535                                 float offset= strip->prev->end - tdn->h1[0];
536                                 
537                                 tdn->h1[0] += offset;
538                                 tdn->h2[0] += offset;
539                         }
540                         else /* all is fine and well */
541                                 break;
542                 }
543                 
544                 /* handle auto-snapping */
545                 switch (snla->autosnap) {
546                         case SACTSNAP_FRAME: /* snap to nearest frame/time  */
547                                 if (snla->flag & SNLA_DRAWTIME) {
548                                         tdn->h1[0]= (float)( floor((tdn->h1[0]/secf) + 0.5f) * secf );
549                                         tdn->h2[0]= (float)( floor((tdn->h2[0]/secf) + 0.5f) * secf );
550                                 }
551                                 else {
552                                         tdn->h1[0]= (float)( floor(tdn->h1[0]+0.5f) );
553                                         tdn->h2[0]= (float)( floor(tdn->h2[0]+0.5f) );
554                                 }
555                                 break;
556                         
557                         case SACTSNAP_MARKER: /* snap to nearest marker */
558                                 tdn->h1[0]= (float)ED_markers_find_nearest_marker_time(&t->scene->markers, tdn->h1[0]);
559                                 tdn->h2[0]= (float)ED_markers_find_nearest_marker_time(&t->scene->markers, tdn->h2[0]);
560                                 break;
561                 }
562                 
563                 /* use RNA to write the values... */
564                 // TODO: do we need to write in 2 passes to make sure that no truncation goes on?
565                 RNA_pointer_create(NULL, &RNA_NlaStrip, strip, &strip_ptr);
566                 
567                 RNA_float_set(&strip_ptr, "frame_start", tdn->h1[0]);
568                 RNA_float_set(&strip_ptr, "frame_end", tdn->h2[0]);
569                 
570                 /* flush transforms to child strips (since this should be a meta) */
571                 BKE_nlameta_flush_transforms(strip);
572                 
573                 
574                 /* now, check if we need to try and move track
575                  *      - we need to calculate both, as only one may have been altered by transform if only 1 handle moved
576                  */
577                 delta_y1= ((int)tdn->h1[1] / NLACHANNEL_STEP(snla) - tdn->trackIndex);
578                 delta_y2= ((int)tdn->h2[1] / NLACHANNEL_STEP(snla) - tdn->trackIndex);
579                 
580                 if (delta_y1 || delta_y2) {
581                         NlaTrack *track;
582                         int delta = (delta_y2) ? delta_y2 : delta_y1;
583                         int n;
584                         
585                         /* move in the requested direction, checking at each layer if there's space for strip to pass through,
586                          * stopping on the last track available or that we're able to fit in
587                          */
588                         if (delta > 0) {
589                                 for (track=tdn->nlt->next, n=0; (track) && (n < delta); track=track->next, n++) {
590                                         /* check if space in this track for the strip */
591                                         if (BKE_nlatrack_has_space(track, strip->start, strip->end)) {
592                                                 /* move strip to this track */
593                                                 BLI_remlink(&tdn->nlt->strips, strip);
594                                                 BKE_nlatrack_add_strip(track, strip);
595                                                 
596                                                 tdn->nlt= track;
597                                                 tdn->trackIndex++;
598                                         }
599                                         else /* can't move any further */
600                                                 break;
601                                 }
602                         }
603                         else {
604                                 /* make delta 'positive' before using it, since we now know to go backwards */
605                                 delta= -delta;
606                                 
607                                 for (track=tdn->nlt->prev, n=0; (track) && (n < delta); track=track->prev, n++) {
608                                         /* check if space in this track for the strip */
609                                         if (BKE_nlatrack_has_space(track, strip->start, strip->end)) {
610                                                 /* move strip to this track */
611                                                 BLI_remlink(&tdn->nlt->strips, strip);
612                                                 BKE_nlatrack_add_strip(track, strip);
613                                                 
614                                                 tdn->nlt= track;
615                                                 tdn->trackIndex--;
616                                         }
617                                         else /* can't move any further */
618                                                 break;
619                                 }
620                         }
621                 }
622         }
623 }
624
625 /* helper for recalcData() - for Image Editor transforms */
626 static void recalcData_image(TransInfo *t)
627 {
628         if (t->obedit && t->obedit->type == OB_MESH) {
629                 SpaceImage *sima= t->sa->spacedata.first;
630                 
631                 flushTransUVs(t);
632                 if(sima->flag & SI_LIVE_UNWRAP)
633                         ED_uvedit_live_unwrap_re_solve();
634                 
635                 DAG_id_tag_update(t->obedit->data, 0);
636         }
637 }
638
639 /* helper for recalcData() - for Movie Clip transforms */
640 static void recalcData_clip(TransInfo *t)
641 {
642         SpaceClip *sc= t->sa->spacedata.first;
643         MovieClip *clip= ED_space_clip(sc);
644         ListBase *tracksbase= BKE_tracking_get_tracks(&clip->tracking);
645         MovieTrackingTrack *track;
646         
647         if(t->state == TRANS_CANCEL) {
648                 track= tracksbase->first;
649                 while(track) {
650                         if(TRACK_VIEW_SELECTED(sc, track)) {
651                                 MovieTrackingMarker *marker= BKE_tracking_ensure_marker(track, sc->user.framenr);
652                                 
653                                 marker->flag= track->transflag;
654                         }
655                         
656                         track= track->next;
657                 }
658         }
659         
660         flushTransTracking(t);
661         
662         track= tracksbase->first;
663         while(track) {
664                 if(TRACK_VIEW_SELECTED(sc, track)) {
665                         if (t->mode == TFM_TRANSLATION) {
666                                 if(TRACK_AREA_SELECTED(track, TRACK_AREA_PAT))
667                                         BKE_tracking_clamp_track(track, CLAMP_PAT_POS);
668                                 if(TRACK_AREA_SELECTED(track, TRACK_AREA_SEARCH))
669                                         BKE_tracking_clamp_track(track, CLAMP_SEARCH_POS);
670                         }
671                         else if (t->mode == TFM_RESIZE) {
672                                 if(TRACK_AREA_SELECTED(track, TRACK_AREA_PAT))
673                                         BKE_tracking_clamp_track(track, CLAMP_PAT_DIM);
674                                 if(TRACK_AREA_SELECTED(track, TRACK_AREA_SEARCH))
675                                         BKE_tracking_clamp_track(track, CLAMP_SEARCH_DIM);
676                         }
677                 }
678                 
679                 track= track->next;
680         }
681         
682         DAG_id_tag_update(&clip->id, 0);
683 }
684
685 /* helper for recalcData() - for 3d-view transforms */
686 static void recalcData_view3d(TransInfo *t)
687 {
688         Base *base = t->scene->basact;
689         
690         if (t->obedit) {
691                 if ELEM(t->obedit->type, OB_CURVE, OB_SURF) {
692                         Curve *cu= t->obedit->data;
693                         ListBase *nurbs= curve_editnurbs(cu);
694                         Nurb *nu= nurbs->first;
695                         
696                         if(t->state != TRANS_CANCEL) {
697                                 clipMirrorModifier(t, t->obedit);
698                                 applyProject(t);
699                         }
700                         
701                         DAG_id_tag_update(t->obedit->data, 0);  /* sets recalc flags */
702                                 
703                         if (t->state == TRANS_CANCEL) {
704                                 while(nu) {
705                                         calchandlesNurb(nu); /* Cant do testhandlesNurb here, it messes up the h1 and h2 flags */
706                                         nu= nu->next;
707                                 }
708                         } 
709                         else {
710                                 /* Normal updating */
711                                 while(nu) {
712                                         test2DNurb(nu);
713                                         calchandlesNurb(nu);
714                                         nu= nu->next;
715                                 }
716                         }
717                 }
718                 else if(t->obedit->type==OB_LATTICE) {
719                         Lattice *la= t->obedit->data;
720                         
721                         if(t->state != TRANS_CANCEL) {
722                                 applyProject(t);
723                         }
724                         
725                         DAG_id_tag_update(t->obedit->data, 0);  /* sets recalc flags */
726                         
727                         if(la->editlatt->latt->flag & LT_OUTSIDE) outside_lattice(la->editlatt->latt);
728                 }
729                 else if (t->obedit->type == OB_MESH) {
730                         BMEditMesh *em = ((Mesh*)t->obedit->data)->edit_btmesh;
731                         /* mirror modifier clipping? */
732                         if(t->state != TRANS_CANCEL) {
733                                 /* apply clipping after so we never project past the clip plane [#25423] */
734                                 applyProject(t);
735                                 clipMirrorModifier(t, t->obedit);
736                         }
737                         if((t->options & CTX_NO_MIRROR) == 0 && (t->flag & T_MIRROR))
738                                 editbmesh_apply_to_mirror(t);
739                                 
740                         DAG_id_tag_update(t->obedit->data, 0);  /* sets recalc flags */
741                         
742                         EDBM_RecalcNormals(em);
743                         BMEdit_RecalcTesselation(em);
744                 }
745                 else if(t->obedit->type==OB_ARMATURE) { /* no recalc flag, does pose */
746                         bArmature *arm= t->obedit->data;
747                         ListBase *edbo = arm->edbo;
748                         EditBone *ebo;
749                         TransData *td = t->data;
750                         int i;
751                         
752                         if(t->state != TRANS_CANCEL) {
753                                 applyProject(t);
754                         }
755                         
756                         /* Ensure all bones are correctly adjusted */
757                         for (ebo = edbo->first; ebo; ebo = ebo->next){
758                                 
759                                 if ((ebo->flag & BONE_CONNECTED) && ebo->parent){
760                                         /* If this bone has a parent tip that has been moved */
761                                         if (ebo->parent->flag & BONE_TIPSEL){
762                                                 copy_v3_v3 (ebo->head, ebo->parent->tail);
763                                                 if(t->mode==TFM_BONE_ENVELOPE) ebo->rad_head= ebo->parent->rad_tail;
764                                         }
765                                         /* If this bone has a parent tip that has NOT been moved */
766                                         else{
767                                                 copy_v3_v3 (ebo->parent->tail, ebo->head);
768                                                 if(t->mode==TFM_BONE_ENVELOPE) ebo->parent->rad_tail= ebo->rad_head;
769                                         }
770                                 }
771                                 
772                                 /* on extrude bones, oldlength==0.0f, so we scale radius of points */
773                                 ebo->length= len_v3v3(ebo->head, ebo->tail);
774                                 if(ebo->oldlength==0.0f) {
775                                         ebo->rad_head= 0.25f*ebo->length;
776                                         ebo->rad_tail= 0.10f*ebo->length;
777                                         ebo->dist= 0.25f*ebo->length;
778                                         if(ebo->parent) {
779                                                 if(ebo->rad_head > ebo->parent->rad_tail)
780                                                         ebo->rad_head= ebo->parent->rad_tail;
781                                         }
782                                 }
783                                 else if(t->mode!=TFM_BONE_ENVELOPE) {
784                                         /* if bones change length, lets do that for the deform distance as well */
785                                         ebo->dist*= ebo->length/ebo->oldlength;
786                                         ebo->rad_head*= ebo->length/ebo->oldlength;
787                                         ebo->rad_tail*= ebo->length/ebo->oldlength;
788                                         ebo->oldlength= ebo->length;
789                                 }
790                         }
791                         
792                         
793                         if (t->mode != TFM_BONE_ROLL)
794                         {
795                                 /* fix roll */
796                                 for(i = 0; i < t->total; i++, td++)
797                                 {
798                                         if (td->extra)
799                                         {
800                                                 float vec[3], up_axis[3];
801                                                 float qrot[4];
802                                                 
803                                                 ebo = td->extra;
804                                                 copy_v3_v3(up_axis, td->axismtx[2]);
805                                                 
806                                                 if (t->mode != TFM_ROTATION)
807                                                 {
808                                                         sub_v3_v3v3(vec, ebo->tail, ebo->head);
809                                                         normalize_v3(vec);
810                                                         rotation_between_vecs_to_quat(qrot, td->axismtx[1], vec);
811                                                         mul_qt_v3(qrot, up_axis);
812                                                 }
813                                                 else
814                                                 {
815                                                         mul_m3_v3(t->mat, up_axis);
816                                                 }
817                                                 
818                                                 ebo->roll = ED_rollBoneToVector(ebo, up_axis, FALSE);
819                                         }
820                                 }
821                         }
822                         
823                         if(arm->flag & ARM_MIRROR_EDIT)
824                                 transform_armature_mirror_update(t->obedit);
825                         
826                 }
827                 else
828                 {
829                         if(t->state != TRANS_CANCEL) {
830                                 applyProject(t);
831                         }
832                         DAG_id_tag_update(t->obedit->data, 0);  /* sets recalc flags */
833                 }
834         }
835         else if( (t->flag & T_POSE) && t->poseobj) {
836                 Object *ob= t->poseobj;
837                 bArmature *arm= ob->data;
838                 
839                 /* if animtimer is running, and the object already has animation data,
840                  * check if the auto-record feature means that we should record 'samples'
841                  * (i.e. uneditable animation values)
842                  *
843                  * context is needed for keying set poll() functions.
844                  */
845                 // TODO: autokeyframe calls need some setting to specify to add samples (FPoints) instead of keyframes?
846                 if ((t->animtimer) && (t->context) && IS_AUTOKEY_ON(t->scene)) {
847                         int targetless_ik= (t->flag & T_AUTOIK); // XXX this currently doesn't work, since flags aren't set yet!
848                         
849                         animrecord_check_state(t->scene, &ob->id, t->animtimer);
850                         autokeyframe_pose_cb_func(t->context, t->scene, (View3D *)t->view, ob, t->mode, targetless_ik);
851                 }
852                 
853                 /* old optimize trick... this enforces to bypass the depgraph */
854                 if (!(arm->flag & ARM_DELAYDEFORM)) {
855                         DAG_id_tag_update(&ob->id, OB_RECALC_DATA);  /* sets recalc flags */
856                 }
857                 else
858                         where_is_pose(t->scene, ob);
859         }
860         else if(base && (base->object->mode & OB_MODE_PARTICLE_EDIT) && PE_get_current(t->scene, base->object)) {
861                 if(t->state != TRANS_CANCEL) {
862                         applyProject(t);
863                 }
864                 flushTransParticles(t);
865         }
866         else {
867                 int i;
868                 
869                 if(t->state != TRANS_CANCEL) {
870                         applyProject(t);
871                 }
872                 
873                 for (i = 0; i < t->total; i++) {
874                         TransData *td = t->data + i;
875                         Object *ob = td->ob;
876                         
877                         if (td->flag & TD_NOACTION)
878                                 break;
879                         
880                         if (td->flag & TD_SKIP)
881                                 continue;
882                         
883                         /* if animtimer is running, and the object already has animation data,
884                          * check if the auto-record feature means that we should record 'samples'
885                          * (i.e. uneditable animation values)
886                          */
887                         // TODO: autokeyframe calls need some setting to specify to add samples (FPoints) instead of keyframes?
888                         if ((t->animtimer) && IS_AUTOKEY_ON(t->scene)) {
889                                 animrecord_check_state(t->scene, &ob->id, t->animtimer);
890                                 autokeyframe_ob_cb_func(t->context, t->scene, (View3D *)t->view, ob, t->mode);
891                         }
892                         
893                         /* sets recalc flags fully, instead of flushing existing ones 
894                          * otherwise proxies don't function correctly
895                          */
896                         DAG_id_tag_update(&ob->id, OB_RECALC_OB);
897                 }
898         }
899 }
900
901 /* called for updating while transform acts, once per redraw */
902 void recalcData(TransInfo *t)
903 {
904         if (t->spacetype==SPACE_NODE) {
905                 flushTransNodes(t);
906         }
907         else if (t->spacetype==SPACE_SEQ) {
908                 flushTransSeq(t);
909         }
910         else if (t->spacetype == SPACE_ACTION) {
911                 recalcData_actedit(t);
912         }
913         else if (t->spacetype == SPACE_IPO) {
914                 recalcData_graphedit(t);
915         }
916         else if (t->spacetype == SPACE_NLA) {
917                 recalcData_nla(t);
918         }
919         else if (t->spacetype == SPACE_IMAGE) {
920                 recalcData_image(t);
921         }
922         else if (t->spacetype == SPACE_VIEW3D) {
923                 recalcData_view3d(t);
924         }
925         else if (t->spacetype == SPACE_CLIP) {
926                 recalcData_clip(t);
927         }
928 }
929
930 void drawLine(TransInfo *t, float *center, float *dir, char axis, short options)
931 {
932         float v1[3], v2[3], v3[3];
933         unsigned char col[3], col2[3];
934
935         if (t->spacetype == SPACE_VIEW3D)
936         {
937                 View3D *v3d = t->view;
938                 
939                 glPushMatrix();
940                 
941                 //if(t->obedit) glLoadMatrixf(t->obedit->obmat);        // sets opengl viewing
942                 
943                 
944                 copy_v3_v3(v3, dir);
945                 mul_v3_fl(v3, v3d->far);
946                 
947                 sub_v3_v3v3(v2, center, v3);
948                 add_v3_v3v3(v1, center, v3);
949                 
950                 if (options & DRAWLIGHT) {
951                         col[0] = col[1] = col[2] = 220;
952                 }
953                 else {
954                         UI_GetThemeColor3ubv(TH_GRID, col);
955                 }
956                 UI_make_axis_color(col, col2, axis);
957                 glColor3ubv(col2);
958                 
959                 setlinestyle(0);
960                 glBegin(GL_LINE_STRIP);
961                         glVertex3fv(v1);
962                         glVertex3fv(v2);
963                 glEnd();
964                 
965                 glPopMatrix();
966         }
967 }
968
969 void resetTransRestrictions(TransInfo *t)
970 {
971         t->flag &= ~T_ALL_RESTRICTIONS;
972 }
973
974 /* the *op can be NULL */
975 int initTransInfo (bContext *C, TransInfo *t, wmOperator *op, wmEvent *event)
976 {
977         Scene *sce = CTX_data_scene(C);
978         ToolSettings *ts = CTX_data_tool_settings(C);
979         ARegion *ar = CTX_wm_region(C);
980         ScrArea *sa = CTX_wm_area(C);
981         Object *obedit = CTX_data_edit_object(C);
982         
983         /* moving: is shown in drawobject() (transform color) */
984 //  TRANSFORM_FIX_ME
985 //      if(obedit || (t->flag & T_POSE) ) G.moving= G_TRANSFORM_EDIT;
986 //      else if(G.f & G_PARTICLEEDIT) G.moving= G_TRANSFORM_PARTICLE;
987 //      else G.moving= G_TRANSFORM_OBJ;
988         
989         t->scene = sce;
990         t->sa = sa;
991         t->ar = ar;
992         t->obedit = obedit;
993         t->settings = ts;
994         
995         t->data = NULL;
996         t->ext = NULL;
997         
998         t->helpline = HLP_NONE;
999         
1000         t->flag = 0;
1001         
1002         t->redraw = 1; /* redraw first time */
1003         
1004         if (event)
1005         {
1006                 copy_v2_v2_int(t->imval, event->mval);
1007                 t->event_type = event->type;
1008         }
1009         else
1010         {
1011                 t->imval[0] = 0;
1012                 t->imval[1] = 0;
1013         }
1014         
1015         t->con.imval[0] = t->imval[0];
1016         t->con.imval[1] = t->imval[1];
1017         
1018         t->mval[0] = t->imval[0];
1019         t->mval[1] = t->imval[1];
1020         
1021         t->transform            = NULL;
1022         t->handleEvent          = NULL;
1023         
1024         t->total                        = 0;
1025         
1026         t->val = 0.0f;
1027         
1028         t->vec[0]                       =
1029                 t->vec[1]               =
1030                 t->vec[2]               = 0.0f;
1031         
1032         t->center[0]            =
1033                 t->center[1]    =
1034                 t->center[2]    = 0.0f;
1035         
1036         unit_m3(t->mat);
1037         
1038         /* if there's an event, we're modal */
1039         if (event) {
1040                 t->flag |= T_MODAL;
1041         }
1042
1043         /* Crease needs edge flag */
1044         if (t->mode == TFM_CREASE) {
1045                 t->options |= CTX_EDGE;
1046         }
1047
1048
1049         /* Assign the space type, some exceptions for running in different mode */
1050         if(sa == NULL) {
1051                 /* background mode */
1052                 t->spacetype= SPACE_EMPTY;
1053         }
1054         else if ((ar == NULL) && (sa->spacetype == SPACE_VIEW3D)) {
1055                 /* running in the text editor */
1056                 t->spacetype= SPACE_EMPTY;
1057         }
1058         else {
1059                 /* normal operation */
1060                 t->spacetype= sa->spacetype;
1061         }
1062
1063
1064         if(t->spacetype == SPACE_VIEW3D)
1065         {
1066                 View3D *v3d = sa->spacedata.first;
1067                 
1068                 t->view = v3d;
1069                 t->animtimer= CTX_wm_screen(C)->animtimer;
1070                 
1071                 /* turn manipulator off during transform */
1072                 // FIXME: but don't do this when USING the manipulator...
1073                 if (t->flag & T_MODAL) {
1074                         t->twtype = v3d->twtype;
1075                         v3d->twtype = 0;
1076                 }
1077
1078                 if(v3d->flag & V3D_ALIGN) t->flag |= T_V3D_ALIGN;
1079                 t->around = v3d->around;
1080                 
1081                 if (op && RNA_struct_find_property(op->ptr, "constraint_orientation") && RNA_struct_property_is_set(op->ptr, "constraint_orientation"))
1082                 {
1083                         t->current_orientation = RNA_enum_get(op->ptr, "constraint_orientation");
1084                         
1085                         if (t->current_orientation >= V3D_MANIP_CUSTOM + BIF_countTransformOrientation(C))
1086                         {
1087                                 t->current_orientation = V3D_MANIP_GLOBAL;
1088                         }
1089                 }
1090                 else
1091                 {
1092                         t->current_orientation = v3d->twmode;
1093                 }
1094
1095                 /* exceptional case */
1096                 if(t->around==V3D_LOCAL && (t->settings->selectmode & SCE_SELECT_FACE)) {
1097                         if(ELEM3(t->mode, TFM_ROTATION, TFM_RESIZE, TFM_TRACKBALL)) {
1098                                 t->options |= CTX_NO_PET;
1099                         }
1100                 }
1101
1102                 /* initialize UV transform from */
1103                 if (op && RNA_struct_find_property(op->ptr, "correct_uv")) {
1104                         if(RNA_struct_property_is_set(op->ptr, "correct_uv")) {
1105                                 if(RNA_boolean_get(op->ptr, "correct_uv")) {
1106                                         t->settings->uvcalc_flag |= UVCALC_TRANSFORM_CORRECT;
1107                                 }
1108                                 else {
1109                                         t->settings->uvcalc_flag &= ~UVCALC_TRANSFORM_CORRECT;
1110                                 }
1111                         }
1112                         else {
1113                                 RNA_boolean_set(op->ptr, "correct_uv", t->settings->uvcalc_flag & UVCALC_TRANSFORM_CORRECT);
1114                         }
1115                 }
1116
1117         }
1118         else if(t->spacetype==SPACE_IMAGE)
1119         {
1120                 SpaceImage *sima = sa->spacedata.first;
1121                 // XXX for now, get View2D from the active region
1122                 t->view = &ar->v2d;
1123                 t->around = sima->around;
1124         }
1125         else if(t->spacetype==SPACE_NODE)
1126         {
1127                 // XXX for now, get View2D from the active region
1128                 t->view = &ar->v2d;
1129                 t->around = V3D_CENTER;
1130         }
1131         else if(t->spacetype==SPACE_IPO) 
1132         {
1133                 SpaceIpo *sipo= sa->spacedata.first;
1134                 t->view = &ar->v2d;
1135                 t->around = sipo->around;
1136         }
1137         else
1138         {
1139                 if(ar) {
1140                         // XXX for now, get View2D  from the active region
1141                         t->view = &ar->v2d;
1142                         // XXX for now, the center point is the midpoint of the data
1143                 }
1144                 else {
1145                         t->view= NULL;
1146                 }
1147                 t->around = V3D_CENTER;
1148         }
1149         
1150         if (op && RNA_struct_property_is_set(op->ptr, "release_confirm"))
1151         {
1152                 if (RNA_boolean_get(op->ptr, "release_confirm"))
1153                 {
1154                         t->flag |= T_RELEASE_CONFIRM;
1155                 }
1156         }
1157         else
1158         {
1159                 if (U.flag & USER_RELEASECONFIRM)
1160                 {
1161                         t->flag |= T_RELEASE_CONFIRM;
1162                 }
1163         }
1164
1165         if (op && RNA_struct_find_property(op->ptr, "mirror") && RNA_struct_property_is_set(op->ptr, "mirror"))
1166         {
1167                 if (RNA_boolean_get(op->ptr, "mirror"))
1168                 {
1169                         t->flag |= T_MIRROR;
1170                         t->mirror = 1;
1171                 }
1172         }
1173         // Need stuff to take it from edit mesh or whatnot here
1174         else if (t->spacetype == SPACE_VIEW3D)
1175         {
1176                 if (t->obedit && t->obedit->type == OB_MESH && (((Mesh *)t->obedit->data)->editflag & ME_EDIT_MIRROR_X))
1177                 {
1178                         t->flag |= T_MIRROR;
1179                         t->mirror = 1;
1180                 }
1181         }
1182         
1183         /* setting PET flag only if property exist in operator. Otherwise, assume it's not supported */
1184         if (op && RNA_struct_find_property(op->ptr, "proportional"))
1185         {
1186                 if (RNA_struct_property_is_set(op->ptr, "proportional"))
1187                 {
1188                         switch(RNA_enum_get(op->ptr, "proportional"))
1189                         {
1190                         case PROP_EDIT_CONNECTED:
1191                                 t->flag |= T_PROP_CONNECTED;
1192                         case PROP_EDIT_ON:
1193                                 t->flag |= T_PROP_EDIT;
1194                                 break;
1195                         }
1196                 }
1197                 else
1198                 {
1199                         /* use settings from scene only if modal */
1200                         if (t->flag & T_MODAL)
1201                         {
1202                                 if ((t->options & CTX_NO_PET) == 0)
1203                                 {
1204                                         if (t->obedit && ts->proportional != PROP_EDIT_OFF)
1205                                         {
1206                                                 t->flag |= T_PROP_EDIT;
1207
1208                                                 if(ts->proportional == PROP_EDIT_CONNECTED)
1209                                                         t->flag |= T_PROP_CONNECTED;
1210                                         }
1211                                         else if (t->obedit == NULL && ts->proportional_objects)
1212                                         {
1213                                                 t->flag |= T_PROP_EDIT;
1214                                         }
1215                                 }
1216                         }
1217                 }
1218                 
1219                 if (op && RNA_struct_find_property(op->ptr, "proportional_size") && RNA_struct_property_is_set(op->ptr, "proportional_size"))
1220                 {
1221                         t->prop_size = RNA_float_get(op->ptr, "proportional_size");
1222                 }
1223                 else
1224                 {
1225                         t->prop_size = ts->proportional_size;
1226                 }
1227                 
1228                 
1229                 /* TRANSFORM_FIX_ME rna restrictions */
1230                 if (t->prop_size <= 0.00001f)
1231                 {
1232                         printf("Proportional size (%f) under 0.00001, reseting to 1!\n", t->prop_size);
1233                         t->prop_size = 1.0f;
1234                 }
1235                 
1236                 if (op && RNA_struct_find_property(op->ptr, "proportional_edit_falloff") && RNA_struct_property_is_set(op->ptr, "proportional_edit_falloff"))
1237                 {
1238                         t->prop_mode = RNA_enum_get(op->ptr, "proportional_edit_falloff");
1239                 }
1240                 else
1241                 {
1242                         t->prop_mode = ts->prop_mode;
1243                 }
1244         }
1245         else /* add not pet option to context when not available */
1246         {
1247                 t->options |= CTX_NO_PET;
1248         }
1249         
1250         // Mirror is not supported with PET, turn it off.
1251         if (t->flag & T_PROP_EDIT)
1252         {
1253                 t->flag &= ~T_MIRROR;
1254         }
1255
1256         setTransformViewMatrices(t);
1257         initNumInput(&t->num);
1258         
1259         return 1;
1260 }
1261
1262 /* Here I would suggest only TransInfo related issues, like free data & reset vars. Not redraws */
1263 void postTrans (bContext *C, TransInfo *t)
1264 {
1265         TransData *td;
1266         
1267         if (t->draw_handle_view)
1268                 ED_region_draw_cb_exit(t->ar->type, t->draw_handle_view);
1269         if (t->draw_handle_apply)
1270                 ED_region_draw_cb_exit(t->ar->type, t->draw_handle_apply);
1271         if (t->draw_handle_pixel)
1272                 ED_region_draw_cb_exit(t->ar->type, t->draw_handle_pixel);
1273         if (t->draw_handle_cursor)
1274                 WM_paint_cursor_end(CTX_wm_manager(C), t->draw_handle_cursor);
1275
1276         if (t->customFree) {
1277                 /* Can take over freeing t->data and data2d etc... */
1278                 t->customFree(t);
1279         }
1280         else if (t->customData) {
1281                 MEM_freeN(t->customData);
1282         }
1283
1284         /* postTrans can be called when nothing is selected, so data is NULL already */
1285         if (t->data) {
1286                 int a;
1287                 
1288                 /* free data malloced per trans-data */
1289                 for(a=0, td= t->data; a<t->total; a++, td++) {
1290                         if (td->flag & TD_BEZTRIPLE) 
1291                                 MEM_freeN(td->hdata);
1292                 }
1293                 MEM_freeN(t->data);
1294         }
1295         
1296         BLI_freelistN(&t->tsnap.points);
1297
1298         if (t->ext) MEM_freeN(t->ext);
1299         if (t->data2d) {
1300                 MEM_freeN(t->data2d);
1301                 t->data2d= NULL;
1302         }
1303         
1304         if(t->spacetype==SPACE_IMAGE) {
1305                 SpaceImage *sima= t->sa->spacedata.first;
1306                 if(sima->flag & SI_LIVE_UNWRAP)
1307                         ED_uvedit_live_unwrap_end(t->state == TRANS_CANCEL);
1308         }
1309         else if(t->spacetype==SPACE_VIEW3D) {
1310                 View3D *v3d = t->sa->spacedata.first;
1311                 /* restore manipulator */
1312                 if (t->flag & T_MODAL) {
1313                         v3d->twtype = t->twtype;
1314                 }
1315         }
1316         
1317         if (t->mouse.data)
1318         {
1319                 MEM_freeN(t->mouse.data);
1320         }
1321 }
1322
1323 void applyTransObjects(TransInfo *t)
1324 {
1325         TransData *td;
1326         
1327         for (td = t->data; td < t->data + t->total; td++) {
1328                 copy_v3_v3(td->iloc, td->loc);
1329                 if (td->ext->rot) {
1330                         copy_v3_v3(td->ext->irot, td->ext->rot);
1331                 }
1332                 if (td->ext->size) {
1333                         copy_v3_v3(td->ext->isize, td->ext->size);
1334                 }
1335         }
1336         recalcData(t);
1337 }
1338
1339 static void restoreElement(TransData *td)
1340 {
1341         /* TransData for crease has no loc */
1342         if (td->loc) {
1343                 copy_v3_v3(td->loc, td->iloc);
1344         }
1345         if (td->val) {
1346                 *td->val = td->ival;
1347         }
1348
1349         if (td->ext && (td->flag&TD_NO_EXT)==0) {
1350                 if (td->ext->rot) {
1351                         copy_v3_v3(td->ext->rot, td->ext->irot);
1352                 }
1353                 if(td->ext->rotAngle) {
1354                         *td->ext->rotAngle= td->ext->irotAngle;
1355                 }
1356                 if(td->ext->rotAxis) {
1357                         copy_v3_v3(td->ext->rotAxis, td->ext->irotAxis);
1358                 }
1359                 /* XXX, drotAngle & drotAxis not used yet */
1360                 if (td->ext->size) {
1361                         copy_v3_v3(td->ext->size, td->ext->isize);
1362                 }
1363                 if (td->ext->quat) {
1364                         copy_qt_qt(td->ext->quat, td->ext->iquat);
1365                 }
1366         }
1367         
1368         if (td->flag & TD_BEZTRIPLE) {
1369                 *(td->hdata->h1) = td->hdata->ih1;
1370                 *(td->hdata->h2) = td->hdata->ih2;
1371         }
1372 }
1373
1374 void restoreTransObjects(TransInfo *t)
1375 {
1376         TransData *td;
1377         TransData2D *td2d;
1378
1379         for (td = t->data; td < t->data + t->total; td++) {
1380                 restoreElement(td);
1381         }
1382         
1383         for (td2d=t->data2d; t->data2d && td2d < t->data2d + t->total; td2d++) {
1384                 if (td2d->h1) {
1385                         td2d->h1[0] = td2d->ih1[0];
1386                         td2d->h1[1] = td2d->ih1[1];
1387                 }
1388                 if (td2d->h2) {
1389                         td2d->h2[0] = td2d->ih2[0];
1390                         td2d->h2[1] = td2d->ih2[1];
1391                 }
1392         }
1393
1394         unit_m3(t->mat);
1395         
1396         recalcData(t);
1397 }
1398
1399 void calculateCenter2D(TransInfo *t)
1400 {
1401         if (t->flag & (T_EDIT|T_POSE)) {
1402                 Object *ob= t->obedit?t->obedit:t->poseobj;
1403                 float vec[3];
1404                 
1405                 copy_v3_v3(vec, t->center);
1406                 mul_m4_v3(ob->obmat, vec);
1407                 projectIntView(t, vec, t->center2d);
1408         }
1409         else {
1410                 projectIntView(t, t->center, t->center2d);
1411         }
1412 }
1413
1414 void calculateCenterCursor(TransInfo *t)
1415 {
1416         float *cursor;
1417         
1418         cursor = give_cursor(t->scene, t->view);
1419         copy_v3_v3(t->center, cursor);
1420         
1421         /* If edit or pose mode, move cursor in local space */
1422         if (t->flag & (T_EDIT|T_POSE)) {
1423                 Object *ob = t->obedit?t->obedit:t->poseobj;
1424                 float mat[3][3], imat[3][3];
1425                 
1426                 sub_v3_v3v3(t->center, t->center, ob->obmat[3]);
1427                 copy_m3_m4(mat, ob->obmat);
1428                 invert_m3_m3(imat, mat);
1429                 mul_m3_v3(imat, t->center);
1430         }
1431         
1432         calculateCenter2D(t);
1433 }
1434
1435 void calculateCenterCursor2D(TransInfo *t)
1436 {
1437         float aspx=1.0, aspy=1.0;
1438         float *cursor= NULL;
1439         
1440         if(t->spacetype==SPACE_IMAGE) {
1441                 SpaceImage *sima= (SpaceImage *)t->sa->spacedata.first;
1442                 /* only space supported right now but may change */
1443                 ED_space_image_uv_aspect(sima, &aspx, &aspy);
1444                 cursor = sima->cursor;
1445         }
1446         
1447         if (cursor) {
1448                 t->center[0] = cursor[0] * aspx;
1449                 t->center[1] = cursor[1] * aspy;
1450         }
1451         
1452         calculateCenter2D(t);
1453 }
1454
1455 static void calculateCenterCursorGraph2D(TransInfo *t)
1456 {
1457         SpaceIpo *sipo= (SpaceIpo *)t->sa->spacedata.first;
1458         Scene *scene= t->scene;
1459         
1460         /* cursor is combination of current frame, and graph-editor cursor value */
1461         t->center[0]= (float)(scene->r.cfra);
1462         t->center[1]= sipo->cursorVal;
1463         
1464         calculateCenter2D(t);
1465 }
1466
1467 void calculateCenterMedian(TransInfo *t)
1468 {
1469         float partial[3] = {0.0f, 0.0f, 0.0f};
1470         int total = 0;
1471         int i;
1472         
1473         for(i = 0; i < t->total; i++) {
1474                 if (t->data[i].flag & TD_SELECTED) {
1475                         if (!(t->data[i].flag & TD_NOCENTER))
1476                         {
1477                                 add_v3_v3(partial, t->data[i].center);
1478                                 total++;
1479                         }
1480                 }
1481                 else {
1482                         /*
1483                            All the selected elements are at the head of the array
1484                            which means we can stop when it finds unselected data
1485                         */
1486                         break;
1487                 }
1488         }
1489         if(i)
1490                 mul_v3_fl(partial, 1.0f / total);
1491         copy_v3_v3(t->center, partial);
1492         
1493         calculateCenter2D(t);
1494 }
1495
1496 void calculateCenterBound(TransInfo *t)
1497 {
1498         float max[3];
1499         float min[3];
1500         int i;
1501         for(i = 0; i < t->total; i++) {
1502                 if (i) {
1503                         if (t->data[i].flag & TD_SELECTED) {
1504                                 if (!(t->data[i].flag & TD_NOCENTER))
1505                                         minmax_v3v3_v3(min, max, t->data[i].center);
1506                         }
1507                         else {
1508                                 /*
1509                                    All the selected elements are at the head of the array
1510                                    which means we can stop when it finds unselected data
1511                                 */
1512                                 break;
1513                         }
1514                 }
1515                 else {
1516                         copy_v3_v3(max, t->data[i].center);
1517                         copy_v3_v3(min, t->data[i].center);
1518                 }
1519         }
1520         add_v3_v3v3(t->center, min, max);
1521         mul_v3_fl(t->center, 0.5);
1522         
1523         calculateCenter2D(t);
1524 }
1525
1526 void calculateCenter(TransInfo *t)
1527 {
1528         switch(t->around) {
1529         case V3D_CENTER:
1530                 calculateCenterBound(t);
1531                 break;
1532         case V3D_CENTROID:
1533                 calculateCenterMedian(t);
1534                 break;
1535         case V3D_CURSOR:
1536                 if(t->spacetype==SPACE_IMAGE)
1537                         calculateCenterCursor2D(t);
1538                 else if(t->spacetype==SPACE_IPO)
1539                         calculateCenterCursorGraph2D(t);
1540                 else
1541                         calculateCenterCursor(t);
1542                 break;
1543         case V3D_LOCAL:
1544                 /* Individual element center uses median center for helpline and such */
1545                 calculateCenterMedian(t);
1546                 break;
1547         case V3D_ACTIVE:
1548                 {
1549                 /* set median, and if if if... do object center */
1550                 
1551                 /* EDIT MODE ACTIVE EDITMODE ELEMENT */
1552
1553                 if (t->obedit) {
1554                         if (t->obedit && t->obedit->type == OB_MESH) {
1555                                 BMEditSelection ese;
1556                                 BMEditMesh *em = ((Mesh*)t->obedit->data)->edit_btmesh;
1557
1558                                 if (EDBM_get_actSelection(em, &ese)) {
1559                                         EDBM_editselection_center(em, t->center, &ese);
1560                                         calculateCenter2D(t);
1561                                         break;
1562                                 }
1563                         }
1564                         else if (ELEM(t->obedit->type, OB_CURVE, OB_SURF)) {
1565                                 float center[3];
1566                                 Curve *cu= (Curve *)t->obedit->data;
1567
1568                                 if (ED_curve_actSelection(cu, center)) {
1569                                         copy_v3_v3(t->center, center);
1570                                         calculateCenter2D(t);
1571                                         break;
1572                                 }
1573                         }
1574                 } /* END EDIT MODE ACTIVE ELEMENT */
1575
1576                 calculateCenterMedian(t);
1577                 if((t->flag & (T_EDIT|T_POSE))==0)
1578                 {
1579                         Scene *scene = t->scene;
1580                         Object *ob= OBACT;
1581                         if(ob)
1582                         {
1583                                 copy_v3_v3(t->center, ob->obmat[3]);
1584                                 projectIntView(t, t->center, t->center2d);
1585                         }
1586                 }
1587                 
1588                 }
1589         }
1590         
1591         /* setting constraint center */
1592         copy_v3_v3(t->con.center, t->center);
1593         if(t->flag & (T_EDIT|T_POSE))
1594         {
1595                 Object *ob= t->obedit?t->obedit:t->poseobj;
1596                 mul_m4_v3(ob->obmat, t->con.center);
1597         }
1598         
1599         /* for panning from cameraview */
1600         if(t->flag & T_OBJECT)
1601         {
1602                 if(t->spacetype==SPACE_VIEW3D && t->ar && t->ar->regiontype == RGN_TYPE_WINDOW)
1603                 {
1604                         View3D *v3d = t->view;
1605                         Scene *scene = t->scene;
1606                         RegionView3D *rv3d = t->ar->regiondata;
1607                         
1608                         if(v3d->camera == OBACT && rv3d->persp==RV3D_CAMOB)
1609                         {
1610                                 float axis[3];
1611                                 /* persinv is nasty, use viewinv instead, always right */
1612                                 copy_v3_v3(axis, t->viewinv[2]);
1613                                 normalize_v3(axis);
1614                                 
1615                                 /* 6.0 = 6 grid units */
1616                                 axis[0]= t->center[0]- 6.0f*axis[0];
1617                                 axis[1]= t->center[1]- 6.0f*axis[1];
1618                                 axis[2]= t->center[2]- 6.0f*axis[2];
1619                                 
1620                                 projectIntView(t, axis, t->center2d);
1621                                 
1622                                 /* rotate only needs correct 2d center, grab needs initgrabz() value */
1623                                 if(t->mode==TFM_TRANSLATION)
1624                                 {
1625                                         copy_v3_v3(t->center, axis);
1626                                         copy_v3_v3(t->con.center, t->center);
1627                                 }
1628                         }
1629                 }
1630         }
1631         
1632         if(t->spacetype==SPACE_VIEW3D)
1633         {
1634                 /* initgrabz() defines a factor for perspective depth correction, used in window_to_3d_delta() */
1635                 if(t->flag & (T_EDIT|T_POSE)) {
1636                         Object *ob= t->obedit?t->obedit:t->poseobj;
1637                         float vec[3];
1638                         
1639                         copy_v3_v3(vec, t->center);
1640                         mul_m4_v3(ob->obmat, vec);
1641                         initgrabz(t->ar->regiondata, vec[0], vec[1], vec[2]);
1642                 }
1643                 else {
1644                         initgrabz(t->ar->regiondata, t->center[0], t->center[1], t->center[2]);
1645                 }
1646         }
1647 }
1648
1649 void calculatePropRatio(TransInfo *t)
1650 {
1651         TransData *td = t->data;
1652         int i;
1653         float dist;
1654         short connected = t->flag & T_PROP_CONNECTED;
1655
1656         if (t->flag & T_PROP_EDIT) {
1657                 for(i = 0 ; i < t->total; i++, td++) {
1658                         if (td->flag & TD_SELECTED) {
1659                                 td->factor = 1.0f;
1660                         }
1661                         else if (t->flag & T_MIRROR && td->loc[0] * t->mirror < -0.00001f)
1662                         {
1663                                 td->flag |= TD_SKIP;
1664                                 td->factor = 0.0f;
1665                                 restoreElement(td);
1666                         }
1667                         else if ((connected &&
1668                                                 (td->flag & TD_NOTCONNECTED || td->dist > t->prop_size))
1669                                 ||
1670                                         (connected == 0 &&
1671                                                 td->rdist > t->prop_size)) {
1672                                 /*
1673                                    The elements are sorted according to their dist member in the array,
1674                                    that means we can stop when it finds one element outside of the propsize.
1675                                 */
1676                                 td->flag |= TD_NOACTION;
1677                                 td->factor = 0.0f;
1678                                 restoreElement(td);
1679                         }
1680                         else {
1681                                 /* Use rdist for falloff calculations, it is the real distance */
1682                                 td->flag &= ~TD_NOACTION;
1683                                 
1684                                 if (connected)
1685                                         dist= (t->prop_size-td->dist)/t->prop_size;
1686                                 else
1687                                         dist= (t->prop_size-td->rdist)/t->prop_size;
1688
1689                                 /*
1690                                  * Clamp to positive numbers.
1691                                  * Certain corner cases with connectivity and individual centers
1692                                  * can give values of rdist larger than propsize.
1693                                  */
1694                                 if (dist < 0.0f)
1695                                         dist = 0.0f;
1696                                 
1697                                 switch(t->prop_mode) {
1698                                 case PROP_SHARP:
1699                                         td->factor= dist*dist;
1700                                         break;
1701                                 case PROP_SMOOTH:
1702                                         td->factor= 3.0f*dist*dist - 2.0f*dist*dist*dist;
1703                                         break;
1704                                 case PROP_ROOT:
1705                                         td->factor = (float)sqrt(dist);
1706                                         break;
1707                                 case PROP_LIN:
1708                                         td->factor = dist;
1709                                         break;
1710                                 case PROP_CONST:
1711                                         td->factor = 1.0f;
1712                                         break;
1713                                 case PROP_SPHERE:
1714                                         td->factor = (float)sqrt(2*dist - dist * dist);
1715                                         break;
1716                                 case PROP_RANDOM:
1717                                         BLI_srand( BLI_rand() ); /* random seed */
1718                                         td->factor = BLI_frand()*dist;
1719                                         break;
1720                                 default:
1721                                         td->factor = 1;
1722                                 }
1723                         }
1724                 }
1725                 switch(t->prop_mode) {
1726                 case PROP_SHARP:
1727                         strcpy(t->proptext, "(Sharp)");
1728                         break;
1729                 case PROP_SMOOTH:
1730                         strcpy(t->proptext, "(Smooth)");
1731                         break;
1732                 case PROP_ROOT:
1733                         strcpy(t->proptext, "(Root)");
1734                         break;
1735                 case PROP_LIN:
1736                         strcpy(t->proptext, "(Linear)");
1737                         break;
1738                 case PROP_CONST:
1739                         strcpy(t->proptext, "(Constant)");
1740                         break;
1741                 case PROP_SPHERE:
1742                         strcpy(t->proptext, "(Sphere)");
1743                         break;
1744                 case PROP_RANDOM:
1745                         strcpy(t->proptext, "(Random)");
1746                         break;
1747                 default:
1748                         t->proptext[0]= '\0';
1749                 }
1750         }
1751         else {
1752                 for(i = 0 ; i < t->total; i++, td++) {
1753                         td->factor = 1.0;
1754                 }
1755                 t->proptext[0]= '\0';
1756         }
1757 }