mirror of
				https://github.com/python/cpython.git
				synced 2025-10-31 10:26:02 +00:00 
			
		
		
		
	
		
			
				
	
	
		
			1088 lines
		
	
	
	
		
			29 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			1088 lines
		
	
	
	
		
			29 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| 
 | |
| /* ========================== Module Drag =========================== */
 | |
| 
 | |
| #include "Python.h"
 | |
| 
 | |
| 
 | |
| 
 | |
| #define SystemSevenOrLater 1
 | |
| 
 | |
| #include "macglue.h"
 | |
| #include <Memory.h>
 | |
| #include <Dialogs.h>
 | |
| #include <Menus.h>
 | |
| #include <Controls.h>
 | |
| 
 | |
| extern PyObject *ResObj_New(Handle);
 | |
| extern int ResObj_Convert(PyObject *, Handle *);
 | |
| extern PyObject *OptResObj_New(Handle);
 | |
| extern int OptResObj_Convert(PyObject *, Handle *);
 | |
| 
 | |
| extern PyObject *WinObj_New(WindowPtr);
 | |
| extern int WinObj_Convert(PyObject *, WindowPtr *);
 | |
| extern PyTypeObject Window_Type;
 | |
| #define WinObj_Check(x) ((x)->ob_type == &Window_Type)
 | |
| 
 | |
| extern PyObject *DlgObj_New(DialogPtr);
 | |
| extern int DlgObj_Convert(PyObject *, DialogPtr *);
 | |
| extern PyTypeObject Dialog_Type;
 | |
| #define DlgObj_Check(x) ((x)->ob_type == &Dialog_Type)
 | |
| 
 | |
| extern PyObject *MenuObj_New(MenuHandle);
 | |
| extern int MenuObj_Convert(PyObject *, MenuHandle *);
 | |
| 
 | |
| extern PyObject *CtlObj_New(ControlHandle);
 | |
| extern int CtlObj_Convert(PyObject *, ControlHandle *);
 | |
| 
 | |
| extern PyObject *GrafObj_New(GrafPtr);
 | |
| extern int GrafObj_Convert(PyObject *, GrafPtr *);
 | |
| 
 | |
| extern PyObject *BMObj_New(BitMapPtr);
 | |
| extern int BMObj_Convert(PyObject *, BitMapPtr *);
 | |
| 
 | |
| extern PyObject *WinObj_WhichWindow(WindowPtr);
 | |
| 
 | |
| #include <Drag.h>
 | |
| 
 | |
| #define resNotFound -192 /* Can't include <Errors.h> because of Python's "errors.h" */
 | |
| /* Exported by Qdmodule.c: */
 | |
| extern PyObject *QdRGB_New(RGBColor *);
 | |
| extern int QdRGB_Convert(PyObject *, RGBColor *);
 | |
| 
 | |
| 
 | |
| /* Exported by AEModule.c: */
 | |
| extern PyObject *AEDesc_New(AppleEvent *);
 | |
| extern int AEDesc_Convert(PyObject *, AppleEvent *);
 | |
| 
 | |
| /* Callback glue routines */
 | |
| DragTrackingHandlerUPP dragglue_TrackingHandlerUPP;
 | |
| DragReceiveHandlerUPP dragglue_ReceiveHandlerUPP;
 | |
| DragSendDataUPP dragglue_SendDataUPP;
 | |
| #if 0
 | |
| DragInputUPP dragglue_InputUPP;
 | |
| DragDrawingUPP dragglue_DrawingUPP;
 | |
| #endif
 | |
| 
 | |
| static PyObject *Drag_Error;
 | |
| 
 | |
| /* ---------------------- Object type DragObj ----------------------- */
 | |
| 
 | |
| PyTypeObject DragObj_Type;
 | |
| 
 | |
| #define DragObj_Check(x) ((x)->ob_type == &DragObj_Type)
 | |
| 
 | |
| typedef struct DragObjObject {
 | |
| 	PyObject_HEAD
 | |
| 	DragReference ob_itself;
 | |
| 	PyObject *sendproc;
 | |
| } DragObjObject;
 | |
| 
 | |
| PyObject *DragObj_New(itself)
 | |
| 	DragReference itself;
 | |
| {
 | |
| 	DragObjObject *it;
 | |
| 	if (itself == NULL) {
 | |
| 						PyErr_SetString(Drag_Error,"Cannot create null Drag");
 | |
| 						return NULL;
 | |
| 					}
 | |
| 	it = PyObject_NEW(DragObjObject, &DragObj_Type);
 | |
| 	if (it == NULL) return NULL;
 | |
| 	it->ob_itself = itself;
 | |
| 	it->sendproc = NULL;
 | |
| 	return (PyObject *)it;
 | |
| }
 | |
| DragObj_Convert(v, p_itself)
 | |
| 	PyObject *v;
 | |
| 	DragReference *p_itself;
 | |
| {
 | |
| 	if (!DragObj_Check(v))
 | |
| 	{
 | |
| 		PyErr_SetString(PyExc_TypeError, "DragObj required");
 | |
| 		return 0;
 | |
| 	}
 | |
| 	*p_itself = ((DragObjObject *)v)->ob_itself;
 | |
| 	return 1;
 | |
| }
 | |
