| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | /***********************************************************
 | 
					
						
							| 
									
										
										
										
											1995-01-04 19:12:13 +00:00
										 |  |  | Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam, | 
					
						
							|  |  |  | The Netherlands. | 
					
						
							| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | 
 | 
					
						
							|  |  |  |                         All Rights Reserved | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1996-10-25 14:44:06 +00:00
										 |  |  | Permission to use, copy, modify, and distribute this software and its | 
					
						
							|  |  |  | documentation for any purpose and without fee is hereby granted, | 
					
						
							| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | provided that the above copyright notice appear in all copies and that | 
					
						
							| 
									
										
										
										
											1996-10-25 14:44:06 +00:00
										 |  |  | both that copyright notice and this permission notice appear in | 
					
						
							| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | supporting documentation, and that the names of Stichting Mathematisch | 
					
						
							| 
									
										
										
										
											1996-10-25 14:44:06 +00:00
										 |  |  | Centrum or CWI or Corporation for National Research Initiatives or | 
					
						
							|  |  |  | CNRI not be used in advertising or publicity pertaining to | 
					
						
							|  |  |  | distribution of the software without specific, written prior | 
					
						
							|  |  |  | permission. | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | While CWI is the initial source for this software, a modified version | 
					
						
							|  |  |  | is made available by the Corporation for National Research Initiatives | 
					
						
							|  |  |  | (CNRI) at the Internet address ftp://ftp.python.org.
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH | 
					
						
							|  |  |  | REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF | 
					
						
							|  |  |  | MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH | 
					
						
							|  |  |  | CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL | 
					
						
							|  |  |  | DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR | 
					
						
							|  |  |  | PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER | 
					
						
							|  |  |  | TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR | 
					
						
							|  |  |  | PERFORMANCE OF THIS SOFTWARE. | 
					
						
							| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | 
 | 
					
						
							|  |  |  | ******************************************************************/ | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | /* Python interpreter main program for frozen scripts */ | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1995-03-31 10:27:23 +00:00
										 |  |  | #include "Python.h"
 | 
					
						
							| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											1998-04-03 21:11:15 +00:00
										 |  |  | #ifdef MS_WIN32
 | 
					
						
							|  |  |  | extern void PyWinFreeze_ExeInit(); | 
					
						
							|  |  |  | extern void PyWinFreeze_ExeTerm(); | 
					
						
							|  |  |  | #endif
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1998-01-19 22:05:22 +00:00
										 |  |  | #ifdef HAVE_UNISTD_H
 | 
					
						
							|  |  |  | #include <unistd.h> /* For isatty() */
 | 
					
						
							|  |  |  | #endif
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1998-08-04 22:46:29 +00:00
										 |  |  | /* For isatty()'s proto. - [cjh] */ | 
					
						
							|  |  |  | #ifdef HAVE_UNISTD_H
 | 
					
						
							|  |  |  | #include <unistd.h>
 | 
					
						
							|  |  |  | #endif
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1995-08-04 04:10:43 +00:00
										 |  |  | /* Main program */ | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | int | 
					
						
							| 
									
										
										
										
											1997-07-19 21:59:47 +00:00
										 |  |  | Py_FrozenMain(argc, argv) | 
					
						
							| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | 	int argc; | 
					
						
							|  |  |  | 	char **argv; | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  | 	char *p; | 
					
						
							| 
									
										
										
										
											1993-11-05 10:16:09 +00:00
										 |  |  | 	int n, sts; | 
					
						
							|  |  |  | 	int inspect = 0; | 
					
						
							| 
									
										
										
										
											1994-08-30 08:27:36 +00:00
										 |  |  | 	int unbuffered = 0; | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1998-02-06 22:30:29 +00:00
										 |  |  | 	Py_FrozenFlag = 1; /* Suppress errors from getpath.c */ | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1993-06-24 11:10:19 +00:00
										 |  |  | 	if ((p = getenv("PYTHONINSPECT")) && *p != '\0') | 
					
						
							|  |  |  | 		inspect = 1; | 
					
						
							| 
									
										
										
										
											1994-08-30 08:27:36 +00:00
										 |  |  | 	if ((p = getenv("PYTHONUNBUFFERED")) && *p != '\0') | 
					
						
							|  |  |  | 		unbuffered = 1; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 	if (unbuffered) { | 
					
						
							| 
									
										
										
										
											1997-12-02 20:41:39 +00:00
										 |  |  | 		setbuf(stdin, (char *)NULL); | 
					
						
							| 
									
										
										
										
											1994-08-30 08:27:36 +00:00
										 |  |  | 		setbuf(stdout, (char *)NULL); | 
					
						
							|  |  |  | 		setbuf(stderr, (char *)NULL); | 
					
						
							|  |  |  | 	} | 
					
						
							| 
									
										
										
										
											1993-06-24 11:10:19 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											1997-07-19 19:24:41 +00:00
										 |  |  | 	Py_SetProgramName(argv[0]); | 
					
						
							|  |  |  | 	Py_Initialize(); | 
					
						
							| 
									
										
										
										
											1998-04-03 21:11:15 +00:00
										 |  |  | #ifdef MS_WIN32
 | 
					
						
							|  |  |  | 	PyWinFreeze_ExeInit(); | 
					
						
							|  |  |  | #endif
 | 
					
						
							| 
									
										
										
										
											1997-07-19 19:24:41 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											1995-03-31 10:27:23 +00:00
										 |  |  | 	if (Py_VerboseFlag) | 
					
						
							| 
									
										
										
										
											1994-08-30 08:27:36 +00:00
										 |  |  | 		fprintf(stderr, "Python %s\n%s\n", | 
					
						
							| 
									
										
										
										
											1996-05-28 22:30:17 +00:00
										 |  |  | 			Py_GetVersion(), Py_GetCopyright()); | 
					
						
							| 
									
										
										
										
											1997-07-19 19:24:41 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											1995-03-31 10:27:23 +00:00
										 |  |  | 	PySys_SetArgv(argc, argv); | 
					
						
							| 
									
										
										
										
											1993-06-24 11:10:19 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											1995-03-31 10:27:23 +00:00
										 |  |  | 	n = PyImport_ImportFrozenModule("__main__"); | 
					
						
							| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | 	if (n == 0) | 
					
						
							| 
									
										
										
										
											1995-03-31 10:27:23 +00:00
										 |  |  | 		Py_FatalError("__main__ not frozen"); | 
					
						
							| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | 	if (n < 0) { | 
					
						
							| 
									
										
										
										
											1995-03-31 10:27:23 +00:00
										 |  |  | 		PyErr_Print(); | 
					
						
							| 
									
										
										
										
											1993-06-24 11:10:19 +00:00
										 |  |  | 		sts = 1; | 
					
						
							| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | 	} | 
					
						
							|  |  |  | 	else | 
					
						
							| 
									
										
										
										
											1993-06-24 11:10:19 +00:00
										 |  |  | 		sts = 0; | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											1993-07-05 10:31:29 +00:00
										 |  |  | 	if (inspect && isatty((int)fileno(stdin))) | 
					
						
							| 
									
										
										
										
											1995-03-31 10:27:23 +00:00
										 |  |  | 		sts = PyRun_AnyFile(stdin, "<stdin>") != 0; | 
					
						
							| 
									
										
										
										
											1993-06-24 11:10:19 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											1998-04-03 21:11:15 +00:00
										 |  |  | #ifdef MS_WIN32
 | 
					
						
							|  |  |  | 	PyWinFreeze_ExeTerm(); | 
					
						
							|  |  |  | #endif
 | 
					
						
							| 
									
										
										
										
											1997-08-15 02:52:08 +00:00
										 |  |  | 	Py_Finalize(); | 
					
						
							|  |  |  | 	return sts; | 
					
						
							| 
									
										
										
										
											1993-04-01 20:59:32 +00:00
										 |  |  | } |