bugfix [#19392] Typing help() in the console window freezes Blender
[blender-staging.git] / source / blender / python / intern / bpy_interface.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  * Contributor(s): Michel Selten, Willian P. Germano, Stephen Swaney,
21  * Chris Keith, Chris Want, Ken Hughes, Campbell Barton
22  *
23  * ***** END GPL LICENSE BLOCK *****
24  */
25  
26 #include <stdio.h>
27 #include <stdlib.h>
28 #include <string.h>
29 #include <sys/stat.h>
30
31
32 /* grr, python redefines */
33 #ifdef _POSIX_C_SOURCE
34 #undef _POSIX_C_SOURCE
35 #endif
36
37 #include <Python.h>
38 #include "compile.h"            /* for the PyCodeObject */
39 #include "eval.h"               /* for PyEval_EvalCode */
40
41 #include "bpy_rna.h"
42 #include "bpy_operator.h"
43 #include "bpy_ui.h"
44 #include "bpy_util.h"
45
46 #ifndef WIN32
47 #include <dirent.h>
48 #else
49 #include "BLI_winstuff.h"
50 #endif
51
52 #include "DNA_anim_types.h"
53 #include "DNA_space_types.h"
54 #include "DNA_text_types.h"
55
56 #include "MEM_guardedalloc.h"
57
58 #include "BLI_util.h"
59 #include "BLI_storage.h"
60 #include "BLI_fileops.h"
61 #include "BLI_string.h"
62
63 #include "BKE_context.h"
64 #include "BKE_fcurve.h"
65 #include "BKE_text.h"
66
67 #include "BPY_extern.h"
68
69 #include "../generic/bpy_internal_import.h" // our own imports
70 /* external util modules */
71
72 #include "../generic/Mathutils.h"
73 #include "../generic/Geometry.h"
74 #include "../generic/BGL.h"
75
76
77 /* for internal use, when starting and ending python scripts */
78
79 /* incase a python script triggers another python call, stop bpy_context_clear from invalidating */
80 static int py_call_level= 0;
81
82
83 // only for tests
84 #define TIME_PY_RUN
85
86 #ifdef TIME_PY_RUN
87 #include "PIL_time.h"
88 static int              bpy_timer_count = 0;
89 static double   bpy_timer; /* time since python starts */
90 static double   bpy_timer_run; /* time for each python script run */
91 static double   bpy_timer_run_tot; /* accumulate python runs */
92 #endif
93
94 void bpy_context_set(bContext *C, PyGILState_STATE *gilstate)
95 {
96         py_call_level++;
97
98         if(gilstate)
99                 *gilstate = PyGILState_Ensure();
100
101         if(py_call_level==1) {
102
103                 BPY_update_modules(); /* can give really bad results if this isnt here */
104
105                 if(C) { // XXX - should always be true.
106                         BPy_SetContext(C);
107                         bpy_import_main_set(CTX_data_main(C));
108                 }
109                 else {
110                         fprintf(stderr, "ERROR: Python context called with a NULL Context. this should not happen!\n");
111                 }
112
113 #ifdef TIME_PY_RUN
114                 if(bpy_timer_count==0) {
115                         /* record time from the beginning */
116                         bpy_timer= PIL_check_seconds_timer();
117                         bpy_timer_run = bpy_timer_run_tot = 0.0;
118                 }
119                 bpy_timer_run= PIL_check_seconds_timer();
120
121
122                 bpy_timer_count++;
123 #endif
124         }
125 }
126
127 void bpy_context_clear(bContext *C, PyGILState_STATE *gilstate)
128 {
129         py_call_level--;
130
131         if(gilstate)
132                 PyGILState_Release(*gilstate);
133
134         if(py_call_level < 0) {
135                 fprintf(stderr, "ERROR: Python context internal state bug. this should not happen!\n");
136         }
137         else if(py_call_level==0) {
138                 // XXX - Calling classes currently wont store the context :\, cant set NULL because of this. but this is very flakey still.
139                 //BPy_SetContext(NULL);
140                 //bpy_import_main_set(NULL);
141
142 #ifdef TIME_PY_RUN
143                 bpy_timer_run_tot += PIL_check_seconds_timer() - bpy_timer_run;
144                 bpy_timer_count++;
145 #endif
146
147         }
148 }
149
150
151 void BPY_free_compiled_text( struct Text *text )
152 {
153         if( text->compiled ) {
154                 Py_DECREF( ( PyObject * ) text->compiled );
155                 text->compiled = NULL;
156         }
157 }
158
159 /*****************************************************************************
160 * Description: Creates the bpy module and adds it to sys.modules for importing
161 *****************************************************************************/
162 static void bpy_init_modules( void )
163 {
164         PyObject *mod;
165         
166         mod = PyModule_New("bpy");
167         
168         PyModule_AddObject( mod, "data", BPY_rna_module() );
169         /* PyModule_AddObject( mod, "doc", BPY_rna_doc() ); */
170         PyModule_AddObject( mod, "types", BPY_rna_types() );
171         PyModule_AddObject( mod, "props", BPY_rna_props() );
172         PyModule_AddObject( mod, "__ops__", BPY_operator_module() ); /* ops is now a python module that does the conversion from SOME_OT_foo -> some.foo */
173         PyModule_AddObject( mod, "ui", BPY_ui_module() ); // XXX very experimental, consider this a test, especially PyCObject is not meant to be permanent
174         
175         /* add the module so we can import it */
176         PyDict_SetItemString(PySys_GetObject("modules"), "bpy", mod);
177         Py_DECREF(mod);
178
179
180         /* stand alone utility modules not related to blender directly */
181         Geometry_Init();
182         Mathutils_Init();
183         BGL_Init();
184 }
185
186 void BPY_update_modules( void )
187 {
188 #if 0 // slow, this runs all the time poll, draw etc 100's of time a sec.
189         PyObject *mod= PyImport_ImportModuleLevel("bpy", NULL, NULL, NULL, 0);
190         PyModule_AddObject( mod, "data", BPY_rna_module() );
191         PyModule_AddObject( mod, "types", BPY_rna_types() ); // atm this does not need updating
192 #endif
193
194         /* refreshes the main struct */
195         BPY_update_rna_module();
196
197 }
198
199 /*****************************************************************************
200 * Description: This function creates a new Python dictionary object.
201 *****************************************************************************/
202 static PyObject *CreateGlobalDictionary( bContext *C )
203 {
204         PyObject *mod;
205         PyObject *dict = PyDict_New(  );
206         PyObject *item = PyUnicode_FromString( "__main__" );
207         PyDict_SetItemString( dict, "__builtins__", PyEval_GetBuiltins(  ) );
208         PyDict_SetItemString( dict, "__name__", item );
209         Py_DECREF(item);
210         
211         // XXX - put somewhere more logical
212         {
213                 PyMethodDef *ml;
214                 static PyMethodDef bpy_prop_meths[] = {
215                         {"FloatProperty", (PyCFunction)BPy_FloatProperty, METH_VARARGS|METH_KEYWORDS, ""},
216                         {"IntProperty", (PyCFunction)BPy_IntProperty, METH_VARARGS|METH_KEYWORDS, ""},
217                         {"BoolProperty", (PyCFunction)BPy_BoolProperty, METH_VARARGS|METH_KEYWORDS, ""},
218                         {"StringProperty", (PyCFunction)BPy_StringProperty, METH_VARARGS|METH_KEYWORDS, ""},
219                         {NULL, NULL, 0, NULL}
220                 };
221                 
222                 for(ml = bpy_prop_meths; ml->ml_name; ml++) {
223                         PyDict_SetItemString( dict, ml->ml_name, PyCFunction_New(ml, NULL));
224                 }
225         }
226         
227         /* add bpy to global namespace */
228         mod= PyImport_ImportModuleLevel("bpy", NULL, NULL, NULL, 0);
229         PyDict_SetItemString( dict, "bpy", mod );
230         Py_DECREF(mod);
231         
232         return dict;
233 }
234
235 /* must be called before Py_Initialize */
236 void BPY_start_python_path(void)
237 {
238         char *py_path_bundle= BLI_gethome_folder("python", BLI_GETHOME_ALL);
239
240         if(py_path_bundle==NULL)
241                 return;
242
243         /* set the environment path */
244         printf("found bundled python: %s\n", py_path_bundle);
245
246 #if 0
247         BLI_setenv("PYTHONHOME", py_path_bundle);
248         BLI_setenv("PYTHONPATH", py_path_bundle);
249 #endif
250
251         {
252                 static wchar_t py_path_bundle_wchar[FILE_MAXDIR];
253
254                 mbstowcs(py_path_bundle_wchar, py_path_bundle, FILE_MAXDIR);
255                 Py_SetPythonHome(py_path_bundle_wchar);
256         }
257 }
258
259
260 void BPY_start_python( int argc, char **argv )
261 {
262         PyThreadState *py_tstate = NULL;
263         
264         BPY_start_python_path(); /* allow to use our own included python */
265
266         Py_Initialize(  );
267         
268         // PySys_SetArgv( argc, argv); // broken in py3, not a huge deal
269         /* sigh, why do python guys not have a char** version anymore? :( */
270         {
271                 int i;
272                 PyObject *py_argv= PyList_New(argc);
273
274                 for (i=0; i<argc; i++)
275                         PyList_SET_ITEM(py_argv, i, PyUnicode_FromString(argv[i]));
276
277                 PySys_SetObject("argv", py_argv);
278                 Py_DECREF(py_argv);
279         }
280         
281         /* Initialize thread support (also acquires lock) */
282         PyEval_InitThreads();
283         
284         
285         /* bpy.* and lets us import it */
286         bpy_init_modules(); 
287
288         { /* our own import and reload functions */
289                 PyObject *item;
290                 //PyObject *m = PyImport_AddModule("__builtin__");
291                 //PyObject *d = PyModule_GetDict(m);
292                 PyObject *d = PyEval_GetBuiltins(  );
293                 PyDict_SetItemString(d, "reload",               item=PyCFunction_New(bpy_reload_meth, NULL));   Py_DECREF(item);
294                 PyDict_SetItemString(d, "__import__",   item=PyCFunction_New(bpy_import_meth, NULL));   Py_DECREF(item);
295                 
296                 /* a bit nasty but this prevents help() and input() from locking blender
297                  * Ideally we could have some way for the console to replace sys.stdin but
298                  * python would lock blender while waiting for a return value, not easy :| */
299                 PySys_SetObject("stdin", Py_None);
300         }
301         
302         pyrna_alloc_types();
303
304         py_tstate = PyGILState_GetThisThreadState();
305         PyEval_ReleaseThread(py_tstate);
306 }
307
308 void BPY_end_python( void )
309 {
310         // fprintf(stderr, "Ending Python!\n");
311
312         PyGILState_Ensure(); /* finalizing, no need to grab the state */
313         
314         // free other python data.
315         pyrna_free_types();
316
317         /* clear all python data from structs */
318         
319         Py_Finalize(  );
320         
321 #ifdef TIME_PY_RUN
322         // measure time since py started
323         bpy_timer = PIL_check_seconds_timer() - bpy_timer;
324
325         printf("*bpy stats* - ");
326         printf("tot exec: %d,  ", bpy_timer_count);
327         printf("tot run: %.4fsec,  ", bpy_timer_run_tot);
328         if(bpy_timer_count>0)
329                 printf("average run: %.6fsec,  ", (bpy_timer_run_tot/bpy_timer_count));
330
331         if(bpy_timer>0.0)
332                 printf("tot usage %.4f%%", (bpy_timer_run_tot/bpy_timer)*100.0);
333
334         printf("\n");
335
336         // fprintf(stderr, "Ending Python Done!\n");
337
338 #endif
339
340 }
341
342 /* Can run a file or text block */
343 int BPY_run_python_script( bContext *C, const char *fn, struct Text *text, struct ReportList *reports)
344 {
345         PyObject *py_dict, *py_result= NULL;
346         PyGILState_STATE gilstate;
347         
348         if (fn==NULL && text==NULL) {
349                 return 0;
350         }
351         
352         bpy_context_set(C, &gilstate);
353         
354         py_dict = CreateGlobalDictionary(C);
355
356         if (text) {
357                 
358                 if( !text->compiled ) { /* if it wasn't already compiled, do it now */
359                         char *buf = txt_to_buf( text );
360
361                         text->compiled =
362                                 Py_CompileString( buf, text->id.name+2, Py_file_input );
363
364                         MEM_freeN( buf );
365
366                         if( PyErr_Occurred(  ) ) {
367                                 BPY_free_compiled_text( text );
368                         }
369                 }
370                 if(text->compiled)
371                         py_result =  PyEval_EvalCode( text->compiled, py_dict, py_dict );
372                 
373         } else {
374 #if 0
375                 char *pystring;
376                 pystring= malloc(strlen(fn) + 32);
377                 pystring[0]= '\0';
378                 sprintf(pystring, "exec(open(r'%s').read())", fn);
379                 py_result = PyRun_String( pystring, Py_file_input, py_dict, py_dict );
380                 free(pystring);
381 #else
382                 FILE *fp= fopen(fn, "r");               
383                 if(fp) {
384                         py_result = PyRun_File(fp, fn, Py_file_input, py_dict, py_dict);
385                         fclose(fp);
386                 }
387                 else {
388                         PyErr_Format(PyExc_SystemError, "Python file \"%s\" could not be opened: %s", fn, strerror(errno));
389                         py_result= NULL;
390                 }
391 #endif
392         }
393         
394         if (!py_result) {
395                 BPy_errors_to_report(reports);
396         } else {
397                 Py_DECREF( py_result );
398         }
399         
400         Py_DECREF(py_dict);
401         
402         bpy_context_clear(C, &gilstate);
403
404         return py_result ? 1:0;
405 }
406
407
408 /* TODO - move into bpy_space.c ? */
409 /* GUI interface routines */
410
411 /* Copied from Draw.c */
412 static void exit_pydraw( SpaceScript * sc, short err )
413 {
414         Script *script = NULL;
415
416         if( !sc || !sc->script )
417                 return;
418
419         script = sc->script;
420
421         if( err ) {
422                 BPy_errors_to_report(NULL); // TODO, reports
423                 script->flags = 0;      /* mark script struct for deletion */
424                 SCRIPT_SET_NULL(script);
425                 script->scriptname[0] = '\0';
426                 script->scriptarg[0] = '\0';
427 // XXX 2.5              error_pyscript();
428 // XXX 2.5              scrarea_queue_redraw( sc->area );
429         }
430
431 #if 0 // XXX 2.5
432         BPy_Set_DrawButtonsList(sc->but_refs);
433         BPy_Free_DrawButtonsList(); /*clear all temp button references*/
434 #endif
435
436         sc->but_refs = NULL;
437         
438         Py_XDECREF( ( PyObject * ) script->py_draw );
439         Py_XDECREF( ( PyObject * ) script->py_event );
440         Py_XDECREF( ( PyObject * ) script->py_button );
441
442         script->py_draw = script->py_event = script->py_button = NULL;
443 }
444
445 static int bpy_run_script_init(bContext *C, SpaceScript * sc)
446 {
447         if (sc->script==NULL) 
448                 return 0;
449         
450         if (sc->script->py_draw==NULL && sc->script->scriptname[0] != '\0')
451                 BPY_run_python_script(C, sc->script->scriptname, NULL, NULL);
452                 
453         if (sc->script->py_draw==NULL)
454                 return 0;
455         
456         return 1;
457 }
458
459 int BPY_run_script_space_draw(const struct bContext *C, SpaceScript * sc)
460 {
461         if (bpy_run_script_init( (bContext *)C, sc)) {
462                 PyGILState_STATE gilstate = PyGILState_Ensure();
463                 PyObject *result = PyObject_CallObject( sc->script->py_draw, NULL );
464                 
465                 if (result==NULL)
466                         exit_pydraw(sc, 1);
467                         
468                 PyGILState_Release(gilstate);
469         }
470         return 1;
471 }
472
473 // XXX - not used yet, listeners dont get a context
474 int BPY_run_script_space_listener(bContext *C, SpaceScript * sc)
475 {
476         if (bpy_run_script_init(C, sc)) {
477                 PyGILState_STATE gilstate = PyGILState_Ensure();
478                 
479                 PyObject *result = PyObject_CallObject( sc->script->py_draw, NULL );
480                 
481                 if (result==NULL)
482                         exit_pydraw(sc, 1);
483                         
484                 PyGILState_Release(gilstate);
485         }
486         return 1;
487 }
488
489 void BPY_DECREF(void *pyob_ptr)
490 {
491         Py_DECREF((PyObject *)pyob_ptr);
492 }
493
494 #if 0
495 /* called from the the scripts window, assume context is ok */
496 int BPY_run_python_script_space(const char *modulename, const char *func)
497 {
498         PyObject *py_dict, *py_result= NULL;
499         char pystring[512];
500         PyGILState_STATE gilstate;
501         
502         /* for calling the module function */
503         PyObject *py_func, 
504         
505         gilstate = PyGILState_Ensure();
506         
507         py_dict = CreateGlobalDictionary(C);
508         
509         PyObject *module = PyImport_ImportModule(scpt->script.filename);
510         if (module==NULL) {
511                 PyErr_SetFormat(PyExc_SystemError, "could not import '%s'", scpt->script.filename);
512         }
513         else {
514                 py_func = PyObject_GetAttrString(modulename, func);
515                 if (py_func==NULL) {
516                         PyErr_SetFormat(PyExc_SystemError, "module has no function '%s.%s'\n", scpt->script.filename, func);
517                 }
518                 else {
519                         Py_DECREF(py_func);
520                         if (!PyCallable_Check(py_func)) {
521                                 PyErr_SetFormat(PyExc_SystemError, "module item is not callable '%s.%s'\n", scpt->script.filename, func);
522                         }
523                         else {
524                                 py_result= PyObject_CallObject(py_func, NULL); // XXX will need args eventually
525                         }
526                 }
527         }
528         
529         if (!py_result) {
530                 BPy_errors_to_report(NULL); // TODO - reports
531         } else
532                 Py_DECREF( py_result );
533         
534         Py_XDECREF(module);
535         
536         Py_DECREF(py_dict);
537         
538         PyGILState_Release(gilstate);
539         return 1;
540 }
541 #endif
542
543 // #define TIME_REGISTRATION
544
545 #ifdef TIME_REGISTRATION
546 #include "PIL_time.h"
547 #endif
548
549 /* for use by BPY_run_ui_scripts only */
550 static int bpy_import_module(char *modname, int reload)
551 {
552         PyObject *mod= PyImport_ImportModuleLevel(modname, NULL, NULL, NULL, 0);
553         if (mod) {
554                 if (reload) {
555                         PyObject *mod_orig= mod;
556                         mod= PyImport_ReloadModule(mod);
557                         Py_DECREF(mod_orig);
558                 }
559         }
560
561         if(mod) {
562                 Py_DECREF(mod); /* could be NULL from reloading */
563                 return 0;
564         } else {
565                 return -1;
566         }
567 }
568
569 /* XXX this is temporary, need a proper script registration system for 2.5 */
570 void BPY_run_ui_scripts(bContext *C, int reload)
571 {
572 #ifdef TIME_REGISTRATION
573         double time = PIL_check_seconds_timer();
574 #endif
575         DIR *dir; 
576         struct dirent *de;
577         char *file_extension;
578         char *dirname;
579         char path[FILE_MAX];
580         char *dirs[] = {"ui", "io", NULL};
581         int path_flags[] = {BLI_GETHOME_LOCAL|BLI_GETHOME_SYSTEM, BLI_GETHOME_USER}; /* SYSTEM / NON-SYSTEM */
582         int a, err, flag_iter;
583         
584         PyGILState_STATE gilstate;
585         PyObject *sys_path;
586
587         bpy_context_set(C, &gilstate);
588
589         sys_path= PySys_GetObject("path"); /* borrow */
590         PyList_Insert(sys_path, 0, Py_None); /* place holder, resizes the list */
591
592         /* Scan system scripts first, then local/user */
593         for(flag_iter=0; flag_iter < sizeof(path_flags)/sizeof(int); flag_iter++) {
594                 
595                 for(a=0; dirs[a]; a++) {
596                         dirname= BLI_gethome_folder(dirs[a], path_flags[flag_iter]);
597
598                         if(!dirname)
599                                 continue;
600
601                         dir = opendir(dirname);
602
603                         if(!dir)
604                                 continue;
605                         
606                         /* set the first dir in the sys.path for fast importing of modules */
607                         PyList_SetItem(sys_path, 0, PyUnicode_FromString(dirname)); /* steals the ref */
608                                 
609                         while((de = readdir(dir)) != NULL) {
610                                 /* We could stat the file but easier just to let python
611                                  * import it and complain if theres a problem */
612                                 err = 0;
613
614                                 if (de->d_name[0] == '.') {
615                                         /* do nothing, probably .svn */
616                                 }
617                                 else if ((file_extension = strstr(de->d_name, ".py"))) {
618                                         /* normal py files? */
619                                         if(file_extension && file_extension[3] == '\0') {
620                                                 de->d_name[(file_extension - de->d_name)] = '\0';
621                                                 err= bpy_import_module(de->d_name, reload);
622                                         }
623                                 }
624 #ifndef __linux__
625                                 else if( BLI_join_dirfile(path, dirname, de->d_name), S_ISDIR(BLI_exist(path))) {
626 #else
627                                 else if(de->d_type==DT_DIR) {
628                                         BLI_join_dirfile(path, dirname, de->d_name);
629 #endif
630                                         /* support packages */
631                                         BLI_join_dirfile(path, path, "__init__.py");
632
633                                         if(BLI_exists(path)) {
634                                                 err= bpy_import_module(de->d_name, reload);
635                                         }
636                                 }
637
638                                 if(err==-1) {
639                                         BPy_errors_to_report(NULL);
640                                         fprintf(stderr, "unable to import %s/%s\n", dirname, de->d_name);
641                                 }
642                         }
643
644                         closedir(dir);
645                 }
646         }
647         
648         PyList_SetSlice(sys_path, 0, 1, NULL); /* remove the first item */
649
650         bpy_context_clear(C, &gilstate);
651         
652 #ifdef TIME_REGISTRATION
653         printf("script time %f\n", (PIL_check_seconds_timer()-time));
654 #endif
655
656         /* reset the timer so as not to take loading into the stats */
657         bpy_timer_count = 0;
658 }
659
660 /* ****************************************** */
661 /* Drivers - PyExpression Evaluation */
662
663 /* for pydrivers (drivers using one-line Python expressions to express relationships between targets) */
664 PyObject *bpy_pydriver_Dict = NULL;
665
666 /* For faster execution we keep a special dictionary for pydrivers, with
667  * the needed modules and aliases. 
668  */
669 static int bpy_pydriver_create_dict(void)
670 {
671         PyObject *d, *mod;
672         
673         /* validate namespace for driver evaluation */
674         if (bpy_pydriver_Dict) return -1;
675
676         d = PyDict_New();
677         if (d == NULL) 
678                 return -1;
679         else
680                 bpy_pydriver_Dict = d;
681
682         /* import some modules: builtins, bpy, math, (Blender.noise )*/
683         PyDict_SetItemString(d, "__builtins__", PyEval_GetBuiltins());
684
685         mod = PyImport_ImportModule("math");
686         if (mod) {
687                 PyDict_Merge(d, PyModule_GetDict(mod), 0); /* 0 - dont overwrite existing values */
688                 
689                 /* Only keep for backwards compat! - just import all math into root, they are standard */
690                 PyDict_SetItemString(d, "math", mod);
691                 PyDict_SetItemString(d, "m", mod);
692                 Py_DECREF(mod);
693         } 
694         
695         /* add bpy to global namespace */
696         mod= PyImport_ImportModuleLevel("bpy", NULL, NULL, NULL, 0);
697         if (mod) {
698                 PyDict_SetItemString(bpy_pydriver_Dict, "bpy", mod);
699                 Py_DECREF(mod);
700         }
701         
702         
703 #if 0 // non existant yet
704         mod = PyImport_ImportModule("Blender.Noise");
705         if (mod) {
706                 PyDict_SetItemString(d, "noise", mod);
707                 PyDict_SetItemString(d, "n", mod);
708                 Py_DECREF(mod);
709         } else {
710                 PyErr_Clear();
711         }
712         
713         /* If there's a Blender text called pydrivers.py, import it.
714          * Users can add their own functions to this module. 
715          */
716         if (G.f & G_DOSCRIPTLINKS) {
717                 mod = importText("pydrivers"); /* can also use PyImport_Import() */
718                 if (mod) {
719                         PyDict_SetItemString(d, "pydrivers", mod);
720                         PyDict_SetItemString(d, "p", mod);
721                         Py_DECREF(mod);
722                 } else {
723                         PyErr_Clear();
724                 }
725         }
726 #endif // non existant yet
727         
728         return 0;
729 }
730
731 /* Update function, it gets rid of pydrivers global dictionary, forcing
732  * BPY_pydriver_eval to recreate it. This function is used to force
733  * reloading the Blender text module "pydrivers.py", if available, so
734  * updates in it reach pydriver evaluation. 
735  */
736 void BPY_pydriver_update(void)
737 {
738         PyGILState_STATE gilstate = PyGILState_Ensure();
739
740         if (bpy_pydriver_Dict) { /* free the global dict used by pydrivers */
741                 PyDict_Clear(bpy_pydriver_Dict);
742                 Py_DECREF(bpy_pydriver_Dict);
743                 bpy_pydriver_Dict = NULL;
744         }
745
746         PyGILState_Release(gilstate);
747
748         return;
749 }
750
751 /* error return function for BPY_eval_pydriver */
752 static float pydriver_error(ChannelDriver *driver) 
753 {
754         if (bpy_pydriver_Dict) { /* free the global dict used by pydrivers */
755                 PyDict_Clear(bpy_pydriver_Dict);
756                 Py_DECREF(bpy_pydriver_Dict);
757                 bpy_pydriver_Dict = NULL;
758         }
759
760         driver->flag |= DRIVER_FLAG_INVALID; /* py expression failed */
761         fprintf(stderr, "\nError in Driver: The following Python expression failed:\n\t'%s'\n\n", driver->expression);
762         
763         BPy_errors_to_report(NULL); // TODO - reports
764
765         return 0.0f;
766 }
767
768 /* This evals py driver expressions, 'expr' is a Python expression that
769  * should evaluate to a float number, which is returned. 
770  */
771 float BPY_pydriver_eval (ChannelDriver *driver)
772 {
773         PyObject *driver_vars=NULL;
774         PyObject *retval;
775         PyGILState_STATE gilstate;
776         
777         DriverTarget *dtar;
778         float result = 0.0f; /* default return */
779         char *expr = NULL;
780         short targets_ok= 1;
781         
782         /* sanity checks - should driver be executed? */
783         if ((driver == NULL) /*|| (G.f & G_DOSCRIPTLINKS)==0*/) 
784                 return result;
785         
786         /* get the py expression to be evaluated */
787         expr = driver->expression; 
788         if ((expr == NULL) || (expr[0]=='\0')) 
789                 return result;
790
791         gilstate = PyGILState_Ensure();
792         
793         /* init global dictionary for py-driver evaluation settings */
794         if (!bpy_pydriver_Dict) {
795                 if (bpy_pydriver_create_dict() != 0) {
796                         fprintf(stderr, "Pydriver error: couldn't create Python dictionary");
797                         PyGILState_Release(gilstate);
798                         return result;
799                 }
800         }
801         
802         /* add target values to a dict that will be used as '__locals__' dict */
803         driver_vars = PyDict_New(); // XXX do we need to decref this?
804         for (dtar= driver->targets.first; dtar; dtar= dtar->next) {
805                 PyObject *driver_arg = NULL;
806                 float tval = 0.0f;
807                 
808                 /* try to get variable value */
809                 tval= driver_get_target_value(driver, dtar);
810                 driver_arg= PyFloat_FromDouble((double)tval);
811                 
812                 /* try to add to dictionary */
813                 if (PyDict_SetItemString(driver_vars, dtar->name, driver_arg)) {
814                         /* this target failed - bad name */
815                         if (targets_ok) {
816                                 /* first one - print some extra info for easier identification */
817                                 fprintf(stderr, "\nBPY_pydriver_eval() - Error while evaluating PyDriver:\n");
818                                 targets_ok= 0;
819                         }
820                         
821                         fprintf(stderr, "\tBPY_pydriver_eval() - couldn't add variable '%s' to namespace \n", dtar->name);
822                         BPy_errors_to_report(NULL); // TODO - reports
823                 }
824         }
825         
826         /* execute expression to get a value */
827         retval = PyRun_String(expr, Py_eval_input, bpy_pydriver_Dict, driver_vars);
828         
829         /* decref the driver vars first...  */
830         Py_DECREF(driver_vars);
831         
832         /* process the result */
833         if (retval == NULL) {
834                 result = pydriver_error(driver);
835                 PyGILState_Release(gilstate);
836                 return result;
837         }
838
839         result = (float)PyFloat_AsDouble(retval);
840         Py_DECREF(retval);
841         
842         if ((result == -1) && PyErr_Occurred()) {
843                 result = pydriver_error(driver);
844                 PyGILState_Release(gilstate);
845                 return result;
846         }
847         
848         /* all fine, make sure the "invalid expression" flag is cleared */
849         driver->flag &= ~DRIVER_FLAG_INVALID;
850
851         PyGILState_Release(gilstate);
852
853         return result;
854 }
855
856 int BPY_button_eval(bContext *C, char *expr, double *value)
857 {
858         PyGILState_STATE gilstate;
859         PyObject *dict, *retval;
860         int error_ret = 0;
861         
862         if (!value || !expr || expr[0]=='\0') return -1;
863         
864         bpy_context_set(C, &gilstate);
865         
866         dict= CreateGlobalDictionary(C);
867         retval = PyRun_String(expr, Py_eval_input, dict, dict);
868         
869         if (retval == NULL) {
870                 error_ret= -1;
871         }
872         else {
873                 double val;
874
875                 if(PyTuple_Check(retval)) {
876                         /* Users my have typed in 10km, 2m
877                          * add up all values */
878                         int i;
879                         val= 0.0;
880
881                         for(i=0; i<PyTuple_GET_SIZE(retval); i++) {
882                                 val+= PyFloat_AsDouble(PyTuple_GET_ITEM(retval, i));
883                         }
884                 }
885                 else {
886                         val = PyFloat_AsDouble(retval);
887                 }
888                 Py_DECREF(retval);
889                 
890                 if(val==-1 && PyErr_Occurred()) {
891                         error_ret= -1;
892                 }
893                 else {
894                         *value= val;
895                 }
896         }
897         
898         if(error_ret) {
899                 BPy_errors_to_report(CTX_wm_reports(C));
900         }
901         
902         Py_DECREF(dict);
903         bpy_context_clear(C, &gilstate);
904         
905         return error_ret;
906 }
907