1997-07-19 16:25:33 -03:00
|
|
|
/* Minimal main program -- everything is loaded from the library */
|
|
|
|
|
1998-08-08 17:01:22 -03:00
|
|
|
#include "Python.h"
|
2008-04-05 17:41:37 -03:00
|
|
|
#include <locale.h>
|
1998-08-08 17:01:22 -03:00
|
|
|
|
2002-12-28 17:56:08 -04:00
|
|
|
#ifdef __FreeBSD__
|
|
|
|
#include <floatingpoint.h>
|
|
|
|
#endif
|
|
|
|
|
2008-04-05 17:41:37 -03:00
|
|
|
#ifdef MS_WINDOWS
|
|
|
|
int
|
|
|
|
wmain(int argc, wchar_t **argv)
|
|
|
|
{
|
|
|
|
return Py_Main(argc, argv);
|
|
|
|
}
|
|
|
|
#else
|
1997-08-14 23:52:08 -03:00
|
|
|
int
|
2000-07-09 17:35:15 -03:00
|
|
|
main(int argc, char **argv)
|
1997-07-19 16:25:33 -03:00
|
|
|
{
|
2008-10-19 11:15:00 -03:00
|
|
|
wchar_t **argv_copy = (wchar_t **)PyMem_Malloc(sizeof(wchar_t*)*argc);
|
2008-04-05 17:41:37 -03:00
|
|
|
/* We need a second copies, as Python might modify the first one. */
|
2008-10-19 11:15:00 -03:00
|
|
|
wchar_t **argv_copy2 = (wchar_t **)PyMem_Malloc(sizeof(wchar_t*)*argc);
|
2008-04-05 17:41:37 -03:00
|
|
|
int i, res;
|
|
|
|
char *oldloc;
|
2002-12-28 17:56:08 -04:00
|
|
|
/* 754 requires that FP exceptions run in "no stop" mode by default,
|
|
|
|
* and until C vendors implement C99's ways to control FP exceptions,
|
|
|
|
* Python requires non-stop mode. Alas, some platforms enable FP
|
|
|
|
* exceptions by default. Here we disable them.
|
|
|
|
*/
|
|
|
|
#ifdef __FreeBSD__
|
|
|
|
fp_except_t m;
|
|
|
|
|
|
|
|
m = fpgetmask();
|
|
|
|
fpsetmask(m & ~FP_X_OFL);
|
|
|
|
#endif
|
2008-04-05 17:41:37 -03:00
|
|
|
if (!argv_copy || !argv_copy2) {
|
2008-10-07 18:06:18 -03:00
|
|
|
fprintf(stderr, "out of memory\n");
|
2008-04-05 17:41:37 -03:00
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
oldloc = setlocale(LC_ALL, NULL);
|
|
|
|
setlocale(LC_ALL, "");
|
|
|
|
for (i = 0; i < argc; i++) {
|
2008-09-03 15:58:51 -03:00
|
|
|
#ifdef HAVE_BROKEN_MBSTOWCS
|
|
|
|
/* Some platforms have a broken implementation of
|
|
|
|
* mbstowcs which does not count the characters that
|
|
|
|
* would result from conversion. Use an upper bound.
|
|
|
|
*/
|
|
|
|
size_t argsize = strlen(argv[i]);
|
|
|
|
#else
|
2008-04-05 17:41:37 -03:00
|
|
|
size_t argsize = mbstowcs(NULL, argv[i], 0);
|
2008-09-03 15:58:51 -03:00
|
|
|
#endif
|
|
|
|
size_t count;
|
2008-04-05 17:41:37 -03:00
|
|
|
if (argsize == (size_t)-1) {
|
2008-10-07 18:06:18 -03:00
|
|
|
fprintf(stderr, "Could not convert argument %d to string\n", i);
|
2008-04-05 17:41:37 -03:00
|
|
|
return 1;
|
|
|
|
}
|
2008-10-19 11:15:00 -03:00
|
|
|
argv_copy[i] = (wchar_t *)PyMem_Malloc((argsize+1)*sizeof(wchar_t));
|
2008-04-05 17:41:37 -03:00
|
|
|
argv_copy2[i] = argv_copy[i];
|
|
|
|
if (!argv_copy[i]) {
|
2008-10-07 18:06:18 -03:00
|
|
|
fprintf(stderr, "out of memory\n");
|
2008-04-05 17:41:37 -03:00
|
|
|
return 1;
|
|
|
|
}
|
2008-09-03 15:58:51 -03:00
|
|
|
count = mbstowcs(argv_copy[i], argv[i], argsize+1);
|
|
|
|
if (count == (size_t)-1) {
|
2008-10-07 18:06:18 -03:00
|
|
|
fprintf(stderr, "Could not convert argument %d to string\n", i);
|
2008-09-03 15:58:51 -03:00
|
|
|
return 1;
|
|
|
|
}
|
2008-04-05 17:41:37 -03:00
|
|
|
}
|
|
|
|
setlocale(LC_ALL, oldloc);
|
|
|
|
res = Py_Main(argc, argv_copy);
|
|
|
|
for (i = 0; i < argc; i++) {
|
|
|
|
PyMem_Free(argv_copy2[i]);
|
|
|
|
}
|
|
|
|
PyMem_Free(argv_copy);
|
|
|
|
PyMem_Free(argv_copy2);
|
|
|
|
return res;
|
1997-07-19 16:25:33 -03:00
|
|
|
}
|
2008-04-05 17:41:37 -03:00
|
|
|
#endif
|