utils/wxPython/src/helpers.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        helpers.cpp
   3 // Purpose:     Helper functions/classes for the wxPython extension module
   4 //
   5 // Author:      Robin Dunn
   6 //
   7 // Created:     7/1/97
   8 // RCS-ID:      $Id$
   9 // Copyright:   (c) 1998 by Total Control Software
  10 // Licence:     wxWindows license
  11 /////////////////////////////////////////////////////////////////////////////
  12
  13 #ifdef __WXMSW__
  14 #include <windows.h>
  15 #undef FindWindow
  16 #undef GetCharWidth
  17 #undef LoadAccelerators
  18 #endif
  19
  20 #undef DEBUG
  21 #include <Python.h>
  22 #include "helpers.h"
  23
  24 #ifdef __WXGTK__
  25 #ifdef wxUSE_GDK_IMLIB
  26 #include "gdk_imlib/gdk_imlib.h"
  27 #endif
  28 #endif
  29
  30 //---------------------------------------------------------------------------
  31
  32 //wxHashTable*  wxPyWindows = NULL;
  33
  34
  35 wxPoint     wxPyDefaultPosition;        //wxDefaultPosition);
  36 wxSize      wxPyDefaultSize;            //wxDefaultSize);
  37 wxString    wxPyEmptyStr("");
  38
  39
  40
  41 #ifdef __WXMSW__             // If building for win32...
  42 extern HINSTANCE wxhInstance;
  43
  44 //----------------------------------------------------------------------
  45 // This gets run when the DLL is loaded.  We just need to save a handle.
  46 //----------------------------------------------------------------------
  47
  48 BOOL WINAPI DllMain(
  49     HINSTANCE   hinstDLL,    // handle to DLL module
  50     DWORD       fdwReason,   // reason for calling function
  51     LPVOID      lpvReserved  // reserved
  52    )
  53 {
  54     wxhInstance = hinstDLL;
  55     return 1;
  56 }
  57 #endif
  58
  59 //----------------------------------------------------------------------
  60 // Class for implementing the wxp main application shell.
  61 //----------------------------------------------------------------------
  62
  63 wxPyApp *wxPythonApp = NULL;            // Global instance of application object
  64
  65
  66 // This one isn't acutally called...  See __wxStart()
  67 bool wxPyApp::OnInit(void) {
  68     return false;
  69 }
  70
  71 int  wxPyApp::MainLoop(void) {
  72     int retval = wxApp::MainLoop();
  73     AfterMainLoop();
  74     return retval;
  75 }
  76
  77 void wxPyApp::AfterMainLoop(void) {
  78     // more stuff from wxEntry...
  79
  80 #ifdef __WXMSW__
  81     if (wxPythonApp->GetTopWindow()) {
  82         // Forcibly delete the window.
  83         if (wxPythonApp->GetTopWindow()->IsKindOf(CLASSINFO(wxFrame)) ||
  84             wxPythonApp->GetTopWindow()->IsKindOf(CLASSINFO(wxDialog))) {
  85
  86             wxPythonApp->GetTopWindow()->Close(TRUE);
  87             wxPythonApp->DeletePendingObjects();
  88         }
  89         else {
  90             delete wxPythonApp->GetTopWindow();
  91             wxPythonApp->SetTopWindow(NULL);
  92         }
  93     }
  94 #endif
  95 #ifdef __WXGTK__
  96       wxPythonApp->DeletePendingObjects();
  97 #endif
  98
  99     wxPythonApp->OnExit();
 100 #ifdef __WXMSW__
 101     wxApp::CleanUp();
 102 #endif
 103 #ifdef __WXGTK__
 104     wxApp::CommonCleanUp();
 105 #endif
 106     delete wxPythonApp;
 107 }
 108
 109
 110 //---------------------------------------------------------------------
 111 // a few native methods to add to the module
 112 //----------------------------------------------------------------------
 113
 114
 115 // This is where we pick up the first part of the wxEntry functionality...
 116 // The rest is in __wxStart and  AfterMainLoop.  Thi function is called when
 117 // wxpc is imported.  (Before there is a wxApp object.)
 118 void __wxPreStart()
 119 {
 120     // Bail out if there is already windows created.  This means that the
 121     // toolkit has already been initialized, as in embedding wxPython in
 122     // a C++ wxWindows app.
 123     if (wxTopLevelWindows.Number() > 0)
 124         return;
 125
 126 #ifdef __WXMSW__
 127     wxApp::Initialize();
 128 #endif
 129 #ifdef __WXGTK__
 130     wxClassInfo::InitializeClasses();
 131
 132     PyObject* sysargv = PySys_GetObject("argv");
 133     int argc = PyList_Size(sysargv);
 134     char** argv = new char*[argc+1];
 135     int x;
 136     for(x=0; x<argc; x++)
 137         argv[x] = PyString_AsString(PyList_GetItem(sysargv, x));
 138     argv[argc] = NULL;
 139
 140     gtk_init( &argc, &argv );
 141     delete [] argv;
 142
 143 #ifdef wxUSE_GDK_IMLIB
 144     gdk_imlib_init();
 145     gtk_widget_push_visual(gdk_imlib_get_visual());
 146     gtk_widget_push_colormap(gdk_imlib_get_colormap());
 147 #endif
 148
 149     wxApp::CommonInit();
 150 #endif
 151
 152 }
 153
 154
 155
 156 static char* __nullArgv[1] = { 0 };
 157
 158 // Start the user application, user App's OnInit method is a parameter here
 159 PyObject* __wxStart(PyObject* /* self */, PyObject* args)
 160 {
 161     PyObject*   onInitFunc = NULL;
 162     PyObject*   arglist;
 163     PyObject*   result;
 164     long        bResult;
 165
 166
 167     if (!PyArg_ParseTuple(args, "O", &onInitFunc))
 168         return NULL;
 169
 170     if (wxTopLevelWindows.Number() > 0) {
 171         PyErr_SetString(PyExc_TypeError, "Only 1 wxApp per process!");
 172         return NULL;
 173     }
 174
 175
 176     // This is the next part of the wxEntry functionality...
 177     wxPythonApp->argc = 0;
 178     wxPythonApp->argv = __nullArgv;
 179     wxPythonApp->OnInitGui();
 180
 181
 182     // Call the Python App's OnInit function
 183     arglist = PyTuple_New(0);
 184     result = PyEval_CallObject(onInitFunc, arglist);
 185     if (!result) {
 186         PyErr_Print();
 187         exit(1);
 188     }
 189
 190     if (! PyInt_Check(result)) {
 191         PyErr_SetString(PyExc_TypeError, "OnInit should return a boolean value");
 192         return NULL;
 193     }
 194     bResult = PyInt_AS_LONG(result);
 195     if (! bResult) {
 196         wxPythonApp->DeletePendingObjects();
 197         wxPythonApp->OnExit();
 198 #ifdef __WXMSW__
 199         wxApp::CleanUp();
 200 #endif
 201 #ifdef __WXGTK__
 202         wxApp::CommonCleanUp();
 203 #endif
 204         PyErr_SetString(PyExc_SystemExit, "OnInit returned false, exiting...");
 205         return NULL;
 206     }
 207
 208 #ifdef __WXGTK__
 209     wxTheApp->m_initialized = (wxTopLevelWindows.Number() > 0);
 210 #endif
 211
 212     Py_INCREF(Py_None);
 213     return Py_None;
 214 }
 215
 216
 217
 218
 219
 220 PyObject* wxPython_dict;
 221 PyObject* __wxSetDictionary(PyObject* /* self */, PyObject* args)
 222 {
 223
 224     if (!PyArg_ParseTuple(args, "O", &wxPython_dict))
 225         return NULL;
 226
 227     if (!PyDict_Check(wxPython_dict)) {
 228         PyErr_SetString(PyExc_TypeError, "_wxSetDictionary must have dictionary object!");
 229         return NULL;
 230     }
 231 #ifdef __WXMOTIF__
 232 #define wxPlatform "__WXMOTIF__"
 233 #endif
 234 #ifdef __WXQT__
 235 #define wxPlatform "__WXQT__"
 236 #endif
 237 #ifdef __WXGTK__
 238 #define wxPlatform "__WXGTK__"
 239 #endif
 240 #if defined(__WIN32__) || defined(__WXMSW__)
 241 #define wxPlatform "__WXMSW__"
 242 #endif
 243 #ifdef __WXMAC__
 244 #define wxPlatform "__WXMAC__"
 245 #endif
 246
 247     PyDict_SetItemString(wxPython_dict, "wxPlatform", PyString_FromString(wxPlatform));
 248
 249     Py_INCREF(Py_None);
 250     return Py_None;
 251 }
 252
 253
 254 //---------------------------------------------------------------------------
 255
 256
 257 static
 258 PyObject* wxPyConstructObject(void* ptr, char* className)
 259 {
 260     char    buff[64];               // should always be big enough...
 261     char    swigptr[64];
 262
 263     sprintf(buff, "_%s_p", className);
 264     SWIG_MakePtr(swigptr, ptr, buff);
 265
 266     sprintf(buff, "%sPtr", className);
 267     PyObject* classobj = PyDict_GetItemString(wxPython_dict, buff);
 268     if (! classobj) {
 269         Py_INCREF(Py_None);
 270         return Py_None;
 271     }
 272
 273     PyObject* arg = Py_BuildValue("(s)", swigptr);
 274     PyObject* obj = PyInstance_New(classobj, arg, NULL);
 275     Py_DECREF(arg);
 276
 277     return obj;
 278 }
 279
 280
 281 // This function is used for all events destined for Python event handlers.
 282 void wxPyCallback::EventThunker(wxEvent& event) {
 283     wxPyCallback*   cb = (wxPyCallback*)event.m_callbackUserData;
 284     PyObject*       func = cb->m_func;
 285     PyObject*       result;
 286     PyObject*       arg;
 287     PyObject*       tuple;
 288
 289     arg = wxPyConstructObject((void*)&event, event.GetClassInfo()->GetClassName());
 290
 291     tuple = PyTuple_New(1);
 292     PyTuple_SET_ITEM(tuple, 0, arg);
 293     result = PyEval_CallObject(func, tuple);
 294     Py_DECREF(arg);
 295     Py_DECREF(tuple);
 296     if (result) {
 297         Py_DECREF(result);
 298         PyErr_Clear();
 299     } else {
 300         PyErr_Print();
 301     }
 302 }
 303
 304
 305 //---------------------------------------------------------------------------
 306
 307 wxPyMenu::wxPyMenu(const wxString& title, PyObject* _func)
 308     : wxMenu(title, (wxFunction)(func ? MenuCallback : NULL)), func(0) {
 309
 310     if (_func) {
 311         func = _func;
 312         Py_INCREF(func);
 313     }
 314 }
 315
 316 wxPyMenu::~wxPyMenu() {
 317     if (func)
 318         Py_DECREF(func);
 319 }
 320
 321
 322 void wxPyMenu::MenuCallback(wxMenu& menu, wxCommandEvent& evt) {
 323     PyObject* evtobj  = wxPyConstructObject((void*)&evt, "wxCommandEvent");
 324     PyObject* menuobj = wxPyConstructObject((void*)&menu, "wxMenu");
 325     if (PyErr_Occurred()) {
 326         // bail out if a problem
 327         PyErr_Print();
 328         return;
 329     }
 330     // Now call the callback...
 331     PyObject* func = ((wxPyMenu*)&menu)->func;
 332     PyObject* args = Py_BuildValue("(OO)", menuobj, evtobj);
 333     PyObject* res  = PyEval_CallObject(func, args);
 334     Py_DECREF(args);
 335     Py_DECREF(res);
 336     Py_DECREF(evtobj);
 337     Py_DECREF(menuobj);
 338 }
 339
 340
 341 //---------------------------------------------------------------------------
 342
 343 wxPyTimer::wxPyTimer(PyObject* callback) {
 344     func = callback;
 345     Py_INCREF(func);
 346 }
 347
 348 wxPyTimer::~wxPyTimer() {
 349     Py_DECREF(func);
 350 }
 351
 352 void wxPyTimer::Notify() {
 353     PyObject*   result;
 354     PyObject*   args = Py_BuildValue("()");
 355
 356     result = PyEval_CallObject(func, args);
 357     Py_DECREF(args);
 358     if (result) {
 359         Py_DECREF(result);
 360         PyErr_Clear();
 361     } else {
 362         PyErr_Print();
 363     }
 364 }
 365
 366
 367
 368 //----------------------------------------------------------------------
 369 //----------------------------------------------------------------------
 370 // Some helper functions for typemaps in my_typemaps.i, so they won't be
 371 // imcluded in every file...
 372
 373
 374 int* int_LIST_helper(PyObject* source) {
 375     if (!PyList_Check(source)) {
 376         PyErr_SetString(PyExc_TypeError, "Expected a list object.");
 377         return NULL;
 378     }
 379     int count = PyList_Size(source);
 380     int* temp = new int[count];
 381     if (! temp) {
 382         PyErr_SetString(PyExc_MemoryError, "Unable to allocate temporary array");
 383         return NULL;
 384     }
 385     for (int x=0; x<count; x++) {
 386         PyObject* o = PyList_GetItem(source, x);
 387         if (! PyInt_Check(o)) {
 388             PyErr_SetString(PyExc_TypeError, "Expected a list of integers.");
 389             return NULL;
 390         }
 391         temp[x] = PyInt_AsLong(o);
 392     }
 393     return temp;
 394 }
 395
 396
 397 long* long_LIST_helper(PyObject* source) {
 398     if (!PyList_Check(source)) {
 399         PyErr_SetString(PyExc_TypeError, "Expected a list object.");
 400         return NULL;
 401     }
 402     int count = PyList_Size(source);
 403     long* temp = new long[count];
 404     if (! temp) {
 405         PyErr_SetString(PyExc_MemoryError, "Unable to allocate temporary array");
 406         return NULL;
 407     }
 408     for (int x=0; x<count; x++) {
 409         PyObject* o = PyList_GetItem(source, x);
 410         if (! PyInt_Check(o)) {
 411             PyErr_SetString(PyExc_TypeError, "Expected a list of integers.");
 412             return NULL;
 413         }
 414         temp[x] = PyInt_AsLong(o);
 415     }
 416     return temp;
 417 }
 418
 419
 420 char** string_LIST_helper(PyObject* source) {
 421     if (!PyList_Check(source)) {
 422         PyErr_SetString(PyExc_TypeError, "Expected a list object.");
 423         return NULL;
 424     }
 425     int count = PyList_Size(source);
 426     char** temp = new char*[count];
 427     if (! temp) {
 428         PyErr_SetString(PyExc_MemoryError, "Unable to allocate temporary array");
 429         return NULL;
 430     }
 431     for (int x=0; x<count; x++) {
 432         PyObject* o = PyList_GetItem(source, x);
 433         if (! PyString_Check(o)) {
 434             PyErr_SetString(PyExc_TypeError, "Expected a list of strings.");
 435             return NULL;
 436         }
 437         temp[x] = PyString_AsString(o);
 438     }
 439     return temp;
 440 }
 441
 442
 443
 444 wxPoint* wxPoint_LIST_helper(PyObject* source) {
 445     if (!PyList_Check(source)) {
 446         PyErr_SetString(PyExc_TypeError, "Expected a list object.");
 447         return NULL;
 448     }
 449     int count = PyList_Size(source);
 450     wxPoint* temp = new wxPoint[count];
 451     if (! temp) {
 452         PyErr_SetString(PyExc_MemoryError, "Unable to allocate temporary array");
 453         return NULL;
 454     }
 455     for (int x=0; x<count; x++) {
 456         PyObject* o = PyList_GetItem(source, x);
 457         if (PyString_Check(o)) {
 458             char*       st = PyString_AsString(o);
 459             wxPoint*    pt;
 460             if (SWIG_GetPtr(st,(void **) &pt,"_wxPoint_p")) {
 461                 PyErr_SetString(PyExc_TypeError,"Expected _wxPoint_p.");
 462                 return NULL;
 463             }
 464             temp[x] = *pt;
 465         }
 466         else if (PyTuple_Check(o)) {
 467             PyObject* o1 = PyTuple_GetItem(o, 0);
 468             PyObject* o2 = PyTuple_GetItem(o, 1);
 469
 470             temp[x].x = PyInt_AsLong(o1);
 471             temp[x].y = PyInt_AsLong(o2);
 472         }
 473         else {
 474             PyErr_SetString(PyExc_TypeError, "Expected a list of 2-tuples or wxPoints.");
 475             return NULL;
 476         }
 477     }
 478     return temp;
 479 }
 480
 481
 482 wxBitmap** wxBitmap_LIST_helper(PyObject* source) {
 483     if (!PyList_Check(source)) {
 484         PyErr_SetString(PyExc_TypeError, "Expected a list object.");
 485         return NULL;
 486     }
 487     int count = PyList_Size(source);
 488     wxBitmap** temp = new wxBitmap*[count];
 489     if (! temp) {
 490         PyErr_SetString(PyExc_MemoryError, "Unable to allocate temporary array");
 491         return NULL;
 492     }
 493     for (int x=0; x<count; x++) {
 494         PyObject* o = PyList_GetItem(source, x);
 495         if (PyString_Check(o)) {
 496             char*       st = PyString_AsString(o);
 497             wxBitmap*    pt;
 498             if (SWIG_GetPtr(st,(void **) &pt,"_wxBitmap_p")) {
 499                 PyErr_SetString(PyExc_TypeError,"Expected _wxBitmap_p.");
 500                 return NULL;
 501             }
 502             temp[x] = pt;
 503         }
 504         else {
 505             PyErr_SetString(PyExc_TypeError, "Expected a list of wxBitmaps.");
 506             return NULL;
 507         }
 508     }
 509     return temp;
 510 }
 511
 512
 513
 514 wxString* wxString_LIST_helper(PyObject* source) {
 515     if (!PyList_Check(source)) {
 516         PyErr_SetString(PyExc_TypeError, "Expected a list object.");
 517         return NULL;
 518     }
 519     int count = PyList_Size(source);
 520     wxString* temp = new wxString[count];
 521     if (! temp) {
 522         PyErr_SetString(PyExc_MemoryError, "Unable to allocate temporary array");
 523         return NULL;
 524     }
 525     for (int x=0; x<count; x++) {
 526         PyObject* o = PyList_GetItem(source, x);
 527         if (! PyString_Check(o)) {
 528             PyErr_SetString(PyExc_TypeError, "Expected a list of strings.");
 529             return NULL;
 530         }
 531         temp[x] = PyString_AsString(o);
 532     }
 533     return temp;
 534 }
 535
 536
 537 #ifdef __WXMSW__
 538 wxAcceleratorEntry* wxAcceleratorEntry_LIST_helper(PyObject* source) {
 539     if (!PyList_Check(source)) {
 540         PyErr_SetString(PyExc_TypeError, "Expected a list object.");
 541         return NULL;
 542     }
 543     int count                = PyList_Size(source);
 544     wxAcceleratorEntry* temp = new wxAcceleratorEntry[count];
 545     if (! temp) {
 546         PyErr_SetString(PyExc_MemoryError, "Unable to allocate temporary array");
 547         return NULL;
 548     }
 549     for (int x=0; x<count; x++) {
 550         PyObject* o = PyList_GetItem(source, x);
 551         if (PyString_Check(o)) {
 552             char*               st = PyString_AsString(o);
 553             wxAcceleratorEntry* ae;
 554             if (SWIG_GetPtr(st,(void **) &ae,"_wxAcceleratorEntry_p")) {
 555                 PyErr_SetString(PyExc_TypeError,"Expected _wxAcceleratorEntry_p.");
 556                 return NULL;
 557             }
 558             temp[x] = *ae;
 559         }
 560         else if (PyTuple_Check(o)) {
 561             PyObject* o1 = PyTuple_GetItem(o, 0);
 562             PyObject* o2 = PyTuple_GetItem(o, 1);
 563             PyObject* o3 = PyTuple_GetItem(o, 2);
 564
 565             temp[x].m_flags   = PyInt_AsLong(o1);
 566             temp[x].m_keyCode = PyInt_AsLong(o2);
 567             temp[x].m_command = PyInt_AsLong(o3);
 568         }
 569         else {
 570             PyErr_SetString(PyExc_TypeError, "Expected a list of 3-tuples or wxAcceleratorEntry objects.");
 571             return NULL;
 572         }
 573     }
 574     return temp;
 575 }
 576
 577 #endif
 578
 579 //----------------------------------------------------------------------
 580 // A WinMain for when wxWindows and Python are linked together in a single
 581 // application, instead of as a dynamic module
 582
 583
 584 //#if !defined(WIN_PYD) && defined(WIN32)
 585
 586 //extern "C" int Py_Main(int argc, char** argv);
 587
 588 //int APIENTRY WinMain(HANDLE hInstance, HANDLE hPrevInstance, LPSTR m_lpCmdLine,
 589 //                    int nCmdShow )
 590 //{
 591
 592 //    wxpCreateApp();
 593
 594 //        // Initialize wxWindows, but don't start the main loop
 595 //    wxEntry(hInstance, hPrevInstance, m_lpCmdLine, nCmdShow, FALSE);
 596
 597 //    Py_Initialize();
 598 //    PyObject *argvList = PyList_New(0);
 599
 600 //    char*   stderrfilename = "wxpstderr.log";
 601 //    int     pyargc = 1;
 602 //    char*   script = NULL;
 603 //    int     argc = wxPythonApp->argc;
 604 //    char**  argv = wxPythonApp->argv;
 605
 606 //    for (int i = 1; i < argc; i++) {
 607 //        if (strncmp(argv[i], "wxpstderr=", 10) == 0)
 608 //            stderrfilename = argv[i]+10;
 609 //        else {
 610 //            PyList_Append(argvList, PyString_FromString(argv[i]));
 611 //            if (!script)
 612 //                script = argv[i];
 613 //            pyargc++;
 614 //        }
 615 //    }
 616
 617 //    PySys_SetObject("argv", argvList);
 618
 619 //#if 1
 620 //    char buf[256];
 621 ////    //PyRun_SimpleString("import sys; sys.stdout=open('wxpstdout.log','w')");
 622 //    sprintf(buf, "import sys; sys.stdout=sys.stderr=open('%s','w')", stderrfilename);
 623 //    PyRun_SimpleString(buf);
 624 //#endif
 625
 626 //    initwxPythonc();
 627
 628 //    if (script) {
 629 //        FILE *fp = fopen(script, "r");
 630 //        if (fp) {
 631 //            PyRun_SimpleFile(fp, script);// This returns after wxpApp constructor
 632 //            fclose(fp);
 633 //        }
 634 //        else {
 635 //            char msg[256];
 636 //            sprintf(msg, "Cannot open %s", script);
 637 //            wxMessageBox(msg);
 638 //        }
 639 //    }
 640 //    else
 641 //        PyRun_SimpleString("import wxpide");
 642
 643 //    return 0;
 644 //}
 645
 646
 647 //#endif
 648
 649 //----------------------------------------------------------------------
 650
 651 /////////////////////////////////////////////////////////////////////////////
 652 //
 653 // $Log$
 654 // Revision 1.10  1998/10/02 06:40:39  RD
 655 // Version 0.4 of wxPython for MSW.
 656 //
 657 // Revision 1.9  1998/09/25 13:28:52  VZ
 658 //
 659 // USE_xxx constants renamed to wxUSE_xxx. This is an incompatible change, you
 660 // must recompile everything after upgrading!
 661 //
 662 // Revision 1.8  1998/08/27 21:59:08  RD
 663 // Some chicken-and-egg problems solved for wxPython on wxGTK
 664 //
 665 // Revision 1.7  1998/08/27 00:00:26  RD
 666 // - more tweaks
 667 // - have discovered some problems but not yet discovered solutions...
 668 //
 669 // Revision 1.6  1998/08/18 21:54:12  RD
 670 //
 671 // ifdef out some wxGTK specific code
 672 //
 673 // Revision 1.5  1998/08/18 19:48:17  RD
 674 // more wxGTK compatibility things.
 675 //
 676 // It builds now but there are serious runtime problems...
 677 //
 678 // Revision 1.4  1998/08/16 04:31:06  RD
 679 // More wxGTK work.
 680 //
 681 // Revision 1.3  1998/08/15 07:36:36  RD
 682 // - Moved the header in the .i files out of the code that gets put into
 683 // the .cpp files.  It caused CVS conflicts because of the RCS ID being
 684 // different each time.
 685 //
 686 // - A few minor fixes.
 687 //
 688 // Revision 1.2  1998/08/14 23:36:36  RD
 689 // Beginings of wxGTK compatibility
 690 //
 691 // Revision 1.1  1998/08/09 08:25:51  RD
 692 // Initial version
 693 //
 694 //