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