1996-06-26 15:26:04 -03:00
|
|
|
/***********************************************************
|
|
|
|
Copyright (C) 1994 Steen Lumholt.
|
|
|
|
|
|
|
|
All Rights Reserved
|
|
|
|
|
|
|
|
******************************************************************/
|
|
|
|
|
|
|
|
/* _tkinter.c -- Interface to libtk.a and libtcl.a. */
|
1994-06-20 04:49:28 -03:00
|
|
|
|
1996-08-13 18:10:16 -03:00
|
|
|
/* TCL/TK VERSION INFO:
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
Only Tcl/Tk 8.3.1 and later are supported. Older versions are not
|
|
|
|
supported. Use Python 2.6 or older if you cannot upgrade your
|
|
|
|
Tcl/Tk libraries.
|
2000-03-28 16:07:05 -04:00
|
|
|
*/
|
1997-07-19 16:57:42 -03:00
|
|
|
|
2000-03-28 16:07:05 -04:00
|
|
|
/* XXX Further speed-up ideas, involving Tcl 8.0 features:
|
1998-04-29 13:22:14 -03:00
|
|
|
|
|
|
|
- Register a new Tcl type, "Python callable", which can be called more
|
|
|
|
efficiently and passed to Tcl_EvalObj() directly (if this is possible).
|
|
|
|
|
1996-08-13 18:10:16 -03:00
|
|
|
*/
|
|
|
|
|
1997-08-01 21:09:09 -03:00
|
|
|
|
1995-09-22 20:49:28 -03:00
|
|
|
#include "Python.h"
|
1996-08-08 16:09:53 -03:00
|
|
|
#include <ctype.h>
|
1995-09-22 20:49:28 -03:00
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
#ifdef WITH_THREAD
|
1998-10-01 17:42:43 -03:00
|
|
|
#include "pythread.h"
|
1998-05-28 20:06:38 -03:00
|
|
|
#endif
|
|
|
|
|
1998-05-28 22:28:40 -03:00
|
|
|
#ifdef MS_WINDOWS
|
|
|
|
#include <windows.h>
|
|
|
|
#endif
|
|
|
|
|
2013-08-21 15:38:21 -03:00
|
|
|
#define CHECK_SIZE(size, elemsize) \
|
|
|
|
((size_t)(size) <= Py_MAX((size_t)INT_MAX, UINT_MAX / (size_t)(elemsize)))
|
|
|
|
|
2002-10-01 15:08:06 -03:00
|
|
|
/* Starting with Tcl 8.4, many APIs offer const-correctness. Unfortunately,
|
|
|
|
making _tkinter correct for this API means to break earlier
|
|
|
|
versions. USE_COMPAT_CONST allows to make _tkinter work with both 8.4 and
|
|
|
|
earlier versions. Once Tcl releases before 8.4 don't need to be supported
|
|
|
|
anymore, this should go. */
|
|
|
|
#define USE_COMPAT_CONST
|
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
/* If Tcl is compiled for threads, we must also define TCL_THREAD. We define
|
|
|
|
it always; if Tcl is not threaded, the thread functions in
|
|
|
|
Tcl are empty. */
|
|
|
|
#define TCL_THREADS
|
|
|
|
|
2001-12-09 19:15:56 -04:00
|
|
|
#ifdef TK_FRAMEWORK
|
|
|
|
#include <Tcl/tcl.h>
|
|
|
|
#include <Tk/tk.h>
|
|
|
|
#else
|
1994-06-20 04:49:28 -03:00
|
|
|
#include <tcl.h>
|
|
|
|
#include <tk.h>
|
2001-12-09 19:15:56 -04:00
|
|
|
#endif
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2009-04-10 19:19:09 -03:00
|
|
|
#include "tkinter.h"
|
|
|
|
|
2002-12-31 16:30:46 -04:00
|
|
|
/* For Tcl 8.2 and 8.3, CONST* is not defined (except on Cygwin). */
|
2002-12-30 14:14:15 -04:00
|
|
|
#ifndef CONST84_RETURN
|
|
|
|
#define CONST84_RETURN
|
2002-12-31 16:30:46 -04:00
|
|
|
#undef CONST
|
2002-12-30 14:14:15 -04:00
|
|
|
#define CONST
|
|
|
|
#endif
|
|
|
|
|
2009-02-09 18:35:27 -04:00
|
|
|
#if TK_VERSION_HEX < 0x08030102
|
|
|
|
#error "Tk older than 8.3.1 not supported"
|
1998-05-28 20:06:38 -03:00
|
|
|
#endif
|
|
|
|
|
2003-11-19 21:44:59 -04:00
|
|
|
#if !(defined(MS_WINDOWS) || defined(__CYGWIN__))
|
1997-08-14 16:57:07 -03:00
|
|
|
#define HAVE_CREATEFILEHANDLER
|
|
|
|
#endif
|
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
#ifdef HAVE_CREATEFILEHANDLER
|
|
|
|
|
2006-01-07 21:08:55 -04:00
|
|
|
/* This bit is to ensure that TCL_UNIX_FD is defined and doesn't interfere
|
|
|
|
with the proper calculation of FHANDLETYPE == TCL_UNIX_FD below. */
|
|
|
|
#ifndef TCL_UNIX_FD
|
|
|
|
# ifdef TCL_WIN_SOCKET
|
|
|
|
# define TCL_UNIX_FD (! TCL_WIN_SOCKET)
|
|
|
|
# else
|
|
|
|
# define TCL_UNIX_FD 1
|
|
|
|
# endif
|
|
|
|
#endif
|
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
/* Tcl_CreateFileHandler() changed several times; these macros deal with the
|
|
|
|
messiness. In Tcl 8.0 and later, it is not available on Windows (and on
|
|
|
|
Unix, only because Jack added it back); when available on Windows, it only
|
|
|
|
applies to sockets. */
|
|
|
|
|
1998-05-22 15:28:17 -03:00
|
|
|
#ifdef MS_WINDOWS
|
|
|
|
#define FHANDLETYPE TCL_WIN_SOCKET
|
|
|
|
#else
|
|
|
|
#define FHANDLETYPE TCL_UNIX_FD
|
|
|
|
#endif
|
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
/* If Tcl can wait for a Unix file descriptor, define the EventHook() routine
|
|
|
|
which uses this to handle Tcl events while the user is typing commands. */
|
|
|
|
|
|
|
|
#if FHANDLETYPE == TCL_UNIX_FD
|
1998-05-22 15:28:17 -03:00
|
|
|
#define WAIT_FOR_STDIN
|
|
|
|
#endif
|
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
#endif /* HAVE_CREATEFILEHANDLER */
|
|
|
|
|
1998-06-13 10:56:28 -03:00
|
|
|
#ifdef MS_WINDOWS
|
|
|
|
#include <conio.h>
|
|
|
|
#define WAIT_FOR_STDIN
|
|
|
|
#endif
|
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
#ifdef WITH_THREAD
|
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
/* The threading situation is complicated. Tcl is not thread-safe, except
|
|
|
|
when configured with --enable-threads.
|
2012-10-16 16:50:34 -03:00
|
|
|
|
|
|
|
So we need to use a lock around all uses of Tcl. Previously, the
|
|
|
|
Python interpreter lock was used for this. However, this causes
|
|
|
|
problems when other Python threads need to run while Tcl is blocked
|
|
|
|
waiting for events.
|
|
|
|
|
|
|
|
To solve this problem, a separate lock for Tcl is introduced.
|
|
|
|
Holding it is incompatible with holding Python's interpreter lock.
|
|
|
|
The following four macros manipulate both locks together.
|
|
|
|
|
|
|
|
ENTER_TCL and LEAVE_TCL are brackets, just like
|
|
|
|
Py_BEGIN_ALLOW_THREADS and Py_END_ALLOW_THREADS. They should be
|
|
|
|
used whenever a call into Tcl is made that could call an event
|
|
|
|
handler, or otherwise affect the state of a Tcl interpreter. These
|
|
|
|
assume that the surrounding code has the Python interpreter lock;
|
|
|
|
inside the brackets, the Python interpreter lock has been released
|
|
|
|
and the lock for Tcl has been acquired.
|
|
|
|
|
|
|
|
Sometimes, it is necessary to have both the Python lock and the Tcl
|
|
|
|
lock. (For example, when transferring data from the Tcl
|
|
|
|
interpreter result to a Python string object.) This can be done by
|
|
|
|
using different macros to close the ENTER_TCL block: ENTER_OVERLAP
|
|
|
|
reacquires the Python lock (and restores the thread state) but
|
|
|
|
doesn't release the Tcl lock; LEAVE_OVERLAP_TCL releases the Tcl
|
|
|
|
lock.
|
1998-06-15 11:03:52 -03:00
|
|
|
|
1998-10-09 17:51:18 -03:00
|
|
|
By contrast, ENTER_PYTHON and LEAVE_PYTHON are used in Tcl event
|
2012-10-16 16:50:34 -03:00
|
|
|
handlers when the handler needs to use Python. Such event handlers
|
|
|
|
are entered while the lock for Tcl is held; the event handler
|
|
|
|
presumably needs to use Python. ENTER_PYTHON releases the lock for
|
|
|
|
Tcl and acquires the Python interpreter lock, restoring the
|
|
|
|
appropriate thread state, and LEAVE_PYTHON releases the Python
|
|
|
|
interpreter lock and re-acquires the lock for Tcl. It is okay for
|
|
|
|
ENTER_TCL/LEAVE_TCL pairs to be contained inside the code between
|
|
|
|
ENTER_PYTHON and LEAVE_PYTHON.
|
|
|
|
|
|
|
|
These locks expand to several statements and brackets; they should
|
|
|
|
not be used in branches of if statements and the like.
|
|
|
|
|
|
|
|
If Tcl is threaded, this approach won't work anymore. The Tcl
|
|
|
|
interpreter is only valid in the thread that created it, and all Tk
|
|
|
|
activity must happen in this thread, also. That means that the
|
|
|
|
mainloop must be invoked in the thread that created the
|
|
|
|
interpreter. Invoking commands from other threads is possible;
|
|
|
|
_tkinter will queue an event for the interpreter thread, which will
|
|
|
|
then execute the command and pass back the result. If the main
|
|
|
|
thread is not in the mainloop, and invoking commands causes an
|
|
|
|
exception; if the main loop is running but not processing events,
|
|
|
|
the command invocation will block.
|
|
|
|
|
|
|
|
In addition, for a threaded Tcl, a single global tcl_tstate won't
|
|
|
|
be sufficient anymore, since multiple Tcl interpreters may
|
|
|
|
simultaneously dispatch in different threads. So we use the Tcl TLS
|
|
|
|
API.
|
2002-12-12 13:07:58 -04:00
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
*/
|
|
|
|
|
1998-12-21 15:32:43 -04:00
|
|
|
static PyThread_type_lock tcl_lock = 0;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
|
|
|
#ifdef TCL_THREADS
|
|
|
|
static Tcl_ThreadDataKey state_key;
|
|
|
|
typedef PyThreadState *ThreadSpecificData;
|
2012-10-16 16:50:34 -03:00
|
|
|
#define tcl_tstate \
|
|
|
|
(*(PyThreadState**)Tcl_GetThreadData(&state_key, sizeof(PyThreadState*)))
|
2002-12-12 13:07:58 -04:00
|
|
|
#else
|
1998-10-09 17:51:18 -03:00
|
|
|
static PyThreadState *tcl_tstate = NULL;
|
2002-12-12 13:07:58 -04:00
|
|
|
#endif
|
1998-05-28 20:06:38 -03:00
|
|
|
|
|
|
|
#define ENTER_TCL \
|
2010-05-09 12:52:27 -03:00
|
|
|
{ PyThreadState *tstate = PyThreadState_Get(); Py_BEGIN_ALLOW_THREADS \
|
|
|
|
if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1); tcl_tstate = tstate;
|
1998-05-28 20:06:38 -03:00
|
|
|
|
|
|
|
#define LEAVE_TCL \
|
2012-10-16 16:50:34 -03:00
|
|
|
tcl_tstate = NULL; \
|
|
|
|
if(tcl_lock)PyThread_release_lock(tcl_lock); Py_END_ALLOW_THREADS}
|
1998-05-28 20:06:38 -03:00
|
|
|
|
1998-06-15 01:36:09 -03:00
|
|
|
#define ENTER_OVERLAP \
|
2010-05-09 12:52:27 -03:00
|
|
|
Py_END_ALLOW_THREADS
|
1998-06-15 01:36:09 -03:00
|
|
|
|
|
|
|
#define LEAVE_OVERLAP_TCL \
|
2010-05-09 12:52:27 -03:00
|
|
|
tcl_tstate = NULL; if(tcl_lock)PyThread_release_lock(tcl_lock); }
|
1998-06-15 01:36:09 -03:00
|
|
|
|
1998-10-09 17:51:18 -03:00
|
|
|
#define ENTER_PYTHON \
|
2010-05-09 12:52:27 -03:00
|
|
|
{ PyThreadState *tstate = tcl_tstate; tcl_tstate = NULL; \
|
2012-10-16 16:50:34 -03:00
|
|
|
if(tcl_lock) \
|
|
|
|
PyThread_release_lock(tcl_lock); PyEval_RestoreThread((tstate)); }
|
1998-05-28 20:06:38 -03:00
|
|
|
|
|
|
|
#define LEAVE_PYTHON \
|
2010-05-09 12:52:27 -03:00
|
|
|
{ PyThreadState *tstate = PyEval_SaveThread(); \
|
|
|
|
if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1); tcl_tstate = tstate; }
|
2002-12-12 13:07:58 -04:00
|
|
|
|
|
|
|
#define CHECK_TCL_APPARTMENT \
|
2010-05-09 12:52:27 -03:00
|
|
|
if (((TkappObject *)self)->threaded && \
|
|
|
|
((TkappObject *)self)->thread_id != Tcl_GetCurrentThread()) { \
|
2012-10-16 16:50:34 -03:00
|
|
|
PyErr_SetString(PyExc_RuntimeError, \
|
|
|
|
"Calling Tcl from different appartment"); \
|
2010-05-09 12:52:27 -03:00
|
|
|
return 0; \
|
|
|
|
}
|
1998-05-28 20:06:38 -03:00
|
|
|
|
|
|
|
#else
|
|
|
|
|
|
|
|
#define ENTER_TCL
|
|
|
|
#define LEAVE_TCL
|
1998-06-15 01:36:09 -03:00
|
|
|
#define ENTER_OVERLAP
|
|
|
|
#define LEAVE_OVERLAP_TCL
|
1998-10-09 17:51:18 -03:00
|
|
|
#define ENTER_PYTHON
|
1998-05-28 20:06:38 -03:00
|
|
|
#define LEAVE_PYTHON
|
2002-12-12 13:07:58 -04:00
|
|
|
#define CHECK_TCL_APPARTMENT
|
1998-05-28 20:06:38 -03:00
|
|
|
|
|
|
|
#endif
|
|
|
|
|
1996-08-08 16:09:53 -03:00
|
|
|
#ifndef FREECAST
|
1996-08-13 18:10:16 -03:00
|
|
|
#define FREECAST (char *)
|
1996-08-08 16:09:53 -03:00
|
|
|
#endif
|
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/**** Tkapp Object Declaration ****/
|
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
static PyObject *Tkapp_Type;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
typedef struct {
|
2010-05-09 12:52:27 -03:00
|
|
|
PyObject_HEAD
|
|
|
|
Tcl_Interp *interp;
|
|
|
|
int wantobjects;
|
|
|
|
int threaded; /* True if tcl_platform[threaded] */
|
|
|
|
Tcl_ThreadId thread_id;
|
|
|
|
int dispatching;
|
|
|
|
/* We cannot include tclInt.h, as this is internal.
|
|
|
|
So we cache interesting types here. */
|
|
|
|
Tcl_ObjType *BooleanType;
|
|
|
|
Tcl_ObjType *ByteArrayType;
|
|
|
|
Tcl_ObjType *DoubleType;
|
|
|
|
Tcl_ObjType *IntType;
|
|
|
|
Tcl_ObjType *ListType;
|
|
|
|
Tcl_ObjType *ProcBodyType;
|
|
|
|
Tcl_ObjType *StringType;
|
1998-05-28 20:06:38 -03:00
|
|
|
} TkappObject;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
|
|
|
#define Tkapp_Interp(v) (((TkappObject *) (v))->interp)
|
2000-10-12 14:14:46 -03:00
|
|
|
#define Tkapp_Result(v) Tcl_GetStringResult(Tkapp_Interp(v))
|
1994-06-20 04:49:28 -03:00
|
|
|
|
1997-08-01 21:09:09 -03:00
|
|
|
#define DEBUG_REFCNT(v) (printf("DEBUG: id=%p, refcnt=%i\n", \
|
2007-12-18 22:45:37 -04:00
|
|
|
(void *) v, Py_REFCNT(v)))
|
1997-01-15 20:15:11 -04:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/**** Error Handling ****/
|
|
|
|
|
|
|
|
static PyObject *Tkinter_TclError;
|
1994-07-07 06:25:12 -03:00
|
|
|
static int quitMainLoop = 0;
|
1994-06-20 04:49:28 -03:00
|
|
|
static int errorInCmd = 0;
|
|
|
|
static PyObject *excInCmd;
|
|
|
|
static PyObject *valInCmd;
|
1995-01-02 15:30:30 -04:00
|
|
|
static PyObject *trbInCmd;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2009-02-09 18:33:59 -04:00
|
|
|
#ifdef TKINTER_PROTECT_LOADTK
|
2009-04-04 22:30:02 -03:00
|
|
|
static int tk_load_failed = 0;
|
2009-02-09 18:33:59 -04:00
|
|
|
#endif
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkinter_Error(PyObject *v)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
PyErr_SetString(Tkinter_TclError, Tkapp_Result(v));
|
|
|
|
return NULL;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
/**** Utils ****/
|
|
|
|
|
2003-05-09 05:19:48 -03:00
|
|
|
static int Tkinter_busywaitinterval = 20;
|
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
#ifdef WITH_THREAD
|
1998-05-28 22:28:40 -03:00
|
|
|
#ifndef MS_WINDOWS
|
1998-08-13 10:29:22 -03:00
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
/* Millisecond sleep() for Unix platforms. */
|
|
|
|
|
|
|
|
static void
|
2000-07-08 01:04:38 -03:00
|
|
|
Sleep(int milli)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
/* XXX Too bad if you don't have select(). */
|
|
|
|
struct timeval t;
|
|
|
|
t.tv_sec = milli/1000;
|
|
|
|
t.tv_usec = (milli%1000) * 1000;
|
|
|
|
select(0, (fd_set *)0, (fd_set *)0, (fd_set *)0, &t);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
1998-05-28 22:28:40 -03:00
|
|
|
#endif /* MS_WINDOWS */
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2002-12-28 05:23:09 -04:00
|
|
|
/* Wait up to 1s for the mainloop to come up. */
|
|
|
|
|
|
|
|
static int
|
|
|
|
WaitForMainloop(TkappObject* self)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
int i;
|
|
|
|
for (i = 0; i < 10; i++) {
|
|
|
|
if (self->dispatching)
|
|
|
|
return 1;
|
|
|
|
Py_BEGIN_ALLOW_THREADS
|
|
|
|
Sleep(100);
|
|
|
|
Py_END_ALLOW_THREADS
|
|
|
|
}
|
|
|
|
if (self->dispatching)
|
|
|
|
return 1;
|
|
|
|
PyErr_SetString(PyExc_RuntimeError, "main thread is not in main loop");
|
|
|
|
return 0;
|
2002-12-28 05:23:09 -04:00
|
|
|
}
|
2003-03-30 04:44:58 -04:00
|
|
|
#endif /* WITH_THREAD */
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
#define ARGSZ 64
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Split(char *list)
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
int argc;
|
|
|
|
char **argv;
|
|
|
|
PyObject *v;
|
|
|
|
|
|
|
|
if (list == NULL) {
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
2010-05-09 12:52:27 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
if (Tcl_SplitList((Tcl_Interp *)NULL, list, &argc, &argv) != TCL_OK) {
|
|
|
|
/* Not a list.
|
|
|
|
* Could be a quoted string containing funnies, e.g. {"}.
|
|
|
|
* Return the string itself.
|
|
|
|
*/
|
|
|
|
return PyUnicode_FromString(list);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (argc == 0)
|
|
|
|
v = PyUnicode_FromString("");
|
|
|
|
else if (argc == 1)
|
|
|
|
v = PyUnicode_FromString(argv[0]);
|
|
|
|
else if ((v = PyTuple_New(argc)) != NULL) {
|
|
|
|
int i;
|
|
|
|
PyObject *w;
|
|
|
|
|
|
|
|
for (i = 0; i < argc; i++) {
|
|
|
|
if ((w = Split(argv[i])) == NULL) {
|
|
|
|
Py_DECREF(v);
|
|
|
|
v = NULL;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
PyTuple_SetItem(v, i, w);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
Tcl_Free(FREECAST argv);
|
|
|
|
return v;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
2012-10-16 16:50:34 -03:00
|
|
|
/* In some cases, Tcl will still return strings that are supposed to
|
|
|
|
be lists. SplitObj walks through a nested tuple, finding string
|
|
|
|
objects that need to be split. */
|
2002-11-26 05:28:05 -04:00
|
|
|
|
2008-06-13 04:50:45 -03:00
|
|
|
static PyObject *
|
2002-11-26 05:28:05 -04:00
|
|
|
SplitObj(PyObject *arg)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
if (PyTuple_Check(arg)) {
|
|
|
|
int i, size;
|
|
|
|
PyObject *elem, *newelem, *result;
|
|
|
|
|
|
|
|
size = PyTuple_Size(arg);
|
|
|
|
result = NULL;
|
|
|
|
/* Recursively invoke SplitObj for all tuple items.
|
|
|
|
If this does not return a new object, no action is
|
|
|
|
needed. */
|
|
|
|
for(i = 0; i < size; i++) {
|
|
|
|
elem = PyTuple_GetItem(arg, i);
|
|
|
|
newelem = SplitObj(elem);
|
|
|
|
if (!newelem) {
|
|
|
|
Py_XDECREF(result);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (!result) {
|
|
|
|
int k;
|
|
|
|
if (newelem == elem) {
|
|
|
|
Py_DECREF(newelem);
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
result = PyTuple_New(size);
|
|
|
|
if (!result)
|
|
|
|
return NULL;
|
|
|
|
for(k = 0; k < i; k++) {
|
|
|
|
elem = PyTuple_GetItem(arg, k);
|
|
|
|
Py_INCREF(elem);
|
|
|
|
PyTuple_SetItem(result, k, elem);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
PyTuple_SetItem(result, i, newelem);
|
|
|
|
}
|
|
|
|
if (result)
|
|
|
|
return result;
|
|
|
|
/* Fall through, returning arg. */
|
|
|
|
}
|
2013-07-11 14:34:47 -03:00
|
|
|
else if (PyUnicode_Check(arg)) {
|
|
|
|
int argc;
|
|
|
|
char **argv;
|
|
|
|
char *list = PyUnicode_AsUTF8(arg);
|
|
|
|
|
|
|
|
if (list == NULL ||
|
|
|
|
Tcl_SplitList((Tcl_Interp *)NULL, list, &argc, &argv) != TCL_OK) {
|
|
|
|
Py_INCREF(arg);
|
|
|
|
return arg;
|
|
|
|
}
|
|
|
|
Tcl_Free(FREECAST argv);
|
|
|
|
if (argc > 1)
|
|
|
|
return Split(list);
|
|
|
|
/* Fall through, returning arg. */
|
|
|
|
}
|
2010-05-09 12:52:27 -03:00
|
|
|
else if (PyBytes_Check(arg)) {
|
|
|
|
int argc;
|
|
|
|
char **argv;
|
|
|
|
char *list = PyBytes_AsString(arg);
|
|
|
|
|
|
|
|
if (Tcl_SplitList((Tcl_Interp *)NULL, list, &argc, &argv) != TCL_OK) {
|
|
|
|
Py_INCREF(arg);
|
|
|
|
return arg;
|
|
|
|
}
|
|
|
|
Tcl_Free(FREECAST argv);
|
|
|
|
if (argc > 1)
|
|
|
|
return Split(PyBytes_AsString(arg));
|
|
|
|
/* Fall through, returning arg. */
|
|
|
|
}
|
|
|
|
Py_INCREF(arg);
|
|
|
|
return arg;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/**** Tkapp Object ****/
|
|
|
|
|
|
|
|
#ifndef WITH_APPINIT
|
|
|
|
int
|
2000-07-08 01:04:38 -03:00
|
|
|
Tcl_AppInit(Tcl_Interp *interp)
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
const char * _tkinter_skip_tk_init;
|
1996-02-25 00:46:40 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (Tcl_Init(interp) == TCL_ERROR) {
|
|
|
|
PySys_WriteStderr("Tcl_Init error: %s\n", Tcl_GetStringResult(interp));
|
|
|
|
return TCL_ERROR;
|
|
|
|
}
|
2009-02-09 18:33:59 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
_tkinter_skip_tk_init = Tcl_GetVar(interp,
|
|
|
|
"_tkinter_skip_tk_init", TCL_GLOBAL_ONLY);
|
|
|
|
if (_tkinter_skip_tk_init != NULL &&
|
|
|
|
strcmp(_tkinter_skip_tk_init, "1") == 0) {
|
|
|
|
return TCL_OK;
|
|
|
|
}
|
2009-02-09 18:33:59 -04:00
|
|
|
|
|
|
|
#ifdef TKINTER_PROTECT_LOADTK
|
2010-05-09 12:52:27 -03:00
|
|
|
if (tk_load_failed) {
|
|
|
|
PySys_WriteStderr("Tk_Init error: %s\n", TKINTER_LOADTK_ERRMSG);
|
|
|
|
return TCL_ERROR;
|
|
|
|
}
|
2009-02-09 18:33:59 -04:00
|
|
|
#endif
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (Tk_Init(interp) == TCL_ERROR) {
|
2009-02-09 18:33:59 -04:00
|
|
|
#ifdef TKINTER_PROTECT_LOADTK
|
2010-05-09 12:52:27 -03:00
|
|
|
tk_load_failed = 1;
|
2009-02-09 18:33:59 -04:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
PySys_WriteStderr("Tk_Init error: %s\n", Tcl_GetStringResult(interp));
|
|
|
|
return TCL_ERROR;
|
|
|
|
}
|
2009-02-09 18:33:59 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
return TCL_OK;
|
1997-01-15 20:15:11 -04:00
|
|
|
}
|
1994-06-20 04:49:28 -03:00
|
|
|
#endif /* !WITH_APPINIT */
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/* Initialize the Tk application; see the `main' function in
|
1997-01-15 20:15:11 -04:00
|
|
|
* `tkMain.c'.
|
|
|
|
*/
|
1998-05-22 15:28:17 -03:00
|
|
|
|
2000-07-24 11:43:35 -03:00
|
|
|
static void EnableEventHook(void); /* Forward */
|
|
|
|
static void DisableEventHook(void); /* Forward */
|
1998-05-22 15:28:17 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static TkappObject *
|
2008-04-05 16:47:23 -03:00
|
|
|
Tkapp_New(char *screenName, char *className,
|
2010-05-09 12:52:27 -03:00
|
|
|
int interactive, int wantobjects, int wantTk, int sync, char *use)
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
TkappObject *v;
|
|
|
|
char *argv0;
|
2004-08-03 23:16:48 -03:00
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
v = PyObject_New(TkappObject, (PyTypeObject *) Tkapp_Type);
|
2010-05-09 12:52:27 -03:00
|
|
|
if (v == NULL)
|
|
|
|
return NULL;
|
2013-08-10 19:22:30 -03:00
|
|
|
Py_INCREF(Tkapp_Type);
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
v->interp = Tcl_CreateInterp();
|
|
|
|
v->wantobjects = wantobjects;
|
|
|
|
v->threaded = Tcl_GetVar2Ex(v->interp, "tcl_platform", "threaded",
|
|
|
|
TCL_GLOBAL_ONLY) != NULL;
|
|
|
|
v->thread_id = Tcl_GetCurrentThread();
|
|
|
|
v->dispatching = 0;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
|
|
|
#ifndef TCL_THREADS
|
2010-05-09 12:52:27 -03:00
|
|
|
if (v->threaded) {
|
2012-10-16 16:50:34 -03:00
|
|
|
PyErr_SetString(PyExc_RuntimeError,
|
|
|
|
"Tcl is threaded but _tkinter is not");
|
2010-05-09 12:52:27 -03:00
|
|
|
Py_DECREF(v);
|
|
|
|
return 0;
|
|
|
|
}
|
2002-12-12 13:07:58 -04:00
|
|
|
#endif
|
2003-03-30 04:44:58 -04:00
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
if (v->threaded && tcl_lock) {
|
|
|
|
/* If Tcl is threaded, we don't need the lock. */
|
|
|
|
PyThread_free_lock(tcl_lock);
|
|
|
|
tcl_lock = NULL;
|
|
|
|
}
|
2003-03-30 04:44:58 -04:00
|
|
|
#endif
|
1996-02-25 00:46:40 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
v->BooleanType = Tcl_GetObjType("boolean");
|
|
|
|
v->ByteArrayType = Tcl_GetObjType("bytearray");
|
|
|
|
v->DoubleType = Tcl_GetObjType("double");
|
|
|
|
v->IntType = Tcl_GetObjType("int");
|
|
|
|
v->ListType = Tcl_GetObjType("list");
|
|
|
|
v->ProcBodyType = Tcl_GetObjType("procbody");
|
|
|
|
v->StringType = Tcl_GetObjType("string");
|
|
|
|
|
|
|
|
/* Delete the 'exit' command, which can screw things up */
|
|
|
|
Tcl_DeleteCommand(v->interp, "exit");
|
|
|
|
|
|
|
|
if (screenName != NULL)
|
|
|
|
Tcl_SetVar2(v->interp, "env", "DISPLAY",
|
|
|
|
screenName, TCL_GLOBAL_ONLY);
|
|
|
|
|
|
|
|
if (interactive)
|
|
|
|
Tcl_SetVar(v->interp, "tcl_interactive", "1", TCL_GLOBAL_ONLY);
|
|
|
|
else
|
|
|
|
Tcl_SetVar(v->interp, "tcl_interactive", "0", TCL_GLOBAL_ONLY);
|
|
|
|
|
|
|
|
/* This is used to get the application class for Tk 4.1 and up */
|
|
|
|
argv0 = (char*)ckalloc(strlen(className) + 1);
|
|
|
|
if (!argv0) {
|
|
|
|
PyErr_NoMemory();
|
|
|
|
Py_DECREF(v);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
strcpy(argv0, className);
|
2011-10-04 08:50:21 -03:00
|
|
|
if (Py_ISUPPER(Py_CHARMASK(argv0[0])))
|
|
|
|
argv0[0] = Py_TOLOWER(Py_CHARMASK(argv0[0]));
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_SetVar(v->interp, "argv0", argv0, TCL_GLOBAL_ONLY);
|
|
|
|
ckfree(argv0);
|
|
|
|
|
|
|
|
if (! wantTk) {
|
|
|
|
Tcl_SetVar(v->interp,
|
|
|
|
"_tkinter_skip_tk_init", "1", TCL_GLOBAL_ONLY);
|
|
|
|
}
|
2009-02-09 18:33:59 -04:00
|
|
|
#ifdef TKINTER_PROTECT_LOADTK
|
2010-05-09 12:52:27 -03:00
|
|
|
else if (tk_load_failed) {
|
|
|
|
Tcl_SetVar(v->interp,
|
|
|
|
"_tkinter_tk_failed", "1", TCL_GLOBAL_ONLY);
|
|
|
|
}
|
2009-02-09 18:33:59 -04:00
|
|
|
#endif
|
2004-02-18 01:59:53 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
/* some initial arguments need to be in argv */
|
|
|
|
if (sync || use) {
|
|
|
|
char *args;
|
|
|
|
int len = 0;
|
|
|
|
|
|
|
|
if (sync)
|
|
|
|
len += sizeof "-sync";
|
|
|
|
if (use)
|
|
|
|
len += strlen(use) + sizeof "-use ";
|
|
|
|
|
|
|
|
args = (char*)ckalloc(len);
|
|
|
|
if (!args) {
|
|
|
|
PyErr_NoMemory();
|
|
|
|
Py_DECREF(v);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
args[0] = '\0';
|
|
|
|
if (sync)
|
|
|
|
strcat(args, "-sync");
|
|
|
|
if (use) {
|
|
|
|
if (sync)
|
|
|
|
strcat(args, " ");
|
|
|
|
strcat(args, "-use ");
|
|
|
|
strcat(args, use);
|
|
|
|
}
|
|
|
|
|
|
|
|
Tcl_SetVar(v->interp, "argv", args, TCL_GLOBAL_ONLY);
|
|
|
|
ckfree(args);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (Tcl_AppInit(v->interp) != TCL_OK) {
|
|
|
|
PyObject *result = Tkinter_Error((PyObject *)v);
|
2009-02-09 18:33:59 -04:00
|
|
|
#ifdef TKINTER_PROTECT_LOADTK
|
2010-05-09 12:52:27 -03:00
|
|
|
if (wantTk) {
|
|
|
|
const char *_tkinter_tk_failed;
|
|
|
|
_tkinter_tk_failed = Tcl_GetVar(v->interp,
|
|
|
|
"_tkinter_tk_failed", TCL_GLOBAL_ONLY);
|
|
|
|
|
|
|
|
if ( _tkinter_tk_failed != NULL &&
|
|
|
|
strcmp(_tkinter_tk_failed, "1") == 0) {
|
|
|
|
tk_load_failed = 1;
|
|
|
|
}
|
|
|
|
}
|
2009-02-09 18:33:59 -04:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
Py_DECREF((PyObject *)v);
|
|
|
|
return (TkappObject *)result;
|
|
|
|
}
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
EnableEventHook();
|
1998-05-22 15:28:17 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
return v;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#ifdef WITH_THREAD
|
2002-12-12 13:07:58 -04:00
|
|
|
static void
|
|
|
|
Tkapp_ThreadSend(TkappObject *self, Tcl_Event *ev,
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_Condition *cond, Tcl_Mutex *mutex)
|
2002-12-12 13:07:58 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
Py_BEGIN_ALLOW_THREADS;
|
|
|
|
Tcl_MutexLock(mutex);
|
|
|
|
Tcl_ThreadQueueEvent(self->thread_id, ev, TCL_QUEUE_TAIL);
|
|
|
|
Tcl_ThreadAlert(self->thread_id);
|
|
|
|
Tcl_ConditionWait(cond, mutex, NULL);
|
|
|
|
Tcl_MutexUnlock(mutex);
|
|
|
|
Py_END_ALLOW_THREADS
|
2002-12-12 13:07:58 -04:00
|
|
|
}
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#endif
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/** Tcl Eval **/
|
|
|
|
|
2002-11-26 05:28:05 -04:00
|
|
|
typedef struct {
|
2010-05-09 12:52:27 -03:00
|
|
|
PyObject_HEAD
|
|
|
|
Tcl_Obj *value;
|
|
|
|
PyObject *string; /* This cannot cause cycles. */
|
2002-11-26 05:28:05 -04:00
|
|
|
} PyTclObject;
|
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
static PyObject *PyTclObject_Type;
|
|
|
|
#define PyTclObject_Check(v) ((v)->ob_type == (PyTypeObject *) PyTclObject_Type)
|
2002-11-26 05:28:05 -04:00
|
|
|
|
|
|
|
static PyObject *
|
|
|
|
newPyTclObject(Tcl_Obj *arg)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
PyTclObject *self;
|
2012-10-14 10:54:35 -03:00
|
|
|
self = PyObject_New(PyTclObject, (PyTypeObject *) PyTclObject_Type);
|
2010-05-09 12:52:27 -03:00
|
|
|
if (self == NULL)
|
|
|
|
return NULL;
|
2013-08-10 19:22:30 -03:00
|
|
|
Py_INCREF(PyTclObject_Type);
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_IncrRefCount(arg);
|
|
|
|
self->value = arg;
|
|
|
|
self->string = NULL;
|
|
|
|
return (PyObject*)self;
|
2002-11-26 05:28:05 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
|
|
|
PyTclObject_dealloc(PyTclObject *self)
|
|
|
|
{
|
2013-08-10 19:22:30 -03:00
|
|
|
PyObject *tp = (PyObject *) Py_TYPE(self);
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_DecrRefCount(self->value);
|
|
|
|
Py_XDECREF(self->string);
|
|
|
|
PyObject_Del(self);
|
2013-08-10 19:22:30 -03:00
|
|
|
Py_DECREF(tp);
|
2002-11-26 05:28:05 -04:00
|
|
|
}
|
|
|
|
|
2003-05-01 02:47:00 -03:00
|
|
|
static char*
|
|
|
|
PyTclObject_TclString(PyObject *self)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
return Tcl_GetString(((PyTclObject*)self)->value);
|
2003-05-01 02:47:00 -03:00
|
|
|
}
|
|
|
|
|
2003-01-03 20:08:09 -04:00
|
|
|
/* Like _str, but create Unicode if necessary. */
|
2007-11-21 16:09:18 -04:00
|
|
|
PyDoc_STRVAR(PyTclObject_string__doc__,
|
2007-11-22 01:56:35 -04:00
|
|
|
"the string representation of this object, either as str or bytes");
|
2003-01-03 20:33:13 -04:00
|
|
|
|
2003-01-03 20:08:09 -04:00
|
|
|
static PyObject *
|
|
|
|
PyTclObject_string(PyTclObject *self, void *ignored)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *s;
|
|
|
|
int len;
|
|
|
|
if (!self->string) {
|
|
|
|
s = Tcl_GetStringFromObj(self->value, &len);
|
|
|
|
self->string = PyUnicode_FromStringAndSize(s, len);
|
|
|
|
if (!self->string)
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
Py_INCREF(self->string);
|
|
|
|
return self->string;
|
2003-01-03 20:08:09 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2007-07-12 09:12:25 -03:00
|
|
|
PyTclObject_str(PyTclObject *self, void *ignored)
|
2003-01-03 20:08:09 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *s;
|
|
|
|
int len;
|
|
|
|
if (self->string && PyUnicode_Check(self->string)) {
|
|
|
|
Py_INCREF(self->string);
|
|
|
|
return self->string;
|
|
|
|
}
|
|
|
|
/* XXX Could chache result if it is non-ASCII. */
|
|
|
|
s = Tcl_GetStringFromObj(self->value, &len);
|
|
|
|
return PyUnicode_DecodeUTF8(s, len, "strict");
|
2003-01-03 20:08:09 -04:00
|
|
|
}
|
|
|
|
|
2002-11-26 05:28:05 -04:00
|
|
|
static PyObject *
|
|
|
|
PyTclObject_repr(PyTclObject *self)
|
|
|
|
{
|
2013-09-23 16:49:02 -03:00
|
|
|
PyObject *repr, *str = PyTclObject_str(self, NULL);
|
|
|
|
if (str == NULL)
|
|
|
|
return NULL;
|
|
|
|
repr = PyUnicode_FromFormat("<%s object: %R>",
|
|
|
|
self->value->typePtr->name, str);
|
|
|
|
Py_DECREF(str);
|
|
|
|
return repr;
|
2002-11-26 05:28:05 -04:00
|
|
|
}
|
|
|
|
|
2009-02-01 06:28:51 -04:00
|
|
|
#define TEST_COND(cond) ((cond) ? Py_True : Py_False)
|
|
|
|
|
|
|
|
static PyObject *
|
|
|
|
PyTclObject_richcompare(PyObject *self, PyObject *other, int op)
|
2003-05-03 06:45:12 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
int result;
|
|
|
|
PyObject *v;
|
|
|
|
|
|
|
|
/* neither argument should be NULL, unless something's gone wrong */
|
|
|
|
if (self == NULL || other == NULL) {
|
|
|
|
PyErr_BadInternalCall();
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* both arguments should be instances of PyTclObject */
|
|
|
|
if (!PyTclObject_Check(self) || !PyTclObject_Check(other)) {
|
|
|
|
v = Py_NotImplemented;
|
|
|
|
goto finished;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (self == other)
|
|
|
|
/* fast path when self and other are identical */
|
|
|
|
result = 0;
|
|
|
|
else
|
|
|
|
result = strcmp(Tcl_GetString(((PyTclObject *)self)->value),
|
|
|
|
Tcl_GetString(((PyTclObject *)other)->value));
|
|
|
|
/* Convert return value to a Boolean */
|
|
|
|
switch (op) {
|
|
|
|
case Py_EQ:
|
|
|
|
v = TEST_COND(result == 0);
|
|
|
|
break;
|
|
|
|
case Py_NE:
|
|
|
|
v = TEST_COND(result != 0);
|
|
|
|
break;
|
|
|
|
case Py_LE:
|
|
|
|
v = TEST_COND(result <= 0);
|
|
|
|
break;
|
|
|
|
case Py_GE:
|
|
|
|
v = TEST_COND(result >= 0);
|
|
|
|
break;
|
|
|
|
case Py_LT:
|
|
|
|
v = TEST_COND(result < 0);
|
|
|
|
break;
|
|
|
|
case Py_GT:
|
|
|
|
v = TEST_COND(result > 0);
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
PyErr_BadArgument();
|
|
|
|
return NULL;
|
|
|
|
}
|
2009-02-01 06:28:51 -04:00
|
|
|
finished:
|
2010-05-09 12:52:27 -03:00
|
|
|
Py_INCREF(v);
|
|
|
|
return v;
|
2003-05-03 06:45:12 -03:00
|
|
|
}
|
|
|
|
|
2003-01-03 20:33:13 -04:00
|
|
|
PyDoc_STRVAR(get_typename__doc__, "name of the Tcl type");
|
|
|
|
|
2002-11-26 05:28:05 -04:00
|
|
|
static PyObject*
|
|
|
|
get_typename(PyTclObject* obj, void* ignored)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
return PyUnicode_FromString(obj->value->typePtr->name);
|
2002-11-26 05:28:05 -04:00
|
|
|
}
|
|
|
|
|
2003-01-03 20:33:13 -04:00
|
|
|
|
2002-11-26 05:28:05 -04:00
|
|
|
static PyGetSetDef PyTclObject_getsetlist[] = {
|
2010-05-09 12:52:27 -03:00
|
|
|
{"typename", (getter)get_typename, NULL, get_typename__doc__},
|
|
|
|
{"string", (getter)PyTclObject_string, NULL,
|
|
|
|
PyTclObject_string__doc__},
|
|
|
|
{0},
|
2002-11-26 05:28:05 -04:00
|
|
|
};
|
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
static PyType_Slot PyTclObject_Type_slots[] = {
|
|
|
|
{Py_tp_dealloc, (destructor)PyTclObject_dealloc},
|
|
|
|
{Py_tp_repr, (reprfunc)PyTclObject_repr},
|
|
|
|
{Py_tp_str, (reprfunc)PyTclObject_str},
|
2012-10-30 17:49:16 -03:00
|
|
|
{Py_tp_getattro, PyObject_GenericGetAttr},
|
2012-10-14 10:54:35 -03:00
|
|
|
{Py_tp_richcompare, PyTclObject_richcompare},
|
|
|
|
{Py_tp_getset, PyTclObject_getsetlist},
|
|
|
|
{0, 0}
|
2002-11-26 05:28:05 -04:00
|
|
|
};
|
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
static PyType_Spec PyTclObject_Type_spec = {
|
|
|
|
"_tkinter.Tcl_Obj",
|
|
|
|
sizeof(PyTclObject),
|
|
|
|
0,
|
|
|
|
Py_TPFLAGS_DEFAULT,
|
|
|
|
PyTclObject_Type_slots,
|
|
|
|
};
|
|
|
|
|
|
|
|
|
2000-03-30 20:51:37 -04:00
|
|
|
static Tcl_Obj*
|
2000-07-08 01:04:38 -03:00
|
|
|
AsObj(PyObject *value)
|
2000-03-30 20:51:37 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_Obj *result;
|
|
|
|
long longVal;
|
|
|
|
int overflow;
|
|
|
|
|
|
|
|
if (PyBytes_Check(value))
|
|
|
|
return Tcl_NewStringObj(PyBytes_AS_STRING(value),
|
|
|
|
PyBytes_GET_SIZE(value));
|
|
|
|
else if (PyBool_Check(value))
|
|
|
|
return Tcl_NewBooleanObj(PyObject_IsTrue(value));
|
|
|
|
else if (PyLong_CheckExact(value) &&
|
|
|
|
((longVal = PyLong_AsLongAndOverflow(value, &overflow)),
|
|
|
|
!overflow)) {
|
|
|
|
/* If there is an overflow in the long conversion,
|
|
|
|
fall through to default object handling. */
|
|
|
|
return Tcl_NewLongObj(longVal);
|
|
|
|
}
|
|
|
|
else if (PyFloat_Check(value))
|
|
|
|
return Tcl_NewDoubleObj(PyFloat_AS_DOUBLE(value));
|
|
|
|
else if (PyTuple_Check(value)) {
|
2013-08-21 15:38:21 -03:00
|
|
|
Tcl_Obj **argv;
|
|
|
|
Py_ssize_t size, i;
|
|
|
|
|
|
|
|
size = PyTuple_Size(value);
|
|
|
|
if (!CHECK_SIZE(size, sizeof(Tcl_Obj *))) {
|
|
|
|
PyErr_SetString(PyExc_OverflowError, "tuple is too long");
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
argv = (Tcl_Obj **) ckalloc(((size_t)size) * sizeof(Tcl_Obj *));
|
2010-05-09 12:52:27 -03:00
|
|
|
if(!argv)
|
|
|
|
return 0;
|
2013-08-21 15:38:21 -03:00
|
|
|
for (i = 0; i < size; i++)
|
2010-05-09 12:52:27 -03:00
|
|
|
argv[i] = AsObj(PyTuple_GetItem(value,i));
|
|
|
|
result = Tcl_NewListObj(PyTuple_Size(value), argv);
|
|
|
|
ckfree(FREECAST argv);
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
else if (PyUnicode_Check(value)) {
|
2011-09-28 02:41:54 -03:00
|
|
|
void *inbuf;
|
|
|
|
Py_ssize_t size;
|
|
|
|
int kind;
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_UniChar *outbuf = NULL;
|
|
|
|
Py_ssize_t i;
|
2011-09-28 02:41:54 -03:00
|
|
|
size_t allocsize;
|
|
|
|
|
|
|
|
if (PyUnicode_READY(value) == -1)
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
inbuf = PyUnicode_DATA(value);
|
|
|
|
size = PyUnicode_GET_LENGTH(value);
|
2013-08-21 15:38:21 -03:00
|
|
|
if (!CHECK_SIZE(size, sizeof(Tcl_UniChar))) {
|
|
|
|
PyErr_SetString(PyExc_OverflowError, "string is too long");
|
|
|
|
return NULL;
|
|
|
|
}
|
2011-09-28 02:41:54 -03:00
|
|
|
kind = PyUnicode_KIND(value);
|
|
|
|
allocsize = ((size_t)size) * sizeof(Tcl_UniChar);
|
|
|
|
outbuf = (Tcl_UniChar*)ckalloc(allocsize);
|
2010-05-09 12:52:27 -03:00
|
|
|
/* Else overflow occurred, and we take the next exit */
|
|
|
|
if (!outbuf) {
|
|
|
|
PyErr_NoMemory();
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
for (i = 0; i < size; i++) {
|
2011-09-28 02:41:54 -03:00
|
|
|
Py_UCS4 ch = PyUnicode_READ(kind, inbuf, i);
|
|
|
|
/* We cannot test for sizeof(Tcl_UniChar) directly,
|
|
|
|
so we test for UTF-8 size instead. */
|
|
|
|
#if TCL_UTF_MAX == 3
|
|
|
|
if (ch >= 0x10000) {
|
2010-05-09 12:52:27 -03:00
|
|
|
/* Tcl doesn't do UTF-16, yet. */
|
2013-02-18 07:01:52 -04:00
|
|
|
PyErr_Format(Tkinter_TclError,
|
2011-11-03 20:36:46 -03:00
|
|
|
"character U+%x is above the range "
|
|
|
|
"(U+0000-U+FFFF) allowed by Tcl",
|
2011-11-04 05:49:24 -03:00
|
|
|
ch);
|
2010-05-09 12:52:27 -03:00
|
|
|
ckfree(FREECAST outbuf);
|
|
|
|
return NULL;
|
|
|
|
}
|
2012-07-22 07:56:54 -03:00
|
|
|
#endif
|
2011-09-28 02:41:54 -03:00
|
|
|
outbuf[i] = ch;
|
2010-05-09 12:52:27 -03:00
|
|
|
}
|
|
|
|
result = Tcl_NewUnicodeObj(outbuf, size);
|
|
|
|
ckfree(FREECAST outbuf);
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
else if(PyTclObject_Check(value)) {
|
|
|
|
Tcl_Obj *v = ((PyTclObject*)value)->value;
|
|
|
|
Tcl_IncrRefCount(v);
|
|
|
|
return v;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
PyObject *v = PyObject_Str(value);
|
|
|
|
if (!v)
|
|
|
|
return 0;
|
|
|
|
result = AsObj(v);
|
|
|
|
Py_DECREF(v);
|
|
|
|
return result;
|
|
|
|
}
|
2000-03-30 20:51:37 -04:00
|
|
|
}
|
|
|
|
|
2002-11-26 05:28:05 -04:00
|
|
|
static PyObject*
|
|
|
|
FromObj(PyObject* tkapp, Tcl_Obj *value)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
PyObject *result = NULL;
|
|
|
|
TkappObject *app = (TkappObject*)tkapp;
|
|
|
|
|
|
|
|
if (value->typePtr == NULL) {
|
|
|
|
return PyUnicode_FromStringAndSize(value->bytes,
|
|
|
|
value->length);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (value->typePtr == app->BooleanType) {
|
|
|
|
result = value->internalRep.longValue ? Py_True : Py_False;
|
|
|
|
Py_INCREF(result);
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (value->typePtr == app->ByteArrayType) {
|
|
|
|
int size;
|
|
|
|
char *data = (char*)Tcl_GetByteArrayFromObj(value, &size);
|
|
|
|
return PyBytes_FromStringAndSize(data, size);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (value->typePtr == app->DoubleType) {
|
|
|
|
return PyFloat_FromDouble(value->internalRep.doubleValue);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (value->typePtr == app->IntType) {
|
|
|
|
return PyLong_FromLong(value->internalRep.longValue);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (value->typePtr == app->ListType) {
|
|
|
|
int size;
|
|
|
|
int i, status;
|
|
|
|
PyObject *elem;
|
|
|
|
Tcl_Obj *tcl_elem;
|
|
|
|
|
|
|
|
status = Tcl_ListObjLength(Tkapp_Interp(tkapp), value, &size);
|
|
|
|
if (status == TCL_ERROR)
|
|
|
|
return Tkinter_Error(tkapp);
|
|
|
|
result = PyTuple_New(size);
|
|
|
|
if (!result)
|
|
|
|
return NULL;
|
|
|
|
for (i = 0; i < size; i++) {
|
|
|
|
status = Tcl_ListObjIndex(Tkapp_Interp(tkapp),
|
|
|
|
value, i, &tcl_elem);
|
|
|
|
if (status == TCL_ERROR) {
|
|
|
|
Py_DECREF(result);
|
|
|
|
return Tkinter_Error(tkapp);
|
|
|
|
}
|
|
|
|
elem = FromObj(tkapp, tcl_elem);
|
|
|
|
if (!elem) {
|
|
|
|
Py_DECREF(result);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
PyTuple_SetItem(result, i, elem);
|
|
|
|
}
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (value->typePtr == app->ProcBodyType) {
|
|
|
|
/* fall through: return tcl object. */
|
|
|
|
}
|
|
|
|
|
|
|
|
if (value->typePtr == app->StringType) {
|
2011-09-28 02:41:54 -03:00
|
|
|
#if TCL_UTF_MAX==3
|
|
|
|
return PyUnicode_FromKindAndData(
|
|
|
|
PyUnicode_2BYTE_KIND, Tcl_GetUnicode(value),
|
|
|
|
Tcl_GetCharLength(value));
|
2002-11-26 05:28:05 -04:00
|
|
|
#else
|
2011-09-28 02:41:54 -03:00
|
|
|
return PyUnicode_FromKindAndData(
|
|
|
|
PyUnicode_4BYTE_KIND, Tcl_GetUnicode(value),
|
|
|
|
Tcl_GetCharLength(value));
|
2002-11-26 05:28:05 -04:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
}
|
2002-11-26 05:28:05 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
return newPyTclObject(value);
|
2002-11-26 05:28:05 -04:00
|
|
|
}
|
|
|
|
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#ifdef WITH_THREAD
|
2002-12-12 13:07:58 -04:00
|
|
|
/* This mutex synchronizes inter-thread command calls. */
|
|
|
|
TCL_DECLARE_MUTEX(call_mutex)
|
|
|
|
|
|
|
|
typedef struct Tkapp_CallEvent {
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_Event ev; /* Must be first */
|
|
|
|
TkappObject *self;
|
|
|
|
PyObject *args;
|
|
|
|
int flags;
|
|
|
|
PyObject **res;
|
|
|
|
PyObject **exc_type, **exc_value, **exc_tb;
|
|
|
|
Tcl_Condition *done;
|
2002-12-12 13:07:58 -04:00
|
|
|
} Tkapp_CallEvent;
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#endif
|
2002-12-12 13:07:58 -04:00
|
|
|
|
|
|
|
void
|
|
|
|
Tkapp_CallDeallocArgs(Tcl_Obj** objv, Tcl_Obj** objStore, int objc)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
int i;
|
|
|
|
for (i = 0; i < objc; i++)
|
|
|
|
Tcl_DecrRefCount(objv[i]);
|
|
|
|
if (objv != objStore)
|
|
|
|
ckfree(FREECAST objv);
|
2002-12-12 13:07:58 -04:00
|
|
|
}
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
/* Convert Python objects to Tcl objects. This must happen in the
|
|
|
|
interpreter thread, which may or may not be the calling thread. */
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
static Tcl_Obj**
|
|
|
|
Tkapp_CallArgs(PyObject *args, Tcl_Obj** objStore, int *pobjc)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_Obj **objv = objStore;
|
2013-08-21 15:38:21 -03:00
|
|
|
Py_ssize_t objc = 0, i;
|
2010-05-09 12:52:27 -03:00
|
|
|
if (args == NULL)
|
|
|
|
/* do nothing */;
|
|
|
|
|
|
|
|
else if (!PyTuple_Check(args)) {
|
|
|
|
objv[0] = AsObj(args);
|
|
|
|
if (objv[0] == 0)
|
|
|
|
goto finally;
|
|
|
|
objc = 1;
|
|
|
|
Tcl_IncrRefCount(objv[0]);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
objc = PyTuple_Size(args);
|
|
|
|
|
|
|
|
if (objc > ARGSZ) {
|
2013-08-21 15:38:21 -03:00
|
|
|
if (!CHECK_SIZE(objc, sizeof(Tcl_Obj *))) {
|
|
|
|
PyErr_SetString(PyExc_OverflowError, "tuple is too long");
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
objv = (Tcl_Obj **)ckalloc(((size_t)objc) * sizeof(Tcl_Obj *));
|
2010-05-09 12:52:27 -03:00
|
|
|
if (objv == NULL) {
|
|
|
|
PyErr_NoMemory();
|
|
|
|
objc = 0;
|
|
|
|
goto finally;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
for (i = 0; i < objc; i++) {
|
|
|
|
PyObject *v = PyTuple_GetItem(args, i);
|
|
|
|
if (v == Py_None) {
|
|
|
|
objc = i;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
objv[i] = AsObj(v);
|
|
|
|
if (!objv[i]) {
|
|
|
|
/* Reset objc, so it attempts to clear
|
|
|
|
objects only up to i. */
|
|
|
|
objc = i;
|
|
|
|
goto finally;
|
|
|
|
}
|
|
|
|
Tcl_IncrRefCount(objv[i]);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
*pobjc = objc;
|
|
|
|
return objv;
|
2002-12-12 13:07:58 -04:00
|
|
|
finally:
|
2010-05-09 12:52:27 -03:00
|
|
|
Tkapp_CallDeallocArgs(objv, objStore, objc);
|
|
|
|
return NULL;
|
2002-12-12 13:07:58 -04:00
|
|
|
}
|
1998-04-29 13:22:14 -03:00
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
/* Convert the results of a command call into a Python objects. */
|
2000-03-28 20:19:50 -04:00
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
static PyObject*
|
|
|
|
Tkapp_CallResult(TkappObject *self)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
PyObject *res = NULL;
|
|
|
|
if(self->wantobjects) {
|
|
|
|
Tcl_Obj *value = Tcl_GetObjResult(self->interp);
|
|
|
|
/* Not sure whether the IncrRef is necessary, but something
|
|
|
|
may overwrite the interpreter result while we are
|
|
|
|
converting it. */
|
|
|
|
Tcl_IncrRefCount(value);
|
|
|
|
res = FromObj((PyObject*)self, value);
|
|
|
|
Tcl_DecrRefCount(value);
|
|
|
|
} else {
|
2013-09-20 17:21:44 -03:00
|
|
|
res = PyUnicode_FromString(Tcl_GetStringResult(self->interp));
|
2010-05-09 12:52:27 -03:00
|
|
|
}
|
|
|
|
return res;
|
2002-12-12 13:07:58 -04:00
|
|
|
}
|
2000-03-28 20:19:50 -04:00
|
|
|
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#ifdef WITH_THREAD
|
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
/* Tkapp_CallProc is the event procedure that is executed in the context of
|
|
|
|
the Tcl interpreter thread. Initially, it holds the Tcl lock, and doesn't
|
|
|
|
hold the Python lock. */
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
static int
|
|
|
|
Tkapp_CallProc(Tkapp_CallEvent *e, int flags)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_Obj *objStore[ARGSZ];
|
|
|
|
Tcl_Obj **objv;
|
|
|
|
int objc;
|
|
|
|
int i;
|
|
|
|
ENTER_PYTHON
|
|
|
|
objv = Tkapp_CallArgs(e->args, objStore, &objc);
|
|
|
|
if (!objv) {
|
|
|
|
PyErr_Fetch(e->exc_type, e->exc_value, e->exc_tb);
|
|
|
|
*(e->res) = NULL;
|
|
|
|
}
|
|
|
|
LEAVE_PYTHON
|
|
|
|
if (!objv)
|
|
|
|
goto done;
|
|
|
|
i = Tcl_EvalObjv(e->self->interp, objc, objv, e->flags);
|
|
|
|
ENTER_PYTHON
|
|
|
|
if (i == TCL_ERROR) {
|
|
|
|
*(e->res) = NULL;
|
|
|
|
*(e->exc_type) = NULL;
|
|
|
|
*(e->exc_tb) = NULL;
|
|
|
|
*(e->exc_value) = PyObject_CallFunction(
|
|
|
|
Tkinter_TclError, "s",
|
|
|
|
Tcl_GetStringResult(e->self->interp));
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
*(e->res) = Tkapp_CallResult(e->self);
|
|
|
|
}
|
|
|
|
LEAVE_PYTHON
|
|
|
|
|
|
|
|
Tkapp_CallDeallocArgs(objv, objStore, objc);
|
2009-02-06 19:16:11 -04:00
|
|
|
done:
|
2010-05-09 12:52:27 -03:00
|
|
|
/* Wake up calling thread. */
|
|
|
|
Tcl_MutexLock(&call_mutex);
|
|
|
|
Tcl_ConditionNotify(e->done);
|
|
|
|
Tcl_MutexUnlock(&call_mutex);
|
|
|
|
return 1;
|
2002-12-12 13:07:58 -04:00
|
|
|
}
|
|
|
|
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#endif
|
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
/* This is the main entry point for calling a Tcl command.
|
|
|
|
It supports three cases, with regard to threading:
|
|
|
|
1. Tcl is not threaded: Must have the Tcl lock, then can invoke command in
|
|
|
|
the context of the calling thread.
|
|
|
|
2. Tcl is threaded, caller of the command is in the interpreter thread:
|
|
|
|
Execute the command in the calling thread. Since the Tcl lock will
|
|
|
|
not be used, we can merge that with case 1.
|
|
|
|
3. Tcl is threaded, caller is in a different thread: Must queue an event to
|
|
|
|
the interpreter thread. Allocation of Tcl objects needs to occur in the
|
|
|
|
interpreter thread, so we ship the PyObject* args to the target thread,
|
|
|
|
and perform processing there. */
|
|
|
|
|
|
|
|
static PyObject *
|
Merge the rest of the trunk.
Merged revisions 46490-46494,46496,46498,46500,46506,46521,46538,46558,46563-46567,46570-46571,46583,46593,46595-46598,46604,46606,46609-46753 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r46610 | martin.v.loewis | 2006-06-03 09:42:26 +0200 (Sat, 03 Jun 2006) | 2 lines
Updated version (win32-icons2.zip) from #1490384.
........
r46612 | andrew.kuchling | 2006-06-03 20:09:41 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1472084] Fix description of do_tag
........
r46614 | andrew.kuchling | 2006-06-03 20:33:35 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1475554] Strengthen text to say 'must' instead of 'should'
........
r46616 | andrew.kuchling | 2006-06-03 20:41:28 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1441864] Clarify description of 'data' argument
........
r46617 | andrew.kuchling | 2006-06-03 20:43:24 +0200 (Sat, 03 Jun 2006) | 1 line
Minor rewording
........
r46619 | andrew.kuchling | 2006-06-03 21:02:35 +0200 (Sat, 03 Jun 2006) | 9 lines
[Bug #1497414] _self is a reserved word in the WATCOM 10.6 C compiler.
Fix by renaming the variable.
In a different module, Neal fixed it by renaming _self to self. There's
already a variable named 'self' here, so I used selfptr.
(I'm committing this on a Mac without Tk, but it's a simple search-and-replace.
<crosses fingers>, so I'll watch the buildbots and see what happens.)
........
r46621 | fredrik.lundh | 2006-06-03 23:56:05 +0200 (Sat, 03 Jun 2006) | 5 lines
"_self" is a said to be a reserved word in Watcom C 10.6. I'm
not sure that's really standard compliant behaviour, but I guess
we have to fix that anyway...
........
r46622 | andrew.kuchling | 2006-06-04 00:44:42 +0200 (Sun, 04 Jun 2006) | 1 line
Update readme
........
r46623 | andrew.kuchling | 2006-06-04 00:59:23 +0200 (Sun, 04 Jun 2006) | 1 line
Drop 0 parameter
........
r46624 | andrew.kuchling | 2006-06-04 00:59:59 +0200 (Sun, 04 Jun 2006) | 1 line
Some code tidying; use curses.wrapper
........
r46625 | andrew.kuchling | 2006-06-04 01:02:15 +0200 (Sun, 04 Jun 2006) | 1 line
Use True; value returned from main is unused
........
r46626 | andrew.kuchling | 2006-06-04 01:07:21 +0200 (Sun, 04 Jun 2006) | 1 line
Use true division, and the True value
........
r46627 | andrew.kuchling | 2006-06-04 01:09:58 +0200 (Sun, 04 Jun 2006) | 1 line
Docstring fix; use True
........
r46628 | andrew.kuchling | 2006-06-04 01:15:56 +0200 (Sun, 04 Jun 2006) | 1 line
Put code in a main() function; loosen up the spacing to match current code style
........
r46629 | andrew.kuchling | 2006-06-04 01:39:07 +0200 (Sun, 04 Jun 2006) | 1 line
Use functions; modernize code
........
r46630 | andrew.kuchling | 2006-06-04 01:43:22 +0200 (Sun, 04 Jun 2006) | 1 line
This demo requires Medusa (not just asyncore); remove it
........
r46631 | andrew.kuchling | 2006-06-04 01:46:36 +0200 (Sun, 04 Jun 2006) | 2 lines
Remove xmlrpc demo -- it duplicates the SimpleXMLRPCServer module.
........
r46632 | andrew.kuchling | 2006-06-04 01:47:22 +0200 (Sun, 04 Jun 2006) | 1 line
Remove xmlrpc/ directory
........
r46633 | andrew.kuchling | 2006-06-04 01:51:21 +0200 (Sun, 04 Jun 2006) | 1 line
Remove dangling reference
........
r46634 | andrew.kuchling | 2006-06-04 01:59:36 +0200 (Sun, 04 Jun 2006) | 1 line
Add more whitespace; use a better socket name
........
r46635 | tim.peters | 2006-06-04 03:22:53 +0200 (Sun, 04 Jun 2006) | 2 lines
Whitespace normalization.
........
r46637 | tim.peters | 2006-06-04 05:26:02 +0200 (Sun, 04 Jun 2006) | 16 lines
In a PYMALLOC_DEBUG build obmalloc adds extra debugging info
to each allocated block. This was using 4 bytes for each such
piece of info regardless of platform. This didn't really matter
before (proof: no bug reports, and the debug-build obmalloc would
have assert-failed if it was ever asked for a chunk of memory
>= 2**32 bytes), since container indices were plain ints. But after
the Py_ssize_t changes, it's at least theoretically possible to
allocate a list or string whose guts exceed 2**32 bytes, and the
PYMALLOC_DEBUG routines would fail then (having only 4 bytes
to record the originally requested size).
Now we use sizeof(size_t) bytes for each of a PYMALLOC_DEBUG
build's extra debugging fields. This won't make any difference
on 32-bit boxes, but will add 16 bytes to each allocation in
a debug build on a 64-bit box.
........
r46638 | tim.peters | 2006-06-04 05:38:04 +0200 (Sun, 04 Jun 2006) | 4 lines
_PyObject_DebugMalloc(): The return value should add
2*sizeof(size_t) now, not 8. This probably accounts for
current disasters on the 64-bit buildbot slaves.
........
r46639 | neal.norwitz | 2006-06-04 08:19:31 +0200 (Sun, 04 Jun 2006) | 1 line
SF #1499797, Fix for memory leak in WindowsError_str
........
r46640 | andrew.macintyre | 2006-06-04 14:31:09 +0200 (Sun, 04 Jun 2006) | 2 lines
Patch #1454481: Make thread stack size runtime tunable.
........
r46641 | andrew.macintyre | 2006-06-04 14:59:59 +0200 (Sun, 04 Jun 2006) | 2 lines
clean up function declarations to conform to PEP-7 style.
........
r46642 | martin.blais | 2006-06-04 15:49:49 +0200 (Sun, 04 Jun 2006) | 15 lines
Fixes in struct and socket from merge reviews.
- Following Guido's comments, renamed
* pack_to -> pack_into
* recv_buf -> recv_into
* recvfrom_buf -> recvfrom_into
- Made fixes to _struct.c according to Neal Norwitz comments on the checkins
list.
- Converted some ints into the appropriate -- I hope -- ssize_t and size_t.
........
r46643 | ronald.oussoren | 2006-06-04 16:05:28 +0200 (Sun, 04 Jun 2006) | 3 lines
"Import" LDFLAGS in Mac/OSX/Makefile.in to ensure pythonw gets build with
the right compiler flags.
........
r46644 | ronald.oussoren | 2006-06-04 16:24:59 +0200 (Sun, 04 Jun 2006) | 2 lines
Drop Mac wrappers for the WASTE library.
........
r46645 | tim.peters | 2006-06-04 17:49:07 +0200 (Sun, 04 Jun 2006) | 3 lines
s_methods[]: Stop compiler warnings by casting
s_unpack_from to PyCFunction.
........
r46646 | george.yoshida | 2006-06-04 19:04:12 +0200 (Sun, 04 Jun 2006) | 2 lines
Remove a redundant word
........
r46647 | george.yoshida | 2006-06-04 19:17:25 +0200 (Sun, 04 Jun 2006) | 2 lines
Markup fix
........
r46648 | martin.v.loewis | 2006-06-04 21:36:28 +0200 (Sun, 04 Jun 2006) | 2 lines
Patch #1359618: Speed-up charmap encoder.
........
r46649 | georg.brandl | 2006-06-04 23:46:16 +0200 (Sun, 04 Jun 2006) | 3 lines
Repair refleaks in unicodeobject.
........
r46650 | georg.brandl | 2006-06-04 23:56:52 +0200 (Sun, 04 Jun 2006) | 4 lines
Patch #1346214: correctly optimize away "if 0"-style stmts
(thanks to Neal for review)
........
r46651 | georg.brandl | 2006-06-05 00:15:37 +0200 (Mon, 05 Jun 2006) | 2 lines
Bug #1500293: fix memory leaks in _subprocess module.
........
r46654 | tim.peters | 2006-06-05 01:43:53 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46655 | tim.peters | 2006-06-05 01:52:47 +0200 (Mon, 05 Jun 2006) | 16 lines
Revert revisions:
46640 Patch #1454481: Make thread stack size runtime tunable.
46647 Markup fix
The first is causing many buildbots to fail test runs, and there
are multiple causes with seemingly no immediate prospects for
repairing them. See python-dev discussion.
Note that a branch can (and should) be created for resolving these
problems, like
svn copy svn+ssh://svn.python.org/python/trunk -r46640 svn+ssh://svn.python.org/python/branches/NEW_BRANCH
followed by merging rev 46647 to the new branch.
........
r46656 | andrew.kuchling | 2006-06-05 02:08:09 +0200 (Mon, 05 Jun 2006) | 1 line
Mention second encoding speedup
........
r46657 | gregory.p.smith | 2006-06-05 02:31:01 +0200 (Mon, 05 Jun 2006) | 7 lines
bugfix: when log_archive was called with the DB_ARCH_REMOVE flag present
in BerkeleyDB >= 4.2 it tried to construct a list out of an uninitialized
char **log_list.
feature: export the DB_ARCH_REMOVE flag by name in the module on BerkeleyDB >= 4.2.
........
r46658 | gregory.p.smith | 2006-06-05 02:33:35 +0200 (Mon, 05 Jun 2006) | 5 lines
fix a bug in the previous commit. don't leak empty list on error return and
fix the additional rare (out of memory only) bug that it was supposed to fix
of not freeing log_list when the python allocator failed.
........
r46660 | tim.peters | 2006-06-05 02:55:26 +0200 (Mon, 05 Jun 2006) | 9 lines
"Flat is better than nested."
Move the long-winded, multiply-nested -R support out
of runtest() and into some module-level helper functions.
This makes runtest() and the -R code easier to follow.
That in turn allowed seeing some opportunities for code
simplification, and made it obvious that reglog.txt
never got closed.
........
r46661 | hyeshik.chang | 2006-06-05 02:59:54 +0200 (Mon, 05 Jun 2006) | 3 lines
Fix a potentially invalid memory access of CJKCodecs' shift-jis
decoder. (found by Neal Norwitz)
........
r46663 | gregory.p.smith | 2006-06-05 03:39:52 +0200 (Mon, 05 Jun 2006) | 3 lines
* support DBEnv.log_stat() method on BerkeleyDB >= 4.0 [patch #1494885]
........
r46664 | tim.peters | 2006-06-05 03:43:03 +0200 (Mon, 05 Jun 2006) | 3 lines
Remove doctest.testmod's deprecated (in 2.4) `isprivate`
argument. A lot of hair went into supporting that!
........
r46665 | tim.peters | 2006-06-05 03:47:24 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46666 | tim.peters | 2006-06-05 03:48:21 +0200 (Mon, 05 Jun 2006) | 2 lines
Make doctest news more accurate.
........
r46667 | gregory.p.smith | 2006-06-05 03:56:15 +0200 (Mon, 05 Jun 2006) | 3 lines
* support DBEnv.lsn_reset() method on BerkeleyDB >= 4.4 [patch #1494902]
........
r46668 | gregory.p.smith | 2006-06-05 04:02:25 +0200 (Mon, 05 Jun 2006) | 3 lines
mention the just committed bsddb changes
........
r46671 | gregory.p.smith | 2006-06-05 19:38:04 +0200 (Mon, 05 Jun 2006) | 3 lines
* add support for DBSequence objects [patch #1466734]
........
r46672 | gregory.p.smith | 2006-06-05 20:20:07 +0200 (Mon, 05 Jun 2006) | 3 lines
forgot to add this file in previous commit
........
r46673 | tim.peters | 2006-06-05 20:36:12 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46674 | tim.peters | 2006-06-05 20:36:54 +0200 (Mon, 05 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46675 | gregory.p.smith | 2006-06-05 20:48:21 +0200 (Mon, 05 Jun 2006) | 4 lines
* fix DBCursor.pget() bug with keyword argument names when no data= is
supplied [SF pybsddb bug #1477863]
........
r46676 | andrew.kuchling | 2006-06-05 21:05:32 +0200 (Mon, 05 Jun 2006) | 1 line
Remove use of Trove name, which isn't very helpful to users
........
r46677 | andrew.kuchling | 2006-06-05 21:08:25 +0200 (Mon, 05 Jun 2006) | 1 line
[Bug #1470026] Include link to list of classifiers
........
r46679 | tim.peters | 2006-06-05 22:48:49 +0200 (Mon, 05 Jun 2006) | 10 lines
Access _struct attributes directly instead of mucking with getattr.
string_reverse(): Simplify.
assertRaises(): Raise TestFailed on failure.
test_unpack_from(), test_pack_into(), test_pack_into_fn(): never
use `assert` to test for an expected result (it doesn't test anything
when Python is run with -O).
........
r46680 | tim.peters | 2006-06-05 22:49:27 +0200 (Mon, 05 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46681 | gregory.p.smith | 2006-06-06 01:38:06 +0200 (Tue, 06 Jun 2006) | 3 lines
add depends = ['md5.h'] to the _md5 module extension for correctness sake.
........
r46682 | brett.cannon | 2006-06-06 01:51:55 +0200 (Tue, 06 Jun 2006) | 4 lines
Add 3 more bytes to a buffer to cover constants in string and null byte on top of 10 possible digits for an int.
Closes bug #1501223.
........
r46684 | gregory.p.smith | 2006-06-06 01:59:37 +0200 (Tue, 06 Jun 2006) | 5 lines
- bsddb: the __len__ method of a DB object has been fixed to return correct
results. It could previously incorrectly return 0 in some cases.
Fixes SF bug 1493322 (pybsddb bug 1184012).
........
r46686 | tim.peters | 2006-06-06 02:25:07 +0200 (Tue, 06 Jun 2006) | 7 lines
_PySys_Init(): It's rarely a good idea to size a buffer to the
exact maximum size someone guesses is needed. In this case, if
we're really worried about extreme integers, then "cp%d" can
actually need 14 bytes (2 for "cp" + 1 for \0 at the end +
11 for -(2**31-1)). So reserve 128 bytes instead -- nothing is
actually saved by making a stack-local buffer tiny.
........
r46687 | neal.norwitz | 2006-06-06 09:22:08 +0200 (Tue, 06 Jun 2006) | 1 line
Remove unused variable (and stop compiler warning)
........
r46688 | neal.norwitz | 2006-06-06 09:23:01 +0200 (Tue, 06 Jun 2006) | 1 line
Fix a bunch of parameter strings
........
r46689 | thomas.heller | 2006-06-06 13:34:33 +0200 (Tue, 06 Jun 2006) | 6 lines
Convert CFieldObject tp_members to tp_getset, since there is no
structmember typecode for Py_ssize_t fields. This should fix some of
the errors on the PPC64 debian machine (64-bit, big endian).
Assigning to readonly fields now raises AttributeError instead of
TypeError, so the testcase has to be changed as well.
........
r46690 | thomas.heller | 2006-06-06 13:54:32 +0200 (Tue, 06 Jun 2006) | 1 line
Damn - the sentinel was missing. And fix another silly mistake.
........
r46691 | martin.blais | 2006-06-06 14:46:55 +0200 (Tue, 06 Jun 2006) | 13 lines
Normalized a few cases of whitespace in function declarations.
Found them using::
find . -name '*.py' | while read i ; do grep 'def[^(]*( ' $i /dev/null ; done
find . -name '*.py' | while read i ; do grep ' ):' $i /dev/null ; done
(I was doing this all over my own code anyway, because I'd been using spaces in
all defs, so I thought I'd make a run on the Python code as well. If you need
to do such fixes in your own code, you can use xx-rename or parenregu.el within
emacs.)
........
r46693 | thomas.heller | 2006-06-06 17:34:18 +0200 (Tue, 06 Jun 2006) | 1 line
Specify argtypes for all test functions. Maybe that helps on strange ;-) architectures
........
r46694 | tim.peters | 2006-06-06 17:50:17 +0200 (Tue, 06 Jun 2006) | 5 lines
BSequence_set_range(): Rev 46688 ("Fix a bunch of
parameter strings") changed this function's signature
seemingly by mistake, which is causing buildbots to fail
test_bsddb3. Restored the pre-46688 signature.
........
r46695 | tim.peters | 2006-06-06 17:52:35 +0200 (Tue, 06 Jun 2006) | 4 lines
On python-dev Thomas Heller said these were committed
by mistake in rev 46693, so reverting this part of
rev 46693.
........
r46696 | andrew.kuchling | 2006-06-06 19:10:41 +0200 (Tue, 06 Jun 2006) | 1 line
Fix comment typo
........
r46697 | brett.cannon | 2006-06-06 20:08:16 +0200 (Tue, 06 Jun 2006) | 2 lines
Fix coding style guide bug.
........
r46698 | thomas.heller | 2006-06-06 20:50:46 +0200 (Tue, 06 Jun 2006) | 2 lines
Add a hack so that foreign functions returning float now do work on 64-bit
big endian platforms.
........
r46699 | thomas.heller | 2006-06-06 21:25:13 +0200 (Tue, 06 Jun 2006) | 3 lines
Use the same big-endian hack as in _ctypes/callproc.c for callback functions.
This fixes the callback function tests that return float.
........
r46700 | ronald.oussoren | 2006-06-06 21:50:24 +0200 (Tue, 06 Jun 2006) | 5 lines
* Ensure that "make altinstall" works when the tree was configured
with --enable-framework
* Also for --enable-framework: allow users to use --prefix to specify
the location of the compatibility symlinks (such as /usr/local/bin/python)
........
r46701 | ronald.oussoren | 2006-06-06 21:56:00 +0200 (Tue, 06 Jun 2006) | 3 lines
A quick hack to ensure the right key-bindings for IDLE on osx: install patched
configuration files during a framework install.
........
r46702 | tim.peters | 2006-06-07 03:04:59 +0200 (Wed, 07 Jun 2006) | 4 lines
dash_R_cleanup(): Clear filecmp._cache. This accounts for
different results across -R runs (at least on Windows) of
test_filecmp.
........
r46705 | tim.peters | 2006-06-07 08:57:51 +0200 (Wed, 07 Jun 2006) | 17 lines
SF patch 1501987: Remove randomness from test_exceptions,
from ?iga Seilnacht (sorry about the name, but Firefox
on my box can't display the first character of the name --
the SF "Unix name" is zseil).
This appears to cure the oddball intermittent leaks across
runs when running test_exceptions under -R. I'm not sure
why, but I'm too sleepy to care ;-)
The thrust of the SF patch was to remove randomness in the
pickle protocol used. I changed the patch to use
range(pickle.HIGHEST_PROTOCOL + 1), to try both pickle and
cPickle, and randomly mucked with other test lines to put
statements on their own lines.
Not a bugfix candidate (this is fiddling new-in-2.5 code).
........
r46706 | andrew.kuchling | 2006-06-07 15:55:33 +0200 (Wed, 07 Jun 2006) | 1 line
Add an SQLite introduction, taken from the 'What's New' text
........
r46708 | andrew.kuchling | 2006-06-07 19:02:52 +0200 (Wed, 07 Jun 2006) | 1 line
Mention other placeholders
........
r46709 | andrew.kuchling | 2006-06-07 19:03:46 +0200 (Wed, 07 Jun 2006) | 1 line
Add an item; also, escape %
........
r46710 | andrew.kuchling | 2006-06-07 19:04:01 +0200 (Wed, 07 Jun 2006) | 1 line
Mention other placeholders
........
r46716 | ronald.oussoren | 2006-06-07 20:57:44 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/Tools one level up
........
r46717 | ronald.oussoren | 2006-06-07 20:58:01 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/PythonLauncher one level up
........
r46718 | ronald.oussoren | 2006-06-07 20:58:42 +0200 (Wed, 07 Jun 2006) | 2 lines
mv Mac/OSX/BuildScript one level up
........
r46719 | ronald.oussoren | 2006-06-07 21:02:03 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/* one level up
........
r46720 | ronald.oussoren | 2006-06-07 21:06:01 +0200 (Wed, 07 Jun 2006) | 2 lines
And the last bit: move IDLE one level up and adjust makefiles
........
r46723 | ronald.oussoren | 2006-06-07 21:38:53 +0200 (Wed, 07 Jun 2006) | 4 lines
- Patch the correct version of python in the Info.plists at build time, instead
of relying on a maintainer to update them before releases.
- Remove the now empty Mac/OSX directory
........
r46727 | ronald.oussoren | 2006-06-07 22:18:44 +0200 (Wed, 07 Jun 2006) | 7 lines
* If BuildApplet.py is used as an applet it starts with a version of
sys.exutable that isn't usuable on an #!-line. That results in generated
applets that don't actually work. Work around this problem by resetting
sys.executable.
* argvemulator.py didn't work on intel macs. This patch fixes this
(bug #1491468)
........
r46728 | tim.peters | 2006-06-07 22:40:06 +0200 (Wed, 07 Jun 2006) | 2 lines
Whitespace normalization.
........
r46729 | tim.peters | 2006-06-07 22:40:54 +0200 (Wed, 07 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46730 | thomas.heller | 2006-06-07 22:43:06 +0200 (Wed, 07 Jun 2006) | 7 lines
Fix for foreign functions returning small structures on 64-bit big
endian machines. Should fix the remaininf failure in the PPC64
Debian buildbot.
Thanks to Matthias Klose for providing access to a machine to debug
and test this.
........
r46731 | brett.cannon | 2006-06-07 23:48:17 +0200 (Wed, 07 Jun 2006) | 2 lines
Clarify documentation for bf_getcharbuffer.
........
r46735 | neal.norwitz | 2006-06-08 07:12:45 +0200 (Thu, 08 Jun 2006) | 1 line
Fix a refleak in recvfrom_into
........
r46736 | gregory.p.smith | 2006-06-08 07:17:08 +0200 (Thu, 08 Jun 2006) | 9 lines
- bsddb: the bsddb.dbtables Modify method now raises the proper error and
aborts the db transaction safely when a modifier callback fails.
Fixes SF python patch/bug #1408584.
Also cleans up the bsddb.dbtables docstrings since thats the only
documentation that exists for that unadvertised module. (people
really should really just use sqlite3)
........
r46737 | gregory.p.smith | 2006-06-08 07:38:11 +0200 (Thu, 08 Jun 2006) | 4 lines
* Turn the deadlock situation described in SF bug #775414 into a
DBDeadLockError exception.
* add the test case for my previous dbtables commit.
........
r46738 | gregory.p.smith | 2006-06-08 07:39:54 +0200 (Thu, 08 Jun 2006) | 2 lines
pasted set_lk_detect line in wrong spot in previous commit. fixed. passes tests this time.
........
r46739 | armin.rigo | 2006-06-08 12:56:24 +0200 (Thu, 08 Jun 2006) | 6 lines
(arre, arigo) SF bug #1350060
Give a consistent behavior for comparison and hashing of method objects
(both user- and built-in methods). Now compares the 'self' recursively.
The hash was already asking for the hash of 'self'.
........
r46740 | andrew.kuchling | 2006-06-08 13:56:44 +0200 (Thu, 08 Jun 2006) | 1 line
Typo fix
........
r46741 | georg.brandl | 2006-06-08 14:45:01 +0200 (Thu, 08 Jun 2006) | 2 lines
Bug #1502750: Fix getargs "i" format to use LONG_MIN and LONG_MAX for bounds checking.
........
r46743 | georg.brandl | 2006-06-08 14:54:13 +0200 (Thu, 08 Jun 2006) | 2 lines
Bug #1502728: Correctly link against librt library on HP-UX.
........
r46745 | georg.brandl | 2006-06-08 14:55:47 +0200 (Thu, 08 Jun 2006) | 3 lines
Add news for recent bugfix.
........
r46746 | georg.brandl | 2006-06-08 15:31:07 +0200 (Thu, 08 Jun 2006) | 4 lines
Argh. "integer" is a very confusing word ;)
Actually, checking for INT_MAX and INT_MIN is correct since
the format code explicitly handles a C "int".
........
r46748 | nick.coghlan | 2006-06-08 15:54:49 +0200 (Thu, 08 Jun 2006) | 1 line
Add functools.update_wrapper() and functools.wraps() as described in PEP 356
........
r46751 | georg.brandl | 2006-06-08 16:50:21 +0200 (Thu, 08 Jun 2006) | 4 lines
Bug #1502805: don't alias file.__exit__ to file.close since the
latter can return something that's true.
........
r46752 | georg.brandl | 2006-06-08 16:50:53 +0200 (Thu, 08 Jun 2006) | 3 lines
Convert test_file to unittest.
........
2006-06-08 12:35:45 -03:00
|
|
|
Tkapp_Call(PyObject *selfptr, PyObject *args)
|
2002-12-12 13:07:58 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_Obj *objStore[ARGSZ];
|
|
|
|
Tcl_Obj **objv = NULL;
|
|
|
|
int objc, i;
|
|
|
|
PyObject *res = NULL;
|
|
|
|
TkappObject *self = (TkappObject*)selfptr;
|
|
|
|
int flags = TCL_EVAL_DIRECT | TCL_EVAL_GLOBAL;
|
|
|
|
|
|
|
|
/* If args is a single tuple, replace with contents of tuple */
|
|
|
|
if (1 == PyTuple_Size(args)){
|
|
|
|
PyObject* item = PyTuple_GetItem(args, 0);
|
|
|
|
if (PyTuple_Check(item))
|
|
|
|
args = item;
|
|
|
|
}
|
2003-03-30 04:44:58 -04:00
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
if (self->threaded && self->thread_id != Tcl_GetCurrentThread()) {
|
|
|
|
/* We cannot call the command directly. Instead, we must
|
|
|
|
marshal the parameters to the interpreter thread. */
|
|
|
|
Tkapp_CallEvent *ev;
|
|
|
|
Tcl_Condition cond = NULL;
|
|
|
|
PyObject *exc_type, *exc_value, *exc_tb;
|
|
|
|
if (!WaitForMainloop(self))
|
|
|
|
return NULL;
|
|
|
|
ev = (Tkapp_CallEvent*)ckalloc(sizeof(Tkapp_CallEvent));
|
|
|
|
ev->ev.proc = (Tcl_EventProc*)Tkapp_CallProc;
|
|
|
|
ev->self = self;
|
|
|
|
ev->args = args;
|
|
|
|
ev->res = &res;
|
|
|
|
ev->exc_type = &exc_type;
|
|
|
|
ev->exc_value = &exc_value;
|
|
|
|
ev->exc_tb = &exc_tb;
|
|
|
|
ev->done = &cond;
|
|
|
|
|
|
|
|
Tkapp_ThreadSend(self, (Tcl_Event*)ev, &cond, &call_mutex);
|
|
|
|
|
|
|
|
if (res == NULL) {
|
|
|
|
if (exc_type)
|
|
|
|
PyErr_Restore(exc_type, exc_value, exc_tb);
|
|
|
|
else
|
|
|
|
PyErr_SetObject(Tkinter_TclError, exc_value);
|
|
|
|
}
|
|
|
|
Tcl_ConditionFinalize(&cond);
|
|
|
|
}
|
|
|
|
else
|
2003-03-30 04:44:58 -04:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
{
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
objv = Tkapp_CallArgs(args, objStore, &objc);
|
|
|
|
if (!objv)
|
|
|
|
return NULL;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_TCL
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
i = Tcl_EvalObjv(self->interp, objc, objv, flags);
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_OVERLAP
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (i == TCL_ERROR)
|
|
|
|
Tkinter_Error(selfptr);
|
|
|
|
else
|
|
|
|
res = Tkapp_CallResult(self);
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
LEAVE_OVERLAP_TCL
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
Tkapp_CallDeallocArgs(objv, objStore, objc);
|
|
|
|
}
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_Eval(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *script;
|
|
|
|
PyObject *res = NULL;
|
|
|
|
int err;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "s:eval", &script))
|
|
|
|
return NULL;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
CHECK_TCL_APPARTMENT;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_TCL
|
|
|
|
err = Tcl_Eval(Tkapp_Interp(self), script);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (err == TCL_ERROR)
|
|
|
|
res = Tkinter_Error(self);
|
|
|
|
else
|
|
|
|
res = PyUnicode_FromString(Tkapp_Result(self));
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_EvalFile(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *fileName;
|
|
|
|
PyObject *res = NULL;
|
|
|
|
int err;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "s:evalfile", &fileName))
|
|
|
|
return NULL;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
CHECK_TCL_APPARTMENT;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_TCL
|
|
|
|
err = Tcl_EvalFile(Tkapp_Interp(self), fileName);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (err == TCL_ERROR)
|
|
|
|
res = Tkinter_Error(self);
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
else
|
|
|
|
res = PyUnicode_FromString(Tkapp_Result(self));
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_Record(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *script;
|
|
|
|
PyObject *res = NULL;
|
|
|
|
int err;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "s", &script))
|
|
|
|
return NULL;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
CHECK_TCL_APPARTMENT;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_TCL
|
|
|
|
err = Tcl_RecordAndEval(Tkapp_Interp(self), script, TCL_NO_EVAL);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (err == TCL_ERROR)
|
|
|
|
res = Tkinter_Error(self);
|
|
|
|
else
|
|
|
|
res = PyUnicode_FromString(Tkapp_Result(self));
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_AddErrorInfo(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *msg;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "s:adderrorinfo", &msg))
|
|
|
|
return NULL;
|
|
|
|
CHECK_TCL_APPARTMENT;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_TCL
|
|
|
|
Tcl_AddErrorInfo(Tkapp_Interp(self), msg);
|
|
|
|
LEAVE_TCL
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/** Tcl Variable **/
|
|
|
|
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
typedef PyObject* (*EventFunc)(PyObject*, PyObject *args, int flags);
|
|
|
|
|
|
|
|
#ifdef WITH_THREAD
|
2002-12-12 13:07:58 -04:00
|
|
|
TCL_DECLARE_MUTEX(var_mutex)
|
|
|
|
|
|
|
|
typedef struct VarEvent {
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_Event ev; /* must be first */
|
|
|
|
PyObject *self;
|
|
|
|
PyObject *args;
|
|
|
|
int flags;
|
|
|
|
EventFunc func;
|
|
|
|
PyObject **res;
|
|
|
|
PyObject **exc_type;
|
|
|
|
PyObject **exc_val;
|
|
|
|
Tcl_Condition *cond;
|
2002-12-12 13:07:58 -04:00
|
|
|
} VarEvent;
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#endif
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2003-05-01 02:47:00 -03:00
|
|
|
static int
|
|
|
|
varname_converter(PyObject *in, void *_out)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char **out = (char**)_out;
|
|
|
|
if (PyBytes_Check(in)) {
|
|
|
|
*out = PyBytes_AsString(in);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
if (PyUnicode_Check(in)) {
|
|
|
|
*out = _PyUnicode_AsString(in);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
if (PyTclObject_Check(in)) {
|
|
|
|
*out = PyTclObject_TclString(in);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
/* XXX: Should give diagnostics. */
|
|
|
|
return 0;
|
2007-11-21 16:09:18 -04:00
|
|
|
}
|
2003-05-01 02:47:00 -03:00
|
|
|
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#ifdef WITH_THREAD
|
|
|
|
|
2008-06-13 04:50:45 -03:00
|
|
|
static void
|
2002-12-12 13:07:58 -04:00
|
|
|
var_perform(VarEvent *ev)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
*(ev->res) = ev->func(ev->self, ev->args, ev->flags);
|
|
|
|
if (!*(ev->res)) {
|
|
|
|
PyObject *exc, *val, *tb;
|
|
|
|
PyErr_Fetch(&exc, &val, &tb);
|
|
|
|
PyErr_NormalizeException(&exc, &val, &tb);
|
|
|
|
*(ev->exc_type) = exc;
|
|
|
|
*(ev->exc_val) = val;
|
|
|
|
Py_DECREF(tb);
|
|
|
|
}
|
2007-11-21 16:09:18 -04:00
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
|
|
|
var_proc(VarEvent* ev, int flags)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_PYTHON
|
|
|
|
var_perform(ev);
|
|
|
|
Tcl_MutexLock(&var_mutex);
|
|
|
|
Tcl_ConditionNotify(ev->cond);
|
|
|
|
Tcl_MutexUnlock(&var_mutex);
|
|
|
|
LEAVE_PYTHON
|
|
|
|
return 1;
|
2002-12-12 13:07:58 -04:00
|
|
|
}
|
|
|
|
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#endif
|
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
static PyObject*
|
Merge the rest of the trunk.
Merged revisions 46490-46494,46496,46498,46500,46506,46521,46538,46558,46563-46567,46570-46571,46583,46593,46595-46598,46604,46606,46609-46753 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r46610 | martin.v.loewis | 2006-06-03 09:42:26 +0200 (Sat, 03 Jun 2006) | 2 lines
Updated version (win32-icons2.zip) from #1490384.
........
r46612 | andrew.kuchling | 2006-06-03 20:09:41 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1472084] Fix description of do_tag
........
r46614 | andrew.kuchling | 2006-06-03 20:33:35 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1475554] Strengthen text to say 'must' instead of 'should'
........
r46616 | andrew.kuchling | 2006-06-03 20:41:28 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1441864] Clarify description of 'data' argument
........
r46617 | andrew.kuchling | 2006-06-03 20:43:24 +0200 (Sat, 03 Jun 2006) | 1 line
Minor rewording
........
r46619 | andrew.kuchling | 2006-06-03 21:02:35 +0200 (Sat, 03 Jun 2006) | 9 lines
[Bug #1497414] _self is a reserved word in the WATCOM 10.6 C compiler.
Fix by renaming the variable.
In a different module, Neal fixed it by renaming _self to self. There's
already a variable named 'self' here, so I used selfptr.
(I'm committing this on a Mac without Tk, but it's a simple search-and-replace.
<crosses fingers>, so I'll watch the buildbots and see what happens.)
........
r46621 | fredrik.lundh | 2006-06-03 23:56:05 +0200 (Sat, 03 Jun 2006) | 5 lines
"_self" is a said to be a reserved word in Watcom C 10.6. I'm
not sure that's really standard compliant behaviour, but I guess
we have to fix that anyway...
........
r46622 | andrew.kuchling | 2006-06-04 00:44:42 +0200 (Sun, 04 Jun 2006) | 1 line
Update readme
........
r46623 | andrew.kuchling | 2006-06-04 00:59:23 +0200 (Sun, 04 Jun 2006) | 1 line
Drop 0 parameter
........
r46624 | andrew.kuchling | 2006-06-04 00:59:59 +0200 (Sun, 04 Jun 2006) | 1 line
Some code tidying; use curses.wrapper
........
r46625 | andrew.kuchling | 2006-06-04 01:02:15 +0200 (Sun, 04 Jun 2006) | 1 line
Use True; value returned from main is unused
........
r46626 | andrew.kuchling | 2006-06-04 01:07:21 +0200 (Sun, 04 Jun 2006) | 1 line
Use true division, and the True value
........
r46627 | andrew.kuchling | 2006-06-04 01:09:58 +0200 (Sun, 04 Jun 2006) | 1 line
Docstring fix; use True
........
r46628 | andrew.kuchling | 2006-06-04 01:15:56 +0200 (Sun, 04 Jun 2006) | 1 line
Put code in a main() function; loosen up the spacing to match current code style
........
r46629 | andrew.kuchling | 2006-06-04 01:39:07 +0200 (Sun, 04 Jun 2006) | 1 line
Use functions; modernize code
........
r46630 | andrew.kuchling | 2006-06-04 01:43:22 +0200 (Sun, 04 Jun 2006) | 1 line
This demo requires Medusa (not just asyncore); remove it
........
r46631 | andrew.kuchling | 2006-06-04 01:46:36 +0200 (Sun, 04 Jun 2006) | 2 lines
Remove xmlrpc demo -- it duplicates the SimpleXMLRPCServer module.
........
r46632 | andrew.kuchling | 2006-06-04 01:47:22 +0200 (Sun, 04 Jun 2006) | 1 line
Remove xmlrpc/ directory
........
r46633 | andrew.kuchling | 2006-06-04 01:51:21 +0200 (Sun, 04 Jun 2006) | 1 line
Remove dangling reference
........
r46634 | andrew.kuchling | 2006-06-04 01:59:36 +0200 (Sun, 04 Jun 2006) | 1 line
Add more whitespace; use a better socket name
........
r46635 | tim.peters | 2006-06-04 03:22:53 +0200 (Sun, 04 Jun 2006) | 2 lines
Whitespace normalization.
........
r46637 | tim.peters | 2006-06-04 05:26:02 +0200 (Sun, 04 Jun 2006) | 16 lines
In a PYMALLOC_DEBUG build obmalloc adds extra debugging info
to each allocated block. This was using 4 bytes for each such
piece of info regardless of platform. This didn't really matter
before (proof: no bug reports, and the debug-build obmalloc would
have assert-failed if it was ever asked for a chunk of memory
>= 2**32 bytes), since container indices were plain ints. But after
the Py_ssize_t changes, it's at least theoretically possible to
allocate a list or string whose guts exceed 2**32 bytes, and the
PYMALLOC_DEBUG routines would fail then (having only 4 bytes
to record the originally requested size).
Now we use sizeof(size_t) bytes for each of a PYMALLOC_DEBUG
build's extra debugging fields. This won't make any difference
on 32-bit boxes, but will add 16 bytes to each allocation in
a debug build on a 64-bit box.
........
r46638 | tim.peters | 2006-06-04 05:38:04 +0200 (Sun, 04 Jun 2006) | 4 lines
_PyObject_DebugMalloc(): The return value should add
2*sizeof(size_t) now, not 8. This probably accounts for
current disasters on the 64-bit buildbot slaves.
........
r46639 | neal.norwitz | 2006-06-04 08:19:31 +0200 (Sun, 04 Jun 2006) | 1 line
SF #1499797, Fix for memory leak in WindowsError_str
........
r46640 | andrew.macintyre | 2006-06-04 14:31:09 +0200 (Sun, 04 Jun 2006) | 2 lines
Patch #1454481: Make thread stack size runtime tunable.
........
r46641 | andrew.macintyre | 2006-06-04 14:59:59 +0200 (Sun, 04 Jun 2006) | 2 lines
clean up function declarations to conform to PEP-7 style.
........
r46642 | martin.blais | 2006-06-04 15:49:49 +0200 (Sun, 04 Jun 2006) | 15 lines
Fixes in struct and socket from merge reviews.
- Following Guido's comments, renamed
* pack_to -> pack_into
* recv_buf -> recv_into
* recvfrom_buf -> recvfrom_into
- Made fixes to _struct.c according to Neal Norwitz comments on the checkins
list.
- Converted some ints into the appropriate -- I hope -- ssize_t and size_t.
........
r46643 | ronald.oussoren | 2006-06-04 16:05:28 +0200 (Sun, 04 Jun 2006) | 3 lines
"Import" LDFLAGS in Mac/OSX/Makefile.in to ensure pythonw gets build with
the right compiler flags.
........
r46644 | ronald.oussoren | 2006-06-04 16:24:59 +0200 (Sun, 04 Jun 2006) | 2 lines
Drop Mac wrappers for the WASTE library.
........
r46645 | tim.peters | 2006-06-04 17:49:07 +0200 (Sun, 04 Jun 2006) | 3 lines
s_methods[]: Stop compiler warnings by casting
s_unpack_from to PyCFunction.
........
r46646 | george.yoshida | 2006-06-04 19:04:12 +0200 (Sun, 04 Jun 2006) | 2 lines
Remove a redundant word
........
r46647 | george.yoshida | 2006-06-04 19:17:25 +0200 (Sun, 04 Jun 2006) | 2 lines
Markup fix
........
r46648 | martin.v.loewis | 2006-06-04 21:36:28 +0200 (Sun, 04 Jun 2006) | 2 lines
Patch #1359618: Speed-up charmap encoder.
........
r46649 | georg.brandl | 2006-06-04 23:46:16 +0200 (Sun, 04 Jun 2006) | 3 lines
Repair refleaks in unicodeobject.
........
r46650 | georg.brandl | 2006-06-04 23:56:52 +0200 (Sun, 04 Jun 2006) | 4 lines
Patch #1346214: correctly optimize away "if 0"-style stmts
(thanks to Neal for review)
........
r46651 | georg.brandl | 2006-06-05 00:15:37 +0200 (Mon, 05 Jun 2006) | 2 lines
Bug #1500293: fix memory leaks in _subprocess module.
........
r46654 | tim.peters | 2006-06-05 01:43:53 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46655 | tim.peters | 2006-06-05 01:52:47 +0200 (Mon, 05 Jun 2006) | 16 lines
Revert revisions:
46640 Patch #1454481: Make thread stack size runtime tunable.
46647 Markup fix
The first is causing many buildbots to fail test runs, and there
are multiple causes with seemingly no immediate prospects for
repairing them. See python-dev discussion.
Note that a branch can (and should) be created for resolving these
problems, like
svn copy svn+ssh://svn.python.org/python/trunk -r46640 svn+ssh://svn.python.org/python/branches/NEW_BRANCH
followed by merging rev 46647 to the new branch.
........
r46656 | andrew.kuchling | 2006-06-05 02:08:09 +0200 (Mon, 05 Jun 2006) | 1 line
Mention second encoding speedup
........
r46657 | gregory.p.smith | 2006-06-05 02:31:01 +0200 (Mon, 05 Jun 2006) | 7 lines
bugfix: when log_archive was called with the DB_ARCH_REMOVE flag present
in BerkeleyDB >= 4.2 it tried to construct a list out of an uninitialized
char **log_list.
feature: export the DB_ARCH_REMOVE flag by name in the module on BerkeleyDB >= 4.2.
........
r46658 | gregory.p.smith | 2006-06-05 02:33:35 +0200 (Mon, 05 Jun 2006) | 5 lines
fix a bug in the previous commit. don't leak empty list on error return and
fix the additional rare (out of memory only) bug that it was supposed to fix
of not freeing log_list when the python allocator failed.
........
r46660 | tim.peters | 2006-06-05 02:55:26 +0200 (Mon, 05 Jun 2006) | 9 lines
"Flat is better than nested."
Move the long-winded, multiply-nested -R support out
of runtest() and into some module-level helper functions.
This makes runtest() and the -R code easier to follow.
That in turn allowed seeing some opportunities for code
simplification, and made it obvious that reglog.txt
never got closed.
........
r46661 | hyeshik.chang | 2006-06-05 02:59:54 +0200 (Mon, 05 Jun 2006) | 3 lines
Fix a potentially invalid memory access of CJKCodecs' shift-jis
decoder. (found by Neal Norwitz)
........
r46663 | gregory.p.smith | 2006-06-05 03:39:52 +0200 (Mon, 05 Jun 2006) | 3 lines
* support DBEnv.log_stat() method on BerkeleyDB >= 4.0 [patch #1494885]
........
r46664 | tim.peters | 2006-06-05 03:43:03 +0200 (Mon, 05 Jun 2006) | 3 lines
Remove doctest.testmod's deprecated (in 2.4) `isprivate`
argument. A lot of hair went into supporting that!
........
r46665 | tim.peters | 2006-06-05 03:47:24 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46666 | tim.peters | 2006-06-05 03:48:21 +0200 (Mon, 05 Jun 2006) | 2 lines
Make doctest news more accurate.
........
r46667 | gregory.p.smith | 2006-06-05 03:56:15 +0200 (Mon, 05 Jun 2006) | 3 lines
* support DBEnv.lsn_reset() method on BerkeleyDB >= 4.4 [patch #1494902]
........
r46668 | gregory.p.smith | 2006-06-05 04:02:25 +0200 (Mon, 05 Jun 2006) | 3 lines
mention the just committed bsddb changes
........
r46671 | gregory.p.smith | 2006-06-05 19:38:04 +0200 (Mon, 05 Jun 2006) | 3 lines
* add support for DBSequence objects [patch #1466734]
........
r46672 | gregory.p.smith | 2006-06-05 20:20:07 +0200 (Mon, 05 Jun 2006) | 3 lines
forgot to add this file in previous commit
........
r46673 | tim.peters | 2006-06-05 20:36:12 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46674 | tim.peters | 2006-06-05 20:36:54 +0200 (Mon, 05 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46675 | gregory.p.smith | 2006-06-05 20:48:21 +0200 (Mon, 05 Jun 2006) | 4 lines
* fix DBCursor.pget() bug with keyword argument names when no data= is
supplied [SF pybsddb bug #1477863]
........
r46676 | andrew.kuchling | 2006-06-05 21:05:32 +0200 (Mon, 05 Jun 2006) | 1 line
Remove use of Trove name, which isn't very helpful to users
........
r46677 | andrew.kuchling | 2006-06-05 21:08:25 +0200 (Mon, 05 Jun 2006) | 1 line
[Bug #1470026] Include link to list of classifiers
........
r46679 | tim.peters | 2006-06-05 22:48:49 +0200 (Mon, 05 Jun 2006) | 10 lines
Access _struct attributes directly instead of mucking with getattr.
string_reverse(): Simplify.
assertRaises(): Raise TestFailed on failure.
test_unpack_from(), test_pack_into(), test_pack_into_fn(): never
use `assert` to test for an expected result (it doesn't test anything
when Python is run with -O).
........
r46680 | tim.peters | 2006-06-05 22:49:27 +0200 (Mon, 05 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46681 | gregory.p.smith | 2006-06-06 01:38:06 +0200 (Tue, 06 Jun 2006) | 3 lines
add depends = ['md5.h'] to the _md5 module extension for correctness sake.
........
r46682 | brett.cannon | 2006-06-06 01:51:55 +0200 (Tue, 06 Jun 2006) | 4 lines
Add 3 more bytes to a buffer to cover constants in string and null byte on top of 10 possible digits for an int.
Closes bug #1501223.
........
r46684 | gregory.p.smith | 2006-06-06 01:59:37 +0200 (Tue, 06 Jun 2006) | 5 lines
- bsddb: the __len__ method of a DB object has been fixed to return correct
results. It could previously incorrectly return 0 in some cases.
Fixes SF bug 1493322 (pybsddb bug 1184012).
........
r46686 | tim.peters | 2006-06-06 02:25:07 +0200 (Tue, 06 Jun 2006) | 7 lines
_PySys_Init(): It's rarely a good idea to size a buffer to the
exact maximum size someone guesses is needed. In this case, if
we're really worried about extreme integers, then "cp%d" can
actually need 14 bytes (2 for "cp" + 1 for \0 at the end +
11 for -(2**31-1)). So reserve 128 bytes instead -- nothing is
actually saved by making a stack-local buffer tiny.
........
r46687 | neal.norwitz | 2006-06-06 09:22:08 +0200 (Tue, 06 Jun 2006) | 1 line
Remove unused variable (and stop compiler warning)
........
r46688 | neal.norwitz | 2006-06-06 09:23:01 +0200 (Tue, 06 Jun 2006) | 1 line
Fix a bunch of parameter strings
........
r46689 | thomas.heller | 2006-06-06 13:34:33 +0200 (Tue, 06 Jun 2006) | 6 lines
Convert CFieldObject tp_members to tp_getset, since there is no
structmember typecode for Py_ssize_t fields. This should fix some of
the errors on the PPC64 debian machine (64-bit, big endian).
Assigning to readonly fields now raises AttributeError instead of
TypeError, so the testcase has to be changed as well.
........
r46690 | thomas.heller | 2006-06-06 13:54:32 +0200 (Tue, 06 Jun 2006) | 1 line
Damn - the sentinel was missing. And fix another silly mistake.
........
r46691 | martin.blais | 2006-06-06 14:46:55 +0200 (Tue, 06 Jun 2006) | 13 lines
Normalized a few cases of whitespace in function declarations.
Found them using::
find . -name '*.py' | while read i ; do grep 'def[^(]*( ' $i /dev/null ; done
find . -name '*.py' | while read i ; do grep ' ):' $i /dev/null ; done
(I was doing this all over my own code anyway, because I'd been using spaces in
all defs, so I thought I'd make a run on the Python code as well. If you need
to do such fixes in your own code, you can use xx-rename or parenregu.el within
emacs.)
........
r46693 | thomas.heller | 2006-06-06 17:34:18 +0200 (Tue, 06 Jun 2006) | 1 line
Specify argtypes for all test functions. Maybe that helps on strange ;-) architectures
........
r46694 | tim.peters | 2006-06-06 17:50:17 +0200 (Tue, 06 Jun 2006) | 5 lines
BSequence_set_range(): Rev 46688 ("Fix a bunch of
parameter strings") changed this function's signature
seemingly by mistake, which is causing buildbots to fail
test_bsddb3. Restored the pre-46688 signature.
........
r46695 | tim.peters | 2006-06-06 17:52:35 +0200 (Tue, 06 Jun 2006) | 4 lines
On python-dev Thomas Heller said these were committed
by mistake in rev 46693, so reverting this part of
rev 46693.
........
r46696 | andrew.kuchling | 2006-06-06 19:10:41 +0200 (Tue, 06 Jun 2006) | 1 line
Fix comment typo
........
r46697 | brett.cannon | 2006-06-06 20:08:16 +0200 (Tue, 06 Jun 2006) | 2 lines
Fix coding style guide bug.
........
r46698 | thomas.heller | 2006-06-06 20:50:46 +0200 (Tue, 06 Jun 2006) | 2 lines
Add a hack so that foreign functions returning float now do work on 64-bit
big endian platforms.
........
r46699 | thomas.heller | 2006-06-06 21:25:13 +0200 (Tue, 06 Jun 2006) | 3 lines
Use the same big-endian hack as in _ctypes/callproc.c for callback functions.
This fixes the callback function tests that return float.
........
r46700 | ronald.oussoren | 2006-06-06 21:50:24 +0200 (Tue, 06 Jun 2006) | 5 lines
* Ensure that "make altinstall" works when the tree was configured
with --enable-framework
* Also for --enable-framework: allow users to use --prefix to specify
the location of the compatibility symlinks (such as /usr/local/bin/python)
........
r46701 | ronald.oussoren | 2006-06-06 21:56:00 +0200 (Tue, 06 Jun 2006) | 3 lines
A quick hack to ensure the right key-bindings for IDLE on osx: install patched
configuration files during a framework install.
........
r46702 | tim.peters | 2006-06-07 03:04:59 +0200 (Wed, 07 Jun 2006) | 4 lines
dash_R_cleanup(): Clear filecmp._cache. This accounts for
different results across -R runs (at least on Windows) of
test_filecmp.
........
r46705 | tim.peters | 2006-06-07 08:57:51 +0200 (Wed, 07 Jun 2006) | 17 lines
SF patch 1501987: Remove randomness from test_exceptions,
from ?iga Seilnacht (sorry about the name, but Firefox
on my box can't display the first character of the name --
the SF "Unix name" is zseil).
This appears to cure the oddball intermittent leaks across
runs when running test_exceptions under -R. I'm not sure
why, but I'm too sleepy to care ;-)
The thrust of the SF patch was to remove randomness in the
pickle protocol used. I changed the patch to use
range(pickle.HIGHEST_PROTOCOL + 1), to try both pickle and
cPickle, and randomly mucked with other test lines to put
statements on their own lines.
Not a bugfix candidate (this is fiddling new-in-2.5 code).
........
r46706 | andrew.kuchling | 2006-06-07 15:55:33 +0200 (Wed, 07 Jun 2006) | 1 line
Add an SQLite introduction, taken from the 'What's New' text
........
r46708 | andrew.kuchling | 2006-06-07 19:02:52 +0200 (Wed, 07 Jun 2006) | 1 line
Mention other placeholders
........
r46709 | andrew.kuchling | 2006-06-07 19:03:46 +0200 (Wed, 07 Jun 2006) | 1 line
Add an item; also, escape %
........
r46710 | andrew.kuchling | 2006-06-07 19:04:01 +0200 (Wed, 07 Jun 2006) | 1 line
Mention other placeholders
........
r46716 | ronald.oussoren | 2006-06-07 20:57:44 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/Tools one level up
........
r46717 | ronald.oussoren | 2006-06-07 20:58:01 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/PythonLauncher one level up
........
r46718 | ronald.oussoren | 2006-06-07 20:58:42 +0200 (Wed, 07 Jun 2006) | 2 lines
mv Mac/OSX/BuildScript one level up
........
r46719 | ronald.oussoren | 2006-06-07 21:02:03 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/* one level up
........
r46720 | ronald.oussoren | 2006-06-07 21:06:01 +0200 (Wed, 07 Jun 2006) | 2 lines
And the last bit: move IDLE one level up and adjust makefiles
........
r46723 | ronald.oussoren | 2006-06-07 21:38:53 +0200 (Wed, 07 Jun 2006) | 4 lines
- Patch the correct version of python in the Info.plists at build time, instead
of relying on a maintainer to update them before releases.
- Remove the now empty Mac/OSX directory
........
r46727 | ronald.oussoren | 2006-06-07 22:18:44 +0200 (Wed, 07 Jun 2006) | 7 lines
* If BuildApplet.py is used as an applet it starts with a version of
sys.exutable that isn't usuable on an #!-line. That results in generated
applets that don't actually work. Work around this problem by resetting
sys.executable.
* argvemulator.py didn't work on intel macs. This patch fixes this
(bug #1491468)
........
r46728 | tim.peters | 2006-06-07 22:40:06 +0200 (Wed, 07 Jun 2006) | 2 lines
Whitespace normalization.
........
r46729 | tim.peters | 2006-06-07 22:40:54 +0200 (Wed, 07 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46730 | thomas.heller | 2006-06-07 22:43:06 +0200 (Wed, 07 Jun 2006) | 7 lines
Fix for foreign functions returning small structures on 64-bit big
endian machines. Should fix the remaininf failure in the PPC64
Debian buildbot.
Thanks to Matthias Klose for providing access to a machine to debug
and test this.
........
r46731 | brett.cannon | 2006-06-07 23:48:17 +0200 (Wed, 07 Jun 2006) | 2 lines
Clarify documentation for bf_getcharbuffer.
........
r46735 | neal.norwitz | 2006-06-08 07:12:45 +0200 (Thu, 08 Jun 2006) | 1 line
Fix a refleak in recvfrom_into
........
r46736 | gregory.p.smith | 2006-06-08 07:17:08 +0200 (Thu, 08 Jun 2006) | 9 lines
- bsddb: the bsddb.dbtables Modify method now raises the proper error and
aborts the db transaction safely when a modifier callback fails.
Fixes SF python patch/bug #1408584.
Also cleans up the bsddb.dbtables docstrings since thats the only
documentation that exists for that unadvertised module. (people
really should really just use sqlite3)
........
r46737 | gregory.p.smith | 2006-06-08 07:38:11 +0200 (Thu, 08 Jun 2006) | 4 lines
* Turn the deadlock situation described in SF bug #775414 into a
DBDeadLockError exception.
* add the test case for my previous dbtables commit.
........
r46738 | gregory.p.smith | 2006-06-08 07:39:54 +0200 (Thu, 08 Jun 2006) | 2 lines
pasted set_lk_detect line in wrong spot in previous commit. fixed. passes tests this time.
........
r46739 | armin.rigo | 2006-06-08 12:56:24 +0200 (Thu, 08 Jun 2006) | 6 lines
(arre, arigo) SF bug #1350060
Give a consistent behavior for comparison and hashing of method objects
(both user- and built-in methods). Now compares the 'self' recursively.
The hash was already asking for the hash of 'self'.
........
r46740 | andrew.kuchling | 2006-06-08 13:56:44 +0200 (Thu, 08 Jun 2006) | 1 line
Typo fix
........
r46741 | georg.brandl | 2006-06-08 14:45:01 +0200 (Thu, 08 Jun 2006) | 2 lines
Bug #1502750: Fix getargs "i" format to use LONG_MIN and LONG_MAX for bounds checking.
........
r46743 | georg.brandl | 2006-06-08 14:54:13 +0200 (Thu, 08 Jun 2006) | 2 lines
Bug #1502728: Correctly link against librt library on HP-UX.
........
r46745 | georg.brandl | 2006-06-08 14:55:47 +0200 (Thu, 08 Jun 2006) | 3 lines
Add news for recent bugfix.
........
r46746 | georg.brandl | 2006-06-08 15:31:07 +0200 (Thu, 08 Jun 2006) | 4 lines
Argh. "integer" is a very confusing word ;)
Actually, checking for INT_MAX and INT_MIN is correct since
the format code explicitly handles a C "int".
........
r46748 | nick.coghlan | 2006-06-08 15:54:49 +0200 (Thu, 08 Jun 2006) | 1 line
Add functools.update_wrapper() and functools.wraps() as described in PEP 356
........
r46751 | georg.brandl | 2006-06-08 16:50:21 +0200 (Thu, 08 Jun 2006) | 4 lines
Bug #1502805: don't alias file.__exit__ to file.close since the
latter can return something that's true.
........
r46752 | georg.brandl | 2006-06-08 16:50:53 +0200 (Thu, 08 Jun 2006) | 3 lines
Convert test_file to unittest.
........
2006-06-08 12:35:45 -03:00
|
|
|
var_invoke(EventFunc func, PyObject *selfptr, PyObject *args, int flags)
|
2002-12-12 13:07:58 -04:00
|
|
|
{
|
2003-03-30 04:44:58 -04:00
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
TkappObject *self = (TkappObject*)selfptr;
|
|
|
|
if (self->threaded && self->thread_id != Tcl_GetCurrentThread()) {
|
|
|
|
TkappObject *self = (TkappObject*)selfptr;
|
|
|
|
VarEvent *ev;
|
|
|
|
PyObject *res, *exc_type, *exc_val;
|
|
|
|
Tcl_Condition cond = NULL;
|
|
|
|
|
|
|
|
/* The current thread is not the interpreter thread. Marshal
|
|
|
|
the call to the interpreter thread, then wait for
|
|
|
|
completion. */
|
|
|
|
if (!WaitForMainloop(self))
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
ev = (VarEvent*)ckalloc(sizeof(VarEvent));
|
|
|
|
|
|
|
|
ev->self = selfptr;
|
|
|
|
ev->args = args;
|
|
|
|
ev->flags = flags;
|
|
|
|
ev->func = func;
|
|
|
|
ev->res = &res;
|
|
|
|
ev->exc_type = &exc_type;
|
|
|
|
ev->exc_val = &exc_val;
|
|
|
|
ev->cond = &cond;
|
|
|
|
ev->ev.proc = (Tcl_EventProc*)var_proc;
|
|
|
|
Tkapp_ThreadSend(self, (Tcl_Event*)ev, &cond, &var_mutex);
|
|
|
|
Tcl_ConditionFinalize(&cond);
|
|
|
|
if (!res) {
|
|
|
|
PyErr_SetObject(exc_type, exc_val);
|
|
|
|
Py_DECREF(exc_type);
|
|
|
|
Py_DECREF(exc_val);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
return res;
|
|
|
|
}
|
2003-03-30 04:44:58 -04:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
/* Tcl is not threaded, or this is the interpreter thread. */
|
|
|
|
return func(selfptr, args, flags);
|
2002-12-12 13:07:58 -04:00
|
|
|
}
|
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
SetVar(PyObject *self, PyObject *args, int flags)
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *name1, *name2;
|
|
|
|
PyObject *newValue;
|
|
|
|
PyObject *res = NULL;
|
|
|
|
Tcl_Obj *newval, *ok;
|
|
|
|
|
|
|
|
if (PyArg_ParseTuple(args, "O&O:setvar",
|
|
|
|
varname_converter, &name1, &newValue)) {
|
|
|
|
/* XXX Acquire tcl lock??? */
|
|
|
|
newval = AsObj(newValue);
|
|
|
|
if (newval == NULL)
|
|
|
|
return NULL;
|
|
|
|
ENTER_TCL
|
|
|
|
ok = Tcl_SetVar2Ex(Tkapp_Interp(self), name1, NULL,
|
|
|
|
newval, flags);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (!ok)
|
|
|
|
Tkinter_Error(self);
|
|
|
|
else {
|
|
|
|
res = Py_None;
|
|
|
|
Py_INCREF(res);
|
|
|
|
}
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
PyErr_Clear();
|
|
|
|
if (PyArg_ParseTuple(args, "ssO:setvar",
|
|
|
|
&name1, &name2, &newValue)) {
|
|
|
|
/* XXX must hold tcl lock already??? */
|
|
|
|
newval = AsObj(newValue);
|
|
|
|
ENTER_TCL
|
|
|
|
ok = Tcl_SetVar2Ex(Tkapp_Interp(self), name1, name2, newval, flags);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (!ok)
|
|
|
|
Tkinter_Error(self);
|
|
|
|
else {
|
|
|
|
res = Py_None;
|
|
|
|
Py_INCREF(res);
|
|
|
|
}
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_SetVar(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
return var_invoke(SetVar, self, args, TCL_LEAVE_ERR_MSG);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_GlobalSetVar(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
return var_invoke(SetVar, self, args, TCL_LEAVE_ERR_MSG | TCL_GLOBAL_ONLY);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
GetVar(PyObject *self, PyObject *args, int flags)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *name1, *name2=NULL;
|
|
|
|
PyObject *res = NULL;
|
|
|
|
Tcl_Obj *tres;
|
|
|
|
|
|
|
|
if (!PyArg_ParseTuple(args, "O&|s:getvar",
|
|
|
|
varname_converter, &name1, &name2))
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
ENTER_TCL
|
|
|
|
tres = Tcl_GetVar2Ex(Tkapp_Interp(self), name1, name2, flags);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (tres == NULL) {
|
2012-10-16 16:50:34 -03:00
|
|
|
PyErr_SetString(Tkinter_TclError,
|
|
|
|
Tcl_GetStringResult(Tkapp_Interp(self)));
|
2010-05-09 12:52:27 -03:00
|
|
|
} else {
|
|
|
|
if (((TkappObject*)self)->wantobjects) {
|
|
|
|
res = FromObj(self, tres);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
res = PyUnicode_FromString(Tcl_GetString(tres));
|
|
|
|
}
|
|
|
|
}
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_GetVar(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
return var_invoke(GetVar, self, args, TCL_LEAVE_ERR_MSG);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_GlobalGetVar(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
return var_invoke(GetVar, self, args, TCL_LEAVE_ERR_MSG | TCL_GLOBAL_ONLY);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
UnsetVar(PyObject *self, PyObject *args, int flags)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *name1, *name2=NULL;
|
|
|
|
int code;
|
|
|
|
PyObject *res = NULL;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "s|s:unsetvar", &name1, &name2))
|
|
|
|
return NULL;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_TCL
|
|
|
|
code = Tcl_UnsetVar2(Tkapp_Interp(self), name1, name2, flags);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (code == TCL_ERROR)
|
|
|
|
res = Tkinter_Error(self);
|
|
|
|
else {
|
|
|
|
Py_INCREF(Py_None);
|
|
|
|
res = Py_None;
|
|
|
|
}
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_UnsetVar(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
return var_invoke(UnsetVar, self, args, TCL_LEAVE_ERR_MSG);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_GlobalUnsetVar(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2012-10-16 16:50:34 -03:00
|
|
|
return var_invoke(UnsetVar, self, args,
|
|
|
|
TCL_LEAVE_ERR_MSG | TCL_GLOBAL_ONLY);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/** Tcl to Python **/
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_GetInt(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *s;
|
|
|
|
int v;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (PyTuple_Size(args) == 1) {
|
|
|
|
PyObject* o = PyTuple_GetItem(args, 0);
|
|
|
|
if (PyLong_Check(o)) {
|
|
|
|
Py_INCREF(o);
|
|
|
|
return o;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (!PyArg_ParseTuple(args, "s:getint", &s))
|
|
|
|
return NULL;
|
|
|
|
if (Tcl_GetInt(Tkapp_Interp(self), s, &v) == TCL_ERROR)
|
|
|
|
return Tkinter_Error(self);
|
|
|
|
return Py_BuildValue("i", v);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_GetDouble(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *s;
|
|
|
|
double v;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (PyTuple_Size(args) == 1) {
|
|
|
|
PyObject *o = PyTuple_GetItem(args, 0);
|
|
|
|
if (PyFloat_Check(o)) {
|
|
|
|
Py_INCREF(o);
|
|
|
|
return o;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (!PyArg_ParseTuple(args, "s:getdouble", &s))
|
|
|
|
return NULL;
|
|
|
|
if (Tcl_GetDouble(Tkapp_Interp(self), s, &v) == TCL_ERROR)
|
|
|
|
return Tkinter_Error(self);
|
|
|
|
return Py_BuildValue("d", v);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_GetBoolean(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *s;
|
|
|
|
int v;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (PyTuple_Size(args) == 1) {
|
|
|
|
PyObject *o = PyTuple_GetItem(args, 0);
|
|
|
|
if (PyLong_Check(o)) {
|
|
|
|
Py_INCREF(o);
|
|
|
|
return o;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (!PyArg_ParseTuple(args, "s:getboolean", &s))
|
|
|
|
return NULL;
|
|
|
|
if (Tcl_GetBoolean(Tkapp_Interp(self), s, &v) == TCL_ERROR)
|
|
|
|
return Tkinter_Error(self);
|
|
|
|
return PyBool_FromLong(v);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_ExprString(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *s;
|
|
|
|
PyObject *res = NULL;
|
|
|
|
int retval;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "s:exprstring", &s))
|
|
|
|
return NULL;
|
2007-11-21 16:09:18 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
CHECK_TCL_APPARTMENT;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_TCL
|
|
|
|
retval = Tcl_ExprString(Tkapp_Interp(self), s);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (retval == TCL_ERROR)
|
|
|
|
res = Tkinter_Error(self);
|
|
|
|
else
|
|
|
|
res = Py_BuildValue("s", Tkapp_Result(self));
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_ExprLong(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *s;
|
|
|
|
PyObject *res = NULL;
|
|
|
|
int retval;
|
|
|
|
long v;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "s:exprlong", &s))
|
|
|
|
return NULL;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
CHECK_TCL_APPARTMENT;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_TCL
|
|
|
|
retval = Tcl_ExprLong(Tkapp_Interp(self), s, &v);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (retval == TCL_ERROR)
|
|
|
|
res = Tkinter_Error(self);
|
|
|
|
else
|
|
|
|
res = Py_BuildValue("l", v);
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_ExprDouble(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *s;
|
|
|
|
PyObject *res = NULL;
|
|
|
|
double v;
|
|
|
|
int retval;
|
|
|
|
|
|
|
|
if (!PyArg_ParseTuple(args, "s:exprdouble", &s))
|
|
|
|
return NULL;
|
|
|
|
CHECK_TCL_APPARTMENT;
|
|
|
|
PyFPE_START_PROTECT("Tkapp_ExprDouble", return 0)
|
|
|
|
ENTER_TCL
|
|
|
|
retval = Tcl_ExprDouble(Tkapp_Interp(self), s, &v);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
PyFPE_END_PROTECT(retval)
|
|
|
|
if (retval == TCL_ERROR)
|
|
|
|
res = Tkinter_Error(self);
|
|
|
|
else
|
|
|
|
res = Py_BuildValue("d", v);
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_ExprBoolean(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *s;
|
|
|
|
PyObject *res = NULL;
|
|
|
|
int retval;
|
|
|
|
int v;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "s:exprboolean", &s))
|
|
|
|
return NULL;
|
|
|
|
CHECK_TCL_APPARTMENT;
|
|
|
|
ENTER_TCL
|
|
|
|
retval = Tcl_ExprBoolean(Tkapp_Interp(self), s, &v);
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (retval == TCL_ERROR)
|
|
|
|
res = Tkinter_Error(self);
|
|
|
|
else
|
|
|
|
res = Py_BuildValue("i", v);
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
return res;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_SplitList(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *list;
|
|
|
|
int argc;
|
|
|
|
char **argv;
|
2013-08-22 11:40:31 -03:00
|
|
|
PyObject *arg, *v;
|
2010-05-09 12:52:27 -03:00
|
|
|
int i;
|
|
|
|
|
2013-08-22 11:40:31 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "O:splitlist", &arg))
|
|
|
|
return NULL;
|
|
|
|
if (PyTclObject_Check(arg)) {
|
|
|
|
int objc;
|
|
|
|
Tcl_Obj **objv;
|
|
|
|
if (Tcl_ListObjGetElements(Tkapp_Interp(self),
|
|
|
|
((PyTclObject*)arg)->value,
|
|
|
|
&objc, &objv) == TCL_ERROR) {
|
|
|
|
return Tkinter_Error(self);
|
|
|
|
}
|
|
|
|
if (!(v = PyTuple_New(objc)))
|
|
|
|
return NULL;
|
|
|
|
for (i = 0; i < objc; i++) {
|
|
|
|
PyObject *s = FromObj(self, objv[i]);
|
|
|
|
if (!s || PyTuple_SetItem(v, i, s)) {
|
|
|
|
Py_DECREF(v);
|
|
|
|
return NULL;
|
|
|
|
}
|
2010-05-09 12:52:27 -03:00
|
|
|
}
|
2013-08-22 11:40:31 -03:00
|
|
|
return v;
|
2010-05-09 12:52:27 -03:00
|
|
|
}
|
2013-08-22 11:40:31 -03:00
|
|
|
if (PyTuple_Check(arg)) {
|
|
|
|
Py_INCREF(arg);
|
|
|
|
return arg;
|
|
|
|
}
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "et:splitlist", "utf-8", &list))
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
if (Tcl_SplitList(Tkapp_Interp(self), list,
|
|
|
|
&argc, &argv) == TCL_ERROR) {
|
|
|
|
PyMem_Free(list);
|
|
|
|
return Tkinter_Error(self);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (!(v = PyTuple_New(argc)))
|
|
|
|
goto finally;
|
|
|
|
|
|
|
|
for (i = 0; i < argc; i++) {
|
|
|
|
PyObject *s = PyUnicode_FromString(argv[i]);
|
|
|
|
if (!s || PyTuple_SetItem(v, i, s)) {
|
|
|
|
Py_DECREF(v);
|
|
|
|
v = NULL;
|
|
|
|
goto finally;
|
|
|
|
}
|
|
|
|
}
|
1994-06-20 04:49:28 -03:00
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
finally:
|
2010-05-09 12:52:27 -03:00
|
|
|
ckfree(FREECAST argv);
|
|
|
|
PyMem_Free(list);
|
|
|
|
return v;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_Split(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2013-08-22 11:40:31 -03:00
|
|
|
PyObject *arg, *v;
|
2010-05-09 12:52:27 -03:00
|
|
|
char *list;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2013-08-22 11:40:31 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "O:split", &arg))
|
|
|
|
return NULL;
|
|
|
|
if (PyTclObject_Check(arg)) {
|
|
|
|
Tcl_Obj *value = ((PyTclObject*)arg)->value;
|
|
|
|
int objc;
|
|
|
|
Tcl_Obj **objv;
|
|
|
|
int i;
|
|
|
|
if (Tcl_ListObjGetElements(Tkapp_Interp(self), value,
|
|
|
|
&objc, &objv) == TCL_ERROR) {
|
|
|
|
return FromObj(self, value);
|
2010-05-09 12:52:27 -03:00
|
|
|
}
|
2013-08-22 11:40:31 -03:00
|
|
|
if (objc == 0)
|
|
|
|
return PyUnicode_FromString("");
|
|
|
|
if (objc == 1)
|
|
|
|
return FromObj(self, objv[0]);
|
|
|
|
if (!(v = PyTuple_New(objc)))
|
|
|
|
return NULL;
|
|
|
|
for (i = 0; i < objc; i++) {
|
|
|
|
PyObject *s = FromObj(self, objv[i]);
|
|
|
|
if (!s || PyTuple_SetItem(v, i, s)) {
|
|
|
|
Py_DECREF(v);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return v;
|
2010-05-09 12:52:27 -03:00
|
|
|
}
|
2013-08-22 11:40:31 -03:00
|
|
|
if (PyTuple_Check(arg))
|
|
|
|
return SplitObj(arg);
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "et:split", "utf-8", &list))
|
|
|
|
return NULL;
|
|
|
|
v = Split(list);
|
|
|
|
PyMem_Free(list);
|
|
|
|
return v;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/** Tcl Command **/
|
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
/* Client data struct */
|
|
|
|
typedef struct {
|
2010-05-09 12:52:27 -03:00
|
|
|
PyObject *self;
|
|
|
|
PyObject *func;
|
1998-05-28 20:06:38 -03:00
|
|
|
} PythonCmd_ClientData;
|
|
|
|
|
|
|
|
static int
|
2000-07-08 01:04:38 -03:00
|
|
|
PythonCmd_Error(Tcl_Interp *interp)
|
1998-05-28 20:06:38 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
errorInCmd = 1;
|
|
|
|
PyErr_Fetch(&excInCmd, &valInCmd, &trbInCmd);
|
|
|
|
LEAVE_PYTHON
|
|
|
|
return TCL_ERROR;
|
1998-05-28 20:06:38 -03:00
|
|
|
}
|
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/* This is the Tcl command that acts as a wrapper for Python
|
1997-01-15 20:15:11 -04:00
|
|
|
* function or method.
|
|
|
|
*/
|
1994-06-20 04:49:28 -03:00
|
|
|
static int
|
2000-07-08 01:04:38 -03:00
|
|
|
PythonCmd(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[])
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
PythonCmd_ClientData *data = (PythonCmd_ClientData *)clientData;
|
2011-02-22 16:15:44 -04:00
|
|
|
PyObject *func, *arg, *res;
|
2010-05-09 12:52:27 -03:00
|
|
|
int i, rv;
|
|
|
|
Tcl_Obj *obj_res;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_PYTHON
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
/* TBD: no error checking here since we know, via the
|
|
|
|
* Tkapp_CreateCommand() that the client data is a two-tuple
|
|
|
|
*/
|
|
|
|
func = data->func;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
/* Create argument list (argv1, ..., argvN) */
|
|
|
|
if (!(arg = PyTuple_New(argc - 1)))
|
|
|
|
return PythonCmd_Error(interp);
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
for (i = 0; i < (argc - 1); i++) {
|
|
|
|
PyObject *s = PyUnicode_FromString(argv[i + 1]);
|
2011-05-11 13:24:17 -03:00
|
|
|
if (!s) {
|
|
|
|
/* Is Tk leaking 0xC080 in %A - a "modified" utf-8 null? */
|
|
|
|
if (PyErr_ExceptionMatches(PyExc_UnicodeDecodeError) &&
|
|
|
|
!strcmp(argv[i + 1], "\xC0\x80")) {
|
|
|
|
PyErr_Clear();
|
|
|
|
/* Convert to "strict" utf-8 null */
|
|
|
|
s = PyUnicode_FromString("\0");
|
|
|
|
} else {
|
|
|
|
Py_DECREF(arg);
|
|
|
|
return PythonCmd_Error(interp);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (PyTuple_SetItem(arg, i, s)) {
|
2010-05-09 12:52:27 -03:00
|
|
|
Py_DECREF(arg);
|
|
|
|
return PythonCmd_Error(interp);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
res = PyEval_CallObject(func, arg);
|
|
|
|
Py_DECREF(arg);
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (res == NULL)
|
|
|
|
return PythonCmd_Error(interp);
|
1994-07-07 06:25:12 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
obj_res = AsObj(res);
|
|
|
|
if (obj_res == NULL) {
|
|
|
|
Py_DECREF(res);
|
|
|
|
return PythonCmd_Error(interp);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
Tcl_SetObjResult(interp, obj_res);
|
|
|
|
rv = TCL_OK;
|
|
|
|
}
|
2000-10-06 13:58:26 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
Py_DECREF(res);
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
LEAVE_PYTHON
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
return rv;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
2000-07-08 01:04:38 -03:00
|
|
|
PythonCmdDelete(ClientData clientData)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
PythonCmd_ClientData *data = (PythonCmd_ClientData *)clientData;
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_PYTHON
|
|
|
|
Py_XDECREF(data->self);
|
|
|
|
Py_XDECREF(data->func);
|
|
|
|
PyMem_DEL(data);
|
|
|
|
LEAVE_PYTHON
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
2002-12-12 13:07:58 -04:00
|
|
|
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#ifdef WITH_THREAD
|
2002-12-12 13:07:58 -04:00
|
|
|
TCL_DECLARE_MUTEX(command_mutex)
|
|
|
|
|
|
|
|
typedef struct CommandEvent{
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_Event ev;
|
|
|
|
Tcl_Interp* interp;
|
|
|
|
char *name;
|
|
|
|
int create;
|
|
|
|
int *status;
|
|
|
|
ClientData *data;
|
|
|
|
Tcl_Condition *done;
|
2002-12-12 13:07:58 -04:00
|
|
|
} CommandEvent;
|
|
|
|
|
|
|
|
static int
|
|
|
|
Tkapp_CommandProc(CommandEvent *ev, int flags)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
if (ev->create)
|
|
|
|
*ev->status = Tcl_CreateCommand(
|
|
|
|
ev->interp, ev->name, PythonCmd,
|
|
|
|
ev->data, PythonCmdDelete) == NULL;
|
|
|
|
else
|
|
|
|
*ev->status = Tcl_DeleteCommand(ev->interp, ev->name);
|
|
|
|
Tcl_MutexLock(&command_mutex);
|
|
|
|
Tcl_ConditionNotify(ev->done);
|
|
|
|
Tcl_MutexUnlock(&command_mutex);
|
|
|
|
return 1;
|
2002-12-12 13:07:58 -04:00
|
|
|
}
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#endif
|
2002-12-12 13:07:58 -04:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
Merge the rest of the trunk.
Merged revisions 46490-46494,46496,46498,46500,46506,46521,46538,46558,46563-46567,46570-46571,46583,46593,46595-46598,46604,46606,46609-46753 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r46610 | martin.v.loewis | 2006-06-03 09:42:26 +0200 (Sat, 03 Jun 2006) | 2 lines
Updated version (win32-icons2.zip) from #1490384.
........
r46612 | andrew.kuchling | 2006-06-03 20:09:41 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1472084] Fix description of do_tag
........
r46614 | andrew.kuchling | 2006-06-03 20:33:35 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1475554] Strengthen text to say 'must' instead of 'should'
........
r46616 | andrew.kuchling | 2006-06-03 20:41:28 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1441864] Clarify description of 'data' argument
........
r46617 | andrew.kuchling | 2006-06-03 20:43:24 +0200 (Sat, 03 Jun 2006) | 1 line
Minor rewording
........
r46619 | andrew.kuchling | 2006-06-03 21:02:35 +0200 (Sat, 03 Jun 2006) | 9 lines
[Bug #1497414] _self is a reserved word in the WATCOM 10.6 C compiler.
Fix by renaming the variable.
In a different module, Neal fixed it by renaming _self to self. There's
already a variable named 'self' here, so I used selfptr.
(I'm committing this on a Mac without Tk, but it's a simple search-and-replace.
<crosses fingers>, so I'll watch the buildbots and see what happens.)
........
r46621 | fredrik.lundh | 2006-06-03 23:56:05 +0200 (Sat, 03 Jun 2006) | 5 lines
"_self" is a said to be a reserved word in Watcom C 10.6. I'm
not sure that's really standard compliant behaviour, but I guess
we have to fix that anyway...
........
r46622 | andrew.kuchling | 2006-06-04 00:44:42 +0200 (Sun, 04 Jun 2006) | 1 line
Update readme
........
r46623 | andrew.kuchling | 2006-06-04 00:59:23 +0200 (Sun, 04 Jun 2006) | 1 line
Drop 0 parameter
........
r46624 | andrew.kuchling | 2006-06-04 00:59:59 +0200 (Sun, 04 Jun 2006) | 1 line
Some code tidying; use curses.wrapper
........
r46625 | andrew.kuchling | 2006-06-04 01:02:15 +0200 (Sun, 04 Jun 2006) | 1 line
Use True; value returned from main is unused
........
r46626 | andrew.kuchling | 2006-06-04 01:07:21 +0200 (Sun, 04 Jun 2006) | 1 line
Use true division, and the True value
........
r46627 | andrew.kuchling | 2006-06-04 01:09:58 +0200 (Sun, 04 Jun 2006) | 1 line
Docstring fix; use True
........
r46628 | andrew.kuchling | 2006-06-04 01:15:56 +0200 (Sun, 04 Jun 2006) | 1 line
Put code in a main() function; loosen up the spacing to match current code style
........
r46629 | andrew.kuchling | 2006-06-04 01:39:07 +0200 (Sun, 04 Jun 2006) | 1 line
Use functions; modernize code
........
r46630 | andrew.kuchling | 2006-06-04 01:43:22 +0200 (Sun, 04 Jun 2006) | 1 line
This demo requires Medusa (not just asyncore); remove it
........
r46631 | andrew.kuchling | 2006-06-04 01:46:36 +0200 (Sun, 04 Jun 2006) | 2 lines
Remove xmlrpc demo -- it duplicates the SimpleXMLRPCServer module.
........
r46632 | andrew.kuchling | 2006-06-04 01:47:22 +0200 (Sun, 04 Jun 2006) | 1 line
Remove xmlrpc/ directory
........
r46633 | andrew.kuchling | 2006-06-04 01:51:21 +0200 (Sun, 04 Jun 2006) | 1 line
Remove dangling reference
........
r46634 | andrew.kuchling | 2006-06-04 01:59:36 +0200 (Sun, 04 Jun 2006) | 1 line
Add more whitespace; use a better socket name
........
r46635 | tim.peters | 2006-06-04 03:22:53 +0200 (Sun, 04 Jun 2006) | 2 lines
Whitespace normalization.
........
r46637 | tim.peters | 2006-06-04 05:26:02 +0200 (Sun, 04 Jun 2006) | 16 lines
In a PYMALLOC_DEBUG build obmalloc adds extra debugging info
to each allocated block. This was using 4 bytes for each such
piece of info regardless of platform. This didn't really matter
before (proof: no bug reports, and the debug-build obmalloc would
have assert-failed if it was ever asked for a chunk of memory
>= 2**32 bytes), since container indices were plain ints. But after
the Py_ssize_t changes, it's at least theoretically possible to
allocate a list or string whose guts exceed 2**32 bytes, and the
PYMALLOC_DEBUG routines would fail then (having only 4 bytes
to record the originally requested size).
Now we use sizeof(size_t) bytes for each of a PYMALLOC_DEBUG
build's extra debugging fields. This won't make any difference
on 32-bit boxes, but will add 16 bytes to each allocation in
a debug build on a 64-bit box.
........
r46638 | tim.peters | 2006-06-04 05:38:04 +0200 (Sun, 04 Jun 2006) | 4 lines
_PyObject_DebugMalloc(): The return value should add
2*sizeof(size_t) now, not 8. This probably accounts for
current disasters on the 64-bit buildbot slaves.
........
r46639 | neal.norwitz | 2006-06-04 08:19:31 +0200 (Sun, 04 Jun 2006) | 1 line
SF #1499797, Fix for memory leak in WindowsError_str
........
r46640 | andrew.macintyre | 2006-06-04 14:31:09 +0200 (Sun, 04 Jun 2006) | 2 lines
Patch #1454481: Make thread stack size runtime tunable.
........
r46641 | andrew.macintyre | 2006-06-04 14:59:59 +0200 (Sun, 04 Jun 2006) | 2 lines
clean up function declarations to conform to PEP-7 style.
........
r46642 | martin.blais | 2006-06-04 15:49:49 +0200 (Sun, 04 Jun 2006) | 15 lines
Fixes in struct and socket from merge reviews.
- Following Guido's comments, renamed
* pack_to -> pack_into
* recv_buf -> recv_into
* recvfrom_buf -> recvfrom_into
- Made fixes to _struct.c according to Neal Norwitz comments on the checkins
list.
- Converted some ints into the appropriate -- I hope -- ssize_t and size_t.
........
r46643 | ronald.oussoren | 2006-06-04 16:05:28 +0200 (Sun, 04 Jun 2006) | 3 lines
"Import" LDFLAGS in Mac/OSX/Makefile.in to ensure pythonw gets build with
the right compiler flags.
........
r46644 | ronald.oussoren | 2006-06-04 16:24:59 +0200 (Sun, 04 Jun 2006) | 2 lines
Drop Mac wrappers for the WASTE library.
........
r46645 | tim.peters | 2006-06-04 17:49:07 +0200 (Sun, 04 Jun 2006) | 3 lines
s_methods[]: Stop compiler warnings by casting
s_unpack_from to PyCFunction.
........
r46646 | george.yoshida | 2006-06-04 19:04:12 +0200 (Sun, 04 Jun 2006) | 2 lines
Remove a redundant word
........
r46647 | george.yoshida | 2006-06-04 19:17:25 +0200 (Sun, 04 Jun 2006) | 2 lines
Markup fix
........
r46648 | martin.v.loewis | 2006-06-04 21:36:28 +0200 (Sun, 04 Jun 2006) | 2 lines
Patch #1359618: Speed-up charmap encoder.
........
r46649 | georg.brandl | 2006-06-04 23:46:16 +0200 (Sun, 04 Jun 2006) | 3 lines
Repair refleaks in unicodeobject.
........
r46650 | georg.brandl | 2006-06-04 23:56:52 +0200 (Sun, 04 Jun 2006) | 4 lines
Patch #1346214: correctly optimize away "if 0"-style stmts
(thanks to Neal for review)
........
r46651 | georg.brandl | 2006-06-05 00:15:37 +0200 (Mon, 05 Jun 2006) | 2 lines
Bug #1500293: fix memory leaks in _subprocess module.
........
r46654 | tim.peters | 2006-06-05 01:43:53 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46655 | tim.peters | 2006-06-05 01:52:47 +0200 (Mon, 05 Jun 2006) | 16 lines
Revert revisions:
46640 Patch #1454481: Make thread stack size runtime tunable.
46647 Markup fix
The first is causing many buildbots to fail test runs, and there
are multiple causes with seemingly no immediate prospects for
repairing them. See python-dev discussion.
Note that a branch can (and should) be created for resolving these
problems, like
svn copy svn+ssh://svn.python.org/python/trunk -r46640 svn+ssh://svn.python.org/python/branches/NEW_BRANCH
followed by merging rev 46647 to the new branch.
........
r46656 | andrew.kuchling | 2006-06-05 02:08:09 +0200 (Mon, 05 Jun 2006) | 1 line
Mention second encoding speedup
........
r46657 | gregory.p.smith | 2006-06-05 02:31:01 +0200 (Mon, 05 Jun 2006) | 7 lines
bugfix: when log_archive was called with the DB_ARCH_REMOVE flag present
in BerkeleyDB >= 4.2 it tried to construct a list out of an uninitialized
char **log_list.
feature: export the DB_ARCH_REMOVE flag by name in the module on BerkeleyDB >= 4.2.
........
r46658 | gregory.p.smith | 2006-06-05 02:33:35 +0200 (Mon, 05 Jun 2006) | 5 lines
fix a bug in the previous commit. don't leak empty list on error return and
fix the additional rare (out of memory only) bug that it was supposed to fix
of not freeing log_list when the python allocator failed.
........
r46660 | tim.peters | 2006-06-05 02:55:26 +0200 (Mon, 05 Jun 2006) | 9 lines
"Flat is better than nested."
Move the long-winded, multiply-nested -R support out
of runtest() and into some module-level helper functions.
This makes runtest() and the -R code easier to follow.
That in turn allowed seeing some opportunities for code
simplification, and made it obvious that reglog.txt
never got closed.
........
r46661 | hyeshik.chang | 2006-06-05 02:59:54 +0200 (Mon, 05 Jun 2006) | 3 lines
Fix a potentially invalid memory access of CJKCodecs' shift-jis
decoder. (found by Neal Norwitz)
........
r46663 | gregory.p.smith | 2006-06-05 03:39:52 +0200 (Mon, 05 Jun 2006) | 3 lines
* support DBEnv.log_stat() method on BerkeleyDB >= 4.0 [patch #1494885]
........
r46664 | tim.peters | 2006-06-05 03:43:03 +0200 (Mon, 05 Jun 2006) | 3 lines
Remove doctest.testmod's deprecated (in 2.4) `isprivate`
argument. A lot of hair went into supporting that!
........
r46665 | tim.peters | 2006-06-05 03:47:24 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46666 | tim.peters | 2006-06-05 03:48:21 +0200 (Mon, 05 Jun 2006) | 2 lines
Make doctest news more accurate.
........
r46667 | gregory.p.smith | 2006-06-05 03:56:15 +0200 (Mon, 05 Jun 2006) | 3 lines
* support DBEnv.lsn_reset() method on BerkeleyDB >= 4.4 [patch #1494902]
........
r46668 | gregory.p.smith | 2006-06-05 04:02:25 +0200 (Mon, 05 Jun 2006) | 3 lines
mention the just committed bsddb changes
........
r46671 | gregory.p.smith | 2006-06-05 19:38:04 +0200 (Mon, 05 Jun 2006) | 3 lines
* add support for DBSequence objects [patch #1466734]
........
r46672 | gregory.p.smith | 2006-06-05 20:20:07 +0200 (Mon, 05 Jun 2006) | 3 lines
forgot to add this file in previous commit
........
r46673 | tim.peters | 2006-06-05 20:36:12 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46674 | tim.peters | 2006-06-05 20:36:54 +0200 (Mon, 05 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46675 | gregory.p.smith | 2006-06-05 20:48:21 +0200 (Mon, 05 Jun 2006) | 4 lines
* fix DBCursor.pget() bug with keyword argument names when no data= is
supplied [SF pybsddb bug #1477863]
........
r46676 | andrew.kuchling | 2006-06-05 21:05:32 +0200 (Mon, 05 Jun 2006) | 1 line
Remove use of Trove name, which isn't very helpful to users
........
r46677 | andrew.kuchling | 2006-06-05 21:08:25 +0200 (Mon, 05 Jun 2006) | 1 line
[Bug #1470026] Include link to list of classifiers
........
r46679 | tim.peters | 2006-06-05 22:48:49 +0200 (Mon, 05 Jun 2006) | 10 lines
Access _struct attributes directly instead of mucking with getattr.
string_reverse(): Simplify.
assertRaises(): Raise TestFailed on failure.
test_unpack_from(), test_pack_into(), test_pack_into_fn(): never
use `assert` to test for an expected result (it doesn't test anything
when Python is run with -O).
........
r46680 | tim.peters | 2006-06-05 22:49:27 +0200 (Mon, 05 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46681 | gregory.p.smith | 2006-06-06 01:38:06 +0200 (Tue, 06 Jun 2006) | 3 lines
add depends = ['md5.h'] to the _md5 module extension for correctness sake.
........
r46682 | brett.cannon | 2006-06-06 01:51:55 +0200 (Tue, 06 Jun 2006) | 4 lines
Add 3 more bytes to a buffer to cover constants in string and null byte on top of 10 possible digits for an int.
Closes bug #1501223.
........
r46684 | gregory.p.smith | 2006-06-06 01:59:37 +0200 (Tue, 06 Jun 2006) | 5 lines
- bsddb: the __len__ method of a DB object has been fixed to return correct
results. It could previously incorrectly return 0 in some cases.
Fixes SF bug 1493322 (pybsddb bug 1184012).
........
r46686 | tim.peters | 2006-06-06 02:25:07 +0200 (Tue, 06 Jun 2006) | 7 lines
_PySys_Init(): It's rarely a good idea to size a buffer to the
exact maximum size someone guesses is needed. In this case, if
we're really worried about extreme integers, then "cp%d" can
actually need 14 bytes (2 for "cp" + 1 for \0 at the end +
11 for -(2**31-1)). So reserve 128 bytes instead -- nothing is
actually saved by making a stack-local buffer tiny.
........
r46687 | neal.norwitz | 2006-06-06 09:22:08 +0200 (Tue, 06 Jun 2006) | 1 line
Remove unused variable (and stop compiler warning)
........
r46688 | neal.norwitz | 2006-06-06 09:23:01 +0200 (Tue, 06 Jun 2006) | 1 line
Fix a bunch of parameter strings
........
r46689 | thomas.heller | 2006-06-06 13:34:33 +0200 (Tue, 06 Jun 2006) | 6 lines
Convert CFieldObject tp_members to tp_getset, since there is no
structmember typecode for Py_ssize_t fields. This should fix some of
the errors on the PPC64 debian machine (64-bit, big endian).
Assigning to readonly fields now raises AttributeError instead of
TypeError, so the testcase has to be changed as well.
........
r46690 | thomas.heller | 2006-06-06 13:54:32 +0200 (Tue, 06 Jun 2006) | 1 line
Damn - the sentinel was missing. And fix another silly mistake.
........
r46691 | martin.blais | 2006-06-06 14:46:55 +0200 (Tue, 06 Jun 2006) | 13 lines
Normalized a few cases of whitespace in function declarations.
Found them using::
find . -name '*.py' | while read i ; do grep 'def[^(]*( ' $i /dev/null ; done
find . -name '*.py' | while read i ; do grep ' ):' $i /dev/null ; done
(I was doing this all over my own code anyway, because I'd been using spaces in
all defs, so I thought I'd make a run on the Python code as well. If you need
to do such fixes in your own code, you can use xx-rename or parenregu.el within
emacs.)
........
r46693 | thomas.heller | 2006-06-06 17:34:18 +0200 (Tue, 06 Jun 2006) | 1 line
Specify argtypes for all test functions. Maybe that helps on strange ;-) architectures
........
r46694 | tim.peters | 2006-06-06 17:50:17 +0200 (Tue, 06 Jun 2006) | 5 lines
BSequence_set_range(): Rev 46688 ("Fix a bunch of
parameter strings") changed this function's signature
seemingly by mistake, which is causing buildbots to fail
test_bsddb3. Restored the pre-46688 signature.
........
r46695 | tim.peters | 2006-06-06 17:52:35 +0200 (Tue, 06 Jun 2006) | 4 lines
On python-dev Thomas Heller said these were committed
by mistake in rev 46693, so reverting this part of
rev 46693.
........
r46696 | andrew.kuchling | 2006-06-06 19:10:41 +0200 (Tue, 06 Jun 2006) | 1 line
Fix comment typo
........
r46697 | brett.cannon | 2006-06-06 20:08:16 +0200 (Tue, 06 Jun 2006) | 2 lines
Fix coding style guide bug.
........
r46698 | thomas.heller | 2006-06-06 20:50:46 +0200 (Tue, 06 Jun 2006) | 2 lines
Add a hack so that foreign functions returning float now do work on 64-bit
big endian platforms.
........
r46699 | thomas.heller | 2006-06-06 21:25:13 +0200 (Tue, 06 Jun 2006) | 3 lines
Use the same big-endian hack as in _ctypes/callproc.c for callback functions.
This fixes the callback function tests that return float.
........
r46700 | ronald.oussoren | 2006-06-06 21:50:24 +0200 (Tue, 06 Jun 2006) | 5 lines
* Ensure that "make altinstall" works when the tree was configured
with --enable-framework
* Also for --enable-framework: allow users to use --prefix to specify
the location of the compatibility symlinks (such as /usr/local/bin/python)
........
r46701 | ronald.oussoren | 2006-06-06 21:56:00 +0200 (Tue, 06 Jun 2006) | 3 lines
A quick hack to ensure the right key-bindings for IDLE on osx: install patched
configuration files during a framework install.
........
r46702 | tim.peters | 2006-06-07 03:04:59 +0200 (Wed, 07 Jun 2006) | 4 lines
dash_R_cleanup(): Clear filecmp._cache. This accounts for
different results across -R runs (at least on Windows) of
test_filecmp.
........
r46705 | tim.peters | 2006-06-07 08:57:51 +0200 (Wed, 07 Jun 2006) | 17 lines
SF patch 1501987: Remove randomness from test_exceptions,
from ?iga Seilnacht (sorry about the name, but Firefox
on my box can't display the first character of the name --
the SF "Unix name" is zseil).
This appears to cure the oddball intermittent leaks across
runs when running test_exceptions under -R. I'm not sure
why, but I'm too sleepy to care ;-)
The thrust of the SF patch was to remove randomness in the
pickle protocol used. I changed the patch to use
range(pickle.HIGHEST_PROTOCOL + 1), to try both pickle and
cPickle, and randomly mucked with other test lines to put
statements on their own lines.
Not a bugfix candidate (this is fiddling new-in-2.5 code).
........
r46706 | andrew.kuchling | 2006-06-07 15:55:33 +0200 (Wed, 07 Jun 2006) | 1 line
Add an SQLite introduction, taken from the 'What's New' text
........
r46708 | andrew.kuchling | 2006-06-07 19:02:52 +0200 (Wed, 07 Jun 2006) | 1 line
Mention other placeholders
........
r46709 | andrew.kuchling | 2006-06-07 19:03:46 +0200 (Wed, 07 Jun 2006) | 1 line
Add an item; also, escape %
........
r46710 | andrew.kuchling | 2006-06-07 19:04:01 +0200 (Wed, 07 Jun 2006) | 1 line
Mention other placeholders
........
r46716 | ronald.oussoren | 2006-06-07 20:57:44 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/Tools one level up
........
r46717 | ronald.oussoren | 2006-06-07 20:58:01 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/PythonLauncher one level up
........
r46718 | ronald.oussoren | 2006-06-07 20:58:42 +0200 (Wed, 07 Jun 2006) | 2 lines
mv Mac/OSX/BuildScript one level up
........
r46719 | ronald.oussoren | 2006-06-07 21:02:03 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/* one level up
........
r46720 | ronald.oussoren | 2006-06-07 21:06:01 +0200 (Wed, 07 Jun 2006) | 2 lines
And the last bit: move IDLE one level up and adjust makefiles
........
r46723 | ronald.oussoren | 2006-06-07 21:38:53 +0200 (Wed, 07 Jun 2006) | 4 lines
- Patch the correct version of python in the Info.plists at build time, instead
of relying on a maintainer to update them before releases.
- Remove the now empty Mac/OSX directory
........
r46727 | ronald.oussoren | 2006-06-07 22:18:44 +0200 (Wed, 07 Jun 2006) | 7 lines
* If BuildApplet.py is used as an applet it starts with a version of
sys.exutable that isn't usuable on an #!-line. That results in generated
applets that don't actually work. Work around this problem by resetting
sys.executable.
* argvemulator.py didn't work on intel macs. This patch fixes this
(bug #1491468)
........
r46728 | tim.peters | 2006-06-07 22:40:06 +0200 (Wed, 07 Jun 2006) | 2 lines
Whitespace normalization.
........
r46729 | tim.peters | 2006-06-07 22:40:54 +0200 (Wed, 07 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46730 | thomas.heller | 2006-06-07 22:43:06 +0200 (Wed, 07 Jun 2006) | 7 lines
Fix for foreign functions returning small structures on 64-bit big
endian machines. Should fix the remaininf failure in the PPC64
Debian buildbot.
Thanks to Matthias Klose for providing access to a machine to debug
and test this.
........
r46731 | brett.cannon | 2006-06-07 23:48:17 +0200 (Wed, 07 Jun 2006) | 2 lines
Clarify documentation for bf_getcharbuffer.
........
r46735 | neal.norwitz | 2006-06-08 07:12:45 +0200 (Thu, 08 Jun 2006) | 1 line
Fix a refleak in recvfrom_into
........
r46736 | gregory.p.smith | 2006-06-08 07:17:08 +0200 (Thu, 08 Jun 2006) | 9 lines
- bsddb: the bsddb.dbtables Modify method now raises the proper error and
aborts the db transaction safely when a modifier callback fails.
Fixes SF python patch/bug #1408584.
Also cleans up the bsddb.dbtables docstrings since thats the only
documentation that exists for that unadvertised module. (people
really should really just use sqlite3)
........
r46737 | gregory.p.smith | 2006-06-08 07:38:11 +0200 (Thu, 08 Jun 2006) | 4 lines
* Turn the deadlock situation described in SF bug #775414 into a
DBDeadLockError exception.
* add the test case for my previous dbtables commit.
........
r46738 | gregory.p.smith | 2006-06-08 07:39:54 +0200 (Thu, 08 Jun 2006) | 2 lines
pasted set_lk_detect line in wrong spot in previous commit. fixed. passes tests this time.
........
r46739 | armin.rigo | 2006-06-08 12:56:24 +0200 (Thu, 08 Jun 2006) | 6 lines
(arre, arigo) SF bug #1350060
Give a consistent behavior for comparison and hashing of method objects
(both user- and built-in methods). Now compares the 'self' recursively.
The hash was already asking for the hash of 'self'.
........
r46740 | andrew.kuchling | 2006-06-08 13:56:44 +0200 (Thu, 08 Jun 2006) | 1 line
Typo fix
........
r46741 | georg.brandl | 2006-06-08 14:45:01 +0200 (Thu, 08 Jun 2006) | 2 lines
Bug #1502750: Fix getargs "i" format to use LONG_MIN and LONG_MAX for bounds checking.
........
r46743 | georg.brandl | 2006-06-08 14:54:13 +0200 (Thu, 08 Jun 2006) | 2 lines
Bug #1502728: Correctly link against librt library on HP-UX.
........
r46745 | georg.brandl | 2006-06-08 14:55:47 +0200 (Thu, 08 Jun 2006) | 3 lines
Add news for recent bugfix.
........
r46746 | georg.brandl | 2006-06-08 15:31:07 +0200 (Thu, 08 Jun 2006) | 4 lines
Argh. "integer" is a very confusing word ;)
Actually, checking for INT_MAX and INT_MIN is correct since
the format code explicitly handles a C "int".
........
r46748 | nick.coghlan | 2006-06-08 15:54:49 +0200 (Thu, 08 Jun 2006) | 1 line
Add functools.update_wrapper() and functools.wraps() as described in PEP 356
........
r46751 | georg.brandl | 2006-06-08 16:50:21 +0200 (Thu, 08 Jun 2006) | 4 lines
Bug #1502805: don't alias file.__exit__ to file.close since the
latter can return something that's true.
........
r46752 | georg.brandl | 2006-06-08 16:50:53 +0200 (Thu, 08 Jun 2006) | 3 lines
Convert test_file to unittest.
........
2006-06-08 12:35:45 -03:00
|
|
|
Tkapp_CreateCommand(PyObject *selfptr, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
TkappObject *self = (TkappObject*)selfptr;
|
|
|
|
PythonCmd_ClientData *data;
|
|
|
|
char *cmdName;
|
|
|
|
PyObject *func;
|
|
|
|
int err;
|
1997-08-01 21:09:09 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "sO:createcommand", &cmdName, &func))
|
|
|
|
return NULL;
|
|
|
|
if (!PyCallable_Check(func)) {
|
|
|
|
PyErr_SetString(PyExc_TypeError, "command not callable");
|
|
|
|
return NULL;
|
|
|
|
}
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2003-03-30 04:44:58 -04:00
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
if (self->threaded && self->thread_id != Tcl_GetCurrentThread() &&
|
|
|
|
!WaitForMainloop(self))
|
|
|
|
return NULL;
|
2003-03-30 04:44:58 -04:00
|
|
|
#endif
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
data = PyMem_NEW(PythonCmd_ClientData, 1);
|
|
|
|
if (!data)
|
|
|
|
return PyErr_NoMemory();
|
|
|
|
Py_INCREF(self);
|
|
|
|
Py_INCREF(func);
|
|
|
|
data->self = selfptr;
|
|
|
|
data->func = func;
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
if (self->threaded && self->thread_id != Tcl_GetCurrentThread()) {
|
|
|
|
Tcl_Condition cond = NULL;
|
|
|
|
CommandEvent *ev = (CommandEvent*)ckalloc(sizeof(CommandEvent));
|
|
|
|
ev->ev.proc = (Tcl_EventProc*)Tkapp_CommandProc;
|
|
|
|
ev->interp = self->interp;
|
|
|
|
ev->create = 1;
|
|
|
|
ev->name = cmdName;
|
|
|
|
ev->data = (ClientData)data;
|
|
|
|
ev->status = &err;
|
|
|
|
ev->done = &cond;
|
|
|
|
Tkapp_ThreadSend(self, (Tcl_Event*)ev, &cond, &command_mutex);
|
|
|
|
Tcl_ConditionFinalize(&cond);
|
|
|
|
}
|
|
|
|
else
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
{
|
|
|
|
ENTER_TCL
|
|
|
|
err = Tcl_CreateCommand(
|
|
|
|
Tkapp_Interp(self), cmdName, PythonCmd,
|
|
|
|
(ClientData)data, PythonCmdDelete) == NULL;
|
|
|
|
LEAVE_TCL
|
|
|
|
}
|
|
|
|
if (err) {
|
|
|
|
PyErr_SetString(Tkinter_TclError, "can't create Tcl command");
|
|
|
|
PyMem_DEL(data);
|
|
|
|
return NULL;
|
|
|
|
}
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
Merge the rest of the trunk.
Merged revisions 46490-46494,46496,46498,46500,46506,46521,46538,46558,46563-46567,46570-46571,46583,46593,46595-46598,46604,46606,46609-46753 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r46610 | martin.v.loewis | 2006-06-03 09:42:26 +0200 (Sat, 03 Jun 2006) | 2 lines
Updated version (win32-icons2.zip) from #1490384.
........
r46612 | andrew.kuchling | 2006-06-03 20:09:41 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1472084] Fix description of do_tag
........
r46614 | andrew.kuchling | 2006-06-03 20:33:35 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1475554] Strengthen text to say 'must' instead of 'should'
........
r46616 | andrew.kuchling | 2006-06-03 20:41:28 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1441864] Clarify description of 'data' argument
........
r46617 | andrew.kuchling | 2006-06-03 20:43:24 +0200 (Sat, 03 Jun 2006) | 1 line
Minor rewording
........
r46619 | andrew.kuchling | 2006-06-03 21:02:35 +0200 (Sat, 03 Jun 2006) | 9 lines
[Bug #1497414] _self is a reserved word in the WATCOM 10.6 C compiler.
Fix by renaming the variable.
In a different module, Neal fixed it by renaming _self to self. There's
already a variable named 'self' here, so I used selfptr.
(I'm committing this on a Mac without Tk, but it's a simple search-and-replace.
<crosses fingers>, so I'll watch the buildbots and see what happens.)
........
r46621 | fredrik.lundh | 2006-06-03 23:56:05 +0200 (Sat, 03 Jun 2006) | 5 lines
"_self" is a said to be a reserved word in Watcom C 10.6. I'm
not sure that's really standard compliant behaviour, but I guess
we have to fix that anyway...
........
r46622 | andrew.kuchling | 2006-06-04 00:44:42 +0200 (Sun, 04 Jun 2006) | 1 line
Update readme
........
r46623 | andrew.kuchling | 2006-06-04 00:59:23 +0200 (Sun, 04 Jun 2006) | 1 line
Drop 0 parameter
........
r46624 | andrew.kuchling | 2006-06-04 00:59:59 +0200 (Sun, 04 Jun 2006) | 1 line
Some code tidying; use curses.wrapper
........
r46625 | andrew.kuchling | 2006-06-04 01:02:15 +0200 (Sun, 04 Jun 2006) | 1 line
Use True; value returned from main is unused
........
r46626 | andrew.kuchling | 2006-06-04 01:07:21 +0200 (Sun, 04 Jun 2006) | 1 line
Use true division, and the True value
........
r46627 | andrew.kuchling | 2006-06-04 01:09:58 +0200 (Sun, 04 Jun 2006) | 1 line
Docstring fix; use True
........
r46628 | andrew.kuchling | 2006-06-04 01:15:56 +0200 (Sun, 04 Jun 2006) | 1 line
Put code in a main() function; loosen up the spacing to match current code style
........
r46629 | andrew.kuchling | 2006-06-04 01:39:07 +0200 (Sun, 04 Jun 2006) | 1 line
Use functions; modernize code
........
r46630 | andrew.kuchling | 2006-06-04 01:43:22 +0200 (Sun, 04 Jun 2006) | 1 line
This demo requires Medusa (not just asyncore); remove it
........
r46631 | andrew.kuchling | 2006-06-04 01:46:36 +0200 (Sun, 04 Jun 2006) | 2 lines
Remove xmlrpc demo -- it duplicates the SimpleXMLRPCServer module.
........
r46632 | andrew.kuchling | 2006-06-04 01:47:22 +0200 (Sun, 04 Jun 2006) | 1 line
Remove xmlrpc/ directory
........
r46633 | andrew.kuchling | 2006-06-04 01:51:21 +0200 (Sun, 04 Jun 2006) | 1 line
Remove dangling reference
........
r46634 | andrew.kuchling | 2006-06-04 01:59:36 +0200 (Sun, 04 Jun 2006) | 1 line
Add more whitespace; use a better socket name
........
r46635 | tim.peters | 2006-06-04 03:22:53 +0200 (Sun, 04 Jun 2006) | 2 lines
Whitespace normalization.
........
r46637 | tim.peters | 2006-06-04 05:26:02 +0200 (Sun, 04 Jun 2006) | 16 lines
In a PYMALLOC_DEBUG build obmalloc adds extra debugging info
to each allocated block. This was using 4 bytes for each such
piece of info regardless of platform. This didn't really matter
before (proof: no bug reports, and the debug-build obmalloc would
have assert-failed if it was ever asked for a chunk of memory
>= 2**32 bytes), since container indices were plain ints. But after
the Py_ssize_t changes, it's at least theoretically possible to
allocate a list or string whose guts exceed 2**32 bytes, and the
PYMALLOC_DEBUG routines would fail then (having only 4 bytes
to record the originally requested size).
Now we use sizeof(size_t) bytes for each of a PYMALLOC_DEBUG
build's extra debugging fields. This won't make any difference
on 32-bit boxes, but will add 16 bytes to each allocation in
a debug build on a 64-bit box.
........
r46638 | tim.peters | 2006-06-04 05:38:04 +0200 (Sun, 04 Jun 2006) | 4 lines
_PyObject_DebugMalloc(): The return value should add
2*sizeof(size_t) now, not 8. This probably accounts for
current disasters on the 64-bit buildbot slaves.
........
r46639 | neal.norwitz | 2006-06-04 08:19:31 +0200 (Sun, 04 Jun 2006) | 1 line
SF #1499797, Fix for memory leak in WindowsError_str
........
r46640 | andrew.macintyre | 2006-06-04 14:31:09 +0200 (Sun, 04 Jun 2006) | 2 lines
Patch #1454481: Make thread stack size runtime tunable.
........
r46641 | andrew.macintyre | 2006-06-04 14:59:59 +0200 (Sun, 04 Jun 2006) | 2 lines
clean up function declarations to conform to PEP-7 style.
........
r46642 | martin.blais | 2006-06-04 15:49:49 +0200 (Sun, 04 Jun 2006) | 15 lines
Fixes in struct and socket from merge reviews.
- Following Guido's comments, renamed
* pack_to -> pack_into
* recv_buf -> recv_into
* recvfrom_buf -> recvfrom_into
- Made fixes to _struct.c according to Neal Norwitz comments on the checkins
list.
- Converted some ints into the appropriate -- I hope -- ssize_t and size_t.
........
r46643 | ronald.oussoren | 2006-06-04 16:05:28 +0200 (Sun, 04 Jun 2006) | 3 lines
"Import" LDFLAGS in Mac/OSX/Makefile.in to ensure pythonw gets build with
the right compiler flags.
........
r46644 | ronald.oussoren | 2006-06-04 16:24:59 +0200 (Sun, 04 Jun 2006) | 2 lines
Drop Mac wrappers for the WASTE library.
........
r46645 | tim.peters | 2006-06-04 17:49:07 +0200 (Sun, 04 Jun 2006) | 3 lines
s_methods[]: Stop compiler warnings by casting
s_unpack_from to PyCFunction.
........
r46646 | george.yoshida | 2006-06-04 19:04:12 +0200 (Sun, 04 Jun 2006) | 2 lines
Remove a redundant word
........
r46647 | george.yoshida | 2006-06-04 19:17:25 +0200 (Sun, 04 Jun 2006) | 2 lines
Markup fix
........
r46648 | martin.v.loewis | 2006-06-04 21:36:28 +0200 (Sun, 04 Jun 2006) | 2 lines
Patch #1359618: Speed-up charmap encoder.
........
r46649 | georg.brandl | 2006-06-04 23:46:16 +0200 (Sun, 04 Jun 2006) | 3 lines
Repair refleaks in unicodeobject.
........
r46650 | georg.brandl | 2006-06-04 23:56:52 +0200 (Sun, 04 Jun 2006) | 4 lines
Patch #1346214: correctly optimize away "if 0"-style stmts
(thanks to Neal for review)
........
r46651 | georg.brandl | 2006-06-05 00:15:37 +0200 (Mon, 05 Jun 2006) | 2 lines
Bug #1500293: fix memory leaks in _subprocess module.
........
r46654 | tim.peters | 2006-06-05 01:43:53 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46655 | tim.peters | 2006-06-05 01:52:47 +0200 (Mon, 05 Jun 2006) | 16 lines
Revert revisions:
46640 Patch #1454481: Make thread stack size runtime tunable.
46647 Markup fix
The first is causing many buildbots to fail test runs, and there
are multiple causes with seemingly no immediate prospects for
repairing them. See python-dev discussion.
Note that a branch can (and should) be created for resolving these
problems, like
svn copy svn+ssh://svn.python.org/python/trunk -r46640 svn+ssh://svn.python.org/python/branches/NEW_BRANCH
followed by merging rev 46647 to the new branch.
........
r46656 | andrew.kuchling | 2006-06-05 02:08:09 +0200 (Mon, 05 Jun 2006) | 1 line
Mention second encoding speedup
........
r46657 | gregory.p.smith | 2006-06-05 02:31:01 +0200 (Mon, 05 Jun 2006) | 7 lines
bugfix: when log_archive was called with the DB_ARCH_REMOVE flag present
in BerkeleyDB >= 4.2 it tried to construct a list out of an uninitialized
char **log_list.
feature: export the DB_ARCH_REMOVE flag by name in the module on BerkeleyDB >= 4.2.
........
r46658 | gregory.p.smith | 2006-06-05 02:33:35 +0200 (Mon, 05 Jun 2006) | 5 lines
fix a bug in the previous commit. don't leak empty list on error return and
fix the additional rare (out of memory only) bug that it was supposed to fix
of not freeing log_list when the python allocator failed.
........
r46660 | tim.peters | 2006-06-05 02:55:26 +0200 (Mon, 05 Jun 2006) | 9 lines
"Flat is better than nested."
Move the long-winded, multiply-nested -R support out
of runtest() and into some module-level helper functions.
This makes runtest() and the -R code easier to follow.
That in turn allowed seeing some opportunities for code
simplification, and made it obvious that reglog.txt
never got closed.
........
r46661 | hyeshik.chang | 2006-06-05 02:59:54 +0200 (Mon, 05 Jun 2006) | 3 lines
Fix a potentially invalid memory access of CJKCodecs' shift-jis
decoder. (found by Neal Norwitz)
........
r46663 | gregory.p.smith | 2006-06-05 03:39:52 +0200 (Mon, 05 Jun 2006) | 3 lines
* support DBEnv.log_stat() method on BerkeleyDB >= 4.0 [patch #1494885]
........
r46664 | tim.peters | 2006-06-05 03:43:03 +0200 (Mon, 05 Jun 2006) | 3 lines
Remove doctest.testmod's deprecated (in 2.4) `isprivate`
argument. A lot of hair went into supporting that!
........
r46665 | tim.peters | 2006-06-05 03:47:24 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46666 | tim.peters | 2006-06-05 03:48:21 +0200 (Mon, 05 Jun 2006) | 2 lines
Make doctest news more accurate.
........
r46667 | gregory.p.smith | 2006-06-05 03:56:15 +0200 (Mon, 05 Jun 2006) | 3 lines
* support DBEnv.lsn_reset() method on BerkeleyDB >= 4.4 [patch #1494902]
........
r46668 | gregory.p.smith | 2006-06-05 04:02:25 +0200 (Mon, 05 Jun 2006) | 3 lines
mention the just committed bsddb changes
........
r46671 | gregory.p.smith | 2006-06-05 19:38:04 +0200 (Mon, 05 Jun 2006) | 3 lines
* add support for DBSequence objects [patch #1466734]
........
r46672 | gregory.p.smith | 2006-06-05 20:20:07 +0200 (Mon, 05 Jun 2006) | 3 lines
forgot to add this file in previous commit
........
r46673 | tim.peters | 2006-06-05 20:36:12 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46674 | tim.peters | 2006-06-05 20:36:54 +0200 (Mon, 05 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46675 | gregory.p.smith | 2006-06-05 20:48:21 +0200 (Mon, 05 Jun 2006) | 4 lines
* fix DBCursor.pget() bug with keyword argument names when no data= is
supplied [SF pybsddb bug #1477863]
........
r46676 | andrew.kuchling | 2006-06-05 21:05:32 +0200 (Mon, 05 Jun 2006) | 1 line
Remove use of Trove name, which isn't very helpful to users
........
r46677 | andrew.kuchling | 2006-06-05 21:08:25 +0200 (Mon, 05 Jun 2006) | 1 line
[Bug #1470026] Include link to list of classifiers
........
r46679 | tim.peters | 2006-06-05 22:48:49 +0200 (Mon, 05 Jun 2006) | 10 lines
Access _struct attributes directly instead of mucking with getattr.
string_reverse(): Simplify.
assertRaises(): Raise TestFailed on failure.
test_unpack_from(), test_pack_into(), test_pack_into_fn(): never
use `assert` to test for an expected result (it doesn't test anything
when Python is run with -O).
........
r46680 | tim.peters | 2006-06-05 22:49:27 +0200 (Mon, 05 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46681 | gregory.p.smith | 2006-06-06 01:38:06 +0200 (Tue, 06 Jun 2006) | 3 lines
add depends = ['md5.h'] to the _md5 module extension for correctness sake.
........
r46682 | brett.cannon | 2006-06-06 01:51:55 +0200 (Tue, 06 Jun 2006) | 4 lines
Add 3 more bytes to a buffer to cover constants in string and null byte on top of 10 possible digits for an int.
Closes bug #1501223.
........
r46684 | gregory.p.smith | 2006-06-06 01:59:37 +0200 (Tue, 06 Jun 2006) | 5 lines
- bsddb: the __len__ method of a DB object has been fixed to return correct
results. It could previously incorrectly return 0 in some cases.
Fixes SF bug 1493322 (pybsddb bug 1184012).
........
r46686 | tim.peters | 2006-06-06 02:25:07 +0200 (Tue, 06 Jun 2006) | 7 lines
_PySys_Init(): It's rarely a good idea to size a buffer to the
exact maximum size someone guesses is needed. In this case, if
we're really worried about extreme integers, then "cp%d" can
actually need 14 bytes (2 for "cp" + 1 for \0 at the end +
11 for -(2**31-1)). So reserve 128 bytes instead -- nothing is
actually saved by making a stack-local buffer tiny.
........
r46687 | neal.norwitz | 2006-06-06 09:22:08 +0200 (Tue, 06 Jun 2006) | 1 line
Remove unused variable (and stop compiler warning)
........
r46688 | neal.norwitz | 2006-06-06 09:23:01 +0200 (Tue, 06 Jun 2006) | 1 line
Fix a bunch of parameter strings
........
r46689 | thomas.heller | 2006-06-06 13:34:33 +0200 (Tue, 06 Jun 2006) | 6 lines
Convert CFieldObject tp_members to tp_getset, since there is no
structmember typecode for Py_ssize_t fields. This should fix some of
the errors on the PPC64 debian machine (64-bit, big endian).
Assigning to readonly fields now raises AttributeError instead of
TypeError, so the testcase has to be changed as well.
........
r46690 | thomas.heller | 2006-06-06 13:54:32 +0200 (Tue, 06 Jun 2006) | 1 line
Damn - the sentinel was missing. And fix another silly mistake.
........
r46691 | martin.blais | 2006-06-06 14:46:55 +0200 (Tue, 06 Jun 2006) | 13 lines
Normalized a few cases of whitespace in function declarations.
Found them using::
find . -name '*.py' | while read i ; do grep 'def[^(]*( ' $i /dev/null ; done
find . -name '*.py' | while read i ; do grep ' ):' $i /dev/null ; done
(I was doing this all over my own code anyway, because I'd been using spaces in
all defs, so I thought I'd make a run on the Python code as well. If you need
to do such fixes in your own code, you can use xx-rename or parenregu.el within
emacs.)
........
r46693 | thomas.heller | 2006-06-06 17:34:18 +0200 (Tue, 06 Jun 2006) | 1 line
Specify argtypes for all test functions. Maybe that helps on strange ;-) architectures
........
r46694 | tim.peters | 2006-06-06 17:50:17 +0200 (Tue, 06 Jun 2006) | 5 lines
BSequence_set_range(): Rev 46688 ("Fix a bunch of
parameter strings") changed this function's signature
seemingly by mistake, which is causing buildbots to fail
test_bsddb3. Restored the pre-46688 signature.
........
r46695 | tim.peters | 2006-06-06 17:52:35 +0200 (Tue, 06 Jun 2006) | 4 lines
On python-dev Thomas Heller said these were committed
by mistake in rev 46693, so reverting this part of
rev 46693.
........
r46696 | andrew.kuchling | 2006-06-06 19:10:41 +0200 (Tue, 06 Jun 2006) | 1 line
Fix comment typo
........
r46697 | brett.cannon | 2006-06-06 20:08:16 +0200 (Tue, 06 Jun 2006) | 2 lines
Fix coding style guide bug.
........
r46698 | thomas.heller | 2006-06-06 20:50:46 +0200 (Tue, 06 Jun 2006) | 2 lines
Add a hack so that foreign functions returning float now do work on 64-bit
big endian platforms.
........
r46699 | thomas.heller | 2006-06-06 21:25:13 +0200 (Tue, 06 Jun 2006) | 3 lines
Use the same big-endian hack as in _ctypes/callproc.c for callback functions.
This fixes the callback function tests that return float.
........
r46700 | ronald.oussoren | 2006-06-06 21:50:24 +0200 (Tue, 06 Jun 2006) | 5 lines
* Ensure that "make altinstall" works when the tree was configured
with --enable-framework
* Also for --enable-framework: allow users to use --prefix to specify
the location of the compatibility symlinks (such as /usr/local/bin/python)
........
r46701 | ronald.oussoren | 2006-06-06 21:56:00 +0200 (Tue, 06 Jun 2006) | 3 lines
A quick hack to ensure the right key-bindings for IDLE on osx: install patched
configuration files during a framework install.
........
r46702 | tim.peters | 2006-06-07 03:04:59 +0200 (Wed, 07 Jun 2006) | 4 lines
dash_R_cleanup(): Clear filecmp._cache. This accounts for
different results across -R runs (at least on Windows) of
test_filecmp.
........
r46705 | tim.peters | 2006-06-07 08:57:51 +0200 (Wed, 07 Jun 2006) | 17 lines
SF patch 1501987: Remove randomness from test_exceptions,
from ?iga Seilnacht (sorry about the name, but Firefox
on my box can't display the first character of the name --
the SF "Unix name" is zseil).
This appears to cure the oddball intermittent leaks across
runs when running test_exceptions under -R. I'm not sure
why, but I'm too sleepy to care ;-)
The thrust of the SF patch was to remove randomness in the
pickle protocol used. I changed the patch to use
range(pickle.HIGHEST_PROTOCOL + 1), to try both pickle and
cPickle, and randomly mucked with other test lines to put
statements on their own lines.
Not a bugfix candidate (this is fiddling new-in-2.5 code).
........
r46706 | andrew.kuchling | 2006-06-07 15:55:33 +0200 (Wed, 07 Jun 2006) | 1 line
Add an SQLite introduction, taken from the 'What's New' text
........
r46708 | andrew.kuchling | 2006-06-07 19:02:52 +0200 (Wed, 07 Jun 2006) | 1 line
Mention other placeholders
........
r46709 | andrew.kuchling | 2006-06-07 19:03:46 +0200 (Wed, 07 Jun 2006) | 1 line
Add an item; also, escape %
........
r46710 | andrew.kuchling | 2006-06-07 19:04:01 +0200 (Wed, 07 Jun 2006) | 1 line
Mention other placeholders
........
r46716 | ronald.oussoren | 2006-06-07 20:57:44 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/Tools one level up
........
r46717 | ronald.oussoren | 2006-06-07 20:58:01 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/PythonLauncher one level up
........
r46718 | ronald.oussoren | 2006-06-07 20:58:42 +0200 (Wed, 07 Jun 2006) | 2 lines
mv Mac/OSX/BuildScript one level up
........
r46719 | ronald.oussoren | 2006-06-07 21:02:03 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/* one level up
........
r46720 | ronald.oussoren | 2006-06-07 21:06:01 +0200 (Wed, 07 Jun 2006) | 2 lines
And the last bit: move IDLE one level up and adjust makefiles
........
r46723 | ronald.oussoren | 2006-06-07 21:38:53 +0200 (Wed, 07 Jun 2006) | 4 lines
- Patch the correct version of python in the Info.plists at build time, instead
of relying on a maintainer to update them before releases.
- Remove the now empty Mac/OSX directory
........
r46727 | ronald.oussoren | 2006-06-07 22:18:44 +0200 (Wed, 07 Jun 2006) | 7 lines
* If BuildApplet.py is used as an applet it starts with a version of
sys.exutable that isn't usuable on an #!-line. That results in generated
applets that don't actually work. Work around this problem by resetting
sys.executable.
* argvemulator.py didn't work on intel macs. This patch fixes this
(bug #1491468)
........
r46728 | tim.peters | 2006-06-07 22:40:06 +0200 (Wed, 07 Jun 2006) | 2 lines
Whitespace normalization.
........
r46729 | tim.peters | 2006-06-07 22:40:54 +0200 (Wed, 07 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46730 | thomas.heller | 2006-06-07 22:43:06 +0200 (Wed, 07 Jun 2006) | 7 lines
Fix for foreign functions returning small structures on 64-bit big
endian machines. Should fix the remaininf failure in the PPC64
Debian buildbot.
Thanks to Matthias Klose for providing access to a machine to debug
and test this.
........
r46731 | brett.cannon | 2006-06-07 23:48:17 +0200 (Wed, 07 Jun 2006) | 2 lines
Clarify documentation for bf_getcharbuffer.
........
r46735 | neal.norwitz | 2006-06-08 07:12:45 +0200 (Thu, 08 Jun 2006) | 1 line
Fix a refleak in recvfrom_into
........
r46736 | gregory.p.smith | 2006-06-08 07:17:08 +0200 (Thu, 08 Jun 2006) | 9 lines
- bsddb: the bsddb.dbtables Modify method now raises the proper error and
aborts the db transaction safely when a modifier callback fails.
Fixes SF python patch/bug #1408584.
Also cleans up the bsddb.dbtables docstrings since thats the only
documentation that exists for that unadvertised module. (people
really should really just use sqlite3)
........
r46737 | gregory.p.smith | 2006-06-08 07:38:11 +0200 (Thu, 08 Jun 2006) | 4 lines
* Turn the deadlock situation described in SF bug #775414 into a
DBDeadLockError exception.
* add the test case for my previous dbtables commit.
........
r46738 | gregory.p.smith | 2006-06-08 07:39:54 +0200 (Thu, 08 Jun 2006) | 2 lines
pasted set_lk_detect line in wrong spot in previous commit. fixed. passes tests this time.
........
r46739 | armin.rigo | 2006-06-08 12:56:24 +0200 (Thu, 08 Jun 2006) | 6 lines
(arre, arigo) SF bug #1350060
Give a consistent behavior for comparison and hashing of method objects
(both user- and built-in methods). Now compares the 'self' recursively.
The hash was already asking for the hash of 'self'.
........
r46740 | andrew.kuchling | 2006-06-08 13:56:44 +0200 (Thu, 08 Jun 2006) | 1 line
Typo fix
........
r46741 | georg.brandl | 2006-06-08 14:45:01 +0200 (Thu, 08 Jun 2006) | 2 lines
Bug #1502750: Fix getargs "i" format to use LONG_MIN and LONG_MAX for bounds checking.
........
r46743 | georg.brandl | 2006-06-08 14:54:13 +0200 (Thu, 08 Jun 2006) | 2 lines
Bug #1502728: Correctly link against librt library on HP-UX.
........
r46745 | georg.brandl | 2006-06-08 14:55:47 +0200 (Thu, 08 Jun 2006) | 3 lines
Add news for recent bugfix.
........
r46746 | georg.brandl | 2006-06-08 15:31:07 +0200 (Thu, 08 Jun 2006) | 4 lines
Argh. "integer" is a very confusing word ;)
Actually, checking for INT_MAX and INT_MIN is correct since
the format code explicitly handles a C "int".
........
r46748 | nick.coghlan | 2006-06-08 15:54:49 +0200 (Thu, 08 Jun 2006) | 1 line
Add functools.update_wrapper() and functools.wraps() as described in PEP 356
........
r46751 | georg.brandl | 2006-06-08 16:50:21 +0200 (Thu, 08 Jun 2006) | 4 lines
Bug #1502805: don't alias file.__exit__ to file.close since the
latter can return something that's true.
........
r46752 | georg.brandl | 2006-06-08 16:50:53 +0200 (Thu, 08 Jun 2006) | 3 lines
Convert test_file to unittest.
........
2006-06-08 12:35:45 -03:00
|
|
|
Tkapp_DeleteCommand(PyObject *selfptr, PyObject *args)
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
TkappObject *self = (TkappObject*)selfptr;
|
|
|
|
char *cmdName;
|
|
|
|
int err;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "s:deletecommand", &cmdName))
|
|
|
|
return NULL;
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
|
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
if (self->threaded && self->thread_id != Tcl_GetCurrentThread()) {
|
|
|
|
Tcl_Condition cond = NULL;
|
|
|
|
CommandEvent *ev;
|
|
|
|
ev = (CommandEvent*)ckalloc(sizeof(CommandEvent));
|
|
|
|
ev->ev.proc = (Tcl_EventProc*)Tkapp_CommandProc;
|
|
|
|
ev->interp = self->interp;
|
|
|
|
ev->create = 0;
|
|
|
|
ev->name = cmdName;
|
|
|
|
ev->status = &err;
|
|
|
|
ev->done = &cond;
|
|
|
|
Tkapp_ThreadSend(self, (Tcl_Event*)ev, &cond,
|
|
|
|
&command_mutex);
|
|
|
|
Tcl_ConditionFinalize(&cond);
|
|
|
|
}
|
|
|
|
else
|
Merged revisions 70578,70599,70641-70642,70650,70660-70661,70674,70691,70697-70698,70700,70704 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r70578 | benjamin.peterson | 2009-03-23 22:24:56 -0500 (Mon, 23 Mar 2009) | 1 line
this is better written using assertRaises
........
r70599 | benjamin.peterson | 2009-03-25 16:42:51 -0500 (Wed, 25 Mar 2009) | 1 line
this can be slightly less ugly
........
r70641 | guilherme.polo | 2009-03-27 16:43:08 -0500 (Fri, 27 Mar 2009) | 3 lines
Adjusted _tkinter to compile without warnings when WITH_THREAD is not
defined (part of issue #5035)
........
r70642 | georg.brandl | 2009-03-27 19:48:48 -0500 (Fri, 27 Mar 2009) | 1 line
Fix typo.
........
r70650 | benjamin.peterson | 2009-03-28 14:16:10 -0500 (Sat, 28 Mar 2009) | 1 line
give os.symlink and os.link() better parameter names #5564
........
r70660 | georg.brandl | 2009-03-28 14:52:58 -0500 (Sat, 28 Mar 2009) | 1 line
Switch to fixed Sphinx version.
........
r70661 | georg.brandl | 2009-03-28 14:57:36 -0500 (Sat, 28 Mar 2009) | 2 lines
Add section numbering to some of the larger subdocuments.
........
r70674 | guilherme.polo | 2009-03-29 05:19:05 -0500 (Sun, 29 Mar 2009) | 1 line
Typo fix.
........
r70691 | raymond.hettinger | 2009-03-29 13:51:11 -0500 (Sun, 29 Mar 2009) | 1 line
Make life easier for non-CPython implementations.
........
r70697 | benjamin.peterson | 2009-03-29 16:22:35 -0500 (Sun, 29 Mar 2009) | 1 line
this has been fixed since 2.6 (I love removing these)
........
r70698 | benjamin.peterson | 2009-03-29 16:31:05 -0500 (Sun, 29 Mar 2009) | 1 line
thanks to guido's bytecode verifier, this is fixed
........
r70700 | benjamin.peterson | 2009-03-29 16:50:14 -0500 (Sun, 29 Mar 2009) | 1 line
use the awesome new status iterator
........
r70704 | benjamin.peterson | 2009-03-29 21:49:32 -0500 (Sun, 29 Mar 2009) | 1 line
there's actually three methods here #5600
........
2009-03-30 11:51:56 -03:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
{
|
|
|
|
ENTER_TCL
|
|
|
|
err = Tcl_DeleteCommand(self->interp, cmdName);
|
|
|
|
LEAVE_TCL
|
|
|
|
}
|
|
|
|
if (err == -1) {
|
|
|
|
PyErr_SetString(Tkinter_TclError, "can't delete Tcl command");
|
|
|
|
return NULL;
|
|
|
|
}
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
#ifdef HAVE_CREATEFILEHANDLER
|
1994-06-20 04:49:28 -03:00
|
|
|
/** File Handler **/
|
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
typedef struct _fhcdata {
|
2010-05-09 12:52:27 -03:00
|
|
|
PyObject *func;
|
|
|
|
PyObject *file;
|
|
|
|
int id;
|
|
|
|
struct _fhcdata *next;
|
1998-05-28 20:06:38 -03:00
|
|
|
} FileHandler_ClientData;
|
|
|
|
|
|
|
|
static FileHandler_ClientData *HeadFHCD;
|
|
|
|
|
|
|
|
static FileHandler_ClientData *
|
2000-07-08 01:04:38 -03:00
|
|
|
NewFHCD(PyObject *func, PyObject *file, int id)
|
1998-05-28 20:06:38 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
FileHandler_ClientData *p;
|
|
|
|
p = PyMem_NEW(FileHandler_ClientData, 1);
|
|
|
|
if (p != NULL) {
|
|
|
|
Py_XINCREF(func);
|
|
|
|
Py_XINCREF(file);
|
|
|
|
p->func = func;
|
|
|
|
p->file = file;
|
|
|
|
p->id = id;
|
|
|
|
p->next = HeadFHCD;
|
|
|
|
HeadFHCD = p;
|
|
|
|
}
|
|
|
|
return p;
|
1998-05-28 20:06:38 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
2000-07-08 01:04:38 -03:00
|
|
|
DeleteFHCD(int id)
|
1998-05-28 20:06:38 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
FileHandler_ClientData *p, **pp;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
pp = &HeadFHCD;
|
|
|
|
while ((p = *pp) != NULL) {
|
|
|
|
if (p->id == id) {
|
|
|
|
*pp = p->next;
|
|
|
|
Py_XDECREF(p->func);
|
|
|
|
Py_XDECREF(p->file);
|
|
|
|
PyMem_DEL(p);
|
|
|
|
}
|
|
|
|
else
|
|
|
|
pp = &p->next;
|
|
|
|
}
|
1998-05-28 20:06:38 -03:00
|
|
|
}
|
|
|
|
|
1995-01-10 16:56:29 -04:00
|
|
|
static void
|
2000-07-08 01:04:38 -03:00
|
|
|
FileHandler(ClientData clientData, int mask)
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
FileHandler_ClientData *data = (FileHandler_ClientData *)clientData;
|
|
|
|
PyObject *func, *file, *arg, *res;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_PYTHON
|
|
|
|
func = data->func;
|
|
|
|
file = data->file;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
arg = Py_BuildValue("(Oi)", file, (long) mask);
|
|
|
|
res = PyEval_CallObject(func, arg);
|
|
|
|
Py_DECREF(arg);
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (res == NULL) {
|
|
|
|
errorInCmd = 1;
|
|
|
|
PyErr_Fetch(&excInCmd, &valInCmd, &trbInCmd);
|
|
|
|
}
|
|
|
|
Py_XDECREF(res);
|
|
|
|
LEAVE_PYTHON
|
1994-08-09 11:15:19 -03:00
|
|
|
}
|
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_CreateFileHandler(PyObject *self, PyObject *args)
|
|
|
|
/* args is (file, mask, func) */
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
FileHandler_ClientData *data;
|
|
|
|
PyObject *file, *func;
|
|
|
|
int mask, tfile;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "OiO:createfilehandler",
|
|
|
|
&file, &mask, &func))
|
|
|
|
return NULL;
|
2003-03-03 06:40:01 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
CHECK_TCL_APPARTMENT;
|
2003-03-03 06:40:01 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
tfile = PyObject_AsFileDescriptor(file);
|
|
|
|
if (tfile < 0)
|
|
|
|
return NULL;
|
|
|
|
if (!PyCallable_Check(func)) {
|
|
|
|
PyErr_SetString(PyExc_TypeError, "bad argument list");
|
|
|
|
return NULL;
|
|
|
|
}
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
data = NewFHCD(func, file, tfile);
|
|
|
|
if (data == NULL)
|
|
|
|
return NULL;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
/* Ought to check for null Tcl_File object... */
|
|
|
|
ENTER_TCL
|
|
|
|
Tcl_CreateFileHandler(tfile, mask, FileHandler, (ClientData) data);
|
|
|
|
LEAVE_TCL
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_DeleteFileHandler(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
PyObject *file;
|
|
|
|
int tfile;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "O:deletefilehandler", &file))
|
|
|
|
return NULL;
|
2003-03-03 17:16:39 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
CHECK_TCL_APPARTMENT;
|
2003-03-03 17:16:39 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
tfile = PyObject_AsFileDescriptor(file);
|
|
|
|
if (tfile < 0)
|
|
|
|
return NULL;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
DeleteFHCD(tfile);
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
/* Ought to check for null Tcl_File object... */
|
|
|
|
ENTER_TCL
|
|
|
|
Tcl_DeleteFileHandler(tfile);
|
|
|
|
LEAVE_TCL
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
1997-08-14 16:57:07 -03:00
|
|
|
#endif /* HAVE_CREATEFILEHANDLER */
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-11-10 18:50:21 -04:00
|
|
|
/**** Tktt Object (timer token) ****/
|
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
static PyObject *Tktt_Type;
|
1994-11-10 18:50:21 -04:00
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
typedef struct {
|
2010-05-09 12:52:27 -03:00
|
|
|
PyObject_HEAD
|
|
|
|
Tcl_TimerToken token;
|
|
|
|
PyObject *func;
|
1998-05-28 20:06:38 -03:00
|
|
|
} TkttObject;
|
1994-11-10 18:50:21 -04:00
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tktt_DeleteTimerHandler(PyObject *self, PyObject *args)
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
TkttObject *v = (TkttObject *)self;
|
|
|
|
PyObject *func = v->func;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, ":deletetimerhandler"))
|
|
|
|
return NULL;
|
|
|
|
if (v->token != NULL) {
|
|
|
|
Tcl_DeleteTimerHandler(v->token);
|
|
|
|
v->token = NULL;
|
|
|
|
}
|
|
|
|
if (func != NULL) {
|
|
|
|
v->func = NULL;
|
|
|
|
Py_DECREF(func);
|
|
|
|
Py_DECREF(v); /* See Tktt_New() */
|
|
|
|
}
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
1994-11-10 18:50:21 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyMethodDef Tktt_methods[] =
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
{"deletetimerhandler", Tktt_DeleteTimerHandler, METH_VARARGS},
|
|
|
|
{NULL, NULL}
|
1994-11-10 18:50:21 -04:00
|
|
|
};
|
|
|
|
|
|
|
|
static TkttObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tktt_New(PyObject *func)
|
1994-11-10 18:50:21 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
TkttObject *v;
|
2007-11-21 16:09:18 -04:00
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
v = PyObject_New(TkttObject, (PyTypeObject *) Tktt_Type);
|
2010-05-09 12:52:27 -03:00
|
|
|
if (v == NULL)
|
|
|
|
return NULL;
|
2013-08-10 19:22:30 -03:00
|
|
|
Py_INCREF(Tktt_Type);
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
Py_INCREF(func);
|
|
|
|
v->token = NULL;
|
|
|
|
v->func = func;
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
/* Extra reference, deleted when called or when handler is deleted */
|
|
|
|
Py_INCREF(v);
|
|
|
|
return v;
|
1994-11-10 18:50:21 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
2000-07-08 01:04:38 -03:00
|
|
|
Tktt_Dealloc(PyObject *self)
|
1994-11-10 18:50:21 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
TkttObject *v = (TkttObject *)self;
|
|
|
|
PyObject *func = v->func;
|
2013-08-10 19:22:30 -03:00
|
|
|
PyObject *tp = (PyObject *) Py_TYPE(self);
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
Py_XDECREF(func);
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
PyObject_Del(self);
|
2013-08-10 19:22:30 -03:00
|
|
|
Py_DECREF(tp);
|
1994-11-10 18:50:21 -04:00
|
|
|
}
|
|
|
|
|
1998-05-12 11:36:19 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tktt_Repr(PyObject *self)
|
1994-11-10 18:50:21 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
TkttObject *v = (TkttObject *)self;
|
2011-03-21 14:15:42 -03:00
|
|
|
return PyUnicode_FromFormat("<tktimertoken at %p%s>",
|
|
|
|
v,
|
|
|
|
v->func == NULL ? ", handler deleted" : "");
|
1994-11-10 18:50:21 -04:00
|
|
|
}
|
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
static PyType_Slot Tktt_Type_slots[] = {
|
|
|
|
{Py_tp_dealloc, Tktt_Dealloc},
|
|
|
|
{Py_tp_repr, Tktt_Repr},
|
|
|
|
{Py_tp_methods, Tktt_methods},
|
|
|
|
{0, 0}
|
1994-11-10 18:50:21 -04:00
|
|
|
};
|
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
static PyType_Spec Tktt_Type_spec = {
|
|
|
|
"tktimertoken",
|
|
|
|
sizeof(TkttObject),
|
|
|
|
0,
|
|
|
|
Py_TPFLAGS_DEFAULT,
|
|
|
|
Tktt_Type_slots,
|
|
|
|
};
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-11-10 18:50:21 -04:00
|
|
|
/** Timer Handler **/
|
|
|
|
|
|
|
|
static void
|
2000-07-08 01:04:38 -03:00
|
|
|
TimerHandler(ClientData clientData)
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
TkttObject *v = (TkttObject *)clientData;
|
|
|
|
PyObject *func = v->func;
|
|
|
|
PyObject *res;
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (func == NULL)
|
|
|
|
return;
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
v->func = NULL;
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_PYTHON
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
res = PyEval_CallObject(func, NULL);
|
|
|
|
Py_DECREF(func);
|
|
|
|
Py_DECREF(v); /* See Tktt_New() */
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (res == NULL) {
|
|
|
|
errorInCmd = 1;
|
|
|
|
PyErr_Fetch(&excInCmd, &valInCmd, &trbInCmd);
|
|
|
|
}
|
|
|
|
else
|
|
|
|
Py_DECREF(res);
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
LEAVE_PYTHON
|
1994-11-10 18:50:21 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_CreateTimerHandler(PyObject *self, PyObject *args)
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
int milliseconds;
|
|
|
|
PyObject *func;
|
|
|
|
TkttObject *v;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "iO:createtimerhandler",
|
|
|
|
&milliseconds, &func))
|
|
|
|
return NULL;
|
|
|
|
if (!PyCallable_Check(func)) {
|
|
|
|
PyErr_SetString(PyExc_TypeError, "bad argument list");
|
|
|
|
return NULL;
|
|
|
|
}
|
2003-03-03 06:40:01 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
CHECK_TCL_APPARTMENT;
|
2003-03-03 06:40:01 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
v = Tktt_New(func);
|
|
|
|
if (v) {
|
|
|
|
v->token = Tcl_CreateTimerHandler(milliseconds, TimerHandler,
|
|
|
|
(ClientData)v);
|
|
|
|
}
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
return (PyObject *) v;
|
1994-11-10 18:50:21 -04:00
|
|
|
}
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/** Event Loop **/
|
|
|
|
|
|
|
|
static PyObject *
|
Merge the rest of the trunk.
Merged revisions 46490-46494,46496,46498,46500,46506,46521,46538,46558,46563-46567,46570-46571,46583,46593,46595-46598,46604,46606,46609-46753 via svnmerge from
svn+ssh://pythondev@svn.python.org/python/trunk
........
r46610 | martin.v.loewis | 2006-06-03 09:42:26 +0200 (Sat, 03 Jun 2006) | 2 lines
Updated version (win32-icons2.zip) from #1490384.
........
r46612 | andrew.kuchling | 2006-06-03 20:09:41 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1472084] Fix description of do_tag
........
r46614 | andrew.kuchling | 2006-06-03 20:33:35 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1475554] Strengthen text to say 'must' instead of 'should'
........
r46616 | andrew.kuchling | 2006-06-03 20:41:28 +0200 (Sat, 03 Jun 2006) | 1 line
[Bug #1441864] Clarify description of 'data' argument
........
r46617 | andrew.kuchling | 2006-06-03 20:43:24 +0200 (Sat, 03 Jun 2006) | 1 line
Minor rewording
........
r46619 | andrew.kuchling | 2006-06-03 21:02:35 +0200 (Sat, 03 Jun 2006) | 9 lines
[Bug #1497414] _self is a reserved word in the WATCOM 10.6 C compiler.
Fix by renaming the variable.
In a different module, Neal fixed it by renaming _self to self. There's
already a variable named 'self' here, so I used selfptr.
(I'm committing this on a Mac without Tk, but it's a simple search-and-replace.
<crosses fingers>, so I'll watch the buildbots and see what happens.)
........
r46621 | fredrik.lundh | 2006-06-03 23:56:05 +0200 (Sat, 03 Jun 2006) | 5 lines
"_self" is a said to be a reserved word in Watcom C 10.6. I'm
not sure that's really standard compliant behaviour, but I guess
we have to fix that anyway...
........
r46622 | andrew.kuchling | 2006-06-04 00:44:42 +0200 (Sun, 04 Jun 2006) | 1 line
Update readme
........
r46623 | andrew.kuchling | 2006-06-04 00:59:23 +0200 (Sun, 04 Jun 2006) | 1 line
Drop 0 parameter
........
r46624 | andrew.kuchling | 2006-06-04 00:59:59 +0200 (Sun, 04 Jun 2006) | 1 line
Some code tidying; use curses.wrapper
........
r46625 | andrew.kuchling | 2006-06-04 01:02:15 +0200 (Sun, 04 Jun 2006) | 1 line
Use True; value returned from main is unused
........
r46626 | andrew.kuchling | 2006-06-04 01:07:21 +0200 (Sun, 04 Jun 2006) | 1 line
Use true division, and the True value
........
r46627 | andrew.kuchling | 2006-06-04 01:09:58 +0200 (Sun, 04 Jun 2006) | 1 line
Docstring fix; use True
........
r46628 | andrew.kuchling | 2006-06-04 01:15:56 +0200 (Sun, 04 Jun 2006) | 1 line
Put code in a main() function; loosen up the spacing to match current code style
........
r46629 | andrew.kuchling | 2006-06-04 01:39:07 +0200 (Sun, 04 Jun 2006) | 1 line
Use functions; modernize code
........
r46630 | andrew.kuchling | 2006-06-04 01:43:22 +0200 (Sun, 04 Jun 2006) | 1 line
This demo requires Medusa (not just asyncore); remove it
........
r46631 | andrew.kuchling | 2006-06-04 01:46:36 +0200 (Sun, 04 Jun 2006) | 2 lines
Remove xmlrpc demo -- it duplicates the SimpleXMLRPCServer module.
........
r46632 | andrew.kuchling | 2006-06-04 01:47:22 +0200 (Sun, 04 Jun 2006) | 1 line
Remove xmlrpc/ directory
........
r46633 | andrew.kuchling | 2006-06-04 01:51:21 +0200 (Sun, 04 Jun 2006) | 1 line
Remove dangling reference
........
r46634 | andrew.kuchling | 2006-06-04 01:59:36 +0200 (Sun, 04 Jun 2006) | 1 line
Add more whitespace; use a better socket name
........
r46635 | tim.peters | 2006-06-04 03:22:53 +0200 (Sun, 04 Jun 2006) | 2 lines
Whitespace normalization.
........
r46637 | tim.peters | 2006-06-04 05:26:02 +0200 (Sun, 04 Jun 2006) | 16 lines
In a PYMALLOC_DEBUG build obmalloc adds extra debugging info
to each allocated block. This was using 4 bytes for each such
piece of info regardless of platform. This didn't really matter
before (proof: no bug reports, and the debug-build obmalloc would
have assert-failed if it was ever asked for a chunk of memory
>= 2**32 bytes), since container indices were plain ints. But after
the Py_ssize_t changes, it's at least theoretically possible to
allocate a list or string whose guts exceed 2**32 bytes, and the
PYMALLOC_DEBUG routines would fail then (having only 4 bytes
to record the originally requested size).
Now we use sizeof(size_t) bytes for each of a PYMALLOC_DEBUG
build's extra debugging fields. This won't make any difference
on 32-bit boxes, but will add 16 bytes to each allocation in
a debug build on a 64-bit box.
........
r46638 | tim.peters | 2006-06-04 05:38:04 +0200 (Sun, 04 Jun 2006) | 4 lines
_PyObject_DebugMalloc(): The return value should add
2*sizeof(size_t) now, not 8. This probably accounts for
current disasters on the 64-bit buildbot slaves.
........
r46639 | neal.norwitz | 2006-06-04 08:19:31 +0200 (Sun, 04 Jun 2006) | 1 line
SF #1499797, Fix for memory leak in WindowsError_str
........
r46640 | andrew.macintyre | 2006-06-04 14:31:09 +0200 (Sun, 04 Jun 2006) | 2 lines
Patch #1454481: Make thread stack size runtime tunable.
........
r46641 | andrew.macintyre | 2006-06-04 14:59:59 +0200 (Sun, 04 Jun 2006) | 2 lines
clean up function declarations to conform to PEP-7 style.
........
r46642 | martin.blais | 2006-06-04 15:49:49 +0200 (Sun, 04 Jun 2006) | 15 lines
Fixes in struct and socket from merge reviews.
- Following Guido's comments, renamed
* pack_to -> pack_into
* recv_buf -> recv_into
* recvfrom_buf -> recvfrom_into
- Made fixes to _struct.c according to Neal Norwitz comments on the checkins
list.
- Converted some ints into the appropriate -- I hope -- ssize_t and size_t.
........
r46643 | ronald.oussoren | 2006-06-04 16:05:28 +0200 (Sun, 04 Jun 2006) | 3 lines
"Import" LDFLAGS in Mac/OSX/Makefile.in to ensure pythonw gets build with
the right compiler flags.
........
r46644 | ronald.oussoren | 2006-06-04 16:24:59 +0200 (Sun, 04 Jun 2006) | 2 lines
Drop Mac wrappers for the WASTE library.
........
r46645 | tim.peters | 2006-06-04 17:49:07 +0200 (Sun, 04 Jun 2006) | 3 lines
s_methods[]: Stop compiler warnings by casting
s_unpack_from to PyCFunction.
........
r46646 | george.yoshida | 2006-06-04 19:04:12 +0200 (Sun, 04 Jun 2006) | 2 lines
Remove a redundant word
........
r46647 | george.yoshida | 2006-06-04 19:17:25 +0200 (Sun, 04 Jun 2006) | 2 lines
Markup fix
........
r46648 | martin.v.loewis | 2006-06-04 21:36:28 +0200 (Sun, 04 Jun 2006) | 2 lines
Patch #1359618: Speed-up charmap encoder.
........
r46649 | georg.brandl | 2006-06-04 23:46:16 +0200 (Sun, 04 Jun 2006) | 3 lines
Repair refleaks in unicodeobject.
........
r46650 | georg.brandl | 2006-06-04 23:56:52 +0200 (Sun, 04 Jun 2006) | 4 lines
Patch #1346214: correctly optimize away "if 0"-style stmts
(thanks to Neal for review)
........
r46651 | georg.brandl | 2006-06-05 00:15:37 +0200 (Mon, 05 Jun 2006) | 2 lines
Bug #1500293: fix memory leaks in _subprocess module.
........
r46654 | tim.peters | 2006-06-05 01:43:53 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46655 | tim.peters | 2006-06-05 01:52:47 +0200 (Mon, 05 Jun 2006) | 16 lines
Revert revisions:
46640 Patch #1454481: Make thread stack size runtime tunable.
46647 Markup fix
The first is causing many buildbots to fail test runs, and there
are multiple causes with seemingly no immediate prospects for
repairing them. See python-dev discussion.
Note that a branch can (and should) be created for resolving these
problems, like
svn copy svn+ssh://svn.python.org/python/trunk -r46640 svn+ssh://svn.python.org/python/branches/NEW_BRANCH
followed by merging rev 46647 to the new branch.
........
r46656 | andrew.kuchling | 2006-06-05 02:08:09 +0200 (Mon, 05 Jun 2006) | 1 line
Mention second encoding speedup
........
r46657 | gregory.p.smith | 2006-06-05 02:31:01 +0200 (Mon, 05 Jun 2006) | 7 lines
bugfix: when log_archive was called with the DB_ARCH_REMOVE flag present
in BerkeleyDB >= 4.2 it tried to construct a list out of an uninitialized
char **log_list.
feature: export the DB_ARCH_REMOVE flag by name in the module on BerkeleyDB >= 4.2.
........
r46658 | gregory.p.smith | 2006-06-05 02:33:35 +0200 (Mon, 05 Jun 2006) | 5 lines
fix a bug in the previous commit. don't leak empty list on error return and
fix the additional rare (out of memory only) bug that it was supposed to fix
of not freeing log_list when the python allocator failed.
........
r46660 | tim.peters | 2006-06-05 02:55:26 +0200 (Mon, 05 Jun 2006) | 9 lines
"Flat is better than nested."
Move the long-winded, multiply-nested -R support out
of runtest() and into some module-level helper functions.
This makes runtest() and the -R code easier to follow.
That in turn allowed seeing some opportunities for code
simplification, and made it obvious that reglog.txt
never got closed.
........
r46661 | hyeshik.chang | 2006-06-05 02:59:54 +0200 (Mon, 05 Jun 2006) | 3 lines
Fix a potentially invalid memory access of CJKCodecs' shift-jis
decoder. (found by Neal Norwitz)
........
r46663 | gregory.p.smith | 2006-06-05 03:39:52 +0200 (Mon, 05 Jun 2006) | 3 lines
* support DBEnv.log_stat() method on BerkeleyDB >= 4.0 [patch #1494885]
........
r46664 | tim.peters | 2006-06-05 03:43:03 +0200 (Mon, 05 Jun 2006) | 3 lines
Remove doctest.testmod's deprecated (in 2.4) `isprivate`
argument. A lot of hair went into supporting that!
........
r46665 | tim.peters | 2006-06-05 03:47:24 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46666 | tim.peters | 2006-06-05 03:48:21 +0200 (Mon, 05 Jun 2006) | 2 lines
Make doctest news more accurate.
........
r46667 | gregory.p.smith | 2006-06-05 03:56:15 +0200 (Mon, 05 Jun 2006) | 3 lines
* support DBEnv.lsn_reset() method on BerkeleyDB >= 4.4 [patch #1494902]
........
r46668 | gregory.p.smith | 2006-06-05 04:02:25 +0200 (Mon, 05 Jun 2006) | 3 lines
mention the just committed bsddb changes
........
r46671 | gregory.p.smith | 2006-06-05 19:38:04 +0200 (Mon, 05 Jun 2006) | 3 lines
* add support for DBSequence objects [patch #1466734]
........
r46672 | gregory.p.smith | 2006-06-05 20:20:07 +0200 (Mon, 05 Jun 2006) | 3 lines
forgot to add this file in previous commit
........
r46673 | tim.peters | 2006-06-05 20:36:12 +0200 (Mon, 05 Jun 2006) | 2 lines
Whitespace normalization.
........
r46674 | tim.peters | 2006-06-05 20:36:54 +0200 (Mon, 05 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46675 | gregory.p.smith | 2006-06-05 20:48:21 +0200 (Mon, 05 Jun 2006) | 4 lines
* fix DBCursor.pget() bug with keyword argument names when no data= is
supplied [SF pybsddb bug #1477863]
........
r46676 | andrew.kuchling | 2006-06-05 21:05:32 +0200 (Mon, 05 Jun 2006) | 1 line
Remove use of Trove name, which isn't very helpful to users
........
r46677 | andrew.kuchling | 2006-06-05 21:08:25 +0200 (Mon, 05 Jun 2006) | 1 line
[Bug #1470026] Include link to list of classifiers
........
r46679 | tim.peters | 2006-06-05 22:48:49 +0200 (Mon, 05 Jun 2006) | 10 lines
Access _struct attributes directly instead of mucking with getattr.
string_reverse(): Simplify.
assertRaises(): Raise TestFailed on failure.
test_unpack_from(), test_pack_into(), test_pack_into_fn(): never
use `assert` to test for an expected result (it doesn't test anything
when Python is run with -O).
........
r46680 | tim.peters | 2006-06-05 22:49:27 +0200 (Mon, 05 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46681 | gregory.p.smith | 2006-06-06 01:38:06 +0200 (Tue, 06 Jun 2006) | 3 lines
add depends = ['md5.h'] to the _md5 module extension for correctness sake.
........
r46682 | brett.cannon | 2006-06-06 01:51:55 +0200 (Tue, 06 Jun 2006) | 4 lines
Add 3 more bytes to a buffer to cover constants in string and null byte on top of 10 possible digits for an int.
Closes bug #1501223.
........
r46684 | gregory.p.smith | 2006-06-06 01:59:37 +0200 (Tue, 06 Jun 2006) | 5 lines
- bsddb: the __len__ method of a DB object has been fixed to return correct
results. It could previously incorrectly return 0 in some cases.
Fixes SF bug 1493322 (pybsddb bug 1184012).
........
r46686 | tim.peters | 2006-06-06 02:25:07 +0200 (Tue, 06 Jun 2006) | 7 lines
_PySys_Init(): It's rarely a good idea to size a buffer to the
exact maximum size someone guesses is needed. In this case, if
we're really worried about extreme integers, then "cp%d" can
actually need 14 bytes (2 for "cp" + 1 for \0 at the end +
11 for -(2**31-1)). So reserve 128 bytes instead -- nothing is
actually saved by making a stack-local buffer tiny.
........
r46687 | neal.norwitz | 2006-06-06 09:22:08 +0200 (Tue, 06 Jun 2006) | 1 line
Remove unused variable (and stop compiler warning)
........
r46688 | neal.norwitz | 2006-06-06 09:23:01 +0200 (Tue, 06 Jun 2006) | 1 line
Fix a bunch of parameter strings
........
r46689 | thomas.heller | 2006-06-06 13:34:33 +0200 (Tue, 06 Jun 2006) | 6 lines
Convert CFieldObject tp_members to tp_getset, since there is no
structmember typecode for Py_ssize_t fields. This should fix some of
the errors on the PPC64 debian machine (64-bit, big endian).
Assigning to readonly fields now raises AttributeError instead of
TypeError, so the testcase has to be changed as well.
........
r46690 | thomas.heller | 2006-06-06 13:54:32 +0200 (Tue, 06 Jun 2006) | 1 line
Damn - the sentinel was missing. And fix another silly mistake.
........
r46691 | martin.blais | 2006-06-06 14:46:55 +0200 (Tue, 06 Jun 2006) | 13 lines
Normalized a few cases of whitespace in function declarations.
Found them using::
find . -name '*.py' | while read i ; do grep 'def[^(]*( ' $i /dev/null ; done
find . -name '*.py' | while read i ; do grep ' ):' $i /dev/null ; done
(I was doing this all over my own code anyway, because I'd been using spaces in
all defs, so I thought I'd make a run on the Python code as well. If you need
to do such fixes in your own code, you can use xx-rename or parenregu.el within
emacs.)
........
r46693 | thomas.heller | 2006-06-06 17:34:18 +0200 (Tue, 06 Jun 2006) | 1 line
Specify argtypes for all test functions. Maybe that helps on strange ;-) architectures
........
r46694 | tim.peters | 2006-06-06 17:50:17 +0200 (Tue, 06 Jun 2006) | 5 lines
BSequence_set_range(): Rev 46688 ("Fix a bunch of
parameter strings") changed this function's signature
seemingly by mistake, which is causing buildbots to fail
test_bsddb3. Restored the pre-46688 signature.
........
r46695 | tim.peters | 2006-06-06 17:52:35 +0200 (Tue, 06 Jun 2006) | 4 lines
On python-dev Thomas Heller said these were committed
by mistake in rev 46693, so reverting this part of
rev 46693.
........
r46696 | andrew.kuchling | 2006-06-06 19:10:41 +0200 (Tue, 06 Jun 2006) | 1 line
Fix comment typo
........
r46697 | brett.cannon | 2006-06-06 20:08:16 +0200 (Tue, 06 Jun 2006) | 2 lines
Fix coding style guide bug.
........
r46698 | thomas.heller | 2006-06-06 20:50:46 +0200 (Tue, 06 Jun 2006) | 2 lines
Add a hack so that foreign functions returning float now do work on 64-bit
big endian platforms.
........
r46699 | thomas.heller | 2006-06-06 21:25:13 +0200 (Tue, 06 Jun 2006) | 3 lines
Use the same big-endian hack as in _ctypes/callproc.c for callback functions.
This fixes the callback function tests that return float.
........
r46700 | ronald.oussoren | 2006-06-06 21:50:24 +0200 (Tue, 06 Jun 2006) | 5 lines
* Ensure that "make altinstall" works when the tree was configured
with --enable-framework
* Also for --enable-framework: allow users to use --prefix to specify
the location of the compatibility symlinks (such as /usr/local/bin/python)
........
r46701 | ronald.oussoren | 2006-06-06 21:56:00 +0200 (Tue, 06 Jun 2006) | 3 lines
A quick hack to ensure the right key-bindings for IDLE on osx: install patched
configuration files during a framework install.
........
r46702 | tim.peters | 2006-06-07 03:04:59 +0200 (Wed, 07 Jun 2006) | 4 lines
dash_R_cleanup(): Clear filecmp._cache. This accounts for
different results across -R runs (at least on Windows) of
test_filecmp.
........
r46705 | tim.peters | 2006-06-07 08:57:51 +0200 (Wed, 07 Jun 2006) | 17 lines
SF patch 1501987: Remove randomness from test_exceptions,
from ?iga Seilnacht (sorry about the name, but Firefox
on my box can't display the first character of the name --
the SF "Unix name" is zseil).
This appears to cure the oddball intermittent leaks across
runs when running test_exceptions under -R. I'm not sure
why, but I'm too sleepy to care ;-)
The thrust of the SF patch was to remove randomness in the
pickle protocol used. I changed the patch to use
range(pickle.HIGHEST_PROTOCOL + 1), to try both pickle and
cPickle, and randomly mucked with other test lines to put
statements on their own lines.
Not a bugfix candidate (this is fiddling new-in-2.5 code).
........
r46706 | andrew.kuchling | 2006-06-07 15:55:33 +0200 (Wed, 07 Jun 2006) | 1 line
Add an SQLite introduction, taken from the 'What's New' text
........
r46708 | andrew.kuchling | 2006-06-07 19:02:52 +0200 (Wed, 07 Jun 2006) | 1 line
Mention other placeholders
........
r46709 | andrew.kuchling | 2006-06-07 19:03:46 +0200 (Wed, 07 Jun 2006) | 1 line
Add an item; also, escape %
........
r46710 | andrew.kuchling | 2006-06-07 19:04:01 +0200 (Wed, 07 Jun 2006) | 1 line
Mention other placeholders
........
r46716 | ronald.oussoren | 2006-06-07 20:57:44 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/Tools one level up
........
r46717 | ronald.oussoren | 2006-06-07 20:58:01 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/PythonLauncher one level up
........
r46718 | ronald.oussoren | 2006-06-07 20:58:42 +0200 (Wed, 07 Jun 2006) | 2 lines
mv Mac/OSX/BuildScript one level up
........
r46719 | ronald.oussoren | 2006-06-07 21:02:03 +0200 (Wed, 07 Jun 2006) | 2 lines
Move Mac/OSX/* one level up
........
r46720 | ronald.oussoren | 2006-06-07 21:06:01 +0200 (Wed, 07 Jun 2006) | 2 lines
And the last bit: move IDLE one level up and adjust makefiles
........
r46723 | ronald.oussoren | 2006-06-07 21:38:53 +0200 (Wed, 07 Jun 2006) | 4 lines
- Patch the correct version of python in the Info.plists at build time, instead
of relying on a maintainer to update them before releases.
- Remove the now empty Mac/OSX directory
........
r46727 | ronald.oussoren | 2006-06-07 22:18:44 +0200 (Wed, 07 Jun 2006) | 7 lines
* If BuildApplet.py is used as an applet it starts with a version of
sys.exutable that isn't usuable on an #!-line. That results in generated
applets that don't actually work. Work around this problem by resetting
sys.executable.
* argvemulator.py didn't work on intel macs. This patch fixes this
(bug #1491468)
........
r46728 | tim.peters | 2006-06-07 22:40:06 +0200 (Wed, 07 Jun 2006) | 2 lines
Whitespace normalization.
........
r46729 | tim.peters | 2006-06-07 22:40:54 +0200 (Wed, 07 Jun 2006) | 2 lines
Add missing svn:eol-style property to text files.
........
r46730 | thomas.heller | 2006-06-07 22:43:06 +0200 (Wed, 07 Jun 2006) | 7 lines
Fix for foreign functions returning small structures on 64-bit big
endian machines. Should fix the remaininf failure in the PPC64
Debian buildbot.
Thanks to Matthias Klose for providing access to a machine to debug
and test this.
........
r46731 | brett.cannon | 2006-06-07 23:48:17 +0200 (Wed, 07 Jun 2006) | 2 lines
Clarify documentation for bf_getcharbuffer.
........
r46735 | neal.norwitz | 2006-06-08 07:12:45 +0200 (Thu, 08 Jun 2006) | 1 line
Fix a refleak in recvfrom_into
........
r46736 | gregory.p.smith | 2006-06-08 07:17:08 +0200 (Thu, 08 Jun 2006) | 9 lines
- bsddb: the bsddb.dbtables Modify method now raises the proper error and
aborts the db transaction safely when a modifier callback fails.
Fixes SF python patch/bug #1408584.
Also cleans up the bsddb.dbtables docstrings since thats the only
documentation that exists for that unadvertised module. (people
really should really just use sqlite3)
........
r46737 | gregory.p.smith | 2006-06-08 07:38:11 +0200 (Thu, 08 Jun 2006) | 4 lines
* Turn the deadlock situation described in SF bug #775414 into a
DBDeadLockError exception.
* add the test case for my previous dbtables commit.
........
r46738 | gregory.p.smith | 2006-06-08 07:39:54 +0200 (Thu, 08 Jun 2006) | 2 lines
pasted set_lk_detect line in wrong spot in previous commit. fixed. passes tests this time.
........
r46739 | armin.rigo | 2006-06-08 12:56:24 +0200 (Thu, 08 Jun 2006) | 6 lines
(arre, arigo) SF bug #1350060
Give a consistent behavior for comparison and hashing of method objects
(both user- and built-in methods). Now compares the 'self' recursively.
The hash was already asking for the hash of 'self'.
........
r46740 | andrew.kuchling | 2006-06-08 13:56:44 +0200 (Thu, 08 Jun 2006) | 1 line
Typo fix
........
r46741 | georg.brandl | 2006-06-08 14:45:01 +0200 (Thu, 08 Jun 2006) | 2 lines
Bug #1502750: Fix getargs "i" format to use LONG_MIN and LONG_MAX for bounds checking.
........
r46743 | georg.brandl | 2006-06-08 14:54:13 +0200 (Thu, 08 Jun 2006) | 2 lines
Bug #1502728: Correctly link against librt library on HP-UX.
........
r46745 | georg.brandl | 2006-06-08 14:55:47 +0200 (Thu, 08 Jun 2006) | 3 lines
Add news for recent bugfix.
........
r46746 | georg.brandl | 2006-06-08 15:31:07 +0200 (Thu, 08 Jun 2006) | 4 lines
Argh. "integer" is a very confusing word ;)
Actually, checking for INT_MAX and INT_MIN is correct since
the format code explicitly handles a C "int".
........
r46748 | nick.coghlan | 2006-06-08 15:54:49 +0200 (Thu, 08 Jun 2006) | 1 line
Add functools.update_wrapper() and functools.wraps() as described in PEP 356
........
r46751 | georg.brandl | 2006-06-08 16:50:21 +0200 (Thu, 08 Jun 2006) | 4 lines
Bug #1502805: don't alias file.__exit__ to file.close since the
latter can return something that's true.
........
r46752 | georg.brandl | 2006-06-08 16:50:53 +0200 (Thu, 08 Jun 2006) | 3 lines
Convert test_file to unittest.
........
2006-06-08 12:35:45 -03:00
|
|
|
Tkapp_MainLoop(PyObject *selfptr, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
int threshold = 0;
|
|
|
|
TkappObject *self = (TkappObject*)selfptr;
|
1998-10-09 17:51:18 -03:00
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
PyThreadState *tstate = PyThreadState_Get();
|
1998-10-09 17:51:18 -03:00
|
|
|
#endif
|
1994-11-10 18:50:21 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "|i:mainloop", &threshold))
|
|
|
|
return NULL;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
CHECK_TCL_APPARTMENT;
|
|
|
|
self->dispatching = 1;
|
2002-12-12 13:07:58 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
quitMainLoop = 0;
|
|
|
|
while (Tk_GetNumMainWindows() > threshold &&
|
|
|
|
!quitMainLoop &&
|
|
|
|
!errorInCmd)
|
|
|
|
{
|
|
|
|
int result;
|
1998-05-28 20:06:38 -03:00
|
|
|
|
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
if (self->threaded) {
|
|
|
|
/* Allow other Python threads to run. */
|
|
|
|
ENTER_TCL
|
|
|
|
result = Tcl_DoOneEvent(0);
|
|
|
|
LEAVE_TCL
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
Py_BEGIN_ALLOW_THREADS
|
|
|
|
if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1);
|
|
|
|
tcl_tstate = tstate;
|
|
|
|
result = Tcl_DoOneEvent(TCL_DONT_WAIT);
|
|
|
|
tcl_tstate = NULL;
|
|
|
|
if(tcl_lock)PyThread_release_lock(tcl_lock);
|
|
|
|
if (result == 0)
|
|
|
|
Sleep(Tkinter_busywaitinterval);
|
|
|
|
Py_END_ALLOW_THREADS
|
|
|
|
}
|
1997-08-18 22:00:50 -03:00
|
|
|
#else
|
2010-05-09 12:52:27 -03:00
|
|
|
result = Tcl_DoOneEvent(0);
|
1997-08-18 22:00:50 -03:00
|
|
|
#endif
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (PyErr_CheckSignals() != 0) {
|
|
|
|
self->dispatching = 0;
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (result < 0)
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
self->dispatching = 0;
|
|
|
|
quitMainLoop = 0;
|
|
|
|
|
|
|
|
if (errorInCmd) {
|
|
|
|
errorInCmd = 0;
|
|
|
|
PyErr_Restore(excInCmd, valInCmd, trbInCmd);
|
|
|
|
excInCmd = valInCmd = trbInCmd = NULL;
|
|
|
|
return NULL;
|
|
|
|
}
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1995-01-10 13:42:51 -04:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_DoOneEvent(PyObject *self, PyObject *args)
|
1995-01-10 13:42:51 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
int flags = 0;
|
|
|
|
int rv;
|
1995-01-10 13:42:51 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "|i:dooneevent", &flags))
|
|
|
|
return NULL;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
ENTER_TCL
|
|
|
|
rv = Tcl_DoOneEvent(flags);
|
|
|
|
LEAVE_TCL
|
|
|
|
return Py_BuildValue("i", rv);
|
1995-01-10 13:42:51 -04:00
|
|
|
}
|
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_Quit(PyObject *self, PyObject *args)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, ":quit"))
|
|
|
|
return NULL;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
quitMainLoop = 1;
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1998-04-29 13:17:01 -03:00
|
|
|
static PyObject *
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_InterpAddr(PyObject *self, PyObject *args)
|
1998-04-29 13:17:01 -03:00
|
|
|
{
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, ":interpaddr"))
|
|
|
|
return NULL;
|
1998-04-29 13:17:01 -03:00
|
|
|
|
2013-09-04 19:22:24 -03:00
|
|
|
return PyLong_FromVoidPtr(Tkapp_Interp(self));
|
1998-04-29 13:17:01 -03:00
|
|
|
}
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
static PyObject *
|
2004-02-18 01:59:53 -04:00
|
|
|
Tkapp_TkInit(PyObject *self, PyObject *args)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_Interp *interp = Tkapp_Interp(self);
|
|
|
|
const char * _tk_exists = NULL;
|
|
|
|
int err;
|
2009-02-09 18:33:59 -04:00
|
|
|
|
|
|
|
#ifdef TKINTER_PROTECT_LOADTK
|
2010-05-09 12:52:27 -03:00
|
|
|
/* Up to Tk 8.4.13, Tk_Init deadlocks on the second call when the
|
|
|
|
* first call failed.
|
|
|
|
* To avoid the deadlock, we just refuse the second call through
|
|
|
|
* a static variable.
|
|
|
|
*/
|
|
|
|
if (tk_load_failed) {
|
|
|
|
PyErr_SetString(Tkinter_TclError, TKINTER_LOADTK_ERRMSG);
|
|
|
|
return NULL;
|
|
|
|
}
|
2009-02-09 18:33:59 -04:00
|
|
|
#endif
|
2007-11-21 16:09:18 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
/* We want to guard against calling Tk_Init() multiple times */
|
|
|
|
CHECK_TCL_APPARTMENT;
|
|
|
|
ENTER_TCL
|
|
|
|
err = Tcl_Eval(Tkapp_Interp(self), "info exists tk_version");
|
|
|
|
ENTER_OVERLAP
|
|
|
|
if (err == TCL_ERROR) {
|
|
|
|
/* This sets an exception, but we cannot return right
|
|
|
|
away because we need to exit the overlap first. */
|
|
|
|
Tkinter_Error(self);
|
|
|
|
} else {
|
|
|
|
_tk_exists = Tkapp_Result(self);
|
|
|
|
}
|
|
|
|
LEAVE_OVERLAP_TCL
|
|
|
|
if (err == TCL_ERROR) {
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (_tk_exists == NULL || strcmp(_tk_exists, "1") != 0) {
|
|
|
|
if (Tk_Init(interp) == TCL_ERROR) {
|
2012-10-16 16:50:34 -03:00
|
|
|
PyErr_SetString(Tkinter_TclError,
|
|
|
|
Tcl_GetStringResult(Tkapp_Interp(self)));
|
2009-02-09 18:33:59 -04:00
|
|
|
#ifdef TKINTER_PROTECT_LOADTK
|
2010-05-09 12:52:27 -03:00
|
|
|
tk_load_failed = 1;
|
2009-02-09 18:33:59 -04:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
}
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
2004-02-18 01:59:53 -04:00
|
|
|
}
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2002-11-26 05:28:05 -04:00
|
|
|
static PyObject *
|
|
|
|
Tkapp_WantObjects(PyObject *self, PyObject *args)
|
|
|
|
{
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
int wantobjects = -1;
|
|
|
|
if (!PyArg_ParseTuple(args, "|i:wantobjects", &wantobjects))
|
|
|
|
return NULL;
|
|
|
|
if (wantobjects == -1)
|
|
|
|
return PyBool_FromLong(((TkappObject*)self)->wantobjects);
|
|
|
|
((TkappObject*)self)->wantobjects = wantobjects;
|
2002-11-26 05:28:05 -04:00
|
|
|
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
2002-11-26 05:28:05 -04:00
|
|
|
}
|
|
|
|
|
2002-12-28 05:23:09 -04:00
|
|
|
static PyObject *
|
|
|
|
Tkapp_WillDispatch(PyObject *self, PyObject *args)
|
|
|
|
{
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
((TkappObject*)self)->dispatching = 1;
|
2002-12-28 05:23:09 -04:00
|
|
|
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
2002-12-28 05:23:09 -04:00
|
|
|
}
|
2002-11-26 05:28:05 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/**** Tkapp Method List ****/
|
|
|
|
|
|
|
|
static PyMethodDef Tkapp_methods[] =
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
{"willdispatch", Tkapp_WillDispatch, METH_NOARGS},
|
|
|
|
{"wantobjects", Tkapp_WantObjects, METH_VARARGS},
|
|
|
|
{"call", Tkapp_Call, METH_VARARGS},
|
|
|
|
{"eval", Tkapp_Eval, METH_VARARGS},
|
|
|
|
{"evalfile", Tkapp_EvalFile, METH_VARARGS},
|
|
|
|
{"record", Tkapp_Record, METH_VARARGS},
|
|
|
|
{"adderrorinfo", Tkapp_AddErrorInfo, METH_VARARGS},
|
|
|
|
{"setvar", Tkapp_SetVar, METH_VARARGS},
|
|
|
|
{"globalsetvar", Tkapp_GlobalSetVar, METH_VARARGS},
|
|
|
|
{"getvar", Tkapp_GetVar, METH_VARARGS},
|
|
|
|
{"globalgetvar", Tkapp_GlobalGetVar, METH_VARARGS},
|
|
|
|
{"unsetvar", Tkapp_UnsetVar, METH_VARARGS},
|
|
|
|
{"globalunsetvar", Tkapp_GlobalUnsetVar, METH_VARARGS},
|
|
|
|
{"getint", Tkapp_GetInt, METH_VARARGS},
|
|
|
|
{"getdouble", Tkapp_GetDouble, METH_VARARGS},
|
|
|
|
{"getboolean", Tkapp_GetBoolean, METH_VARARGS},
|
|
|
|
{"exprstring", Tkapp_ExprString, METH_VARARGS},
|
|
|
|
{"exprlong", Tkapp_ExprLong, METH_VARARGS},
|
|
|
|
{"exprdouble", Tkapp_ExprDouble, METH_VARARGS},
|
|
|
|
{"exprboolean", Tkapp_ExprBoolean, METH_VARARGS},
|
|
|
|
{"splitlist", Tkapp_SplitList, METH_VARARGS},
|
|
|
|
{"split", Tkapp_Split, METH_VARARGS},
|
|
|
|
{"createcommand", Tkapp_CreateCommand, METH_VARARGS},
|
|
|
|
{"deletecommand", Tkapp_DeleteCommand, METH_VARARGS},
|
1997-08-14 16:57:07 -03:00
|
|
|
#ifdef HAVE_CREATEFILEHANDLER
|
2010-05-09 12:52:27 -03:00
|
|
|
{"createfilehandler", Tkapp_CreateFileHandler, METH_VARARGS},
|
|
|
|
{"deletefilehandler", Tkapp_DeleteFileHandler, METH_VARARGS},
|
1997-08-06 21:12:22 -03:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
{"createtimerhandler", Tkapp_CreateTimerHandler, METH_VARARGS},
|
|
|
|
{"mainloop", Tkapp_MainLoop, METH_VARARGS},
|
|
|
|
{"dooneevent", Tkapp_DoOneEvent, METH_VARARGS},
|
|
|
|
{"quit", Tkapp_Quit, METH_VARARGS},
|
|
|
|
{"interpaddr", Tkapp_InterpAddr, METH_VARARGS},
|
|
|
|
{"loadtk", Tkapp_TkInit, METH_NOARGS},
|
|
|
|
{NULL, NULL}
|
1994-06-20 04:49:28 -03:00
|
|
|
};
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/**** Tkapp Type Methods ****/
|
|
|
|
|
|
|
|
static void
|
2000-07-08 01:04:38 -03:00
|
|
|
Tkapp_Dealloc(PyObject *self)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2013-08-10 19:22:30 -03:00
|
|
|
PyObject *tp = (PyObject *) Py_TYPE(self);
|
2010-05-09 12:52:27 -03:00
|
|
|
/*CHECK_TCL_APPARTMENT;*/
|
|
|
|
ENTER_TCL
|
|
|
|
Tcl_DeleteInterp(Tkapp_Interp(self));
|
|
|
|
LEAVE_TCL
|
|
|
|
PyObject_Del(self);
|
2013-08-10 19:22:30 -03:00
|
|
|
Py_DECREF(tp);
|
2010-05-09 12:52:27 -03:00
|
|
|
DisableEventHook();
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
static PyType_Slot Tkapp_Type_slots[] = {
|
|
|
|
{Py_tp_dealloc, Tkapp_Dealloc},
|
|
|
|
{Py_tp_methods, Tkapp_methods},
|
|
|
|
{0, 0}
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
static PyType_Spec Tkapp_Type_spec = {
|
|
|
|
"tkapp",
|
|
|
|
sizeof(TkappObject),
|
|
|
|
0,
|
|
|
|
Py_TPFLAGS_DEFAULT,
|
|
|
|
Tkapp_Type_slots,
|
1994-06-20 04:49:28 -03:00
|
|
|
};
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
/**** Tkinter Module ****/
|
|
|
|
|
2000-06-18 15:45:50 -03:00
|
|
|
typedef struct {
|
2010-05-09 12:52:27 -03:00
|
|
|
PyObject* tuple;
|
|
|
|
int size; /* current size */
|
|
|
|
int maxsize; /* allocated size */
|
2000-06-18 15:45:50 -03:00
|
|
|
} FlattenContext;
|
|
|
|
|
|
|
|
static int
|
|
|
|
_bump(FlattenContext* context, int size)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
/* expand tuple to hold (at least) size new items.
|
|
|
|
return true if successful, false if an exception was raised */
|
2000-06-18 15:45:50 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
int maxsize = context->maxsize * 2;
|
2000-06-18 15:45:50 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (maxsize < context->size + size)
|
|
|
|
maxsize = context->size + size;
|
2000-06-18 15:45:50 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
context->maxsize = maxsize;
|
2000-06-18 15:45:50 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
return _PyTuple_Resize(&context->tuple, maxsize) >= 0;
|
2000-06-18 15:45:50 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2000-06-18 21:55:09 -03:00
|
|
|
_flatten1(FlattenContext* context, PyObject* item, int depth)
|
2000-06-18 15:45:50 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
/* add tuple or list to argument tuple (recursively) */
|
|
|
|
|
|
|
|
int i, size;
|
|
|
|
|
|
|
|
if (depth > 1000) {
|
|
|
|
PyErr_SetString(PyExc_ValueError,
|
|
|
|
"nesting too deep in _flatten");
|
|
|
|
return 0;
|
|
|
|
} else if (PyList_Check(item)) {
|
|
|
|
size = PyList_GET_SIZE(item);
|
|
|
|
/* preallocate (assume no nesting) */
|
|
|
|
if (context->size + size > context->maxsize &&
|
|
|
|
!_bump(context, size))
|
|
|
|
return 0;
|
|
|
|
/* copy items to output tuple */
|
|
|
|
for (i = 0; i < size; i++) {
|
|
|
|
PyObject *o = PyList_GET_ITEM(item, i);
|
|
|
|
if (PyList_Check(o) || PyTuple_Check(o)) {
|
|
|
|
if (!_flatten1(context, o, depth + 1))
|
|
|
|
return 0;
|
|
|
|
} else if (o != Py_None) {
|
|
|
|
if (context->size + 1 > context->maxsize &&
|
|
|
|
!_bump(context, 1))
|
|
|
|
return 0;
|
|
|
|
Py_INCREF(o);
|
|
|
|
PyTuple_SET_ITEM(context->tuple,
|
|
|
|
context->size++, o);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
} else if (PyTuple_Check(item)) {
|
|
|
|
/* same, for tuples */
|
|
|
|
size = PyTuple_GET_SIZE(item);
|
|
|
|
if (context->size + size > context->maxsize &&
|
|
|
|
!_bump(context, size))
|
|
|
|
return 0;
|
|
|
|
for (i = 0; i < size; i++) {
|
|
|
|
PyObject *o = PyTuple_GET_ITEM(item, i);
|
|
|
|
if (PyList_Check(o) || PyTuple_Check(o)) {
|
|
|
|
if (!_flatten1(context, o, depth + 1))
|
|
|
|
return 0;
|
|
|
|
} else if (o != Py_None) {
|
|
|
|
if (context->size + 1 > context->maxsize &&
|
|
|
|
!_bump(context, 1))
|
|
|
|
return 0;
|
|
|
|
Py_INCREF(o);
|
|
|
|
PyTuple_SET_ITEM(context->tuple,
|
|
|
|
context->size++, o);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
PyErr_SetString(PyExc_TypeError, "argument must be sequence");
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
return 1;
|
2000-06-18 15:45:50 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static PyObject *
|
|
|
|
Tkinter_Flatten(PyObject* self, PyObject* args)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
FlattenContext context;
|
|
|
|
PyObject* item;
|
2000-06-18 15:45:50 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "O:_flatten", &item))
|
|
|
|
return NULL;
|
2000-06-18 15:45:50 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
context.maxsize = PySequence_Size(item);
|
|
|
|
if (context.maxsize < 0)
|
|
|
|
return NULL;
|
|
|
|
if (context.maxsize == 0)
|
|
|
|
return PyTuple_New(0);
|
2007-11-21 16:09:18 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
context.tuple = PyTuple_New(context.maxsize);
|
|
|
|
if (!context.tuple)
|
|
|
|
return NULL;
|
2007-11-21 16:09:18 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
context.size = 0;
|
2000-06-18 15:45:50 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!_flatten1(&context, item,0))
|
|
|
|
return NULL;
|
2000-06-18 15:45:50 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (_PyTuple_Resize(&context.tuple, context.size))
|
|
|
|
return NULL;
|
2000-06-18 15:45:50 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
return context.tuple;
|
2000-06-18 15:45:50 -03:00
|
|
|
}
|
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyObject *
|
2000-07-21 03:00:07 -03:00
|
|
|
Tkinter_Create(PyObject *self, PyObject *args)
|
1997-01-15 20:15:11 -04:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
char *screenName = NULL;
|
|
|
|
char *baseName = NULL; /* XXX this is not used anymore;
|
|
|
|
try getting rid of it. */
|
|
|
|
char *className = NULL;
|
|
|
|
int interactive = 0;
|
|
|
|
int wantobjects = 0;
|
|
|
|
int wantTk = 1; /* If false, then Tk_Init() doesn't get called */
|
|
|
|
int sync = 0; /* pass -sync to wish */
|
|
|
|
char *use = NULL; /* pass -use to wish */
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
className = "Tk";
|
2007-11-21 16:09:18 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (!PyArg_ParseTuple(args, "|zssiiiiz:create",
|
|
|
|
&screenName, &baseName, &className,
|
|
|
|
&interactive, &wantobjects, &wantTk,
|
|
|
|
&sync, &use))
|
|
|
|
return NULL;
|
1994-06-20 04:49:28 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
return (PyObject *) Tkapp_New(screenName, className,
|
2012-10-16 16:50:34 -03:00
|
|
|
interactive, wantobjects, wantTk,
|
2010-05-09 12:52:27 -03:00
|
|
|
sync, use);
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
2003-05-09 05:19:48 -03:00
|
|
|
static PyObject *
|
|
|
|
Tkinter_setbusywaitinterval(PyObject *self, PyObject *args)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
int new_val;
|
|
|
|
if (!PyArg_ParseTuple(args, "i:setbusywaitinterval", &new_val))
|
|
|
|
return NULL;
|
|
|
|
if (new_val < 0) {
|
|
|
|
PyErr_SetString(PyExc_ValueError,
|
|
|
|
"busywaitinterval must be >= 0");
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
Tkinter_busywaitinterval = new_val;
|
2012-10-07 06:08:38 -03:00
|
|
|
Py_RETURN_NONE;
|
2003-05-09 05:19:48 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static char setbusywaitinterval_doc[] =
|
|
|
|
"setbusywaitinterval(n) -> None\n\
|
|
|
|
\n\
|
|
|
|
Set the busy-wait interval in milliseconds between successive\n\
|
|
|
|
calls to Tcl_DoOneEvent in a threaded Python interpreter.\n\
|
|
|
|
It should be set to a divisor of the maximum time between\n\
|
|
|
|
frames in an animation.";
|
|
|
|
|
|
|
|
static PyObject *
|
|
|
|
Tkinter_getbusywaitinterval(PyObject *self, PyObject *args)
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
return PyLong_FromLong(Tkinter_busywaitinterval);
|
2003-05-09 05:19:48 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static char getbusywaitinterval_doc[] =
|
|
|
|
"getbusywaitinterval() -> int\n\
|
|
|
|
\n\
|
|
|
|
Return the current busy-wait interval between successive\n\
|
|
|
|
calls to Tcl_DoOneEvent in a threaded Python interpreter.";
|
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static PyMethodDef moduleMethods[] =
|
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
{"_flatten", Tkinter_Flatten, METH_VARARGS},
|
|
|
|
{"create", Tkinter_Create, METH_VARARGS},
|
|
|
|
{"setbusywaitinterval",Tkinter_setbusywaitinterval, METH_VARARGS,
|
|
|
|
setbusywaitinterval_doc},
|
|
|
|
{"getbusywaitinterval",(PyCFunction)Tkinter_getbusywaitinterval,
|
|
|
|
METH_NOARGS, getbusywaitinterval_doc},
|
|
|
|
{NULL, NULL}
|
1994-06-20 04:49:28 -03:00
|
|
|
};
|
|
|
|
|
1998-05-22 15:28:17 -03:00
|
|
|
#ifdef WAIT_FOR_STDIN
|
|
|
|
|
|
|
|
static int stdin_ready = 0;
|
|
|
|
|
1998-06-13 10:56:28 -03:00
|
|
|
#ifndef MS_WINDOWS
|
1998-05-22 15:28:17 -03:00
|
|
|
static void
|
2000-07-08 01:04:38 -03:00
|
|
|
MyFileProc(void *clientData, int mask)
|
1998-05-22 15:28:17 -03:00
|
|
|
{
|
2010-05-09 12:52:27 -03:00
|
|
|
stdin_ready = 1;
|
1998-05-22 15:28:17 -03:00
|
|
|
}
|
1998-06-13 10:56:28 -03:00
|
|
|
#endif
|
1998-05-22 15:28:17 -03:00
|
|
|
|
2003-03-30 04:44:58 -04:00
|
|
|
#ifdef WITH_THREAD
|
1998-05-28 20:06:38 -03:00
|
|
|
static PyThreadState *event_tstate = NULL;
|
2003-03-30 04:44:58 -04:00
|
|
|
#endif
|
1997-10-07 15:51:41 -03:00
|
|
|
|
1994-06-20 04:49:28 -03:00
|
|
|
static int
|
2000-07-21 03:00:07 -03:00
|
|
|
EventHook(void)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
1998-06-13 10:56:28 -03:00
|
|
|
#ifndef MS_WINDOWS
|
2010-05-09 12:52:27 -03:00
|
|
|
int tfile;
|
1998-06-13 10:56:28 -03:00
|
|
|
#endif
|
1998-11-16 23:45:24 -04:00
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
PyEval_RestoreThread(event_tstate);
|
1998-11-16 23:45:24 -04:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
stdin_ready = 0;
|
|
|
|
errorInCmd = 0;
|
1998-06-13 10:56:28 -03:00
|
|
|
#ifndef MS_WINDOWS
|
2010-05-09 12:52:27 -03:00
|
|
|
tfile = fileno(stdin);
|
|
|
|
Tcl_CreateFileHandler(tfile, TCL_READABLE, MyFileProc, NULL);
|
1998-06-13 10:56:28 -03:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
while (!errorInCmd && !stdin_ready) {
|
|
|
|
int result;
|
1998-06-13 10:56:28 -03:00
|
|
|
#ifdef MS_WINDOWS
|
2010-05-09 12:52:27 -03:00
|
|
|
if (_kbhit()) {
|
|
|
|
stdin_ready = 1;
|
|
|
|
break;
|
|
|
|
}
|
1998-06-13 10:56:28 -03:00
|
|
|
#endif
|
|
|
|
#if defined(WITH_THREAD) || defined(MS_WINDOWS)
|
2010-05-09 12:52:27 -03:00
|
|
|
Py_BEGIN_ALLOW_THREADS
|
|
|
|
if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1);
|
|
|
|
tcl_tstate = event_tstate;
|
1998-10-09 17:51:18 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
result = Tcl_DoOneEvent(TCL_DONT_WAIT);
|
1998-10-09 17:51:18 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
tcl_tstate = NULL;
|
|
|
|
if(tcl_lock)PyThread_release_lock(tcl_lock);
|
|
|
|
if (result == 0)
|
|
|
|
Sleep(Tkinter_busywaitinterval);
|
|
|
|
Py_END_ALLOW_THREADS
|
1998-05-28 20:06:38 -03:00
|
|
|
#else
|
2010-05-09 12:52:27 -03:00
|
|
|
result = Tcl_DoOneEvent(0);
|
1998-05-22 15:28:17 -03:00
|
|
|
#endif
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
if (result < 0)
|
|
|
|
break;
|
|
|
|
}
|
1998-06-13 10:56:28 -03:00
|
|
|
#ifndef MS_WINDOWS
|
2010-05-09 12:52:27 -03:00
|
|
|
Tcl_DeleteFileHandler(tfile);
|
1998-06-13 10:56:28 -03:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
if (errorInCmd) {
|
|
|
|
errorInCmd = 0;
|
|
|
|
PyErr_Restore(excInCmd, valInCmd, trbInCmd);
|
|
|
|
excInCmd = valInCmd = trbInCmd = NULL;
|
|
|
|
PyErr_Print();
|
|
|
|
}
|
1998-11-16 23:45:24 -04:00
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
PyEval_SaveThread();
|
1998-11-16 23:45:24 -04:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
return 0;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
#endif
|
|
|
|
|
1998-05-22 15:28:17 -03:00
|
|
|
static void
|
2000-07-21 03:00:07 -03:00
|
|
|
EnableEventHook(void)
|
1998-05-22 15:28:17 -03:00
|
|
|
{
|
1998-05-28 20:06:38 -03:00
|
|
|
#ifdef WAIT_FOR_STDIN
|
2010-05-09 12:52:27 -03:00
|
|
|
if (PyOS_InputHook == NULL) {
|
1998-11-16 23:45:24 -04:00
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
event_tstate = PyThreadState_Get();
|
1998-11-16 23:45:24 -04:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
PyOS_InputHook = EventHook;
|
|
|
|
}
|
1998-05-28 20:06:38 -03:00
|
|
|
#endif
|
1998-05-22 15:28:17 -03:00
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
2000-07-21 03:00:07 -03:00
|
|
|
DisableEventHook(void)
|
1998-05-22 15:28:17 -03:00
|
|
|
{
|
1998-05-28 20:06:38 -03:00
|
|
|
#ifdef WAIT_FOR_STDIN
|
2010-05-09 12:52:27 -03:00
|
|
|
if (Tk_GetNumMainWindows() == 0 && PyOS_InputHook == EventHook) {
|
|
|
|
PyOS_InputHook = NULL;
|
|
|
|
}
|
1998-05-28 20:06:38 -03:00
|
|
|
#endif
|
1998-05-22 15:28:17 -03:00
|
|
|
}
|
|
|
|
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2008-06-11 02:26:20 -03:00
|
|
|
static struct PyModuleDef _tkintermodule = {
|
2010-05-09 12:52:27 -03:00
|
|
|
PyModuleDef_HEAD_INIT,
|
|
|
|
"_tkinter",
|
|
|
|
NULL,
|
|
|
|
-1,
|
|
|
|
moduleMethods,
|
|
|
|
NULL,
|
|
|
|
NULL,
|
|
|
|
NULL,
|
|
|
|
NULL
|
2008-06-11 02:26:20 -03:00
|
|
|
};
|
|
|
|
|
2002-07-23 03:31:15 -03:00
|
|
|
PyMODINIT_FUNC
|
2008-06-11 02:26:20 -03:00
|
|
|
PyInit__tkinter(void)
|
1994-06-20 04:49:28 -03:00
|
|
|
{
|
2012-10-14 10:54:35 -03:00
|
|
|
PyObject *m, *uexe, *cexe, *o;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
1998-05-28 20:06:38 -03:00
|
|
|
#ifdef WITH_THREAD
|
2010-05-09 12:52:27 -03:00
|
|
|
tcl_lock = PyThread_allocate_lock();
|
2012-10-14 10:54:35 -03:00
|
|
|
if (tcl_lock == NULL)
|
|
|
|
return NULL;
|
1998-05-28 20:06:38 -03:00
|
|
|
#endif
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
m = PyModule_Create(&_tkintermodule);
|
|
|
|
if (m == NULL)
|
|
|
|
return NULL;
|
1997-01-15 20:15:11 -04:00
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
o = PyErr_NewException("_tkinter.TclError", NULL, NULL);
|
|
|
|
if (o == NULL) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
Py_INCREF(o);
|
|
|
|
if (PyModule_AddObject(m, "TclError", o)) {
|
|
|
|
Py_DECREF(o);
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
Tkinter_TclError = o;
|
2012-10-07 06:30:51 -03:00
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
if (PyModule_AddIntConstant(m, "READABLE", TCL_READABLE)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddIntConstant(m, "WRITABLE", TCL_WRITABLE)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddIntConstant(m, "EXCEPTION", TCL_EXCEPTION)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddIntConstant(m, "WINDOW_EVENTS", TCL_WINDOW_EVENTS)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddIntConstant(m, "FILE_EVENTS", TCL_FILE_EVENTS)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddIntConstant(m, "TIMER_EVENTS", TCL_TIMER_EVENTS)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddIntConstant(m, "IDLE_EVENTS", TCL_IDLE_EVENTS)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddIntConstant(m, "ALL_EVENTS", TCL_ALL_EVENTS)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddIntConstant(m, "DONT_WAIT", TCL_DONT_WAIT)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddStringConstant(m, "TK_VERSION", TK_VERSION)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddStringConstant(m, "TCL_VERSION", TCL_VERSION)) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
2012-10-07 06:30:51 -03:00
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
o = PyType_FromSpec(&Tkapp_Type_spec);
|
|
|
|
if (o == NULL) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddObject(m, "TkappType", o)) {
|
|
|
|
Py_DECREF(o);
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
Tkapp_Type = o;
|
1998-05-28 20:06:38 -03:00
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
o = PyType_FromSpec(&Tktt_Type_spec);
|
|
|
|
if (o == NULL) {
|
2012-07-19 16:18:07 -03:00
|
|
|
Py_DECREF(m);
|
2010-05-09 12:52:27 -03:00
|
|
|
return NULL;
|
2012-07-19 16:18:07 -03:00
|
|
|
}
|
2012-10-14 10:54:35 -03:00
|
|
|
if (PyModule_AddObject(m, "TkttType", o)) {
|
|
|
|
Py_DECREF(o);
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
Tktt_Type = o;
|
1997-09-12 21:44:23 -03:00
|
|
|
|
2012-10-14 10:54:35 -03:00
|
|
|
o = PyType_FromSpec(&PyTclObject_Type_spec);
|
|
|
|
if (o == NULL) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (PyModule_AddObject(m, "Tcl_Obj", o)) {
|
|
|
|
Py_DECREF(o);
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
PyTclObject_Type = o;
|
2001-12-09 19:15:56 -04:00
|
|
|
|
|
|
|
#ifdef TK_AQUA
|
2010-05-09 12:52:27 -03:00
|
|
|
/* Tk_MacOSXSetupTkNotifier must be called before Tcl's subsystems
|
|
|
|
* start waking up. Note that Tcl_FindExecutable will do this, this
|
|
|
|
* code must be above it! The original warning from
|
|
|
|
* tkMacOSXAppInit.c is copied below.
|
|
|
|
*
|
|
|
|
* NB - You have to swap in the Tk Notifier BEFORE you start up the
|
|
|
|
* Tcl interpreter for now. It probably should work to do this
|
|
|
|
* in the other order, but for now it doesn't seem to.
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
Tk_MacOSXSetupTkNotifier();
|
2001-12-09 19:15:56 -04:00
|
|
|
#endif
|
|
|
|
|
|
|
|
|
2010-05-09 12:52:27 -03:00
|
|
|
/* This helps the dynamic loader; in Unicode aware Tcl versions
|
|
|
|
it also helps Tcl find its encodings. */
|
|
|
|
uexe = PyUnicode_FromWideChar(Py_GetProgramName(), -1);
|
|
|
|
if (uexe) {
|
2010-05-15 13:27:27 -03:00
|
|
|
cexe = PyUnicode_EncodeFSDefault(uexe);
|
2010-05-09 12:52:27 -03:00
|
|
|
if (cexe)
|
|
|
|
Tcl_FindExecutable(PyBytes_AsString(cexe));
|
|
|
|
Py_XDECREF(cexe);
|
|
|
|
Py_DECREF(uexe);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (PyErr_Occurred()) {
|
|
|
|
Py_DECREF(m);
|
|
|
|
return NULL;
|
|
|
|
}
|
1998-02-06 18:35:46 -04:00
|
|
|
|
1998-07-14 15:02:13 -03:00
|
|
|
#if 0
|
2010-05-09 12:52:27 -03:00
|
|
|
/* This was not a good idea; through <Destroy> bindings,
|
|
|
|
Tcl_Finalize() may invoke Python code but at that point the
|
|
|
|
interpreter and thread state have already been destroyed! */
|
|
|
|
Py_AtExit(Tcl_Finalize);
|
1998-04-20 15:47:52 -03:00
|
|
|
#endif
|
2010-05-09 12:52:27 -03:00
|
|
|
return m;
|
1994-06-20 04:49:28 -03:00
|
|
|
}
|