| 
 | |
| static void DragObj_dealloc(self)
 | |
| 	DragObjObject *self;
 | |
| {
 | |
| 	Py_XDECREF(self->sendproc);
 | |
| 	PyMem_DEL(self);
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_DisposeDrag(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	if (!PyArg_ParseTuple(_args, ""))
 | |
| 		return NULL;
 | |
| 	_err = DisposeDrag(_self->ob_itself);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_AddDragItemFlavor(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	ItemReference theItemRef;
 | |
| 	FlavorType theType;
 | |
| 	char *dataPtr__in__;
 | |
| 	long dataPtr__len__;
 | |
| 	int dataPtr__in_len__;
 | |
| 	FlavorFlags theFlags;
 | |
| 	if (!PyArg_ParseTuple(_args, "lO&z#l",
 | |
| 	                      &theItemRef,
 | |
| 	                      PyMac_GetOSType, &theType,
 | |
| 	                      &dataPtr__in__, &dataPtr__in_len__,
 | |
| 	                      &theFlags))
 | |
| 		return NULL;
 | |
| 	dataPtr__len__ = dataPtr__in_len__;
 | |
| 	_err = AddDragItemFlavor(_self->ob_itself,
 | |
| 	                         theItemRef,
 | |
| 	                         theType,
 | |
| 	                         dataPtr__in__, dataPtr__len__,
 | |
| 	                         theFlags);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
|  dataPtr__error__: ;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_SetDragItemFlavorData(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	ItemReference theItemRef;
 | |
| 	FlavorType theType;
 | |
| 	char *dataPtr__in__;
 | |
| 	long dataPtr__len__;
 | |
| 	int dataPtr__in_len__;
 | |
| 	UInt32 dataOffset;
 | |
| 	if (!PyArg_ParseTuple(_args, "lO&z#l",
 | |
| 	                      &theItemRef,
 | |
| 	                      PyMac_GetOSType, &theType,
 | |
| 	                      &dataPtr__in__, &dataPtr__in_len__,
 | |
| 	                      &dataOffset))
 | |
| 		return NULL;
 | |
| 	dataPtr__len__ = dataPtr__in_len__;
 | |
| 	_err = SetDragItemFlavorData(_self->ob_itself,
 | |
| 	                             theItemRef,
 | |
| 	                             theType,
 | |
| 	                             dataPtr__in__, dataPtr__len__,
 | |
| 	                             dataOffset);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
|  dataPtr__error__: ;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_SetDragImage(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	PixMapHandle imagePixMap;
 | |
| 	RgnHandle imageRgn;
 | |
| 	Point imageOffsetPt;
 | |
| 	DragImageFlags theImageFlags;
 | |
| 	if (!PyArg_ParseTuple(_args, "O&O&O&l",
 | |
| 	                      ResObj_Convert, &imagePixMap,
 | |
| 	                      ResObj_Convert, &imageRgn,
 | |
| 	                      PyMac_GetPoint, &imageOffsetPt,
 | |
| 	                      &theImageFlags))
 | |
| 		return NULL;
 | |
| 	_err = SetDragImage(_self->ob_itself,
 | |
| 	                    imagePixMap,
 | |
| 	                    imageRgn,
 | |
| 	                    imageOffsetPt,
 | |
| 	                    theImageFlags);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_TrackDrag(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	EventRecord theEvent;
 | |
| 	RgnHandle theRegion;
 | |
| 	if (!PyArg_ParseTuple(_args, "O&O&",
 | |
| 	                      PyMac_GetEventRecord, &theEvent,
 | |
| 	                      ResObj_Convert, &theRegion))
 | |
| 		return NULL;
 | |
| 	_err = TrackDrag(_self->ob_itself,
 | |
| 	                 &theEvent,
 | |
| 	                 theRegion);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_CountDragItems(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	UInt16 numItems;
 | |
| 	if (!PyArg_ParseTuple(_args, ""))
 | |
| 		return NULL;
 | |
| 	_err = CountDragItems(_self->ob_itself,
 | |
| 	                      &numItems);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("H",
 | |
| 	                     numItems);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetDragItemReferenceNumber(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	UInt16 index;
 | |
| 	ItemReference theItemRef;
 | |
| 	if (!PyArg_ParseTuple(_args, "H",
 | |
| 	                      &index))
 | |
| 		return NULL;
 | |
| 	_err = GetDragItemReferenceNumber(_self->ob_itself,
 | |
| 	                                  index,
 | |
| 	                                  &theItemRef);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("l",
 | |
| 	                     theItemRef);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_CountDragItemFlavors(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	ItemReference theItemRef;
 | |
| 	UInt16 numFlavors;
 | |
| 	if (!PyArg_ParseTuple(_args, "l",
 | |
| 	                      &theItemRef))
 | |
| 		return NULL;
 | |
| 	_err = CountDragItemFlavors(_self->ob_itself,
 | |
| 	                            theItemRef,
 | |
| 	                            &numFlavors);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("H",
 | |
| 	                     numFlavors);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetFlavorType(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	ItemReference theItemRef;
 | |
| 	UInt16 index;
 | |
| 	FlavorType theType;
 | |
| 	if (!PyArg_ParseTuple(_args, "lH",
 | |
| 	                      &theItemRef,
 | |
| 	                      &index))
 | |
| 		return NULL;
 | |
| 	_err = GetFlavorType(_self->ob_itself,
 | |
| 	                     theItemRef,
 | |
| 	                     index,
 | |
| 	                     &theType);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("O&",
 | |
| 	                     PyMac_BuildOSType, theType);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetFlavorFlags(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	ItemReference theItemRef;
 | |
| 	FlavorType theType;
 | |
| 	FlavorFlags theFlags;
 | |
| 	if (!PyArg_ParseTuple(_args, "lO&",
 | |
| 	                      &theItemRef,
 | |
| 	                      PyMac_GetOSType, &theType))
 | |
| 		return NULL;
 | |
| 	_err = GetFlavorFlags(_self->ob_itself,
 | |
| 	                      theItemRef,
 | |
| 	                      theType,
 | |
| 	                      &theFlags);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("l",
 | |
| 	                     theFlags);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetFlavorDataSize(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	ItemReference theItemRef;
 | |
| 	FlavorType theType;
 | |
| 	Size dataSize;
 | |
| 	if (!PyArg_ParseTuple(_args, "lO&",
 | |
| 	                      &theItemRef,
 | |
| 	                      PyMac_GetOSType, &theType))
 | |
| 		return NULL;
 | |
| 	_err = GetFlavorDataSize(_self->ob_itself,
 | |
| 	                         theItemRef,
 | |
| 	                         theType,
 | |
| 	                         &dataSize);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("l",
 | |
| 	                     dataSize);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetFlavorData(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	ItemReference theItemRef;
 | |
| 	FlavorType theType;
 | |
| 	char *dataPtr__out__;
 | |
| 	long dataPtr__len__;
 | |
| 	int dataPtr__in_len__;
 | |
| 	UInt32 dataOffset;
 | |
| 	if (!PyArg_ParseTuple(_args, "lO&il",
 | |
| 	                      &theItemRef,
 | |
| 	                      PyMac_GetOSType, &theType,
 | |
| 	                      &dataPtr__in_len__,
 | |
| 	                      &dataOffset))
 | |
| 		return NULL;
 | |
| 	if ((dataPtr__out__ = malloc(dataPtr__in_len__)) == NULL)
 | |
| 	{
 | |
| 		PyErr_NoMemory();
 | |
| 		goto dataPtr__error__;
 | |
| 	}
 | |
| 	dataPtr__len__ = dataPtr__in_len__;
 | |
| 	_err = GetFlavorData(_self->ob_itself,
 | |
| 	                     theItemRef,
 | |
| 	                     theType,
 | |
| 	                     dataPtr__out__, &dataPtr__len__,
 | |
| 	                     dataOffset);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("s#",
 | |
| 	                     dataPtr__out__, (int)dataPtr__len__);
 | |
| 	free(dataPtr__out__);
 | |
|  dataPtr__error__: ;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetDragItemBounds(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	ItemReference theItemRef;
 | |
| 	Rect itemBounds;
 | |
| 	if (!PyArg_ParseTuple(_args, "l",
 | |
| 	                      &theItemRef))
 | |
| 		return NULL;
 | |
| 	_err = GetDragItemBounds(_self->ob_itself,
 | |
| 	                         theItemRef,
 | |
| 	                         &itemBounds);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("O&",
 | |
| 	                     PyMac_BuildRect, &itemBounds);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_SetDragItemBounds(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	ItemReference theItemRef;
 | |
| 	Rect itemBounds;
 | |
| 	if (!PyArg_ParseTuple(_args, "lO&",
 | |
| 	                      &theItemRef,
 | |
| 	                      PyMac_GetRect, &itemBounds))
 | |
| 		return NULL;
 | |
| 	_err = SetDragItemBounds(_self->ob_itself,
 | |
| 	                         theItemRef,
 | |
| 	                         &itemBounds);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetDropLocation(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	AEDesc dropLocation;
 | |
| 	if (!PyArg_ParseTuple(_args, ""))
 | |
| 		return NULL;
 | |
| 	_err = GetDropLocation(_self->ob_itself,
 | |
| 	                       &dropLocation);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("O&",
 | |
| 	                     AEDesc_New, &dropLocation);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_SetDropLocation(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	AEDesc dropLocation;
 | |
| 	if (!PyArg_ParseTuple(_args, "O&",
 | |
| 	                      AEDesc_Convert, &dropLocation))
 | |
| 		return NULL;
 | |
| 	_err = SetDropLocation(_self->ob_itself,
 | |
| 	                       &dropLocation);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetDragAttributes(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	DragAttributes flags;
 | |
| 	if (!PyArg_ParseTuple(_args, ""))
 | |
| 		return NULL;
 | |
| 	_err = GetDragAttributes(_self->ob_itself,
 | |
| 	                         &flags);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("l",
 | |
| 	                     flags);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetDragMouse(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	Point mouse;
 | |
| 	Point globalPinnedMouse;
 | |
| 	if (!PyArg_ParseTuple(_args, ""))
 | |
| 		return NULL;
 | |
| 	_err = GetDragMouse(_self->ob_itself,
 | |
| 	                    &mouse,
 | |
| 	                    &globalPinnedMouse);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("O&O&",
 | |
| 	                     PyMac_BuildPoint, mouse,
 | |
| 	                     PyMac_BuildPoint, globalPinnedMouse);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_SetDragMouse(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	Point globalPinnedMouse;
 | |
| 	if (!PyArg_ParseTuple(_args, "O&",
 | |
| 	                      PyMac_GetPoint, &globalPinnedMouse))
 | |
| 		return NULL;
 | |
| 	_err = SetDragMouse(_self->ob_itself,
 | |
| 	                    globalPinnedMouse);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetDragOrigin(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	Point globalInitialMouse;
 | |
| 	if (!PyArg_ParseTuple(_args, ""))
 | |
| 		return NULL;
 | |
| 	_err = GetDragOrigin(_self->ob_itself,
 | |
| 	                     &globalInitialMouse);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("O&",
 | |
| 	                     PyMac_BuildPoint, globalInitialMouse);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_GetDragModifiers(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	SInt16 modifiers;
 | |
| 	SInt16 mouseDownModifiers;
 | |
| 	SInt16 mouseUpModifiers;
 | |
| 	if (!PyArg_ParseTuple(_args, ""))
 | |
| 		return NULL;
 | |
| 	_err = GetDragModifiers(_self->ob_itself,
 | |
| 	                        &modifiers,
 | |
| 	                        &mouseDownModifiers,
 | |
| 	                        &mouseUpModifiers);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("hhh",
 | |
| 	                     modifiers,
 | |
| 	                     mouseDownModifiers,
 | |
| 	                     mouseUpModifiers);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_ShowDragHilite(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	RgnHandle hiliteFrame;
 | |
| 	Boolean inside;
 | |
| 	if (!PyArg_ParseTuple(_args, "O&b",
 | |
| 	                      ResObj_Convert, &hiliteFrame,
 | |
| 	                      &inside))
 | |
| 		return NULL;
 | |
| 	_err = ShowDragHilite(_self->ob_itself,
 | |
| 	                      hiliteFrame,
 | |
| 	                      inside);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_HideDragHilite(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	if (!PyArg_ParseTuple(_args, ""))
 | |
| 		return NULL;
 | |
| 	_err = HideDragHilite(_self->ob_itself);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_DragPreScroll(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	SInt16 dH;
 | |
| 	SInt16 dV;
 | |
| 	if (!PyArg_ParseTuple(_args, "hh",
 | |
| 	                      &dH,
 | |
| 	                      &dV))
 | |
| 		return NULL;
 | |
| 	_err = DragPreScroll(_self->ob_itself,
 | |
| 	                     dH,
 | |
| 	                     dV);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_DragPostScroll(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	if (!PyArg_ParseTuple(_args, ""))
 | |
| 		return NULL;
 | |
| 	_err = DragPostScroll(_self->ob_itself);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *DragObj_UpdateDragHilite(_self, _args)
 | |
| 	DragObjObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	RgnHandle updateRgn;
 | |
| 	if (!PyArg_ParseTuple(_args, "O&",
 | |
| 	                      ResObj_Convert, &updateRgn))
 | |
| 		return NULL;
 | |
| 	_err = UpdateDragHilite(_self->ob_itself,
 | |
| 	                        updateRgn);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyMethodDef DragObj_methods[] = {
 | |
| 	{"DisposeDrag", (PyCFunction)DragObj_DisposeDrag, 1,
 | |
| 	 "() -> None"},
 | |
| 	{"AddDragItemFlavor", (PyCFunction)DragObj_AddDragItemFlavor, 1,
 | |
| 	 "(ItemReference theItemRef, FlavorType theType, Buffer dataPtr, FlavorFlags theFlags) -> None"},
 | |
| 	{"SetDragItemFlavorData", (PyCFunction)DragObj_SetDragItemFlavorData, 1,
 | |
| 	 "(ItemReference theItemRef, FlavorType theType, Buffer dataPtr, UInt32 dataOffset) -> None"},
 | |
| 	{"SetDragImage", (PyCFunction)DragObj_SetDragImage, 1,
 | |
| 	 "(PixMapHandle imagePixMap, RgnHandle imageRgn, Point imageOffsetPt, DragImageFlags theImageFlags) -> None"},
 | |
| 	{"TrackDrag", (PyCFunction)DragObj_TrackDrag, 1,
 | |
| 	 "(EventRecord theEvent, RgnHandle theRegion) -> None"},
 | |
| 	{"CountDragItems", (PyCFunction)DragObj_CountDragItems, 1,
 | |
| 	 "() -> (UInt16 numItems)"},
 | |
| 	{"GetDragItemReferenceNumber", (PyCFunction)DragObj_GetDragItemReferenceNumber, 1,
 | |
| 	 "(UInt16 index) -> (ItemReference theItemRef)"},
 | |
| 	{"CountDragItemFlavors", (PyCFunction)DragObj_CountDragItemFlavors, 1,
 | |
| 	 "(ItemReference theItemRef) -> (UInt16 numFlavors)"},
 | |
| 	{"GetFlavorType", (PyCFunction)DragObj_GetFlavorType, 1,
 | |
| 	 "(ItemReference theItemRef, UInt16 index) -> (FlavorType theType)"},
 | |
| 	{"GetFlavorFlags", (PyCFunction)DragObj_GetFlavorFlags, 1,
 | |
| 	 "(ItemReference theItemRef, FlavorType theType) -> (FlavorFlags theFlags)"},
 | |
| 	{"GetFlavorDataSize", (PyCFunction)DragObj_GetFlavorDataSize, 1,
 | |
| 	 "(ItemReference theItemRef, FlavorType theType) -> (Size dataSize)"},
 | |
| 	{"GetFlavorData", (PyCFunction)DragObj_GetFlavorData, 1,
 | |
| 	 "(ItemReference theItemRef, FlavorType theType, Buffer dataPtr, UInt32 dataOffset) -> (Buffer dataPtr)"},
 | |
| 	{"GetDragItemBounds", (PyCFunction)DragObj_GetDragItemBounds, 1,
 | |
| 	 "(ItemReference theItemRef) -> (Rect itemBounds)"},
 | |
| 	{"SetDragItemBounds", (PyCFunction)DragObj_SetDragItemBounds, 1,
 | |
| 	 "(ItemReference theItemRef, Rect itemBounds) -> None"},
 | |
| 	{"GetDropLocation", (PyCFunction)DragObj_GetDropLocation, 1,
 | |
| 	 "() -> (AEDesc dropLocation)"},
 | |
| 	{"SetDropLocation", (PyCFunction)DragObj_SetDropLocation, 1,
 | |
| 	 "(AEDesc dropLocation) -> None"},
 | |
| 	{"GetDragAttributes", (PyCFunction)DragObj_GetDragAttributes, 1,
 | |
| 	 "() -> (DragAttributes flags)"},
 | |
| 	{"GetDragMouse", (PyCFunction)DragObj_GetDragMouse, 1,
 | |
| 	 "() -> (Point mouse, Point globalPinnedMouse)"},
 | |
| 	{"SetDragMouse", (PyCFunction)DragObj_SetDragMouse, 1,
 | |
| 	 "(Point globalPinnedMouse) -> None"},
 | |
| 	{"GetDragOrigin", (PyCFunction)DragObj_GetDragOrigin, 1,
 | |
| 	 "() -> (Point globalInitialMouse)"},
 | |
| 	{"GetDragModifiers", (PyCFunction)DragObj_GetDragModifiers, 1,
 | |
| 	 "() -> (SInt16 modifiers, SInt16 mouseDownModifiers, SInt16 mouseUpModifiers)"},
 | |
| 	{"ShowDragHilite", (PyCFunction)DragObj_ShowDragHilite, 1,
 | |
| 	 "(RgnHandle hiliteFrame, Boolean inside) -> None"},
 | |
| 	{"HideDragHilite", (PyCFunction)DragObj_HideDragHilite, 1,
 | |
| 	 "() -> None"},
 | |
| 	{"DragPreScroll", (PyCFunction)DragObj_DragPreScroll, 1,
 | |
| 	 "(SInt16 dH, SInt16 dV) -> None"},
 | |
| 	{"DragPostScroll", (PyCFunction)DragObj_DragPostScroll, 1,
 | |
| 	 "() -> None"},
 | |
| 	{"UpdateDragHilite", (PyCFunction)DragObj_UpdateDragHilite, 1,
 | |
| 	 "(RgnHandle updateRgn) -> None"},
 | |
| 	{NULL, NULL, 0}
 | |
| };
 | |
| 
 | |
| PyMethodChain DragObj_chain = { DragObj_methods, NULL };
 | |
| 
 | |
| static PyObject *DragObj_getattr(self, name)
 | |
| 	DragObjObject *self;
 | |
| 	char *name;
 | |
| {
 | |
| 	return Py_FindMethodInChain(&DragObj_chain, (PyObject *)self, name);
 | |
| }
 | |
| 
 | |
| #define DragObj_setattr NULL
 | |
| 
 | |
| #define DragObj_compare NULL
 | |
| 
 | |
| #define DragObj_repr NULL
 | |
| 
 | |
| #define DragObj_hash NULL
 | |
| 
 | |
| PyTypeObject DragObj_Type = {
 | |
| 	PyObject_HEAD_INIT(&PyType_Type)
 | |
| 	0, /*ob_size*/
 | |
| 	"DragObj", /*tp_name*/
 | |
| 	sizeof(DragObjObject), /*tp_basicsize*/
 | |
| 	0, /*tp_itemsize*/
 | |
| 	/* methods */
 | |
| 	(destructor) DragObj_dealloc, /*tp_dealloc*/
 | |
| 	0, /*tp_print*/
 | |
| 	(getattrfunc) DragObj_getattr, /*tp_getattr*/
 | |
| 	(setattrfunc) DragObj_setattr, /*tp_setattr*/
 | |
| 	(cmpfunc) DragObj_compare, /*tp_compare*/
 | |
| 	(reprfunc) DragObj_repr, /*tp_repr*/
 | |
| 	(PyNumberMethods *)0, /* tp_as_number */
 | |
| 	(PySequenceMethods *)0, /* tp_as_sequence */
 | |
| 	(PyMappingMethods *)0, /* tp_as_mapping */
 | |
| 	(hashfunc) DragObj_hash, /*tp_hash*/
 | |
| };
 | |
| 
 | |
| /* -------------------- End object type DragObj --------------------- */
 | |
| 
 | |
| 
 | |
| static PyObject *Drag_NewDrag(_self, _args)
 | |
| 	PyObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	DragReference theDrag;
 | |
| 	if (!PyArg_ParseTuple(_args, ""))
 | |
| 		return NULL;
 | |
| 	_err = NewDrag(&theDrag);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("O&",
 | |
| 	                     DragObj_New, theDrag);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *Drag_GetDragHiliteColor(_self, _args)
 | |
| 	PyObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	WindowPtr window;
 | |
| 	RGBColor color;
 | |
| 	if (!PyArg_ParseTuple(_args, "O&",
 | |
| 	                      WinObj_Convert, &window))
 | |
| 		return NULL;
 | |
| 	_err = GetDragHiliteColor(window,
 | |
| 	                          &color);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	_res = Py_BuildValue("O&",
 | |
| 	                     QdRGB_New, &color);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *Drag_WaitMouseMoved(_self, _args)
 | |
| 	PyObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	Boolean _rv;
 | |
| 	Point initialMouse;
 | |
| 	if (!PyArg_ParseTuple(_args, "O&",
 | |
| 	                      PyMac_GetPoint, &initialMouse))
 | |
| 		return NULL;
 | |
| 	_rv = WaitMouseMoved(initialMouse);
 | |
| 	_res = Py_BuildValue("b",
 | |
| 	                     _rv);
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *Drag_ZoomRects(_self, _args)
 | |
| 	PyObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	Rect fromRect;
 | |
| 	Rect toRect;
 | |
| 	SInt16 zoomSteps;
 | |
| 	ZoomAcceleration acceleration;
 | |
| 	if (!PyArg_ParseTuple(_args, "O&O&hh",
 | |
| 	                      PyMac_GetRect, &fromRect,
 | |
| 	                      PyMac_GetRect, &toRect,
 | |
| 	                      &zoomSteps,
 | |
| 	                      &acceleration))
 | |
| 		return NULL;
 | |
| 	_err = ZoomRects(&fromRect,
 | |
| 	                 &toRect,
 | |
| 	                 zoomSteps,
 | |
| 	                 acceleration);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *Drag_ZoomRegion(_self, _args)
 | |
| 	PyObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 	OSErr _err;
 | |
| 	RgnHandle region;
 | |
| 	Point zoomDistance;
 | |
| 	SInt16 zoomSteps;
 | |
| 	ZoomAcceleration acceleration;
 | |
| 	if (!PyArg_ParseTuple(_args, "O&O&hh",
 | |
| 	                      ResObj_Convert, ®ion,
 | |
| 	                      PyMac_GetPoint, &zoomDistance,
 | |
| 	                      &zoomSteps,
 | |
| 	                      &acceleration))
 | |
| 		return NULL;
 | |
| 	_err = ZoomRegion(region,
 | |
| 	                  zoomDistance,
 | |
| 	                  zoomSteps,
 | |
| 	                  acceleration);
 | |
| 	if (_err != noErr) return PyMac_Error(_err);
 | |
| 	Py_INCREF(Py_None);
 | |
| 	_res = Py_None;
 | |
| 	return _res;
 | |
| }
 | |
| 
 | |
| static PyObject *Drag_InstallTrackingHandler(_self, _args)
 | |
| 	PyObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 
 | |
| 	    PyObject *callback;
 | |
| 	    WindowPtr theWindow = NULL;
 | |
| 	    OSErr _err;
 | |
| 	    
 | |
| 	    if ( !PyArg_ParseTuple(_args, "O|O&", &callback, WinObj_Convert, &theWindow) )
 | |
| 	    	return NULL;
 | |
| 	    Py_INCREF(callback);	/* Cannot decref later, too bad */
 | |
| 	    _err = InstallTrackingHandler(dragglue_TrackingHandlerUPP, theWindow, (void *)callback);
 | |
| 		if (_err != noErr) return PyMac_Error(_err);
 | |
| 		Py_INCREF(Py_None);
 | |
| 		return Py_None;
 | |
| 
 | |
| }
 | |
| 
 | |
| static PyObject *Drag_InstallReceiveHandler(_self, _args)
 | |
| 	PyObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 
 | |
| 	    PyObject *callback;
 | |
| 	    WindowPtr theWindow = NULL;
 | |
| 	    OSErr _err;
 | |
| 	    
 | |
| 	    if ( !PyArg_ParseTuple(_args, "O|O&", &callback, WinObj_Convert, &theWindow) )
 | |
| 	    	return NULL;
 | |
| 	    Py_INCREF(callback);	/* Cannot decref later, too bad */
 | |
| 	    _err = InstallReceiveHandler(dragglue_ReceiveHandlerUPP, theWindow, (void *)callback);
 | |
| 		if (_err != noErr) return PyMac_Error(_err);
 | |
| 		Py_INCREF(Py_None);
 | |
| 		return Py_None;
 | |
| 
 | |
| }
 | |
| 
 | |
| static PyObject *Drag_RemoveTrackingHandler(_self, _args)
 | |
| 	PyObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 
 | |
| 	    WindowPtr theWindow = NULL;
 | |
| 	    OSErr _err;
 | |
| 	    
 | |
| 	    if ( !PyArg_ParseTuple(_args, "|O&", WinObj_Convert, &theWindow) )
 | |
| 	    	return NULL;
 | |
| 	    _err = RemoveTrackingHandler(dragglue_TrackingHandlerUPP, theWindow);
 | |
| 		if (_err != noErr) return PyMac_Error(_err);
 | |
| 		Py_INCREF(Py_None);
 | |
| 		return Py_None;
 | |
| 
 | |
| }
 | |
| 
 | |
| static PyObject *Drag_RemoveReceiveHandler(_self, _args)
 | |
| 	PyObject *_self;
 | |
| 	PyObject *_args;
 | |
| {
 | |
| 	PyObject *_res = NULL;
 | |
| 
 | |
| 	    WindowPtr theWindow = NULL;
 | |
| 	    OSErr _err;
 | |
| 	    
 | |
| 	    if ( !PyArg_ParseTuple(_args, "|O&", WinObj_Convert, &theWindow) )
 | |
| 	    	return NULL;
 | |
| 	    _err = RemoveReceiveHandler(dragglue_ReceiveHandlerUPP, theWindow);
 | |
| 		if (_err != noErr) return PyMac_Error(_err);
 | |
| 		Py_INCREF(Py_None);
 | |
| 		return Py_None;
 | |
| 
 | |
| }
 | |
| 
 | |
| static PyMethodDef Drag_methods[] = {
 | |
| 	{"NewDrag", (PyCFunction)Drag_NewDrag, 1,
 | |
| 	 "() -> (DragReference theDrag)"},
 | |
| 	{"GetDragHiliteColor", (PyCFunction)Drag_GetDragHiliteColor, 1,
 | |
| 	 "(WindowPtr window) -> (RGBColor color)"},
 | |
| 	{"WaitMouseMoved", (PyCFunction)Drag_WaitMouseMoved, 1,
 | |
| 	 "(Point initialMouse) -> (Boolean _rv)"},
 | |
| 	{"ZoomRects", (PyCFunction)Drag_ZoomRects, 1,
 | |
| 	 "(Rect fromRect, Rect toRect, SInt16 zoomSteps, ZoomAcceleration acceleration) -> None"},
 | |
| 	{"ZoomRegion", (PyCFunction)Drag_ZoomRegion, 1,
 | |
| 	 "(RgnHandle region, Point zoomDistance, SInt16 zoomSteps, ZoomAcceleration acceleration) -> None"},
 | |
| 	{"InstallTrackingHandler", (PyCFunction)Drag_InstallTrackingHandler, 1,
 | |
| 	 NULL},
 | |
| 	{"InstallReceiveHandler", (PyCFunction)Drag_InstallReceiveHandler, 1,
 | |
| 	 NULL},
 | |
| 	{"RemoveTrackingHandler", (PyCFunction)Drag_RemoveTrackingHandler, 1,
 | |
| 	 NULL},
 | |
| 	{"RemoveReceiveHandler", (PyCFunction)Drag_RemoveReceiveHandler, 1,
 | |
| 	 NULL},
 | |
| 	{NULL, NULL, 0}
 | |
| };
 | |
| 
 | |
| 
 | |
| 
 | |
| static pascal OSErr
 | |
| dragglue_TrackingHandler(DragTrackingMessage theMessage, WindowPtr theWindow,
 | |
|                          void *handlerRefCon, DragReference theDrag)
 | |
| {
 | |
| 	PyObject *args, *rv;
 | |
| 	int i;
 | |
| 	
 | |
| 	args = Py_BuildValue("hO&O&", theMessage, DragObj_New, theDrag, WinObj_WhichWindow, theWindow);
 | |
| 	if ( args == NULL )
 | |
| 		return -1;
 | |
| 	rv = PyEval_CallObject((PyObject *)handlerRefCon, args);
 | |
| 	Py_DECREF(args);
 | |
| 	if ( rv == NULL ) {
 | |
| 		fprintf(stderr, "Drag: Exception in TrackingHandler\n");
 | |
| 		return -1;
 | |
| 	}
 | |
| 	i = -1;
 | |
| 	if ( rv == Py_None )
 | |
| 		i = 0;
 | |
| 	else
 | |
| 		PyArg_Parse(rv, "l", &i);
 | |
| 	Py_DECREF(rv);
 | |
| 	return i;
 | |
| }
 | |
| 
 | |
| static pascal OSErr
 | |
| dragglue_ReceiveHandler(WindowPtr theWindow, void *handlerRefCon,
 | |
|                         DragReference theDrag)
 | |
| {
 | |
| 	PyObject *args, *rv;
 | |
| 	int i;
 | |
| 	
 | |
| 	args = Py_BuildValue("O&O&", DragObj_New, theDrag, WinObj_WhichWindow, theWindow);
 | |
| 	if ( args == NULL )
 | |
| 		return -1;
 | |
| 	rv = PyEval_CallObject((PyObject *)handlerRefCon, args);
 | |
| 	Py_DECREF(args);
 | |
| 	if ( rv == NULL ) {
 | |
| 		fprintf(stderr, "Drag: Exception in ReceiveHandler\n");
 | |
| 		return -1;
 | |
| 	}
 | |
| 	i = -1;
 | |
| 	if ( rv == Py_None )
 | |
| 		i = 0;
 | |
| 	else
 | |
| 		PyArg_Parse(rv, "l", &i);
 | |
| 	Py_DECREF(rv);
 | |
| 	return i;
 | |
| }
 | |
| 
 | |
| static pascal OSErr
 | |
| dragglue_SendData(FlavorType theType, void *dragSendRefCon,
 | |
|                       ItemReference theItem, DragReference theDrag)
 | |
| {
 | |
| 	DragObjObject *self = (DragObjObject *)dragSendRefCon;
 | |
| 	PyObject *args, *rv;
 | |
| 	int i;
 | |
| 	
 | |
| 	if ( self->sendproc == NULL )
 | |
| 		return -1;
 | |
| 	args = Py_BuildValue("O&l", PyMac_BuildOSType, theType, theItem);
 | |
| 	if ( args == NULL )
 | |
| 		return -1;
 | |
| 	rv = PyEval_CallObject(self->sendproc, args);
 | |
| 	Py_DECREF(args);
 | |
| 	if ( rv == NULL ) {
 | |
| 		fprintf(stderr, "Drag: Exception in SendDataHandler\n");
 | |
| 		return -1;
 | |
| 	}
 | |
| 	i = -1;
 | |
| 	if ( rv == Py_None )
 | |
| 		i = 0;
 | |
| 	else
 | |
| 		PyArg_Parse(rv, "l", &i);
 | |
| 	Py_DECREF(rv);
 | |
| 	return i;
 | |
| }
 | |
| 
 | |
| #if 0
 | |
| static pascal OSErr
 | |
| dragglue_Input(Point *mouse, short *modifiers,
 | |
|                    void *dragSendRefCon, DragReference theDrag)
 | |
| {
 | |
|     return 0;
 | |
| }
 | |
| 
 | |
| static pascal OSErr
 | |
| dragglue_Drawing(xxxx
 | |
|                    void *dragSendRefCon, DragReference theDrag)
 | |
| {
 | |
|     return 0;
 | |
| }
 | |
| #endif
 | |
| 
 | |
| 
 | |
| 
 | |
| void initDrag()
 | |
| {
 | |
| 	PyObject *m;
 | |
| 	PyObject *d;
 | |
| 
 | |
| 
 | |
| 
 | |
| 
 | |
| 	m = Py_InitModule("Drag", Drag_methods);
 | |
| 	d = PyModule_GetDict(m);
 | |
| 	Drag_Error = PyMac_GetOSErrException();
 | |
| 	if (Drag_Error == NULL ||
 | |
| 	    PyDict_SetItemString(d, "Error", Drag_Error) != 0)
 | |
| 		Py_FatalError("can't initialize Drag.Error");
 | |
| 	DragObj_Type.ob_type = &PyType_Type;
 | |
| 	Py_INCREF(&DragObj_Type);
 | |
| 	if (PyDict_SetItemString(d, "DragObjType", (PyObject *)&DragObj_Type) != 0)
 | |
| 		Py_FatalError("can't initialize DragObjType");
 | |
| 
 | |
| 	dragglue_TrackingHandlerUPP = NewDragTrackingHandlerProc(dragglue_TrackingHandler);
 | |
| 	dragglue_ReceiveHandlerUPP = NewDragReceiveHandlerProc(dragglue_ReceiveHandler);
 | |
| 	dragglue_SendDataUPP = NewDragSendDataProc(dragglue_SendData);
 | |
| #if 0
 | |
| 	dragglue_InputUPP = NewDragInputProc(dragglue_Input);
 | |
| 	dragglue_DrawingUPP = NewDragDrawingProc(dragglue_Drawing);
 | |
| #endif
 | |
| 
 | |
| 
 | |
| }
 | |
| 
 | |
| /* ======================== End module Drag ========================= */
 | |
| 
 | 
