mirrors/cpython
1
0
Fork 0
mirror of https://github.com/python/cpython.git synced 2025-07-23 11:15:24 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 11

Changes to make these work under OSX as the main program for a

Browse source 
fullblown drag and drop application. To my surprise it is starting
to work already: Python actually executes a script dropped on it.

To be done:
- Make sure this still works in MacPython
- Don't lose argv[0] in the process
- Applet support
This commit is contained in:
Jack Jansen 2001-09-05 22:07:52 +00:00
parent b30e106633
commit dff7770b7f
2 changed files with 113 additions and 53 deletions
Download patch file Download diff file Expand all files Collapse all files

53
Mac/Python/macgetargv.c
View file

@ -27,6 +27,7 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
#include <stdlib.h>
#ifdef WITHOUT_FRAMEWORKS
#include <Types.h>
#include <Files.h>
#include <Events.h>
@ -40,6 +41,9 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
#include <Menus.h>
#include <Dialogs.h>
#include <Windows.h>
#else
#include <Carbon/Carbon.h>
#endif /* WITHOUT_FRAMEWORKS */
#if UNIVERSAL_INTERFACES_VERSION >= 0x0340
typedef long refcontype;
@ -54,7 +58,6 @@ static int arg_count;
static char *arg_vector[256];
FSSpec PyMac_ApplicationFSSpec;
char PyMac_ApplicationPath[256];
static int applocation_inited;
/* Duplicate a string to the heap. We also export this since it isn't standard
** and others use it
@ -70,14 +73,33 @@ strdup(const char *src)
}
#endif
#if TARGET_API_MAC_OSX
OSErr
PyMac_GetFullPath(FSSpec *fss, char *path)
{
FSRef fsr;
OSErr err;
*path = '\0';
err = FSpMakeFSRef(fss, &fsr);
if ( err ) return err;
err = (OSErr)FSRefMakePath(&fsr, path, 1024);
if ( err ) return err;
return 0;
}
#endif /* TARGET_API_MAC_OSX */
#if !TARGET_API_MAC_OSX
/* Initialize FSSpec and full name of current application */
OSErr
PyMac_init_process_location()
PyMac_init_process_location(void)
{
ProcessSerialNumber currentPSN;
ProcessInfoRec info;
OSErr err;
static int applocation_inited;
if ( applocation_inited ) return 0;
currentPSN.highLongOfPSN = 0;
@ -92,6 +114,7 @@ PyMac_init_process_location()
applocation_inited = 1;
return 0;
}
#endif /* !TARGET_API_MAC_OSX */
/* Check that there aren't any args remaining in the event */
@ -147,15 +170,15 @@ handle_open_doc(const AppleEvent *theAppleEvent, AppleEvent *reply, refcontype r
DescType rttype;
long i, ndocs, size;
FSSpec fss;
char path[256];
char path[1024];
got_one = 1;
if (err = AEGetParamDesc(theAppleEvent,
keyDirectObject, typeAEList, &doclist))
if ((err = AEGetParamDesc(theAppleEvent,
keyDirectObject, typeAEList, &doclist)))
return err;
if (err = get_missing_params(theAppleEvent))
if ((err = get_missing_params(theAppleEvent)))
return err;
if (err = AECountItems(&doclist, &ndocs))
if ((err = AECountItems(&doclist, &ndocs)))
return err;
for(i = 1; i <= ndocs; i++) {
err = AEGetNthPtr(&doclist, i, typeFSS,
@ -174,7 +197,7 @@ AEEventHandlerUPP open_app_upp;
AEEventHandlerUPP not_upp;
static void
set_ae_handlers()
set_ae_handlers(void)
{
open_doc_upp = NewAEEventHandlerUPP(&handle_open_doc);
open_app_upp = NewAEEventHandlerUPP(&handle_open_app);
@ -193,7 +216,7 @@ set_ae_handlers()
/* Uninstall standard core event handlers */
static void
reset_ae_handlers()
reset_ae_handlers(void)
{
AERemoveEventHandler(kCoreEventClass, kAEOpenApplication,
open_app_upp, false);
@ -208,7 +231,7 @@ reset_ae_handlers()
/* Wait for events until a core event has been handled */
static void
event_loop()
event_loop(void)
{
EventRecord event;
int n;
@ -229,14 +252,16 @@ event_loop()
/* Get the argv vector, return argc */
int
PyMac_GetArgv(pargv, noevents)
char ***pargv;
int noevents;
PyMac_GetArgv(char ***pargv, int noevents)
{
arg_count = 0;
#if TARGET_API_MAC_OSX
/* In an OSX bundle argv[0] is okay */
arg_count++;
#else
(void)PyMac_init_process_location();
arg_vector[arg_count++] = strdup(PyMac_ApplicationPath);
#endif /* TARGET_API_MAC_OSX */
if( !noevents ) {
set_ae_handlers();

113
Mac/Python/macmain.c
View file

@ -30,6 +30,7 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
#include "marshal.h"
#include "macglue.h"
#ifdef WITHOUT_FRAMEWORKS
#include <Memory.h>
#include <Resources.h>
#include <stdio.h>
@ -41,21 +42,23 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
#include <Gestalt.h>
#include <Appearance.h>
#endif /* USE_APPEARANCE */
#else
#include <Carbon/Carbon.h>
#endif /* WITHOUT_FRAMEWORKS */
#ifdef __MWERKS__
#include <SIOUX.h>
#define USE_SIOUX
extern int ccommand(char ***);
#if __profile__ == 1
#include <profiler.h>
#endif
#endif
#endif /* __profile__ */
#endif /* __MWERKS__ */
#include <unistd.h>
#ifdef USE_MAC_SHARED_LIBRARY
extern PyMac_AddLibResources(void);
#endif
//#ifdef USE_GUSI
//#include "GUSISIOUX.h"
//#endif
#define STARTUP "PythonStartup"
@ -81,7 +84,7 @@ PyMac_PrefRecord PyMac_options;
static void Py_Main(int, char **); /* Forward */
void PyMac_Exit(int); /* Forward */
static void init_appearance()
static void init_appearance(void)
{
#ifdef USE_APPEARANCE
OSErr err;
@ -99,7 +102,7 @@ no_appearance:
/* Initialize the Mac toolbox world */
static void
init_mac_world()
init_mac_world(void)
{
#if !TARGET_API_MAC_CARBON
/* These aren't needed for carbon */
@ -127,8 +130,6 @@ PyMac_InteractiveOptions(PyMac_PrefRecord *p, int *argcp, char ***argvp)
ControlHandle handle;
DialogPtr dialog;
Rect rect;
int old_argc = *argcp;
int i;
/*
** If the preferences disallows interactive options we return,
@ -191,7 +192,10 @@ PyMac_InteractiveOptions(PyMac_PrefRecord *p, int *argcp, char ***argvp)
HMSetBalloons(!HMGetBalloons());
}
#endif
#if !TARGET_API_MAC_OSX
if ( item == OPT_CMDLINE ) {
int old_argc = *argcp;
int i;
int new_argc, newer_argc;
char **new_argv, **newer_argv;
@ -209,6 +213,7 @@ PyMac_InteractiveOptions(PyMac_PrefRecord *p, int *argcp, char ***argvp)
/* XXXX Is it not safe to use free() here, apparently */
}
#endif /* !TARGET_API_MAC_OSX */
#define OPT_ITEM(num, var) \
if ( item == (num) ) { \
p->var = !p->var; \
@ -283,7 +288,9 @@ init_common(int *argcp, char ***argvp, int embedded)
#ifdef USE_SIOUX
/* Set various SIOUX flags. Some are changed later based on options */
/* SIOUXSettings.standalone = 0; /* XXXX Attempting to keep sioux from eating events */
#if 0
SIOUXSettings.standalone = 0; /* XXXX Attempting to keep sioux from eating events */
#endif
SIOUXSettings.asktosaveonclose = 0;
SIOUXSettings.showstatusline = 0;
SIOUXSettings.tabspaces = 4;
@ -291,8 +298,11 @@ init_common(int *argcp, char ***argvp, int embedded)
/* Get options from preference file (or from applet resource fork) */
PyMac_options.keep_console = POPT_KEEPCONSOLE_OUTPUT; /* default-default */
PyMac_options.unixnewlines = 1;
#if !TARGET_API_MAC_OSX
PyMac_PreferenceOptions(&PyMac_options);
#endif
if ( embedded ) {
static char *emb_argv[] = {"embedded-python", 0};
@ -301,6 +311,7 @@ init_common(int *argcp, char ***argvp, int embedded)
} else {
/* Create argc/argv. Do it before we go into the options event loop. */
*argcp = PyMac_GetArgv(argvp, PyMac_options.noargs);
#if !TARGET_API_MAC_OSX
#ifndef NO_ARGV0_CHDIR
if (*argcp >= 1 && (*argvp)[0] && (*argvp)[0][0]) {
/* Workaround for MacOS X, which currently (DP4) doesn't set
@ -313,6 +324,7 @@ init_common(int *argcp, char ***argvp, int embedded)
if ( p ) *p = 0;
chdir(app_wd);
}
#endif
#endif
/* Do interactive option setting, if allowed and <option> depressed */
PyMac_InteractiveOptions(&PyMac_options, argcp, argvp);
@ -326,6 +338,7 @@ init_common(int *argcp, char ***argvp, int embedded)
Py_NoSiteFlag = PyMac_options.nosite;
Py_TabcheckFlag = PyMac_options.tabwarn;
Py_DivisionWarningFlag = PyMac_options.divisionwarn;
#if !TARGET_API_MAC_OSX
if ( PyMac_options.noargs ) {
/* don't process events at all without the scripts permission */
PyMacSchedParams scp;
@ -335,7 +348,7 @@ init_common(int *argcp, char ***argvp, int embedded)
/* Should we disable command-dot as well? */
PyMac_SetSchedParams(&scp);
}
/* XXXX dispatch oldexc and nosite */
#endif /* !TARGET_API_MAC_OSX */
/* Set buffering */
if (PyMac_options.unbuffered) {
@ -363,7 +376,7 @@ init_common(int *argcp, char ***argvp, int embedded)
** Inspection mode after script/applet termination
*/
static int
run_inspect()
run_inspect(void)
{
int sts = 0;
@ -378,7 +391,7 @@ run_inspect()
** if available on this machine.
*/
static void
PyMac_InstallNavServicesForSF()
PyMac_InstallNavServicesForSF(void)
{
if ( !PyMac_options.nonavservice ) {
PyObject *m = PyImport_ImportModule("macfsn");
@ -401,7 +414,7 @@ PyMac_InstallNavServicesForSF()
/* Run a compiled Python Python script from 'PYC ' resource __main__ */
static int
run_main_resource()
run_main_resource(void)
{
Handle h;
long size;
@ -434,7 +447,7 @@ run_main_resource()
/* Initialization sequence for applets */
void
PyMac_InitApplet()
PyMac_InitApplet(void)
{
int argc;
char **argv;
@ -460,7 +473,7 @@ PyMac_InitApplet()
** Hook for embedding python.
*/
void
PyMac_Initialize()
PyMac_Initialize(void)
{
int argc;
char **argv;
@ -473,9 +486,25 @@ PyMac_Initialize()
#endif /* USE_MAC_APPLET_SUPPORT */
#if TARGET_API_MAC_OSX
int
main(int argc, char **argv)
{
int i;
printf("first argc=%d\n", argc);
for(i=0; i<argc; i++) printf("first argv[%d] = \"%s\"\n", i, argv[i]);
init_common(&argc, &argv, 0);
printf("second argc=%d\n", argc);
for(i=0; i<argc; i++) printf("second argv[%d] = \"%s\"\n", i, argv[i]);
Py_Main(argc, argv);
return 0;
}
#else
/* For normal application */
void
PyMac_InitApplication()
PyMac_InitApplication(void)
{
int argc;
char **argv;
@ -505,13 +534,12 @@ PyMac_InitApplication()
}
Py_Main(argc, argv);
}
#endif /* TARGET_API_MAC_OSX */
/* Main program */
static void
Py_Main(argc, argv)
int argc;
char **argv;
Py_Main(int argc, char **argv)
{
int sts;
char *command = NULL;
@ -521,7 +549,7 @@ Py_Main(argc, argv)
filename = argv[1];
if (Py_VerboseFlag ||
command == NULL && filename == NULL && isatty((int)fileno(fp)))
(command == NULL && filename == NULL && isatty((int)fileno(fp))))
fprintf(stderr, "Python %s on %s\n%s\n",
Py_GetVersion(), Py_GetPlatform(), COPYRIGHT);
@ -533,9 +561,11 @@ Py_Main(argc, argv)
}
}
#if !TARGET_API_MAC_OSX
/* We initialize the menubar here, hoping SIOUX is initialized by now */
PyMac_InitMenuBar();
#endif
Py_Initialize();
PyUnicode_SetDefaultEncoding(PyMac_getscript());
@ -564,11 +594,12 @@ Py_Main(argc, argv)
/*NOTREACHED*/
}
#if !TARGET_API_MAC_OSX
/*
** Reset the "unseen output" flag
*/
void
PyMac_OutputSeen()
PyMac_OutputSeen(void)
{
if ( console_output_state == STATE_UNKNOWN )
PyMac_InitMenuBar();
@ -579,7 +610,7 @@ PyMac_OutputSeen()
** Set the "unseen output" flag
*/
void
PyMac_OutputNotSeen()
PyMac_OutputNotSeen(void)
{
if ( console_output_state == STATE_UNKNOWN )
PyMac_InitMenuBar();
@ -590,20 +621,22 @@ PyMac_OutputNotSeen()
** Override abort() - The default one is not what we want.
*/
void
abort()
abort(void)
{
console_output_state = STATE_LASTWRITE;
PyMac_Exit(1);
}
#endif /* !TARGET_API_MAC_OSX */
/*
** Terminate application
*/
void
PyMac_Exit(status)
int status;
PyMac_Exit(int status)
{
#ifdef USE_SIOUX
int keep = 0;
#endif
#if __profile__ == 1
ProfilerDump("\pPython Profiler Results");
@ -649,14 +682,7 @@ PyMac_Exit(status)
exit(status);
}
/* Return the program name -- some code out there needs this. */
char *
Py_GetProgramFullPath()
{
return orig_argv[0];
}
#if !TARGET_API_MAC_OSX
/* Make the *original* argc/argv available to other modules.
This is rare, but it is needed by the secureware extension. */
@ -666,23 +692,31 @@ Py_GetArgcArgv(int *argc,char ***argv)
*argc = orig_argc;
*argv = orig_argv;
}
#endif
/* More cruft that shouldn't really be here, used in sysmodule.c */
#if !TARGET_API_MAC_OSX
/* Return the program name -- some code out there needs this. */
char *
Py_GetProgramFullPath(void)
{
return orig_argv[0];
}
char *
Py_GetPrefix()
Py_GetPrefix(void)
{
return PyMac_GetPythonDir();
}
char *
Py_GetExecPrefix()
Py_GetExecPrefix(void)
{
return PyMac_GetPythonDir();
}
int
PyMac_GetDelayConsoleFlag()
PyMac_GetDelayConsoleFlag(void)
{
return (int)PyMac_options.delayconsole;
}
@ -705,4 +739,5 @@ __convert_to_newlines(unsigned char * buf, size_t * n_ptr)
*p = '\r';
}
#endif /* WITHOUT_UNIX_NEWLINES */
#endif /* !TARGET_API_MAC_OSX */