fixed some edge slide issues
[blender-staging.git] / source / blender / editors / transform / transform.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 <stdlib.h>
31 #include <stdio.h>
32 #include <string.h>
33 #include <math.h>
34 #include <float.h>
35
36 #ifdef HAVE_CONFIG_H
37 #include <config.h>
38 #endif
39
40 #ifndef WIN32
41 #include <unistd.h>
42 #else
43 #include <io.h>
44 #endif
45
46 #include "MEM_guardedalloc.h"
47
48 #include "DNA_anim_types.h"
49 #include "DNA_armature_types.h"
50 #include "DNA_action_types.h"  /* for some special action-editor settings */
51 #include "DNA_constraint_types.h"
52 #include "DNA_ipo_types.h"              /* some silly ipo flag  */
53 #include "DNA_listBase.h"
54 #include "DNA_meshdata_types.h"
55 #include "DNA_mesh_types.h"
56 #include "DNA_object_types.h"
57 #include "DNA_scene_types.h"            /* PET modes                    */
58 #include "DNA_screen_types.h"   /* area dimensions              */
59 #include "DNA_texture_types.h"
60 #include "DNA_userdef_types.h"
61 #include "DNA_view3d_types.h"
62 #include "DNA_space_types.h"
63 #include "DNA_windowmanager_types.h"
64
65 #include "RNA_access.h"
66
67 //#include "BIF_editview.h"             /* arrows_move_cursor   */
68 #include "BIF_gl.h"
69 #include "BIF_glutil.h"
70 //#include "BIF_mywindow.h"
71 //#include "BIF_resources.h"
72 //#include "BIF_screen.h"
73 //#include "BIF_space.h"                        /* undo                                 */
74 //#include "BIF_toets.h"                        /* persptoetsen                 */
75 //#include "BIF_mywindow.h"             /* warp_pointer                 */
76 //#include "BIF_toolbox.h"                      /* notice                               */
77 //#include "BIF_editmesh.h"
78 //#include "BIF_editsima.h"
79 //#include "BIF_editparticle.h"
80
81 #include "BKE_action.h"
82 #include "BKE_nla.h"
83 //#include "BKE_bad_level_calls.h"/* popmenu and error  */
84 #include "BKE_bmesh.h"
85 #include "BKE_context.h"
86 #include "BKE_constraint.h"
87 #include "BKE_global.h"
88 #include "BKE_particle.h"
89 #include "BKE_pointcache.h"
90 #include "BKE_utildefines.h"
91 #include "BKE_context.h"
92 #include "BKE_unit.h"
93
94 //#include "BSE_view.h"
95
96 #include "ED_image.h"
97 #include "ED_keyframing.h"
98 #include "ED_screen.h"
99 #include "ED_space_api.h"
100 #include "ED_markers.h"
101 #include "ED_util.h"
102 #include "ED_view3d.h"
103 #include "ED_mesh.h"
104
105 #include "UI_view2d.h"
106 #include "WM_types.h"
107 #include "WM_api.h"
108
109 #include "BLI_arithb.h"
110 #include "BLI_blenlib.h"
111 #include "BLI_editVert.h"
112 #include "BLI_ghash.h"
113 #include "BLI_linklist.h"
114
115 #include "PIL_time.h"                   /* sleep                                */
116
117 #include "UI_resources.h"
118
119 //#include "blendef.h"
120 //
121 //#include "mydevice.h"
122
123 #include "transform.h"
124
125 /* ************************** SPACE DEPENDANT CODE **************************** */
126
127 void setTransformViewMatrices(TransInfo *t)
128 {
129         if(t->spacetype==SPACE_VIEW3D && t->ar->regiontype == RGN_TYPE_WINDOW) {
130                 RegionView3D *rv3d = t->ar->regiondata;
131
132                 Mat4CpyMat4(t->viewmat, rv3d->viewmat);
133                 Mat4CpyMat4(t->viewinv, rv3d->viewinv);
134                 Mat4CpyMat4(t->persmat, rv3d->persmat);
135                 Mat4CpyMat4(t->persinv, rv3d->persinv);
136                 t->persp = rv3d->persp;
137         }
138         else {
139                 Mat4One(t->viewmat);
140                 Mat4One(t->viewinv);
141                 Mat4One(t->persmat);
142                 Mat4One(t->persinv);
143                 t->persp = V3D_ORTHO;
144         }
145
146         calculateCenter2D(t);
147 }
148
149 void convertViewVec(TransInfo *t, float *vec, short dx, short dy)
150 {
151         if (t->spacetype==SPACE_VIEW3D) {
152                 if (t->ar->regiontype == RGN_TYPE_WINDOW)
153                 {
154                         window_to_3d_delta(t->ar, vec, dx, dy);
155                 }
156         }
157         else if(t->spacetype==SPACE_IMAGE) {
158                 View2D *v2d = t->view;
159                 float divx, divy, aspx, aspy;
160
161                 ED_space_image_uv_aspect(t->sa->spacedata.first, &aspx, &aspy);
162
163                 divx= v2d->mask.xmax-v2d->mask.xmin;
164                 divy= v2d->mask.ymax-v2d->mask.ymin;
165
166                 vec[0]= aspx*(v2d->cur.xmax-v2d->cur.xmin)*(dx)/divx;
167                 vec[1]= aspy*(v2d->cur.ymax-v2d->cur.ymin)*(dy)/divy;
168                 vec[2]= 0.0f;
169         }
170         else if(ELEM(t->spacetype, SPACE_IPO, SPACE_NLA)) {
171                 View2D *v2d = t->view;
172                 float divx, divy;
173
174                 divx= v2d->mask.xmax-v2d->mask.xmin;
175                 divy= v2d->mask.ymax-v2d->mask.ymin;
176
177                 vec[0]= (v2d->cur.xmax-v2d->cur.xmin)*(dx) / (divx);
178                 vec[1]= (v2d->cur.ymax-v2d->cur.ymin)*(dy) / (divy);
179                 vec[2]= 0.0f;
180         }
181         else if(t->spacetype==SPACE_NODE) {
182                 View2D *v2d = &t->ar->v2d;
183                 float divx, divy;
184
185                 divx= v2d->mask.xmax-v2d->mask.xmin;
186                 divy= v2d->mask.ymax-v2d->mask.ymin;
187
188                 vec[0]= (v2d->cur.xmax-v2d->cur.xmin)*(dx)/divx;
189                 vec[1]= (v2d->cur.ymax-v2d->cur.ymin)*(dy)/divy;
190                 vec[2]= 0.0f;
191         }
192         else if(t->spacetype==SPACE_SEQ) {
193                 View2D *v2d = &t->ar->v2d;
194                 float divx, divy;
195
196                 divx= v2d->mask.xmax-v2d->mask.xmin;
197                 divy= v2d->mask.ymax-v2d->mask.ymin;
198
199                 vec[0]= (v2d->cur.xmax-v2d->cur.xmin)*(dx)/divx;
200                 vec[1]= (v2d->cur.ymax-v2d->cur.ymin)*(dy)/divy;
201                 vec[2]= 0.0f;
202         }
203 }
204
205 void projectIntView(TransInfo *t, float *vec, int *adr)
206 {
207         if (t->spacetype==SPACE_VIEW3D) {
208                 if(t->ar->regiontype == RGN_TYPE_WINDOW)
209                         project_int_noclip(t->ar, vec, adr);
210         }
211         else if(t->spacetype==SPACE_IMAGE) {
212                 float aspx, aspy, v[2];
213
214                 ED_space_image_uv_aspect(t->sa->spacedata.first, &aspx, &aspy);
215                 v[0]= vec[0]/aspx;
216                 v[1]= vec[1]/aspy;
217
218                 UI_view2d_to_region_no_clip(t->view, v[0], v[1], adr, adr+1);
219         }
220         else if(ELEM(t->spacetype, SPACE_IPO, SPACE_NLA)) {
221                 int out[2] = {0, 0};
222
223                 UI_view2d_view_to_region((View2D *)t->view, vec[0], vec[1], out, out+1);
224                 adr[0]= out[0];
225                 adr[1]= out[1];
226         }
227         else if(t->spacetype==SPACE_SEQ) { /* XXX not tested yet, but should work */
228                 int out[2] = {0, 0};
229
230                 UI_view2d_view_to_region((View2D *)t->view, vec[0], vec[1], out, out+1);
231                 adr[0]= out[0];
232                 adr[1]= out[1];
233         }
234 }
235
236 void projectFloatView(TransInfo *t, float *vec, float *adr)
237 {
238         if (t->spacetype==SPACE_VIEW3D) {
239                 if(t->ar->regiontype == RGN_TYPE_WINDOW)
240                         project_float_noclip(t->ar, vec, adr);
241         }
242         else if(t->spacetype==SPACE_IMAGE) {
243                 int a[2];
244
245                 projectIntView(t, vec, a);
246                 adr[0]= a[0];
247                 adr[1]= a[1];
248         }
249         else if(ELEM(t->spacetype, SPACE_IPO, SPACE_NLA)) {
250                 int a[2];
251
252                 projectIntView(t, vec, a);
253                 adr[0]= a[0];
254                 adr[1]= a[1];
255         }
256 }
257
258 void applyAspectRatio(TransInfo *t, float *vec)
259 {
260         SpaceImage *sima= t->sa->spacedata.first;
261
262         if ((t->spacetype==SPACE_IMAGE) && (t->mode==TFM_TRANSLATION)) {
263                 float aspx, aspy;
264
265                 if((sima->flag & SI_COORDFLOATS)==0) {
266                         int width, height;
267                         ED_space_image_size(sima, &width, &height);
268
269                         vec[0] *= width;
270                         vec[1] *= height;
271                 }
272
273                 ED_space_image_uv_aspect(sima, &aspx, &aspy);
274                 vec[0] /= aspx;
275                 vec[1] /= aspy;
276         }
277 }
278
279 void removeAspectRatio(TransInfo *t, float *vec)
280 {
281         SpaceImage *sima= t->sa->spacedata.first;
282
283         if ((t->spacetype==SPACE_IMAGE) && (t->mode==TFM_TRANSLATION)) {
284                 float aspx, aspy;
285
286                 if((sima->flag & SI_COORDFLOATS)==0) {
287                         int width, height;
288                         ED_space_image_size(sima, &width, &height);
289
290                         vec[0] /= width;
291                         vec[1] /= height;
292                 }
293
294                 ED_space_image_uv_aspect(sima, &aspx, &aspy);
295                 vec[0] *= aspx;
296                 vec[1] *= aspy;
297         }
298 }
299
300 static void viewRedrawForce(bContext *C, TransInfo *t)
301 {
302         if (t->spacetype == SPACE_VIEW3D)
303         {
304                 /* Do we need more refined tags? */
305                 WM_event_add_notifier(C, NC_OBJECT|ND_TRANSFORM, NULL);
306                 
307                 /* for realtime animation record - send notifiers recognised by animation editors */
308                 if ((t->animtimer) && IS_AUTOKEY_ON(t->scene))
309                         WM_event_add_notifier(C, NC_OBJECT|ND_KEYS, NULL);
310         }
311         else if (t->spacetype == SPACE_ACTION) {
312                 //SpaceAction *saction= (SpaceAction *)t->sa->spacedata.first;
313                 WM_event_add_notifier(C, NC_ANIMATION|ND_KEYFRAME_EDIT, NULL);
314         }
315         else if (t->spacetype == SPACE_IPO) {
316                 //SpaceIpo *sipo= (SpaceIpo *)t->sa->spacedata.first;
317                 WM_event_add_notifier(C, NC_ANIMATION|ND_KEYFRAME_EDIT, NULL);
318         }
319         else if (t->spacetype == SPACE_NLA) {
320                 WM_event_add_notifier(C, NC_ANIMATION|ND_NLA_EDIT, NULL);
321         }
322         else if(t->spacetype == SPACE_NODE)
323         {
324                 //ED_area_tag_redraw(t->sa);
325                 WM_event_add_notifier(C, NC_SCENE|ND_NODES, NULL);
326         }
327         else if(t->spacetype == SPACE_SEQ)
328         {
329                 WM_event_add_notifier(C, NC_SCENE|ND_SEQUENCER, NULL);
330         }
331         else if (t->spacetype==SPACE_IMAGE) {
332                 // XXX how to deal with lock?
333 #if 0
334                 SpaceImage *sima= (SpaceImage*)t->sa->spacedata.first;
335                 if(sima->lock) force_draw_plus(SPACE_VIEW3D, 0);
336                 else force_draw(0);
337 #endif
338
339                 WM_event_add_notifier(C, NC_GEOM|ND_DATA, t->obedit->data);
340         }
341 }
342
343 static void viewRedrawPost(TransInfo *t)
344 {
345         ED_area_headerprint(t->sa, NULL);
346
347 #if 0 // TRANSFORM_FIX_ME
348         if(t->spacetype==SPACE_VIEW3D) {
349                 allqueue(REDRAWBUTSOBJECT, 0);
350                 allqueue(REDRAWVIEW3D, 0);
351         }
352         else if(t->spacetype==SPACE_IMAGE) {
353                 allqueue(REDRAWIMAGE, 0);
354                 allqueue(REDRAWVIEW3D, 0);
355         }
356         else if(ELEM3(t->spacetype, SPACE_ACTION, SPACE_NLA, SPACE_IPO)) {
357                 allqueue(REDRAWVIEW3D, 0);
358                 allqueue(REDRAWACTION, 0);
359                 allqueue(REDRAWNLA, 0);
360                 allqueue(REDRAWIPO, 0);
361                 allqueue(REDRAWTIME, 0);
362                 allqueue(REDRAWBUTSOBJECT, 0);
363         }
364
365         scrarea_queue_headredraw(curarea);
366 #endif
367 }
368
369 /* ************************** TRANSFORMATIONS **************************** */
370
371 void BIF_selectOrientation() {
372 #if 0 // TRANSFORM_FIX_ME
373         short val;
374         char *str_menu = BIF_menustringTransformOrientation("Orientation");
375         val= pupmenu(str_menu);
376         MEM_freeN(str_menu);
377
378         if(val >= 0) {
379                 G.vd->twmode = val;
380         }
381 #endif
382 }
383
384 static void view_editmove(unsigned short event)
385 {
386 #if 0 // TRANSFORM_FIX_ME
387         int refresh = 0;
388         /* Regular:   Zoom in */
389         /* Shift:     Scroll up */
390         /* Ctrl:      Scroll right */
391         /* Alt-Shift: Rotate up */
392         /* Alt-Ctrl:  Rotate right */
393
394         /* only work in 3D window for now
395          * In the end, will have to send to event to a 2D window handler instead
396          */
397         if (Trans.flag & T_2D_EDIT)
398                 return;
399
400         switch(event) {
401                 case WHEELUPMOUSE:
402
403                         if( G.qual & LR_SHIFTKEY ) {
404                                 if( G.qual & LR_ALTKEY ) {
405                                         G.qual &= ~LR_SHIFTKEY;
406                                         persptoetsen(PAD2);
407                                         G.qual |= LR_SHIFTKEY;
408                                 } else {
409                                         persptoetsen(PAD2);
410                                 }
411                         } else if( G.qual & LR_CTRLKEY ) {
412                                 if( G.qual & LR_ALTKEY ) {
413                                         G.qual &= ~LR_CTRLKEY;
414                                         persptoetsen(PAD4);
415                                         G.qual |= LR_CTRLKEY;
416                                 } else {
417                                         persptoetsen(PAD4);
418                                 }
419                         } else if(U.uiflag & USER_WHEELZOOMDIR)
420                                 persptoetsen(PADMINUS);
421                         else
422                                 persptoetsen(PADPLUSKEY);
423
424                         refresh = 1;
425                         break;
426                 case WHEELDOWNMOUSE:
427                         if( G.qual & LR_SHIFTKEY ) {
428                                 if( G.qual & LR_ALTKEY ) {
429                                         G.qual &= ~LR_SHIFTKEY;
430                                         persptoetsen(PAD8);
431                                         G.qual |= LR_SHIFTKEY;
432                                 } else {
433                                         persptoetsen(PAD8);
434                                 }
435                         } else if( G.qual & LR_CTRLKEY ) {
436                                 if( G.qual & LR_ALTKEY ) {
437                                         G.qual &= ~LR_CTRLKEY;
438                                         persptoetsen(PAD6);
439                                         G.qual |= LR_CTRLKEY;
440                                 } else {
441                                         persptoetsen(PAD6);
442                                 }
443                         } else if(U.uiflag & USER_WHEELZOOMDIR)
444                                 persptoetsen(PADPLUSKEY);
445                         else
446                                 persptoetsen(PADMINUS);
447
448                         refresh = 1;
449                         break;
450         }
451
452         if (refresh)
453                 setTransformViewMatrices(&Trans);
454 #endif
455 }
456
457 #if 0
458 static char *transform_to_undostr(TransInfo *t)
459 {
460         switch (t->mode) {
461                 case TFM_TRANSLATION:
462                         return "Translate";
463                 case TFM_ROTATION:
464                         return "Rotate";
465                 case TFM_RESIZE:
466                         return "Scale";
467                 case TFM_TOSPHERE:
468                         return "To Sphere";
469                 case TFM_SHEAR:
470                         return "Shear";
471                 case TFM_WARP:
472                         return "Warp";
473                 case TFM_SHRINKFATTEN:
474                         return "Shrink/Fatten";
475                 case TFM_TILT:
476                         return "Tilt";
477                 case TFM_TRACKBALL:
478                         return "Trackball";
479                 case TFM_PUSHPULL:
480                         return "Push/Pull";
481                 case TFM_BEVEL:
482                         return "Bevel";
483                 case TFM_BWEIGHT:
484                         return "Bevel Weight";
485                 case TFM_CREASE:
486                         return "Crease";
487                 case TFM_BONESIZE:
488                         return "Bone Width";
489                 case TFM_BONE_ENVELOPE:
490                         return "Bone Envelope";
491                 case TFM_TIME_TRANSLATE:
492                         return "Translate Anim. Data";
493                 case TFM_TIME_SCALE:
494                         return "Scale Anim. Data";
495                 case TFM_TIME_SLIDE:
496                         return "Time Slide";
497                 case TFM_BAKE_TIME:
498                         return "Key Time";
499                 case TFM_MIRROR:
500                         return "Mirror";
501         }
502         return "Transform";
503 }
504 #endif
505
506 /* ************************************************* */
507
508 /* NOTE: these defines are saved in keymap files, do not change values but just add new ones */
509 #define TFM_MODAL_CANCEL                        1
510 #define TFM_MODAL_CONFIRM                       2
511 #define TFM_MODAL_TRANSLATE                     3
512 #define TFM_MODAL_ROTATE                        4
513 #define TFM_MODAL_RESIZE                        5
514 #define TFM_MODAL_SNAP_GEARS            6
515 #define TFM_MODAL_SNAP_GEARS_OFF        7
516
517 /* called in transform_ops.c, on each regeneration of keymaps */
518 void transform_modal_keymap(wmWindowManager *wm)
519 {
520         static EnumPropertyItem modal_items[] = {
521         {TFM_MODAL_CANCEL, "CANCEL", 0, "Cancel", ""},
522         {TFM_MODAL_CONFIRM, "CONFIRM", 0, "Confirm", ""},
523         {TFM_MODAL_TRANSLATE, "TRANSLATE", 0, "Translate", ""},
524         {TFM_MODAL_ROTATE, "ROTATE", 0, "Rotate", ""},
525         {TFM_MODAL_RESIZE, "RESIZE", 0, "Resize", ""},
526         {TFM_MODAL_SNAP_GEARS, "SNAP_GEARS", 0, "Snap On", ""},
527         {TFM_MODAL_SNAP_GEARS_OFF, "SNAP_GEARS_OFF", 0, "Snap Off", ""},
528         {0, NULL, 0, NULL, NULL}};
529         
530         wmKeyMap *keymap= WM_modalkeymap_get(wm, "Transform Modal Map");
531         
532         /* this function is called for each spacetype, only needs to add map once */
533         if(keymap) return;
534         
535         keymap= WM_modalkeymap_add(wm, "Transform Modal Map", modal_items);
536         
537         /* items for modal map */
538         WM_modalkeymap_add_item(keymap, ESCKEY,    KM_PRESS, KM_ANY, 0, TFM_MODAL_CANCEL);
539         WM_modalkeymap_add_item(keymap, LEFTMOUSE, KM_ANY, KM_ANY, 0, TFM_MODAL_CONFIRM);
540         WM_modalkeymap_add_item(keymap, RETKEY, KM_PRESS, KM_ANY, 0, TFM_MODAL_CONFIRM);
541         WM_modalkeymap_add_item(keymap, PADENTER, KM_PRESS, KM_ANY, 0, TFM_MODAL_CONFIRM);
542
543         WM_modalkeymap_add_item(keymap, GKEY, KM_PRESS, 0, 0, TFM_MODAL_TRANSLATE);
544         WM_modalkeymap_add_item(keymap, RKEY, KM_PRESS, 0, 0, TFM_MODAL_ROTATE);
545         WM_modalkeymap_add_item(keymap, SKEY, KM_PRESS, 0, 0, TFM_MODAL_RESIZE);
546         
547         WM_modalkeymap_add_item(keymap, LEFTCTRLKEY, KM_PRESS, KM_ANY, 0, TFM_MODAL_SNAP_GEARS);
548         WM_modalkeymap_add_item(keymap, LEFTCTRLKEY, KM_RELEASE, KM_ANY, 0, TFM_MODAL_SNAP_GEARS_OFF);
549         
550         /* assign map to operators */
551         WM_modalkeymap_assign(keymap, "TFM_OT_transform");
552         WM_modalkeymap_assign(keymap, "TFM_OT_translate");
553         WM_modalkeymap_assign(keymap, "TFM_OT_rotate");
554         WM_modalkeymap_assign(keymap, "TFM_OT_tosphere");
555         WM_modalkeymap_assign(keymap, "TFM_OT_resize");
556         WM_modalkeymap_assign(keymap, "TFM_OT_shear");
557         WM_modalkeymap_assign(keymap, "TFM_OT_warp");
558         WM_modalkeymap_assign(keymap, "TFM_OT_shrink_fatten");
559         WM_modalkeymap_assign(keymap, "TFM_OT_tilt");
560         WM_modalkeymap_assign(keymap, "TFM_OT_trackball");
561         
562 }
563
564
565 void transformEvent(TransInfo *t, wmEvent *event)
566 {
567         float mati[3][3] = {{1.0f, 0.0f, 0.0f}, {0.0f, 1.0f, 0.0f}, {0.0f, 0.0f, 1.0f}};
568         char cmode = constraintModeToChar(t);
569
570         t->redraw |= handleMouseInput(t, &t->mouse, event);
571
572         if (event->type == MOUSEMOVE)
573         {
574                 t->mval[0] = event->x - t->ar->winrct.xmin;
575                 t->mval[1] = event->y - t->ar->winrct.ymin;
576
577                 t->redraw = 1;
578
579                 applyMouseInput(t, &t->mouse, t->mval, t->values);
580         }
581
582         /* handle modal keymap first */
583         if (event->type == EVT_MODAL_MAP) {
584                 switch (event->val) {
585                         case TFM_MODAL_CANCEL:
586                                 t->state = TRANS_CANCEL;
587                                 break;
588                         case TFM_MODAL_CONFIRM:
589                                 t->state = TRANS_CONFIRM;
590                                 break;
591                                 
592                         case TFM_MODAL_TRANSLATE:
593                                 /* only switch when... */
594                                 if( ELEM3(t->mode, TFM_ROTATION, TFM_RESIZE, TFM_TRACKBALL) ) {
595                                         resetTransRestrictions(t);
596                                         restoreTransObjects(t);
597                                         initTranslation(t);
598                                         initSnapping(t, NULL); // need to reinit after mode change
599                                         t->redraw = 1;
600                                 }
601                                 break;
602                         case TFM_MODAL_ROTATE:
603                                 /* only switch when... */
604                                 if( ELEM4(t->mode, TFM_ROTATION, TFM_RESIZE, TFM_TRACKBALL, TFM_TRANSLATION) ) {
605                                         
606                                         resetTransRestrictions(t);
607                                         
608                                         if (t->mode == TFM_ROTATION) {
609                                                 restoreTransObjects(t);
610                                                 initTrackball(t);
611                                         }
612                                         else {
613                                                 restoreTransObjects(t);
614                                                 initRotation(t);
615                                         }
616                                         initSnapping(t, NULL); // need to reinit after mode change
617                                         t->redraw = 1;
618                                 }
619                                 break;
620                         case TFM_MODAL_RESIZE:
621                                 /* only switch when... */
622                                 if( ELEM3(t->mode, TFM_ROTATION, TFM_TRANSLATION, TFM_TRACKBALL) ) {
623                                         resetTransRestrictions(t);
624                                         restoreTransObjects(t);
625                                         initResize(t);
626                                         initSnapping(t, NULL); // need to reinit after mode change
627                                         t->redraw = 1;
628                                 }
629                                 break;
630                                 
631                         case TFM_MODAL_SNAP_GEARS:
632                                 t->modifiers |= MOD_SNAP_GEARS;
633                                 t->redraw = 1;
634                                 break;
635                         case TFM_MODAL_SNAP_GEARS_OFF:
636                                 t->modifiers &= ~MOD_SNAP_GEARS;
637                                 t->redraw = 1;
638                                 break;
639                 }
640         }
641         /* else do non-mapped events */
642         else if (event->val==KM_PRESS) {
643                 switch (event->type){
644                 case RIGHTMOUSE:
645                         t->state = TRANS_CANCEL;
646                         break;
647                 /* enforce redraw of transform when modifiers are used */
648                 case LEFTCTRLKEY:
649                 case RIGHTCTRLKEY:
650                         t->modifiers |= MOD_SNAP_GEARS;
651                         t->redraw = 1;
652                         break;
653
654                 case LEFTSHIFTKEY:
655                 case RIGHTSHIFTKEY:
656                         t->modifiers |= MOD_CONSTRAINT_PLANE;
657                         t->redraw = 1;
658                         break;
659
660                 case SPACEKEY:
661                         if ((t->spacetype==SPACE_VIEW3D) && event->alt) {
662 #if 0 // TRANSFORM_FIX_ME
663                                 short mval[2];
664
665                                 getmouseco_sc(mval);
666                                 BIF_selectOrientation();
667                                 calc_manipulator_stats(curarea);
668                                 Mat3CpyMat4(t->spacemtx, G.vd->twmat);
669                                 warp_pointer(mval[0], mval[1]);
670 #endif
671                         }
672                         else {
673                                 t->state = TRANS_CONFIRM;
674                         }
675                         break;
676
677                 case MIDDLEMOUSE:
678                         if ((t->flag & T_NO_CONSTRAINT)==0) {
679                                 /* exception for switching to dolly, or trackball, in camera view */
680                                 if (t->flag & T_CAMERA) {
681                                         if (t->mode==TFM_TRANSLATION)
682                                                 setLocalConstraint(t, (CON_AXIS2), "along local Z");
683                                         else if (t->mode==TFM_ROTATION) {
684                                                 restoreTransObjects(t);
685                                                 initTrackball(t);
686                                         }
687                                 }
688                                 else {
689                                         t->modifiers |= MOD_CONSTRAINT_SELECT;
690                                         if (t->con.mode & CON_APPLY) {
691                                                 stopConstraint(t);
692                                         }
693                                         else {
694                                                 if (event->shift) {
695                                                         initSelectConstraint(t, t->spacemtx);
696                                                 }
697                                                 else {
698                                                         /* bit hackish... but it prevents mmb select to print the orientation from menu */
699                                                         strcpy(t->spacename, "global");
700                                                         initSelectConstraint(t, mati);
701                                                 }
702                                                 postSelectConstraint(t);
703                                         }
704                                 }
705                                 t->redraw = 1;
706                         }
707                         break;
708                 case ESCKEY:
709                         t->state = TRANS_CANCEL;
710                         break;
711                 case PADENTER:
712                 case RETKEY:
713                         t->state = TRANS_CONFIRM;
714                         break;
715                 case GKEY:
716                         /* only switch when... */
717                         if( ELEM3(t->mode, TFM_ROTATION, TFM_RESIZE, TFM_TRACKBALL) ) {
718                                 resetTransRestrictions(t);
719                                 restoreTransObjects(t);
720                                 initTranslation(t);
721                                 initSnapping(t, NULL); // need to reinit after mode change
722                                 t->redraw = 1;
723                         }
724                         break;
725                 case SKEY:
726                         /* only switch when... */
727                         if( ELEM3(t->mode, TFM_ROTATION, TFM_TRANSLATION, TFM_TRACKBALL) ) {
728                                 resetTransRestrictions(t);
729                                 restoreTransObjects(t);
730                                 initResize(t);
731                                 initSnapping(t, NULL); // need to reinit after mode change
732                                 t->redraw = 1;
733                         }
734                         break;
735                 case RKEY:
736                         /* only switch when... */
737                         if( ELEM4(t->mode, TFM_ROTATION, TFM_RESIZE, TFM_TRACKBALL, TFM_TRANSLATION) ) {
738
739                                 resetTransRestrictions(t);
740
741                                 if (t->mode == TFM_ROTATION) {
742                                         restoreTransObjects(t);
743                                         initTrackball(t);
744                                 }
745                                 else {
746                                         restoreTransObjects(t);
747                                         initRotation(t);
748                                 }
749                                 initSnapping(t, NULL); // need to reinit after mode change
750                                 t->redraw = 1;
751                         }
752                         break;
753                 case CKEY:
754                         if (event->alt) {
755                                 t->flag ^= T_PROP_CONNECTED;
756                                 sort_trans_data_dist(t);
757                                 calculatePropRatio(t);
758                                 t->redraw= 1;
759                         }
760                         else {
761                                 stopConstraint(t);
762                                 t->redraw = 1;
763                         }
764                         break;
765                 case XKEY:
766                         if ((t->flag & T_NO_CONSTRAINT)==0) {
767                                 if (cmode == 'X') {
768                                         if (t->flag & T_2D_EDIT) {
769                                                 stopConstraint(t);
770                                         }
771                                         else {
772                                                 if (t->con.mode & CON_USER) {
773                                                         stopConstraint(t);
774                                                 }
775                                                 else {
776                                                         if ((t->modifiers & MOD_CONSTRAINT_PLANE) == 0)
777                                                                 setUserConstraint(t, (CON_AXIS0), "along %s X");
778                                                         else if (t->modifiers & MOD_CONSTRAINT_PLANE)
779                                                                 setUserConstraint(t, (CON_AXIS1|CON_AXIS2), "locking %s X");
780                                                 }
781                                         }
782                                 }
783                                 else {
784                                         if (t->flag & T_2D_EDIT) {
785                                                 setConstraint(t, mati, (CON_AXIS0), "along X axis");
786                                         }
787                                         else {
788                                                 if ((t->modifiers & MOD_CONSTRAINT_PLANE) == 0)
789                                                         setConstraint(t, mati, (CON_AXIS0), "along global X");
790                                                 else if (t->modifiers & MOD_CONSTRAINT_PLANE)
791                                                         setConstraint(t, mati, (CON_AXIS1|CON_AXIS2), "locking global X");
792                                         }
793                                 }
794                                 t->redraw = 1;
795                         }
796                         break;
797                 case YKEY:
798                         if ((t->flag & T_NO_CONSTRAINT)==0) {
799                                 if (cmode == 'Y') {
800                                         if (t->flag & T_2D_EDIT) {
801                                                 stopConstraint(t);
802                                         }
803                                         else {
804                                                 if (t->con.mode & CON_USER) {
805                                                         stopConstraint(t);
806                                                 }
807                                                 else {
808                                                         if ((t->modifiers & MOD_CONSTRAINT_PLANE) == 0)
809                                                                 setUserConstraint(t, (CON_AXIS1), "along %s Y");
810                                                         else if (t->modifiers & MOD_CONSTRAINT_PLANE)
811                                                                 setUserConstraint(t, (CON_AXIS0|CON_AXIS2), "locking %s Y");
812                                                 }
813                                         }
814                                 }
815                                 else {
816                                         if (t->flag & T_2D_EDIT) {
817                                                 setConstraint(t, mati, (CON_AXIS1), "along Y axis");
818                                         }
819                                         else {
820                                                 if ((t->modifiers & MOD_CONSTRAINT_PLANE) == 0)
821                                                         setConstraint(t, mati, (CON_AXIS1), "along global Y");
822                                                 else if (t->modifiers & MOD_CONSTRAINT_PLANE)
823                                                         setConstraint(t, mati, (CON_AXIS0|CON_AXIS2), "locking global Y");
824                                         }
825                                 }
826                                 t->redraw = 1;
827                         }
828                         break;
829                 case ZKEY:
830                         if ((t->flag & T_NO_CONSTRAINT)==0) {
831                                 if (cmode == 'Z') {
832                                         if (t->con.mode & CON_USER) {
833                                                 stopConstraint(t);
834                                         }
835                                         else {
836                                                 if ((t->modifiers & MOD_CONSTRAINT_PLANE) == 0)
837                                                         setUserConstraint(t, (CON_AXIS2), "along %s Z");
838                                                 else if ((t->modifiers & MOD_CONSTRAINT_PLANE) && ((t->flag & T_2D_EDIT)==0))
839                                                         setUserConstraint(t, (CON_AXIS0|CON_AXIS1), "locking %s Z");
840                                         }
841                                 }
842                                 else if ((t->flag & T_2D_EDIT)==0) {
843                                         if ((t->modifiers & MOD_CONSTRAINT_PLANE) == 0)
844                                                 setConstraint(t, mati, (CON_AXIS2), "along global Z");
845                                         else if (t->modifiers & MOD_CONSTRAINT_PLANE)
846                                                 setConstraint(t, mati, (CON_AXIS0|CON_AXIS1), "locking global Z");
847                                 }
848                                 t->redraw = 1;
849                         }
850                         break;
851                 case OKEY:
852                         if (t->flag & T_PROP_EDIT && event->shift) {
853                                 t->prop_mode = (t->prop_mode + 1) % 6;
854                                 calculatePropRatio(t);
855                                 t->redraw = 1;
856                         }
857                         break;
858                 case PADPLUSKEY:
859                         if(event->alt && t->flag & T_PROP_EDIT) {
860                                 t->prop_size *= 1.1f;
861                                 calculatePropRatio(t);
862                         }
863                         t->redraw= 1;
864                         break;
865                 case PAGEUPKEY:
866                 case WHEELDOWNMOUSE:
867                         if (t->flag & T_AUTOIK) {
868                                 transform_autoik_update(t, 1);
869                         }
870                         else if(t->flag & T_PROP_EDIT) {
871                                 t->prop_size*= 1.1f;
872                                 calculatePropRatio(t);
873                         }
874                         else view_editmove(event->type);
875                         t->redraw= 1;
876                         break;
877                 case PADMINUS:
878                         if(event->alt && t->flag & T_PROP_EDIT) {
879                                 t->prop_size*= 0.90909090f;
880                                 calculatePropRatio(t);
881                         }
882                         t->redraw= 1;
883                         break;
884                 case PAGEDOWNKEY:
885                 case WHEELUPMOUSE:
886                         if (t->flag & T_AUTOIK) {
887                                 transform_autoik_update(t, -1);
888                         }
889                         else if (t->flag & T_PROP_EDIT) {
890                                 t->prop_size*= 0.90909090f;
891                                 calculatePropRatio(t);
892                         }
893                         else view_editmove(event->type);
894                         t->redraw= 1;
895                         break;
896 //              case NDOFMOTION:
897 //            viewmoveNDOF(1);
898   //         break;
899                 }
900
901                 // Numerical input events
902                 t->redraw |= handleNumInput(&(t->num), event);
903
904                 // NDof input events
905                 switch(handleNDofInput(&(t->ndof), event))
906                 {
907                         case NDOF_CONFIRM:
908                                 if ((t->options & CTX_NDOF) == 0)
909                                 {
910                                         /* Confirm on normal transform only */
911                                         t->state = TRANS_CONFIRM;
912                                 }
913                                 break;
914                         case NDOF_CANCEL:
915                                 if (t->options & CTX_NDOF)
916                                 {
917                                         /* Cancel on pure NDOF transform */
918                                         t->state = TRANS_CANCEL;
919                                 }
920                                 else
921                                 {
922                                         /* Otherwise, just redraw, NDof input was cancelled */
923                                         t->redraw = 1;
924                                 }
925                                 break;
926                         case NDOF_NOMOVE:
927                                 if (t->options & CTX_NDOF)
928                                 {
929                                         /* Confirm on pure NDOF transform */
930                                         t->state = TRANS_CONFIRM;
931                                 }
932                                 break;
933                         case NDOF_REFRESH:
934                                 t->redraw = 1;
935                                 break;
936
937                 }
938
939                 // Snapping events
940                 t->redraw |= handleSnapping(t, event);
941
942                 //arrows_move_cursor(event->type);
943         }
944         else {
945                 switch (event->type){
946                 case LEFTMOUSE:
947                         t->state = TRANS_CONFIRM;
948                         break;
949                 case LEFTSHIFTKEY:
950                 case RIGHTSHIFTKEY:
951                         t->modifiers &= ~MOD_CONSTRAINT_PLANE;
952                         t->redraw = 1;
953                         break;
954
955                 case LEFTCTRLKEY:
956                 case RIGHTCTRLKEY:
957                         t->modifiers &= ~MOD_SNAP_GEARS;
958                         /* no redraw on release modifier keys! this makes sure you can assign the 'grid' still
959                            after releasing modifer key */
960                         //t->redraw = 1;
961                         break;
962                 case MIDDLEMOUSE:
963                         if ((t->flag & T_NO_CONSTRAINT)==0) {
964                                 t->modifiers &= ~MOD_CONSTRAINT_SELECT;
965                                 postSelectConstraint(t);
966                                 t->redraw = 1;
967                         }
968                         break;
969 //              case LEFTMOUSE:
970 //              case RIGHTMOUSE:
971 //                      if(WM_modal_tweak_exit(event, t->event_type))
972 ////                    if (t->options & CTX_TWEAK)
973 //                              t->state = TRANS_CONFIRM;
974 //                      break;
975                 }
976         }
977
978         // Per transform event, if present
979         if (t->handleEvent)
980                 t->redraw |= t->handleEvent(t, event);
981 }
982
983 int calculateTransformCenter(bContext *C, wmEvent *event, int centerMode, float *vec)
984 {
985         TransInfo *t = MEM_callocN(sizeof(TransInfo), "TransInfo data");
986         int success = 1;
987
988         t->state = TRANS_RUNNING;
989
990         t->options = CTX_NONE;
991
992         t->mode = TFM_DUMMY;
993
994         initTransInfo(C, t, NULL, event);                                       // internal data, mouse, vectors
995
996         createTransData(C, t);                  // make TransData structs from selection
997
998         t->around = centerMode;                         // override userdefined mode
999
1000         if (t->total == 0) {
1001                 success = 0;
1002         }
1003         else {
1004                 success = 1;
1005
1006                 calculateCenter(t);
1007
1008                 // Copy center from constraint center. Transform center can be local
1009                 VECCOPY(vec, t->con.center);
1010         }
1011
1012         postTrans(t);
1013
1014         /* aftertrans does insert ipos and action channels, and clears base flags, doesnt read transdata */
1015         special_aftertrans_update(t);
1016
1017         MEM_freeN(t);
1018
1019         return success;
1020 }
1021
1022 typedef enum {
1023         UP,
1024         DOWN,
1025         LEFT,
1026         RIGHT
1027 } ArrowDirection;
1028 static void drawArrow(ArrowDirection d, short offset, short length, short size)
1029 {
1030         switch(d)
1031         {
1032                 case LEFT:
1033                         offset = -offset;
1034                         length = -length;
1035                         size = -size;
1036                 case RIGHT:
1037                         glBegin(GL_LINES);
1038                         glVertex2s( offset, 0);
1039                         glVertex2s( offset + length, 0);
1040                         glVertex2s( offset + length, 0);
1041                         glVertex2s( offset + length - size, -size);
1042                         glVertex2s( offset + length, 0);
1043                         glVertex2s( offset + length - size,  size);
1044                         glEnd();
1045                         break;
1046                 case DOWN:
1047                         offset = -offset;
1048                         length = -length;
1049                         size = -size;
1050                 case UP:
1051                         glBegin(GL_LINES);
1052                         glVertex2s( 0, offset);
1053                         glVertex2s( 0, offset + length);
1054                         glVertex2s( 0, offset + length);
1055                         glVertex2s(-size, offset + length - size);
1056                         glVertex2s( 0, offset + length);
1057                         glVertex2s( size, offset + length - size);
1058                         glEnd();
1059                         break;
1060         }
1061 }
1062
1063 static void drawArrowHead(ArrowDirection d, short size)
1064 {
1065         switch(d)
1066         {
1067                 case LEFT:
1068                         size = -size;
1069                 case RIGHT:
1070                         glBegin(GL_LINES);
1071                         glVertex2s( 0, 0);
1072                         glVertex2s( -size, -size);
1073                         glVertex2s( 0, 0);
1074                         glVertex2s( -size,  size);
1075                         glEnd();
1076                         break;
1077                 case DOWN:
1078                         size = -size;
1079                 case UP:
1080                         glBegin(GL_LINES);
1081                         glVertex2s( 0, 0);
1082                         glVertex2s(-size, -size);
1083                         glVertex2s( 0, 0);
1084                         glVertex2s( size, -size);
1085                         glEnd();
1086                         break;
1087         }
1088 }
1089
1090 static void drawArc(float size, float angle_start, float angle_end, int segments)
1091 {
1092         float delta = (angle_end - angle_start) / segments;
1093         float angle;
1094
1095         glBegin(GL_LINE_STRIP);
1096
1097         for( angle = angle_start; angle < angle_end; angle += delta)
1098         {
1099                 glVertex2f( cosf(angle) * size, sinf(angle) * size);
1100         }
1101         glVertex2f( cosf(angle_end) * size, sinf(angle_end) * size);
1102
1103         glEnd();
1104 }
1105
1106 void drawHelpline(const struct bContext *C, TransInfo *t)
1107 {
1108         if (t->helpline != HLP_NONE && !(t->flag & T_USES_MANIPULATOR))
1109         {
1110                 float vecrot[3], cent[2];
1111
1112                 VECCOPY(vecrot, t->center);
1113                 if(t->flag & T_EDIT) {
1114                         Object *ob= t->obedit;
1115                         if(ob) Mat4MulVecfl(ob->obmat, vecrot);
1116                 }
1117                 else if(t->flag & T_POSE) {
1118                         Object *ob=t->poseobj;
1119                         if(ob) Mat4MulVecfl(ob->obmat, vecrot);
1120                 }
1121
1122                 projectFloatView(t, vecrot, cent);      // no overflow in extreme cases
1123
1124                 glDisable(GL_DEPTH_TEST);
1125
1126                 glMatrixMode(GL_PROJECTION);
1127                 glPushMatrix();
1128                 glMatrixMode(GL_MODELVIEW);
1129                 glPushMatrix();
1130
1131                 ED_region_pixelspace(t->ar);
1132
1133                 switch(t->helpline)
1134                 {
1135                         case HLP_SPRING:
1136                                 UI_ThemeColor(TH_WIRE);
1137
1138                                 setlinestyle(3);
1139                                 glBegin(GL_LINE_STRIP);
1140                                 glVertex2sv(t->mval);
1141                                 glVertex2fv(cent);
1142                                 glEnd();
1143
1144                                 glTranslatef(t->mval[0], t->mval[1], 0);
1145                                 glRotatef(-180 / M_PI * atan2f(cent[0] - t->mval[0], cent[1] - t->mval[1]), 0, 0, 1);
1146
1147                                 setlinestyle(0);
1148                                 glLineWidth(3.0);
1149                                 drawArrow(UP, 5, 10, 5);
1150                                 drawArrow(DOWN, 5, 10, 5);
1151                                 glLineWidth(1.0);
1152                                 break;
1153                         case HLP_HARROW:
1154                                 UI_ThemeColor(TH_WIRE);
1155
1156                                 glTranslatef(t->mval[0], t->mval[1], 0);
1157
1158                                 glLineWidth(3.0);
1159                                 drawArrow(RIGHT, 5, 10, 5);
1160                                 drawArrow(LEFT, 5, 10, 5);
1161                                 glLineWidth(1.0);
1162                                 break;
1163                         case HLP_VARROW:
1164                                 UI_ThemeColor(TH_WIRE);
1165
1166                                 glTranslatef(t->mval[0], t->mval[1], 0);
1167
1168                                 glLineWidth(3.0);
1169                                 glBegin(GL_LINES);
1170                                 drawArrow(UP, 5, 10, 5);
1171                                 drawArrow(DOWN, 5, 10, 5);
1172                                 glLineWidth(1.0);
1173                                 break;
1174                         case HLP_ANGLE:
1175                                 {
1176                                         float dx = t->mval[0] - cent[0], dy = t->mval[1] - cent[1];
1177                                         float angle = atan2f(dy, dx);
1178                                         float dist = sqrtf(dx*dx + dy*dy);
1179                                         float delta_angle = MIN2(15 / dist, M_PI/4);
1180                                         float spacing_angle = MIN2(5 / dist, M_PI/12);
1181                                         UI_ThemeColor(TH_WIRE);
1182
1183                                         setlinestyle(3);
1184                                         glBegin(GL_LINE_STRIP);
1185                                         glVertex2sv(t->mval);
1186                                         glVertex2fv(cent);
1187                                         glEnd();
1188
1189                                         glTranslatef(cent[0], cent[1], 0);
1190
1191                                         setlinestyle(0);
1192                                         glLineWidth(3.0);
1193                                         drawArc(dist, angle - delta_angle, angle - spacing_angle, 10);
1194                                         drawArc(dist, angle + spacing_angle, angle + delta_angle, 10);
1195
1196                                         glPushMatrix();
1197
1198                                         glTranslatef(cosf(angle - delta_angle) * dist, sinf(angle - delta_angle) * dist, 0);
1199                                         glRotatef(180 / M_PI * (angle - delta_angle), 0, 0, 1);
1200
1201                                         drawArrowHead(DOWN, 5);
1202
1203                                         glPopMatrix();
1204
1205                                         glTranslatef(cosf(angle + delta_angle) * dist, sinf(angle + delta_angle) * dist, 0);
1206                                         glRotatef(180 / M_PI * (angle + delta_angle), 0, 0, 1);
1207
1208                                         drawArrowHead(UP, 5);
1209
1210                                         glLineWidth(1.0);
1211                                         break;
1212                                 }
1213                                 case HLP_TRACKBALL:
1214                                 {
1215                                         char col[3], col2[3];
1216                                         UI_GetThemeColor3ubv(TH_GRID, col);
1217
1218                                         glTranslatef(t->mval[0], t->mval[1], 0);
1219
1220                                         glLineWidth(3.0);
1221
1222                                         UI_make_axis_color(col, col2, 'x');
1223                                         glColor3ubv((GLubyte *)col2);
1224
1225                                         drawArrow(RIGHT, 5, 10, 5);
1226                                         drawArrow(LEFT, 5, 10, 5);
1227
1228                                         UI_make_axis_color(col, col2, 'y');
1229                                         glColor3ubv((GLubyte *)col2);
1230
1231                                         drawArrow(UP, 5, 10, 5);
1232                                         drawArrow(DOWN, 5, 10, 5);
1233                                         glLineWidth(1.0);
1234                                         break;
1235                                 }
1236                 }
1237
1238                 glMatrixMode(GL_PROJECTION);
1239                 glPopMatrix();
1240                 glMatrixMode(GL_MODELVIEW);
1241                 glPopMatrix();
1242
1243                 glEnable(GL_DEPTH_TEST);
1244         }
1245 }
1246
1247 void drawTransform(const struct bContext *C, struct ARegion *ar, void *arg)
1248 {
1249         TransInfo *t = arg;
1250
1251         drawConstraint(C, t);
1252         drawPropCircle(C, t);
1253         drawSnapping(C, t);
1254         drawHelpline(C, t);
1255 }
1256
1257 void saveTransform(bContext *C, TransInfo *t, wmOperator *op)
1258 {
1259         ToolSettings *ts = CTX_data_tool_settings(C);
1260         int constraint_axis[3] = {0, 0, 0};
1261         int proportional = 0;
1262
1263         if (RNA_struct_find_property(op->ptr, "value"))
1264         {
1265                 if (t->flag & T_AUTOVALUES)
1266                 {
1267                         RNA_float_set_array(op->ptr, "value", t->auto_values);
1268                 }
1269                 else
1270                 {
1271                         RNA_float_set_array(op->ptr, "value", t->values);
1272                 }
1273         }
1274
1275         /* XXX convert stupid flag to enum */
1276         switch(t->flag & (T_PROP_EDIT|T_PROP_CONNECTED))
1277         {
1278         case (T_PROP_EDIT|T_PROP_CONNECTED):
1279                 proportional = 2;
1280                 break;
1281         case T_PROP_EDIT:
1282                 proportional = 1;
1283                 break;
1284         default:
1285                 proportional = 0;
1286         }
1287
1288         if (RNA_struct_find_property(op->ptr, "proportional"))
1289         {
1290                 RNA_enum_set(op->ptr, "proportional", proportional);
1291                 RNA_enum_set(op->ptr, "proportional_editing_falloff", t->prop_mode);
1292                 RNA_float_set(op->ptr, "proportional_size", t->prop_size);
1293         }
1294
1295         if (RNA_struct_find_property(op->ptr, "mirror"))
1296         {
1297                 RNA_boolean_set(op->ptr, "mirror", t->flag & T_MIRROR);
1298         }
1299
1300         if (RNA_struct_find_property(op->ptr, "constraint_axis"))
1301         {
1302                 RNA_enum_set(op->ptr, "constraint_orientation", t->current_orientation);
1303
1304                 if (t->con.mode & CON_APPLY)
1305                 {
1306                         if (t->con.mode & CON_AXIS0) {
1307                                 constraint_axis[0] = 1;
1308                         }
1309                         if (t->con.mode & CON_AXIS1) {
1310                                 constraint_axis[1] = 1;
1311                         }
1312                         if (t->con.mode & CON_AXIS2) {
1313                                 constraint_axis[2] = 1;
1314                         }
1315                 }
1316
1317                 RNA_boolean_set_array(op->ptr, "constraint_axis", constraint_axis);
1318         }
1319
1320         // XXX If modal, save settings back in scene
1321         if (t->flag & T_MODAL)
1322         {
1323                 ts->prop_mode = t->prop_mode;
1324                 ts->proportional = proportional;
1325
1326                 if(t->spacetype == SPACE_VIEW3D)
1327                 {
1328                         View3D *v3d = t->view;
1329
1330                         v3d->twmode = t->current_orientation;
1331                 }
1332         }
1333 }
1334
1335 int initTransform(bContext *C, TransInfo *t, wmOperator *op, wmEvent *event, int mode)
1336 {
1337         int options = 0;
1338
1339         /* added initialize, for external calls to set stuff in TransInfo, like undo string */
1340
1341         t->state = TRANS_RUNNING;
1342
1343         t->options = options;
1344
1345         t->mode = mode;
1346
1347         if (!initTransInfo(C, t, op, event))                                    // internal data, mouse, vectors
1348         {
1349                 return 0;
1350         }
1351
1352         if(t->spacetype == SPACE_VIEW3D)
1353         {
1354                 //calc_manipulator_stats(curarea);
1355                 initTransformOrientation(C, t);
1356
1357                 t->draw_handle = ED_region_draw_cb_activate(t->ar->type, drawTransform, t, REGION_DRAW_POST);
1358         }
1359         else if(t->spacetype == SPACE_IMAGE) {
1360                 Mat3One(t->spacemtx);
1361                 t->draw_handle = ED_region_draw_cb_activate(t->ar->type, drawTransform, t, REGION_DRAW_POST);
1362         }
1363         else
1364                 Mat3One(t->spacemtx);
1365
1366         createTransData(C, t);                  // make TransData structs from selection
1367
1368         if (t->total == 0) {
1369                 postTrans(t);
1370                 return 0;
1371         }
1372
1373         initSnapping(t, op); // Initialize snapping data AFTER mode flags
1374
1375         /* EVIL! posemode code can switch translation to rotate when 1 bone is selected. will be removed (ton) */
1376         /* EVIL2: we gave as argument also texture space context bit... was cleared */
1377         /* EVIL3: extend mode for animation editors also switches modes... but is best way to avoid duplicate code */
1378         mode = t->mode;
1379
1380         calculatePropRatio(t);
1381         calculateCenter(t);
1382
1383         initMouseInput(t, &t->mouse, t->center2d, t->imval);
1384
1385         switch (mode) {
1386         case TFM_TRANSLATION:
1387                 initTranslation(t);
1388                 break;
1389         case TFM_ROTATION:
1390                 initRotation(t);
1391                 break;
1392         case TFM_RESIZE:
1393                 initResize(t);
1394                 break;
1395         case TFM_TOSPHERE:
1396                 initToSphere(t);
1397                 break;
1398         case TFM_SHEAR:
1399                 initShear(t);
1400                 break;
1401         case TFM_WARP:
1402                 initWarp(t);
1403                 break;
1404         case TFM_SHRINKFATTEN:
1405                 initShrinkFatten(t);
1406                 break;
1407         case TFM_TILT:
1408                 initTilt(t);
1409                 break;
1410         case TFM_CURVE_SHRINKFATTEN:
1411                 initCurveShrinkFatten(t);
1412                 break;
1413         case TFM_TRACKBALL:
1414                 initTrackball(t);
1415                 break;
1416         case TFM_PUSHPULL:
1417                 initPushPull(t);
1418                 break;
1419         case TFM_CREASE:
1420                 initCrease(t);
1421                 break;
1422         case TFM_BONESIZE:
1423                 {       /* used for both B-Bone width (bonesize) as for deform-dist (envelope) */
1424                         bArmature *arm= t->poseobj->data;
1425                         if(arm->drawtype==ARM_ENVELOPE)
1426                                 initBoneEnvelope(t);
1427                         else
1428                                 initBoneSize(t);
1429                 }
1430                 break;
1431         case TFM_BONE_ENVELOPE:
1432                 initBoneEnvelope(t);
1433                 break;
1434         case TFM_EDGE_SLIDE:
1435                 initEdgeSlide(t);
1436                 break;
1437         case TFM_BONE_ROLL:
1438                 initBoneRoll(t);
1439                 break;
1440         case TFM_TIME_TRANSLATE:
1441                 initTimeTranslate(t);
1442                 break;
1443         case TFM_TIME_SLIDE:
1444                 initTimeSlide(t);
1445                 break;
1446         case TFM_TIME_SCALE:
1447                 initTimeScale(t);
1448                 break;
1449         case TFM_TIME_EXTEND:
1450                 /* now that transdata has been made, do like for TFM_TIME_TRANSLATE (for most Animation
1451                  * Editors because they have only 1D transforms for time values) or TFM_TRANSLATION
1452                  * (for Graph/NLA Editors only since they uses 'standard' transforms to get 2D movement)
1453                  * depending on which editor this was called from
1454                  */
1455                 if ELEM(t->spacetype, SPACE_IPO, SPACE_NLA)
1456                         initTranslation(t);
1457                 else
1458                         initTimeTranslate(t);
1459                 break;
1460         case TFM_BAKE_TIME:
1461                 initBakeTime(t);
1462                 break;
1463         case TFM_MIRROR:
1464                 initMirror(t);
1465                 break;
1466         case TFM_BEVEL:
1467                 initBevel(t);
1468                 break;
1469         case TFM_BWEIGHT:
1470                 initBevelWeight(t);
1471                 break;
1472         case TFM_ALIGN:
1473                 initAlign(t);
1474                 break;
1475         }
1476
1477         /* overwrite initial values if operator supplied a non-null vector */
1478         if (RNA_property_is_set(op->ptr, "value"))
1479         {
1480                 float values[4];
1481                 RNA_float_get_array(op->ptr, "value", values);
1482                 QUATCOPY(t->values, values);
1483                 QUATCOPY(t->auto_values, values);
1484                 t->flag |= T_AUTOVALUES;
1485         }
1486
1487         /* Constraint init from operator */
1488         if (RNA_struct_find_property(op->ptr, "constraint_axis") && RNA_property_is_set(op->ptr, "constraint_axis"))
1489         {
1490                 int constraint_axis[3];
1491
1492                 RNA_boolean_get_array(op->ptr, "constraint_axis", constraint_axis);
1493
1494                 if (constraint_axis[0] || constraint_axis[1] || constraint_axis[2])
1495                 {
1496                         t->con.mode |= CON_APPLY;
1497
1498                         if (constraint_axis[0]) {
1499                                 t->con.mode |= CON_AXIS0;
1500                         }
1501                         if (constraint_axis[1]) {
1502                                 t->con.mode |= CON_AXIS1;
1503                         }
1504                         if (constraint_axis[2]) {
1505                                 t->con.mode |= CON_AXIS2;
1506                         }
1507
1508                         setUserConstraint(t, t->con.mode, "%s");
1509                 }
1510         }
1511
1512         return 1;
1513 }
1514
1515 void transformApply(bContext *C, TransInfo *t)
1516 {
1517         if (t->redraw)
1518         {
1519                 if (t->modifiers & MOD_CONSTRAINT_SELECT)
1520                         t->con.mode |= CON_SELECT;
1521
1522                 selectConstraint(t);
1523                 if (t->transform) {
1524                         t->transform(t, t->mval);  // calls recalcData()
1525                         viewRedrawForce(C, t);
1526                 }
1527                 t->redraw = 0;
1528         }
1529
1530         /* If auto confirm is on, break after one pass */
1531         if (t->options & CTX_AUTOCONFIRM)
1532         {
1533                 t->state = TRANS_CONFIRM;
1534         }
1535
1536         if (BKE_ptcache_get_continue_physics())
1537         {
1538                 // TRANSFORM_FIX_ME
1539                 //do_screenhandlers(G.curscreen);
1540                 t->redraw = 1;
1541         }
1542 }
1543
1544 int transformEnd(bContext *C, TransInfo *t)
1545 {
1546         int exit_code = OPERATOR_RUNNING_MODAL;
1547
1548         if (t->state != TRANS_RUNNING)
1549         {
1550                 /* handle restoring objects */
1551                 if(t->state == TRANS_CANCEL)
1552                 {
1553                         exit_code = OPERATOR_CANCELLED;
1554                         restoreTransObjects(t); // calls recalcData()
1555                 }
1556                 else
1557                 {
1558                         exit_code = OPERATOR_FINISHED;
1559                 }
1560
1561                 /* free data */
1562                 postTrans(t);
1563
1564                 /* aftertrans does insert keyframes, and clears base flags, doesnt read transdata */
1565                 special_aftertrans_update(t);
1566
1567                 /* send events out for redraws */
1568                 viewRedrawPost(t);
1569
1570                 /*  Undo as last, certainly after special_trans_update! */
1571
1572                 if(t->state == TRANS_CANCEL) {
1573 //                      if(t->undostr) ED_undo_push(C, t->undostr);
1574                 }
1575                 else {
1576 //                      if(t->undostr) ED_undo_push(C, t->undostr);
1577 //                      else ED_undo_push(C, transform_to_undostr(t));
1578                 }
1579                 t->undostr= NULL;
1580
1581                 viewRedrawForce(C, t);
1582         }
1583
1584         return exit_code;
1585 }
1586
1587 /* ************************** TRANSFORM LOCKS **************************** */
1588
1589 static void protectedTransBits(short protectflag, float *vec)
1590 {
1591         if(protectflag & OB_LOCK_LOCX)
1592                 vec[0]= 0.0f;
1593         if(protectflag & OB_LOCK_LOCY)
1594                 vec[1]= 0.0f;
1595         if(protectflag & OB_LOCK_LOCZ)
1596                 vec[2]= 0.0f;
1597 }
1598
1599 static void protectedSizeBits(short protectflag, float *size)
1600 {
1601         if(protectflag & OB_LOCK_SCALEX)
1602                 size[0]= 1.0f;
1603         if(protectflag & OB_LOCK_SCALEY)
1604                 size[1]= 1.0f;
1605         if(protectflag & OB_LOCK_SCALEZ)
1606                 size[2]= 1.0f;
1607 }
1608
1609 static void protectedRotateBits(short protectflag, float *eul, float *oldeul)
1610 {
1611         if(protectflag & OB_LOCK_ROTX)
1612                 eul[0]= oldeul[0];
1613         if(protectflag & OB_LOCK_ROTY)
1614                 eul[1]= oldeul[1];
1615         if(protectflag & OB_LOCK_ROTZ)
1616                 eul[2]= oldeul[2];
1617 }
1618
1619
1620 /* this function only does the delta rotation */
1621 /* axis-angle is usually internally stored as quats... */
1622 static void protectedAxisAngleBits(short protectflag, float *quat, float *oldquat)
1623 {
1624         /* check that protection flags are set */
1625         if ((protectflag & (OB_LOCK_ROTX|OB_LOCK_ROTY|OB_LOCK_ROTZ|OB_LOCK_ROTW)) == 0)
1626                 return;
1627         
1628         if (protectflag & OB_LOCK_ROT4D) {
1629                 /* axis-angle getting limited as 4D entities that they are... */
1630                 if (protectflag & OB_LOCK_ROTW)
1631                         quat[0]= oldquat[0];
1632                 if (protectflag & OB_LOCK_ROTX)
1633                         quat[1]= oldquat[1];
1634                 if (protectflag & OB_LOCK_ROTY)
1635                         quat[2]= oldquat[2];
1636                 if (protectflag & OB_LOCK_ROTZ)
1637                         quat[3]= oldquat[3];
1638         }
1639         else {
1640                 /* axis-angle get limited with euler... */
1641                 float eul[3], oldeul[3], quat1[4];
1642                 
1643                 QUATCOPY(quat1, quat);
1644                 AxisAngleToEulO(quat+1, quat[0], eul, EULER_ORDER_DEFAULT);
1645                 AxisAngleToEulO(oldquat+1, oldquat[0], oldeul, EULER_ORDER_DEFAULT);
1646                 
1647                 if (protectflag & OB_LOCK_ROTX)
1648                         eul[0]= oldeul[0];
1649                 if (protectflag & OB_LOCK_ROTY)
1650                         eul[1]= oldeul[1];
1651                 if (protectflag & OB_LOCK_ROTZ)
1652                         eul[2]= oldeul[2];
1653                 
1654                 EulOToAxisAngle(eul, EULER_ORDER_DEFAULT, quat+1, quat);
1655                 
1656                 /* when converting to axis-angle, we need a special exception for the case when there is no axis */
1657                 if (IS_EQ(quat[1], quat[2]) && IS_EQ(quat[2], quat[3])) {
1658                         /* for now, rotate around y-axis then (so that it simply becomes the roll) */
1659                         quat[2]= 1.0f;
1660                 }
1661         }
1662 }
1663
1664 /* this function only does the delta rotation */
1665 static void protectedQuaternionBits(short protectflag, float *quat, float *oldquat)
1666 {
1667         /* check that protection flags are set */
1668         if ((protectflag & (OB_LOCK_ROTX|OB_LOCK_ROTY|OB_LOCK_ROTZ|OB_LOCK_ROTW)) == 0)
1669                 return;
1670         
1671         if (protectflag & OB_LOCK_ROT4D) {
1672                 /* quaternions getting limited as 4D entities that they are... */
1673                 if (protectflag & OB_LOCK_ROTW)
1674                         quat[0]= oldquat[0];
1675                 if (protectflag & OB_LOCK_ROTX)
1676                         quat[1]= oldquat[1];
1677                 if (protectflag & OB_LOCK_ROTY)
1678                         quat[2]= oldquat[2];
1679                 if (protectflag & OB_LOCK_ROTZ)
1680                         quat[3]= oldquat[3];
1681         }
1682         else {
1683                 /* quaternions get limited with euler... (compatability mode) */
1684                 float eul[3], oldeul[3], quat1[4];
1685                 
1686                 QUATCOPY(quat1, quat);
1687                 QuatToEul(quat, eul);
1688                 QuatToEul(oldquat, oldeul);
1689                 
1690                 if (protectflag & OB_LOCK_ROTX)
1691                         eul[0]= oldeul[0];
1692                 if (protectflag & OB_LOCK_ROTY)
1693                         eul[1]= oldeul[1];
1694                 if (protectflag & OB_LOCK_ROTZ)
1695                         eul[2]= oldeul[2];
1696                 
1697                 EulToQuat(eul, quat);
1698                 
1699                 /* quaternions flip w sign to accumulate rotations correctly */
1700                 if ( (quat1[0]<0.0f && quat[0]>0.0f) || (quat1[0]>0.0f && quat[0]<0.0f) ) {
1701                         QuatMulf(quat, -1.0f);
1702                 }
1703         }
1704 }
1705
1706 /* ******************* TRANSFORM LIMITS ********************** */
1707
1708 static void constraintTransLim(TransInfo *t, TransData *td)
1709 {
1710         if (td->con) {
1711                 bConstraintTypeInfo *cti= get_constraint_typeinfo(CONSTRAINT_TYPE_LOCLIMIT);
1712                 bConstraintOb cob;
1713                 bConstraint *con;
1714
1715                 /* Make a temporary bConstraintOb for using these limit constraints
1716                  *      - they only care that cob->matrix is correctly set ;-)
1717                  *      - current space should be local
1718                  */
1719                 memset(&cob, 0, sizeof(bConstraintOb));
1720                 Mat4One(cob.matrix);
1721                 if (td->tdi) {
1722                         TransDataIpokey *tdi= td->tdi;
1723                         cob.matrix[3][0]= tdi->locx[0];
1724                         cob.matrix[3][1]= tdi->locy[0];
1725                         cob.matrix[3][2]= tdi->locz[0];
1726                 }
1727                 else {
1728                         VECCOPY(cob.matrix[3], td->loc);
1729                 }
1730
1731                 /* Evaluate valid constraints */
1732                 for (con= td->con; con; con= con->next) {
1733                         float tmat[4][4];
1734
1735                         /* only consider constraint if enabled */
1736                         if (con->flag & CONSTRAINT_DISABLE) continue;
1737                         if (con->enforce == 0.0f) continue;
1738
1739                         /* only use it if it's tagged for this purpose (and the right type) */
1740                         if (con->type == CONSTRAINT_TYPE_LOCLIMIT) {
1741                                 bLocLimitConstraint *data= con->data;
1742
1743                                 if ((data->flag2 & LIMIT_TRANSFORM)==0)
1744                                         continue;
1745
1746                                 /* do space conversions */
1747                                 if (con->ownspace == CONSTRAINT_SPACE_WORLD) {
1748                                         /* just multiply by td->mtx (this should be ok) */
1749                                         Mat4CpyMat4(tmat, cob.matrix);
1750                                         Mat4MulMat34(cob.matrix, td->mtx, tmat);
1751                                 }
1752                                 else if (con->ownspace != CONSTRAINT_SPACE_LOCAL) {
1753                                         /* skip... incompatable spacetype */
1754                                         continue;
1755                                 }
1756
1757                                 /* do constraint */
1758                                 cti->evaluate_constraint(con, &cob, NULL);
1759
1760                                 /* convert spaces again */
1761                                 if (con->ownspace == CONSTRAINT_SPACE_WORLD) {
1762                                         /* just multiply by td->mtx (this should be ok) */
1763                                         Mat4CpyMat4(tmat, cob.matrix);
1764                                         Mat4MulMat34(cob.matrix, td->smtx, tmat);
1765                                 }
1766                         }
1767                 }
1768
1769                 /* copy results from cob->matrix */
1770                 if (td->tdi) {
1771                         TransDataIpokey *tdi= td->tdi;
1772                         tdi->locx[0]= cob.matrix[3][0];
1773                         tdi->locy[0]= cob.matrix[3][1];
1774                         tdi->locz[0]= cob.matrix[3][2];
1775                 }
1776                 else {
1777                         VECCOPY(td->loc, cob.matrix[3]);
1778                 }
1779         }
1780 }
1781
1782 static void constraintRotLim(TransInfo *t, TransData *td)
1783 {
1784         if (td->con) {
1785                 bConstraintTypeInfo *cti= get_constraint_typeinfo(CONSTRAINT_TYPE_ROTLIMIT);
1786                 bConstraintOb cob;
1787                 bConstraint *con;
1788
1789                 /* Make a temporary bConstraintOb for using these limit constraints
1790                  *      - they only care that cob->matrix is correctly set ;-)
1791                  *      - current space should be local
1792                  */
1793                 memset(&cob, 0, sizeof(bConstraintOb));
1794                 if (td->flag & TD_USEQUAT) {
1795                         /* quats */
1796                         if (td->ext)
1797                                 QuatToMat4(td->ext->quat, cob.matrix);
1798                         else
1799                                 return;
1800                 }
1801                 else if (td->tdi) { // XXX depreceated
1802                         /* ipo-keys eulers */
1803                         TransDataIpokey *tdi= td->tdi;
1804                         float eul[3];
1805                         
1806                         eul[0]= tdi->rotx[0];
1807                         eul[1]= tdi->roty[0];
1808                         eul[2]= tdi->rotz[0];
1809                         
1810                         EulOToMat4(eul, td->rotOrder, cob.matrix);
1811                 }
1812                 else if (td->rotOrder == PCHAN_ROT_AXISANGLE) {
1813                         /* axis angle */
1814                         if (td->ext)
1815                                 AxisAngleToMat4(&td->ext->quat[1], td->ext->quat[0], cob.matrix);
1816                         else
1817                                 return;
1818                 }
1819                 else {
1820                         /* eulers */
1821                         if (td->ext)
1822                                 EulOToMat4(td->ext->rot, td->rotOrder, cob.matrix);
1823                         else
1824                                 return;
1825                 }
1826                 
1827                 /* Evaluate valid constraints */
1828                 for (con= td->con; con; con= con->next) {
1829                         /* only consider constraint if enabled */
1830                         if (con->flag & CONSTRAINT_DISABLE) continue;
1831                         if (con->enforce == 0.0f) continue;
1832                         
1833                         /* we're only interested in Limit-Rotation constraints */
1834                         if (con->type == CONSTRAINT_TYPE_ROTLIMIT) {
1835                                 bRotLimitConstraint *data= con->data;
1836                                 float tmat[4][4];
1837                                 
1838                                 /* only use it if it's tagged for this purpose */
1839                                 if ((data->flag2 & LIMIT_TRANSFORM)==0)
1840                                         continue;
1841                                 
1842                                 /* do space conversions */
1843                                 if (con->ownspace == CONSTRAINT_SPACE_WORLD) {
1844                                         /* just multiply by td->mtx (this should be ok) */
1845                                         Mat4CpyMat4(tmat, cob.matrix);
1846                                         Mat4MulMat34(cob.matrix, td->mtx, tmat);
1847                                 }
1848                                 else if (con->ownspace != CONSTRAINT_SPACE_LOCAL) {
1849                                         /* skip... incompatable spacetype */
1850                                         continue;
1851                                 }
1852                                 
1853                                 /* do constraint */
1854                                 cti->evaluate_constraint(con, &cob, NULL);
1855                                 
1856                                 /* convert spaces again */
1857                                 if (con->ownspace == CONSTRAINT_SPACE_WORLD) {
1858                                         /* just multiply by td->mtx (this should be ok) */
1859                                         Mat4CpyMat4(tmat, cob.matrix);
1860                                         Mat4MulMat34(cob.matrix, td->smtx, tmat);
1861                                 }
1862                         }
1863                 }
1864                 
1865                 /* copy results from cob->matrix */
1866                 if (td->flag & TD_USEQUAT) {
1867                         /* quats */
1868                         Mat4ToQuat(cob.matrix, td->ext->quat);
1869                 }
1870                 else if (td->tdi) {
1871                         /* ipo-keys eulers */
1872                         TransDataIpokey *tdi= td->tdi;
1873                         float eul[3];
1874                         
1875                         Mat4ToEulO(cob.matrix, eul, td->rotOrder);
1876                         
1877                         tdi->rotx[0]= eul[0];
1878                         tdi->roty[0]= eul[1];
1879                         tdi->rotz[0]= eul[2];
1880                 }
1881                 else if (td->rotOrder == PCHAN_ROT_AXISANGLE) {
1882                         /* axis angle */
1883                         Mat4ToAxisAngle(cob.matrix, &td->ext->quat[1], &td->ext->quat[0]);
1884                 }
1885                 else {
1886                         /* eulers */
1887                         Mat4ToEulO(cob.matrix, td->ext->rot, td->rotOrder);
1888                 }
1889         }
1890 }
1891
1892 static void constraintSizeLim(TransInfo *t, TransData *td)
1893 {
1894         if (td->con && td->ext) {
1895                 bConstraintTypeInfo *cti= get_constraint_typeinfo(CONSTRAINT_TYPE_SIZELIMIT);
1896                 bConstraintOb cob;
1897                 bConstraint *con;
1898
1899                 /* Make a temporary bConstraintOb for using these limit constraints
1900                  *      - they only care that cob->matrix is correctly set ;-)
1901                  *      - current space should be local
1902                  */
1903                 memset(&cob, 0, sizeof(bConstraintOb));
1904                 if (td->tdi) {
1905                         TransDataIpokey *tdi= td->tdi;
1906                         float size[3];
1907
1908                         size[0]= tdi->sizex[0];
1909                         size[1]= tdi->sizey[0];
1910                         size[2]= tdi->sizez[0];
1911                         SizeToMat4(size, cob.matrix);
1912                 }
1913                 else if ((td->flag & TD_SINGLESIZE) && !(t->con.mode & CON_APPLY)) {
1914                         /* scale val and reset size */
1915                         return; // TODO: fix this case
1916                 }
1917                 else {
1918                         /* Reset val if SINGLESIZE but using a constraint */
1919                         if (td->flag & TD_SINGLESIZE)
1920                                 return;
1921
1922                         SizeToMat4(td->ext->size, cob.matrix);
1923                 }
1924
1925                 /* Evaluate valid constraints */
1926                 for (con= td->con; con; con= con->next) {
1927                         /* only consider constraint if enabled */
1928                         if (con->flag & CONSTRAINT_DISABLE) continue;
1929                         if (con->enforce == 0.0f) continue;
1930
1931                         /* we're only interested in Limit-Scale constraints */
1932                         if (con->type == CONSTRAINT_TYPE_SIZELIMIT) {
1933                                 bSizeLimitConstraint *data= con->data;
1934                                 float tmat[4][4];
1935
1936                                 /* only use it if it's tagged for this purpose */
1937                                 if ((data->flag2 & LIMIT_TRANSFORM)==0)
1938                                         continue;
1939
1940                                 /* do space conversions */
1941                                 if (con->ownspace == CONSTRAINT_SPACE_WORLD) {
1942                                         /* just multiply by td->mtx (this should be ok) */
1943                                         Mat4CpyMat4(tmat, cob.matrix);
1944                                         Mat4MulMat34(cob.matrix, td->mtx, tmat);
1945                                 }
1946                                 else if (con->ownspace != CONSTRAINT_SPACE_LOCAL) {
1947                                         /* skip... incompatable spacetype */
1948                                         continue;
1949                                 }
1950
1951                                 /* do constraint */
1952                                 cti->evaluate_constraint(con, &cob, NULL);
1953
1954                                 /* convert spaces again */
1955                                 if (con->ownspace == CONSTRAINT_SPACE_WORLD) {
1956                                         /* just multiply by td->mtx (this should be ok) */
1957                                         Mat4CpyMat4(tmat, cob.matrix);
1958                                         Mat4MulMat34(cob.matrix, td->smtx, tmat);
1959                                 }
1960                         }
1961                 }
1962
1963                 /* copy results from cob->matrix */
1964                 if (td->tdi) {
1965                         TransDataIpokey *tdi= td->tdi;
1966                         float size[3];
1967
1968                         Mat4ToSize(cob.matrix, size);
1969
1970                         tdi->sizex[0]= size[0];
1971                         tdi->sizey[0]= size[1];
1972                         tdi->sizez[0]= size[2];
1973                 }
1974                 else if ((td->flag & TD_SINGLESIZE) && !(t->con.mode & CON_APPLY)) {
1975                         /* scale val and reset size */
1976                         return; // TODO: fix this case
1977                 }
1978                 else {
1979                         /* Reset val if SINGLESIZE but using a constraint */
1980                         if (td->flag & TD_SINGLESIZE)
1981                                 return;
1982
1983                         Mat4ToSize(cob.matrix, td->ext->size);
1984                 }
1985         }
1986 }
1987
1988 /* ************************** WARP *************************** */
1989
1990 void initWarp(TransInfo *t)
1991 {
1992         float max[3], min[3];
1993         int i;
1994
1995         t->mode = TFM_WARP;
1996         t->transform = Warp;
1997         t->handleEvent = handleEventWarp;
1998
1999         initMouseInputMode(t, &t->mouse, INPUT_HORIZONTAL_RATIO);
2000
2001         t->idx_max = 0;
2002         t->num.idx_max = 0;
2003         t->snap[0] = 0.0f;
2004         t->snap[1] = 5.0f;
2005         t->snap[2] = 1.0f;
2006
2007         t->flag |= T_NO_CONSTRAINT;
2008
2009         /* we need min/max in view space */
2010         for(i = 0; i < t->total; i++) {
2011                 float center[3];
2012                 VECCOPY(center, t->data[i].center);
2013                 Mat3MulVecfl(t->data[i].mtx, center);
2014                 Mat4MulVecfl(t->viewmat, center);
2015                 VecSubf(center, center, t->viewmat[3]);
2016                 if (i)
2017                         MinMax3(min, max, center);
2018                 else {
2019                         VECCOPY(max, center);
2020                         VECCOPY(min, center);
2021                 }
2022         }
2023
2024         t->center[0]= (min[0]+max[0])/2.0f;
2025         t->center[1]= (min[1]+max[1])/2.0f;
2026         t->center[2]= (min[2]+max[2])/2.0f;
2027
2028         if (max[0] == min[0]) max[0] += 0.1; /* not optimal, but flipping is better than invalid garbage (i.e. division by zero!) */
2029         t->val= (max[0]-min[0])/2.0f; /* t->val is X dimension projected boundbox */
2030 }
2031
2032 int handleEventWarp(TransInfo *t, wmEvent *event)
2033 {
2034         int status = 0;
2035
2036         if (event->type == MIDDLEMOUSE && event->val==KM_PRESS)
2037         {
2038                 // Use customData pointer to signal warp direction
2039                 if      (t->customData == 0)
2040                         t->customData = (void*)1;
2041                 else
2042                         t->customData = 0;
2043
2044                 status = 1;
2045         }
2046
2047         return status;
2048 }
2049
2050 int Warp(TransInfo *t, short mval[2])
2051 {
2052         TransData *td = t->data;
2053         float vec[3], circumfac, dist, phi0, co, si, *curs, cursor[3], gcursor[3];
2054         int i;
2055         char str[50];
2056
2057         curs= give_cursor(t->scene, t->view);
2058         /*
2059          * gcursor is the one used for helpline.
2060          * It has to be in the same space as the drawing loop
2061          * (that means it needs to be in the object's space when in edit mode and
2062          *  in global space in object mode)
2063          *
2064          * cursor is used for calculations.
2065          * It needs to be in view space, but we need to take object's offset
2066          * into account if in Edit mode.
2067          */
2068         VECCOPY(cursor, curs);
2069         VECCOPY(gcursor, cursor);
2070         if (t->flag & T_EDIT) {
2071                 VecSubf(cursor, cursor, t->obedit->obmat[3]);
2072                 VecSubf(gcursor, gcursor, t->obedit->obmat[3]);
2073                 Mat3MulVecfl(t->data->smtx, gcursor);
2074         }
2075         Mat4MulVecfl(t->viewmat, cursor);
2076         VecSubf(cursor, cursor, t->viewmat[3]);
2077
2078         /* amount of degrees for warp */
2079         circumfac = 360.0f * t->values[0];
2080
2081         if (t->customData) /* non-null value indicates reversed input */
2082         {
2083                 circumfac *= -1;
2084         }
2085
2086         snapGrid(t, &circumfac);
2087         applyNumInput(&t->num, &circumfac);
2088
2089         /* header print for NumInput */
2090         if (hasNumInput(&t->num)) {
2091                 char c[20];
2092
2093                 outputNumInput(&(t->num), c);
2094
2095                 sprintf(str, "Warp: %s", c);
2096         }
2097         else {
2098                 /* default header print */
2099                 sprintf(str, "Warp: %.3f", circumfac);
2100         }
2101
2102         circumfac*= (float)(-M_PI/360.0);
2103
2104         for(i = 0; i < t->total; i++, td++) {
2105                 float loc[3];
2106                 if (td->flag & TD_NOACTION)
2107                         break;
2108
2109                 if (td->flag & TD_SKIP)
2110                         continue;
2111
2112                 /* translate point to center, rotate in such a way that outline==distance */
2113                 VECCOPY(vec, td->iloc);
2114                 Mat3MulVecfl(td->mtx, vec);
2115                 Mat4MulVecfl(t->viewmat, vec);
2116                 VecSubf(vec, vec, t->viewmat[3]);
2117
2118                 dist= vec[0]-cursor[0];
2119
2120                 /* t->val is X dimension projected boundbox */
2121                 phi0= (circumfac*dist/t->val);
2122
2123                 vec[1]= (vec[1]-cursor[1]);
2124
2125                 co= (float)cos(phi0);
2126                 si= (float)sin(phi0);
2127                 loc[0]= -si*vec[1]+cursor[0];
2128                 loc[1]= co*vec[1]+cursor[1];
2129                 loc[2]= vec[2];
2130
2131                 Mat4MulVecfl(t->viewinv, loc);
2132                 VecSubf(loc, loc, t->viewinv[3]);
2133                 Mat3MulVecfl(td->smtx, loc);
2134
2135                 VecSubf(loc, loc, td->iloc);
2136                 VecMulf(loc, td->factor);
2137                 VecAddf(td->loc, td->iloc, loc);
2138         }
2139
2140         recalcData(t);
2141
2142         ED_area_headerprint(t->sa, str);
2143
2144         return 1;
2145 }
2146
2147 /* ************************** SHEAR *************************** */
2148
2149 void initShear(TransInfo *t)
2150 {
2151         t->mode = TFM_SHEAR;
2152         t->transform = Shear;
2153         t->handleEvent = handleEventShear;
2154
2155         initMouseInputMode(t, &t->mouse, INPUT_HORIZONTAL_ABSOLUTE);
2156
2157         t->idx_max = 0;
2158         t->num.idx_max = 0;
2159         t->snap[0] = 0.0f;
2160         t->snap[1] = 0.1f;
2161         t->snap[2] = t->snap[1] * 0.1f;
2162
2163         t->flag |= T_NO_CONSTRAINT;
2164 }
2165
2166 int handleEventShear(TransInfo *t, wmEvent *event)
2167 {
2168         int status = 0;
2169
2170         if (event->type == MIDDLEMOUSE && event->val==KM_PRESS)
2171         {
2172                 // Use customData pointer to signal Shear direction
2173                 if      (t->customData == 0)
2174                 {
2175                         initMouseInputMode(t, &t->mouse, INPUT_VERTICAL_ABSOLUTE);
2176                         t->customData = (void*)1;
2177                 }
2178                 else
2179                 {
2180                         initMouseInputMode(t, &t->mouse, INPUT_HORIZONTAL_ABSOLUTE);
2181                         t->customData = 0;
2182                 }
2183
2184                 status = 1;
2185         }
2186
2187         return status;
2188 }
2189
2190
2191 int Shear(TransInfo *t, short mval[2])
2192 {
2193         TransData *td = t->data;
2194         float vec[3];
2195         float smat[3][3], tmat[3][3], totmat[3][3], persmat[3][3], persinv[3][3];
2196         float value;
2197         int i;
2198         char str[50];
2199
2200         Mat3CpyMat4(persmat, t->viewmat);
2201         Mat3Inv(persinv, persmat);
2202
2203         value = 0.05f * t->values[0];
2204
2205         snapGrid(t, &value);
2206
2207         applyNumInput(&t->num, &value);
2208
2209         /* header print for NumInput */
2210         if (hasNumInput(&t->num)) {
2211                 char c[20];
2212
2213                 outputNumInput(&(t->num), c);
2214
2215                 sprintf(str, "Shear: %s %s", c, t->proptext);
2216         }
2217         else {
2218                 /* default header print */
2219                 sprintf(str, "Shear: %.3f %s", value, t->proptext);
2220         }
2221
2222         Mat3One(smat);
2223
2224         // Custom data signals shear direction
2225         if (t->customData == 0)
2226                 smat[1][0] = value;
2227         else
2228                 smat[0][1] = value;
2229
2230         Mat3MulMat3(tmat, smat, persmat);
2231         Mat3MulMat3(totmat, persinv, tmat);
2232
2233         for(i = 0 ; i < t->total; i++, td++) {
2234                 if (td->flag & TD_NOACTION)
2235                         break;
2236
2237                 if (td->flag & TD_SKIP)
2238                         continue;
2239
2240                 if (t->obedit) {
2241                         float mat3[3][3];
2242                         Mat3MulMat3(mat3, totmat, td->mtx);
2243                         Mat3MulMat3(tmat, td->smtx, mat3);
2244                 }
2245                 else {
2246                         Mat3CpyMat3(tmat, totmat);
2247                 }
2248                 VecSubf(vec, td->center, t->center);
2249
2250                 Mat3MulVecfl(tmat, vec);
2251
2252                 VecAddf(vec, vec, t->center);
2253                 VecSubf(vec, vec, td->center);
2254
2255                 VecMulf(vec, td->factor);
2256
2257                 VecAddf(td->loc, td->iloc, vec);
2258         }
2259
2260         recalcData(t);
2261
2262         ED_area_headerprint(t->sa, str);
2263
2264         return 1;
2265 }
2266
2267 /* ************************** RESIZE *************************** */
2268
2269 void initResize(TransInfo *t)
2270 {
2271         t->mode = TFM_RESIZE;
2272         t->transform = Resize;
2273
2274         initMouseInputMode(t, &t->mouse, INPUT_SPRING_FLIP);
2275
2276         t->flag |= T_NULL_ONE;
2277         t->num.flag |= NUM_NULL_ONE;
2278         t->num.flag |= NUM_AFFECT_ALL;
2279         if (!t->obedit) {
2280                 t->flag |= T_NO_ZERO;
2281                 t->num.flag |= NUM_NO_ZERO;
2282         }
2283
2284         t->idx_max = 2;
2285         t->num.idx_max = 2;
2286         t->snap[0] = 0.0f;
2287         t->snap[1] = 0.1f;
2288         t->snap[2] = t->snap[1] * 0.1f;
2289 }
2290
2291 static void headerResize(TransInfo *t, float vec[3], char *str) {
2292         char tvec[60];
2293         if (hasNumInput(&t->num)) {
2294                 outputNumInput(&(t->num), tvec);
2295         }
2296         else {
2297                 sprintf(&tvec[0], "%.4f", vec[0]);
2298                 sprintf(&tvec[20], "%.4f", vec[1]);
2299                 sprintf(&tvec[40], "%.4f", vec[2]);
2300         }
2301
2302         if (t->con.mode & CON_APPLY) {
2303                 switch(t->num.idx_max) {
2304                 case 0:
2305                         sprintf(str, "Scale: %s%s %s", &tvec[0], t->con.text, t->proptext);
2306                         break;
2307                 case 1:
2308                         sprintf(str, "Scale: %s : %s%s %s", &tvec[0], &tvec[20], t->con.text, t->proptext);
2309                         break;
2310                 case 2:
2311                         sprintf(str, "Scale: %s : %s : %s%s %s", &tvec[0], &tvec[20], &tvec[40], t->con.text, t->proptext);
2312                 }
2313         }
2314         else {
2315                 if (t->flag & T_2D_EDIT)
2316                         sprintf(str, "Scale X: %s   Y: %s%s %s", &tvec[0], &tvec[20], t->con.text, t->proptext);
2317                 else
2318                         sprintf(str, "Scale X: %s   Y: %s  Z: %s%s %s", &tvec[0], &tvec[20], &tvec[40], t->con.text, t->proptext);
2319         }
2320 }
2321
2322 #define SIGN(a)         (a<-FLT_EPSILON?1:a>FLT_EPSILON?2:3)
2323 #define VECSIGNFLIP(a, b) ((SIGN(a[0]) & SIGN(b[0]))==0 || (SIGN(a[1]) & SIGN(b[1]))==0 || (SIGN(a[2]) & SIGN(b[2]))==0)
2324
2325 /* smat is reference matrix, only scaled */
2326 static void TransMat3ToSize( float mat[][3], float smat[][3], float *size)
2327 {
2328         float vec[3];
2329
2330         VecCopyf(vec, mat[0]);
2331         size[0]= Normalize(vec);
2332         VecCopyf(vec, mat[1]);
2333         size[1]= Normalize(vec);
2334         VecCopyf(vec, mat[2]);
2335         size[2]= Normalize(vec);
2336
2337         /* first tried with dotproduct... but the sign flip is crucial */
2338         if( VECSIGNFLIP(mat[0], smat[0]) ) size[0]= -size[0];
2339         if( VECSIGNFLIP(mat[1], smat[1]) ) size[1]= -size[1];
2340         if( VECSIGNFLIP(mat[2], smat[2]) ) size[2]= -size[2];
2341 }
2342
2343
2344 static void ElementResize(TransInfo *t, TransData *td, float mat[3][3]) {
2345         float tmat[3][3], smat[3][3], center[3];
2346         float vec[3];
2347
2348         if (t->flag & T_EDIT) {
2349                 Mat3MulMat3(smat, mat, td->mtx);
2350                 Mat3MulMat3(tmat, td->smtx, smat);
2351         }
2352         else {
2353                 Mat3CpyMat3(tmat, mat);
2354         }
2355
2356         if (t->con.applySize) {
2357                 t->con.applySize(t, td, tmat);
2358         }
2359
2360         /* local constraint shouldn't alter center */
2361         if (t->around == V3D_LOCAL) {
2362                 if (t->flag & T_OBJECT) {
2363                         VECCOPY(center, td->center);
2364                 }
2365                 else if (t->flag & T_EDIT) {
2366
2367                         if(t->around==V3D_LOCAL && (t->settings->selectmode & SCE_SELECT_FACE)) {
2368                                 VECCOPY(center, td->center);
2369                         }
2370                         else {
2371                                 VECCOPY(center, t->center);
2372                         }
2373                 }
2374                 else {
2375                         VECCOPY(center, t->center);
2376                 }
2377         }
2378         else {
2379                 VECCOPY(center, t->center);
2380         }
2381
2382         if (td->ext) {
2383                 float fsize[3];
2384
2385                 if (t->flag & (T_OBJECT|T_TEXTURE|T_POSE)) {
2386                         float obsizemat[3][3];
2387                         // Reorient the size mat to fit the oriented object.
2388                         Mat3MulMat3(obsizemat, tmat, td->axismtx);
2389                         //printmatrix3("obsizemat", obsizemat);
2390                         TransMat3ToSize(obsizemat, td->axismtx, fsize);
2391                         //printvecf("fsize", fsize);
2392                 }
2393                 else {
2394                         Mat3ToSize(tmat, fsize);
2395                 }
2396
2397                 protectedSizeBits(td->protectflag, fsize);
2398
2399                 if ((t->flag & T_V3D_ALIGN)==0) {       // align mode doesn't resize objects itself
2400                         /* handle ipokeys? */
2401                         if(td->tdi) {
2402                                 TransDataIpokey *tdi= td->tdi;
2403                                 /* calculate delta size (equal for size and dsize) */
2404
2405                                 vec[0]= (tdi->oldsize[0])*(fsize[0] -1.0f) * td->factor;
2406                                 vec[1]= (tdi->oldsize[1])*(fsize[1] -1.0f) * td->factor;
2407                                 vec[2]= (tdi->oldsize[2])*(fsize[2] -1.0f) * td->factor;
2408
2409                                 add_tdi_poin(tdi->sizex, tdi->oldsize,   vec[0]);
2410                                 add_tdi_poin(tdi->sizey, tdi->oldsize+1, vec[1]);
2411                                 add_tdi_poin(tdi->sizez, tdi->oldsize+2, vec[2]);
2412
2413                         }
2414                         else if((td->flag & TD_SINGLESIZE) && !(t->con.mode & CON_APPLY)){
2415                                 /* scale val and reset size */
2416                                 *td->val = td->ival * fsize[0] * td->factor;
2417
2418                                 td->ext->size[0] = td->ext->isize[0];
2419                                 td->ext->size[1] = td->ext->isize[1];
2420                                 td->ext->size[2] = td->ext->isize[2];
2421                         }
2422                         else {
2423                                 /* Reset val if SINGLESIZE but using a constraint */
2424                                 if (td->flag & TD_SINGLESIZE)
2425                                         *td->val = td->ival;
2426
2427                                 td->ext->size[0] = td->ext->isize[0] * (fsize[0]) * td->factor;
2428                                 td->ext->size[1] = td->ext->isize[1] * (fsize[1]) * td->factor;
2429                                 td->ext->size[2] = td->ext->isize[2] * (fsize[2]) * td->factor;
2430                         }
2431                 }
2432
2433                 constraintSizeLim(t, td);
2434         }
2435
2436         /* For individual element center, Editmode need to use iloc */
2437         if (t->flag & T_POINTS)
2438                 VecSubf(vec, td->iloc, center);
2439         else
2440                 VecSubf(vec, td->center, center);
2441
2442         Mat3MulVecfl(tmat, vec);
2443
2444         VecAddf(vec, vec, center);
2445         if (t->flag & T_POINTS)
2446                 VecSubf(vec, vec, td->iloc);
2447         else
2448                 VecSubf(vec, vec, td->center);
2449
2450         VecMulf(vec, td->factor);
2451
2452         if (t->flag & (T_OBJECT|T_POSE)) {
2453                 Mat3MulVecfl(td->smtx, vec);
2454         }
2455
2456         protectedTransBits(td->protectflag, vec);
2457
2458         if(td->tdi) {
2459                 TransDataIpokey *tdi= td->tdi;
2460                 add_tdi_poin(tdi->locx, tdi->oldloc, vec[0]);
2461                 add_tdi_poin(tdi->locy, tdi->oldloc+1, vec[1]);
2462                 add_tdi_poin(tdi->locz, tdi->oldloc+2, vec[2]);
2463         }
2464         else VecAddf(td->loc, td->iloc, vec);
2465
2466         constraintTransLim(t, td);
2467 }
2468
2469 int Resize(TransInfo *t, short mval[2])
2470 {
2471         TransData *td;
2472         float size[3], mat[3][3];
2473         float ratio;
2474         int i;
2475         char str[200];
2476
2477         /* for manipulator, center handle, the scaling can't be done relative to center */
2478         if( (t->flag & T_USES_MANIPULATOR) && t->con.mode==0)
2479         {
2480                 ratio = 1.0f - ((t->imval[0] - mval[0]) + (t->imval[1] - mval[1]))/100.0f;
2481         }
2482         else
2483         {
2484                 ratio = t->values[0];
2485         }
2486
2487         size[0] = size[1] = size[2] = ratio;
2488
2489         snapGrid(t, size);
2490
2491         if (hasNumInput(&t->num)) {
2492                 applyNumInput(&t->num, size);
2493                 constraintNumInput(t, size);
2494         }
2495
2496         applySnapping(t, size);
2497
2498         if (t->flag & T_AUTOVALUES)
2499         {
2500                 VECCOPY(size, t->auto_values);
2501         }
2502
2503         VECCOPY(t->values, size);
2504
2505         SizeToMat3(size, mat);
2506
2507         if (t->con.applySize) {
2508                 t->con.applySize(t, NULL, mat);
2509         }
2510
2511         Mat3CpyMat3(t->mat, mat);       // used in manipulator
2512
2513         headerResize(t, size, str);
2514
2515         for(i = 0, td=t->data; i < t->total; i++, td++) {
2516                 if (td->flag & TD_NOACTION)
2517                         break;
2518
2519                 if (td->flag & TD_SKIP)
2520                         continue;
2521
2522                 ElementResize(t, td, mat);
2523         }
2524
2525         /* evil hack - redo resize if cliping needed */
2526         if (t->flag & T_CLIP_UV && clipUVTransform(t, size, 1)) {
2527                 SizeToMat3(size, mat);
2528
2529                 if (t->con.applySize)
2530                         t->con.applySize(t, NULL, mat);
2531
2532                 for(i = 0, td=t->data; i < t->total; i++, td++)
2533                         ElementResize(t, td, mat);
2534         }
2535
2536         recalcData(t);
2537
2538         ED_area_headerprint(t->sa, str);
2539
2540         return 1;
2541 }
2542
2543 /* ************************** TOSPHERE *************************** */
2544
2545 void initToSphere(TransInfo *t)
2546 {
2547         TransData *td = t->data;
2548         int i;
2549
2550         t->mode = TFM_TOSPHERE;
2551         t->transform = ToSphere;
2552
2553         initMouseInputMode(t, &t->mouse, INPUT_HORIZONTAL_RATIO);
2554
2555         t->idx_max = 0;
2556         t->num.idx_max = 0;
2557         t->snap[0] = 0.0f;
2558         t->snap[1] = 0.1f;
2559         t->snap[2] = t->snap[1] * 0.1f;
2560
2561         t->num.flag |= NUM_NULL_ONE | NUM_NO_NEGATIVE;
2562         t->flag |= T_NO_CONSTRAINT;
2563
2564         // Calculate average radius
2565         for(i = 0 ; i < t->total; i++, td++) {
2566                 t->val += VecLenf(t->center, td->iloc);
2567         }
2568
2569         t->val /= (float)t->total;
2570 }
2571
2572 int ToSphere(TransInfo *t, short mval[2])
2573 {
2574         float vec[3];
2575         float ratio, radius;
2576         int i;
2577         char str[64];
2578         TransData *td = t->data;
2579
2580         ratio = t->values[0];
2581
2582         snapGrid(t, &ratio);
2583
2584         applyNumInput(&t->num, &ratio);
2585
2586         if (ratio < 0)
2587                 ratio = 0.0f;
2588         else if (ratio > 1)
2589                 ratio = 1.0f;
2590
2591         /* header print for NumInput */
2592         if (hasNumInput(&t->num)) {
2593                 char c[20];
2594
2595                 outputNumInput(&(t->num), c);
2596
2597                 sprintf(str, "To Sphere: %s %s", c, t->proptext);
2598         }
2599         else {
2600                 /* default header print */
2601                 sprintf(str, "To Sphere: %.4f %s", ratio, t->proptext);
2602         }
2603
2604
2605         for(i = 0 ; i < t->total; i++, td++) {
2606                 float tratio;
2607                 if (td->flag & TD_NOACTION)
2608                         break;
2609
2610                 if (td->flag & TD_SKIP)
2611                         continue;
2612
2613                 VecSubf(vec, td->iloc, t->center);
2614
2615                 radius = Normalize(vec);
2616
2617                 tratio = ratio * td->factor;
2618
2619                 VecMulf(vec, radius * (1.0f - tratio) + t->val * tratio);
2620
2621                 VecAddf(td->loc, t->center, vec);
2622         }
2623
2624
2625         recalcData(t);
2626
2627         ED_area_headerprint(t->sa, str);
2628
2629         return 1;
2630 }
2631
2632 /* ************************** ROTATION *************************** */
2633
2634
2635 void initRotation(TransInfo *t)
2636 {
2637         t->mode = TFM_ROTATION;
2638         t->transform = Rotation;
2639
2640         initMouseInputMode(t, &t->mouse, INPUT_ANGLE);
2641
2642         t->ndof.axis = 16;
2643         /* Scale down and flip input for rotation */
2644         t->ndof.factor[0] = -0.2f;
2645
2646         t->idx_max = 0;
2647         t->num.idx_max = 0;
2648         t->snap[0] = 0.0f;
2649         t->snap[1] = (float)((5.0/180)*M_PI);
2650         t->snap[2] = t->snap[1] * 0.2f;
2651
2652         if (t->flag & T_2D_EDIT)
2653                 t->flag |= T_NO_CONSTRAINT;
2654 }
2655
2656 static void ElementRotation(TransInfo *t, TransData *td, float mat[3][3], short around) {
2657         float vec[3], totmat[3][3], smat[3][3];
2658         float eul[3], fmat[3][3], quat[4];
2659         float *center = t->center;
2660
2661         /* local constraint shouldn't alter center */
2662         if (around == V3D_LOCAL) {
2663                 if (t->flag & (T_OBJECT|T_POSE)) {
2664                         center = td->center;
2665                 }
2666                 else {
2667                         /* !TODO! Make this if not rely on G */
2668                         if(around==V3D_LOCAL && (t->settings->selectmode & SCE_SELECT_FACE)) {
2669                                 center = td->center;
2670                         }
2671                 }
2672         }
2673
2674         if (t->flag & T_POINTS) {
2675                 Mat3MulMat3(totmat, mat, td->mtx);
2676                 Mat3MulMat3(smat, td->smtx, totmat);
2677
2678                 VecSubf(vec, td->iloc, center);
2679                 Mat3MulVecfl(smat, vec);
2680
2681                 VecAddf(td->loc, vec, center);
2682
2683                 VecSubf(vec,td->loc,td->iloc);
2684                 protectedTransBits(td->protectflag, vec);
2685                 VecAddf(td->loc, td->iloc, vec);
2686
2687                 if(td->flag & TD_USEQUAT) {
2688                         Mat3MulSerie(fmat, td->mtx, mat, td->smtx, 0, 0, 0, 0, 0);
2689                         Mat3ToQuat(fmat, quat); // Actual transform
2690
2691                         if(td->ext->quat){
2692                                 QuatMul(td->ext->quat, quat, td->ext->iquat);
2693
2694                                 /* is there a reason not to have this here? -jahka */
2695                                 protectedQuaternionBits(td->protectflag, td->ext->quat, td->ext->iquat);
2696                         }
2697                 }
2698         }
2699         /**
2700          * HACK WARNING
2701          *
2702          * This is some VERY ugly special case to deal with pose mode.
2703          *
2704          * The problem is that mtx and smtx include each bone orientation.
2705          *
2706          * That is needed to rotate each bone properly, HOWEVER, to calculate
2707          * the translation component, we only need the actual armature object's
2708          * matrix (and inverse). That is not all though. Once the proper translation
2709          * has been computed, it has to be converted back into the bone's space.
2710          */
2711         else if (t->flag & T_POSE) {
2712                 float pmtx[3][3], imtx[3][3];
2713
2714                 // Extract and invert armature object matrix
2715                 Mat3CpyMat4(pmtx, t->poseobj->obmat);
2716                 Mat3Inv(imtx, pmtx);
2717
2718                 if ((td->flag & TD_NO_LOC) == 0)
2719                 {
2720                         VecSubf(vec, td->center, center);
2721
2722                         Mat3MulVecfl(pmtx, vec);        // To Global space
2723                         Mat3MulVecfl(mat, vec);         // Applying rotation
2724                         Mat3MulVecfl(imtx, vec);        // To Local space
2725
2726                         VecAddf(vec, vec, center);
2727                         /* vec now is the location where the object has to be */
2728
2729                         VecSubf(vec, vec, td->center); // Translation needed from the initial location
2730
2731                         Mat3MulVecfl(pmtx, vec);        // To Global space
2732                         Mat3MulVecfl(td->smtx, vec);// To Pose space
2733
2734                         protectedTransBits(td->protectflag, vec);
2735
2736                         VecAddf(td->loc, td->iloc, vec);
2737
2738                         constraintTransLim(t, td);
2739                 }
2740
2741                 /* rotation */
2742                 if ((t->flag & T_V3D_ALIGN)==0) { // align mode doesn't rotate objects itself
2743                         /* euler or quaternion/axis-angle? */
2744                         if (td->flag & TD_USEQUAT) {
2745                                 Mat3MulSerie(fmat, td->mtx, mat, td->smtx, 0, 0, 0, 0, 0);
2746
2747                                 Mat3ToQuat(fmat, quat); // Actual transform
2748
2749                                 QuatMul(td->ext->quat, quat, td->ext->iquat);
2750                                 /* this function works on end result */
2751                                 protectedQuaternionBits(td->protectflag, td->ext->quat, td->ext->iquat);
2752                                 
2753                         }
2754                         else if (td->rotOrder == PCHAN_ROT_AXISANGLE) {
2755                                 /* calculate effect based on quats */
2756                                 float iquat[4];
2757                                 
2758                                 /* td->ext->(i)quat is in axis-angle form, not quats! */
2759                                 AxisAngleToQuat(iquat, &td->ext->iquat[1], td->ext->iquat[0]);
2760                                 
2761                                 Mat3MulSerie(fmat, td->mtx, mat, td->smtx, 0, 0, 0, 0, 0);
2762                                 Mat3ToQuat(fmat, quat); // Actual transform
2763                                 
2764                                 QuatMul(td->ext->quat, quat, iquat);
2765                                 
2766                                 /* make temp copy (since stored in same place) */
2767                                 QUATCOPY(quat, td->ext->quat); // this is just a 4d vector copying macro
2768                                 QuatToAxisAngle(quat, &td->ext->quat[1], &td->ext->quat[0]); 
2769                                 
2770                                 /* this function works on end result */
2771                                 protectedAxisAngleBits(td->protectflag, td->ext->quat, td->ext->iquat);
2772                         }
2773                         else { 
2774                                 float eulmat[3][3];
2775                                 
2776                                 Mat3MulMat3(totmat, mat, td->mtx);
2777                                 Mat3MulMat3(smat, td->smtx, totmat);
2778                                 
2779                                 /* calculate the total rotatation in eulers */
2780                                 VECCOPY(eul, td->ext->irot);
2781                                 EulOToMat3(eul, td->rotOrder, eulmat);
2782                                 
2783                                 /* mat = transform, obmat = bone rotation */
2784                                 Mat3MulMat3(fmat, smat, eulmat);
2785                                 
2786                                 Mat3ToCompatibleEulO(fmat, eul, td->ext->rot, td->rotOrder);
2787                                 
2788                                 /* and apply (to end result only) */
2789                                 protectedRotateBits(td->protectflag, eul, td->ext->irot);
2790                                 VECCOPY(td->ext->rot, eul);
2791                         }
2792                         
2793                         constraintRotLim(t, td);
2794                 }
2795         }
2796         else {
2797                 if ((td->flag & TD_NO_LOC) == 0)
2798                 {
2799                         /* translation */
2800                         VecSubf(vec, td->center, center);
2801                         Mat3MulVecfl(mat, vec);
2802                         VecAddf(vec, vec, center);
2803                         /* vec now is the location where the object has to be */
2804                         VecSubf(vec, vec, td->center);
2805                         Mat3MulVecfl(td->smtx, vec);
2806
2807                         protectedTransBits(td->protectflag, vec);
2808
2809                         if(td->tdi) {
2810                                 TransDataIpokey *tdi= td->tdi;
2811                                 add_tdi_poin(tdi->locx, tdi->oldloc, vec[0]);
2812                                 add_tdi_poin(tdi->locy, tdi->oldloc+1, vec[1]);
2813                                 add_tdi_poin(tdi->locz, tdi->oldloc+2, vec[2]);
2814                         }
2815                         else VecAddf(td->loc, td->iloc, vec);
2816                 }
2817
2818
2819                 constraintTransLim(t, td);
2820
2821                 /* rotation */
2822                 if ((t->flag & T_V3D_ALIGN)==0) { // align mode doesn't rotate objects itself
2823                         /* euler or quaternion? */
2824                     if (td->flag & TD_USEQUAT) {
2825                                 Mat3MulSerie(fmat, td->mtx, mat, td->smtx, 0, 0, 0, 0, 0);
2826                                 Mat3ToQuat(fmat, quat); // Actual transform
2827
2828                                 QuatMul(td->ext->quat, quat, td->ext->iquat);
2829                                 /* this function works on end result */
2830                                 protectedQuaternionBits(td->protectflag, td->ext->quat, td->ext->iquat);
2831                         }
2832                         else {
2833                                 float obmat[3][3];
2834
2835                                 /* are there ipo keys? */
2836                                 if(td->tdi) {
2837                                         TransDataIpokey *tdi= td->tdi;
2838                                         float current_rot[3];
2839                                         float rot[3];
2840
2841                                         /* current IPO value for compatible euler */
2842                                         current_rot[0] = (tdi->rotx) ? tdi->rotx[0] : 0.0f;
2843                                         current_rot[1] = (tdi->roty) ? tdi->roty[0] : 0.0f;
2844                                         current_rot[2] = (tdi->rotz) ? tdi->rotz[0] : 0.0f;
2845                                         VecMulf(current_rot, (float)(M_PI_2 / 9.0));
2846
2847                                         /* calculate the total rotatation in eulers */
2848                                         VecAddf(eul, td->ext->irot, td->ext->drot);
2849                                         EulToMat3(eul, obmat);
2850                                         /* mat = transform, obmat = object rotation */
2851                                         Mat3MulMat3(fmat, mat, obmat);
2852
2853                                         Mat3ToCompatibleEul(fmat, eul, current_rot);
2854
2855                                         /* correct back for delta rot */
2856                                         if(tdi->flag & TOB_IPODROT) {
2857                                                 VecSubf(rot, eul, td->ext->irot);
2858                                         }
2859                                         else {
2860                                                 VecSubf(rot, eul, td->ext->drot);
2861                                         }
2862
2863                                         VecMulf(rot, (float)(9.0/M_PI_2));
2864                                         VecSubf(rot, rot, tdi->oldrot);
2865
2866                                         protectedRotateBits(td->protectflag, rot, tdi->oldrot);
2867
2868                                         add_tdi_poin(tdi->rotx, tdi->oldrot, rot[0]);
2869                                         add_tdi_poin(tdi->roty, tdi->oldrot+1, rot[1]);
2870                                         add_tdi_poin(tdi->rotz, tdi->oldrot+2, rot[2]);
2871                                 }
2872                                 else {
2873                                         Mat3MulMat3(totmat, mat, td->mtx);
2874                                         Mat3MulMat3(smat, td->smtx, totmat);
2875
2876                                         /* calculate the total rotatation in eulers */
2877                                         VecAddf(eul, td->ext->irot, td->ext->drot); /* we have to correct for delta rot */
2878                                         EulToMat3(eul, obmat);
2879                                         /* mat = transform, obmat = object rotation */
2880                                         Mat3MulMat3(fmat, smat, obmat);
2881
2882                                         Mat3ToCompatibleEul(fmat, eul, td->ext->rot);
2883
2884                                         /* correct back for delta rot */
2885                                         VecSubf(eul, eul, td->ext->drot);
2886
2887                                         /* and apply */
2888                                         protectedRotateBits(td->protectflag, eul, td->ext->irot);
2889                                         VECCOPY(td->ext->rot, eul);
2890                                 }
2891                         }
2892
2893                         constraintRotLim(t, td);
2894                 }
2895         }
2896 }
2897
2898 static void applyRotation(TransInfo *t, float angle, float axis[3])
2899 {
2900         TransData *td = t->data;
2901         float mat[3][3];
2902         int i;
2903
2904         VecRotToMat3(axis, angle, mat);
2905
2906         for(i = 0 ; i < t->total; i++, td++) {
2907
2908                 if (td->flag & TD_NOACTION)
2909                         break;
2910
2911                 if (td->flag & TD_SKIP)
2912                         continue;
2913
2914                 if (t->con.applyRot) {
2915                         t->con.applyRot(t, td, axis, NULL);
2916                         VecRotToMat3(axis, angle * td->factor, mat);
2917                 }
2918                 else if (t->flag & T_PROP_EDIT) {
2919                         VecRotToMat3(axis, angle * td->factor, mat);
2920                 }
2921
2922                 ElementRotation(t, td, mat, t->around);
2923         }
2924 }
2925
2926 int Rotation(TransInfo *t, short mval[2])
2927 {
2928         char str[64];
2929
2930         float final;
2931
2932         float axis[3];
2933         float mat[3][3];
2934
2935         VECCOPY(axis, t->viewinv[2]);
2936         VecMulf(axis, -1.0f);
2937         Normalize(axis);
2938
2939         final = t->values[0];
2940
2941         applyNDofInput(&t->ndof, &final);
2942