Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Z
Zope
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
List
Boards
Labels
Milestones
Merge Requests
0
Merge Requests
0
Analytics
Analytics
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Commits
Issue Boards
Open sidebar
Kirill Smelkov
Zope
Commits
3600c6a7
Commit
3600c6a7
authored
Oct 22, 1996
by
Jim Fulton
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
*** empty log message ***
parent
ea6c3af1
Changes
6
Expand all
Show whitespace changes
Inline
Side-by-side
Showing
6 changed files
with
4920 additions
and
0 deletions
+4920
-0
lib/Components/ExtensionClass/ExtensionClass.c
lib/Components/ExtensionClass/ExtensionClass.c
+2056
-0
lib/Components/ExtensionClass/ExtensionClass.h
lib/Components/ExtensionClass/ExtensionClass.h
+162
-0
lib/Components/ExtensionClass/MultiMapping.c
lib/Components/ExtensionClass/MultiMapping.c
+242
-0
lib/Components/ExtensionClass/src/ExtensionClass.c
lib/Components/ExtensionClass/src/ExtensionClass.c
+2056
-0
lib/Components/ExtensionClass/src/ExtensionClass.h
lib/Components/ExtensionClass/src/ExtensionClass.h
+162
-0
lib/Components/ExtensionClass/src/MultiMapping.c
lib/Components/ExtensionClass/src/MultiMapping.c
+242
-0
No files found.
lib/Components/ExtensionClass/ExtensionClass.c
0 → 100644
View file @
3600c6a7
This diff is collapsed.
Click to expand it.
lib/Components/ExtensionClass/ExtensionClass.h
0 → 100644
View file @
3600c6a7
/*
$Id: ExtensionClass.h,v 1.1 1996/10/22 22:25:43 jim Exp $
Extension Class Definitions
Copyright
Copyright 1996 Digital Creations, L.C., 910 Princess Anne
Street, Suite 300, Fredericksburg, Virginia 22401 U.S.A. All
rights reserved. Copyright in this software is owned by DCLC,
unless otherwise indicated. Permission to use, copy and
distribute this software is hereby granted, provided that the
above copyright notice appear in all copies and that both that
copyright notice and this permission notice appear. Note that
any product, process or technology described in this software
may be the subject of other Intellectual Property rights
reserved by Digital Creations, L.C. and are not licensed
hereunder.
Trademarks
Digital Creations & DCLC, are trademarks of Digital Creations, L.C..
All other trademarks are owned by their respective companies.
No Warranty
The software is provided "as is" without warranty of any kind,
either express or implied, including, but not limited to, the
implied warranties of merchantability, fitness for a particular
purpose, or non-infringement. This software could include
technical inaccuracies or typographical errors. Changes are
periodically made to the software; these changes will be
incorporated in new editions of the software. DCLC may make
improvements and/or changes in this software at any time
without notice.
Limitation Of Liability
In no event will DCLC be liable for direct, indirect, special,
incidental, economic, cover, or consequential damages arising
out of the use of or inability to use this software even if
advised of the possibility of such damages. Some states do not
allow the exclusion or limitation of implied warranties or
limitation of liability for incidental or consequential
damages, so the above limitation or exclusion may not apply to
you.
If you have questions regarding this software,
contact:
Jim Fulton, jim@digicool.com
Digital Creations L.C.
(540) 371-6909
$Log: ExtensionClass.h,v $
Revision 1.1 1996/10/22 22:25:43 jim
*** empty log message ***
*/
#ifndef EXTENSIONCLASS_H
#define EXTENSIONCLASS_H
#include "Python.h"
#include "import.h"
/* Declarations for objects of type ExtensionClass */
typedef
struct
{
PyObject_VAR_HEAD
char
*
tp_name
;
/* For printing */
int
tp_basicsize
,
tp_itemsize
;
/* For allocation */
/* Methods to implement standard operations */
destructor
tp_dealloc
;
printfunc
tp_print
;
getattrfunc
tp_getattr
;
setattrfunc
tp_setattr
;
cmpfunc
tp_compare
;
reprfunc
tp_repr
;
/* Method suites for standard classes */
PyNumberMethods
*
tp_as_number
;
PySequenceMethods
*
tp_as_sequence
;
PyMappingMethods
*
tp_as_mapping
;
/* More standard operations (at end for binary compatibility) */
hashfunc
tp_hash
;
ternaryfunc
tp_call
;
reprfunc
tp_str
;
long
tp_xxx1
;
/*getattrofunc tp_getattro;*/
long
tp_xxx2
;
/*setattrofunc tp_setattro;*/
/* Space for future expansion */
long
tp_xxx3
;
long
tp_xxx4
;
char
*
tp_doc
;
/* Documentation string */
/* Here's the juicy stuff */
PyMethodChain
methods
;
PyObject
*
class_dictionary
;
PyObject
*
bases
;
long
class_flags
;
#define EXTENSIONCLASS_DYNAMIC_FLAG 1
#define EXTENSIONCLASS_BINDABLE_FLAG 2
#ifdef COUNT_ALLOCS
/* these must be last */
int
tp_alloc
;
int
tp_free
;
int
tp_maxalloc
;
struct
_typeobject
*
tp_next
;
#endif
}
PyExtensionClass
;
/* Don't look at this. :-) */
#define Py_FindMethod(M,SELF,NAME) \
((getattrfunc)(SELF->ob_type->ob_type->tp_getattr(SELF->ob_type,"."))) \
(SELF,NAME)
#define Py_FindAttrString(SELF,NAME) \
((getattrfunc)(SELF->ob_type->ob_type->tp_getattr(SELF->ob_type,"."))) \
(SELF,NAME)
#define PyExtensionClass_Export(D,N,T) { \
PyObject *_ExtensionClass_module; \
if(_ExtensionClass_module=PyImport_ImportModule("ExtensionClass")) { \
if(PyObject_CallMethod(_ExtensionClass_module, \
"ExtensionClassType", "Oi", &T, 42)) \
PyMapping_SetItemString(D,N,(PyObject*)&T); \
Py_DECREF(_ExtensionClass_module); \
} \
}
#define METHOD_CHAIN(DEF) { DEF, NULL }
#define CHECK_FOR_ERRORS(MESS) \
if(PyErr_Occurred()) { \
PyObject *__sys_exc_type, *__sys_exc_value, *__sys_exc_traceback; \
PyErr_Fetch( &__sys_exc_type, &__sys_exc_value, &__sys_exc_traceback); \
fprintf(stderr, # MESS ":\n\t"); \
PyObject_Print(__sys_exc_type, stderr,0); \
fprintf(stderr,", "); \
PyObject_Print(__sys_exc_value, stderr,0); \
fprintf(stderr,"\n"); \
fflush(stderr); \
Py_FatalError(# MESS); \
}
#endif
lib/Components/ExtensionClass/MultiMapping.c
0 → 100644
View file @
3600c6a7
/*
$Id: MultiMapping.c,v 1.1 1996/10/22 22:27:42 jim Exp $
Sample extension class program that implements multi-mapping objects.
Copyright
Copyright 1996 Digital Creations, L.C., 910 Princess Anne
Street, Suite 300, Fredericksburg, Virginia 22401 U.S.A. All
rights reserved. Copyright in this software is owned by DCLC,
unless otherwise indicated. Permission to use, copy and
distribute this software is hereby granted, provided that the
above copyright notice appear in all copies and that both that
copyright notice and this permission notice appear. Note that
any product, process or technology described in this software
may be the subject of other Intellectual Property rights
reserved by Digital Creations, L.C. and are not licensed
hereunder.
Trademarks
Digital Creations & DCLC, are trademarks of Digital Creations, L.C..
All other trademarks are owned by their respective companies.
No Warranty
The software is provided "as is" without warranty of any kind,
either express or implied, including, but not limited to, the
implied warranties of merchantability, fitness for a particular
purpose, or non-infringement. This software could include
technical inaccuracies or typographical errors. Changes are
periodically made to the software; these changes will be
incorporated in new editions of the software. DCLC may make
improvements and/or changes in this software at any time
without notice.
Limitation Of Liability
In no event will DCLC be liable for direct, indirect, special,
incidental, economic, cover, or consequential damages arising
out of the use of or inability to use this software even if
advised of the possibility of such damages. Some states do not
allow the exclusion or limitation of implied warranties or
limitation of liability for incidental or consequential
damages, so the above limitation or exclusion may not apply to
you.
If you have questions regarding this software,
contact:
Jim Fulton, jim@digicool.com
Digital Creations L.C.
(540) 371-6909
Full description
$Log: MultiMapping.c,v $
Revision 1.1 1996/10/22 22:27:42 jim
*** empty log message ***
*/
#include "Python.h"
#include "ExtensionClass.h"
#define UNLESS(E) if(!(E))
typedef
struct
{
PyObject_HEAD
PyObject
*
data
;
}
MMobject
;
staticforward
PyExtensionClass
MMtype
;
static
PyObject
*
MM_push
(
self
,
args
)
MMobject
*
self
;
PyObject
*
args
;
{
PyObject
*
src
;
UNLESS
(
PyArg_ParseTuple
(
args
,
"O"
,
&
src
))
return
NULL
;
UNLESS
(
-
1
!=
PyList_Append
(
self
->
data
,
src
))
return
NULL
;
Py_INCREF
(
Py_None
);
return
Py_None
;
}
static
PyObject
*
MM_pop
(
self
,
args
)
MMobject
*
self
;
PyObject
*
args
;
{
long
l
;
PyObject
*
r
;
static
PyObject
*
emptyList
=
0
;
UNLESS
(
emptyList
)
UNLESS
(
emptyList
=
PyList_New
(
0
))
return
NULL
;
UNLESS
(
PyArg_ParseTuple
(
args
,
""
))
return
NULL
;
UNLESS
(
-
1
!=
(
l
=
PyList_Size
(
self
->
data
)))
return
NULL
;
l
--
;
UNLESS
(
r
=
PySequence_GetItem
(
self
->
data
,
l
))
return
NULL
;
UNLESS
(
-
1
!=
PyList_SetSlice
(
self
->
data
,
l
,
l
+
1
,
emptyList
))
goto
err
;
return
r
;
err:
Py_DECREF
(
r
);
return
NULL
;
}
static
PyObject
*
MM__init__
(
self
,
args
)
MMobject
*
self
;
PyObject
*
args
;
{
UNLESS
(
PyArg_ParseTuple
(
args
,
""
))
return
NULL
;
UNLESS
(
self
->
data
=
PyList_New
(
0
))
goto
err
;
Py_INCREF
(
Py_None
);
return
Py_None
;
err:
Py_DECREF
(
self
);
return
NULL
;
}
static
struct
PyMethodDef
MM_methods
[]
=
{
{
"__init__"
,
(
PyCFunction
)
MM__init__
,
1
,
"__init__() -- Create a new empty multi-mapping"
},
{
"push"
,
(
PyCFunction
)
MM_push
,
1
,
"push(mapping_object) -- Add a data source"
},
{
"pop"
,
(
PyCFunction
)
MM_pop
,
1
,
"pop() -- Remove and return the last data source added"
},
{
NULL
,
NULL
}
/* sentinel */
};
static
void
MM_dealloc
(
self
)
MMobject
*
self
;
{
Py_XDECREF
(
self
->
data
);
PyMem_DEL
(
self
);
}
static
PyObject
*
MM_getattr
(
self
,
name
)
MMobject
*
self
;
char
*
name
;
{
return
Py_FindMethod
(
MM_methods
,
(
PyObject
*
)
self
,
name
);
}
static
int
MM_length
(
self
)
MMobject
*
self
;
{
long
l
=
0
,
el
,
i
;
PyObject
*
e
=
0
;
UNLESS
(
-
1
!=
(
i
=
PyList_Size
(
self
->
data
)))
return
-
1
;
while
(
--
i
>=
0
)
{
e
=
PyList_GetItem
(
self
->
data
,
i
);
UNLESS
(
-
1
!=
(
el
=
PyObject_Length
(
e
)))
return
-
1
;
l
+=
el
;
}
return
l
;
}
static
PyObject
*
MM_subscript
(
self
,
key
)
MMobject
*
self
;
PyObject
*
key
;
{
long
i
;
PyObject
*
e
;
UNLESS
(
-
1
!=
(
i
=
PyList_Size
(
self
->
data
)))
return
NULL
;
while
(
--
i
>=
0
)
{
e
=
PyList_GetItem
(
self
->
data
,
i
);
if
(
e
=
PyObject_GetItem
(
e
,
key
))
return
e
;
PyErr_Clear
();
}
PyErr_SetObject
(
PyExc_KeyError
,
key
);
return
NULL
;
}
static
PyMappingMethods
MM_as_mapping
=
{
(
inquiry
)
MM_length
,
/*mp_length*/
(
binaryfunc
)
MM_subscript
,
/*mp_subscript*/
(
objobjargproc
)
NULL
,
/*mp_ass_subscript*/
};
/* -------------------------------------------------------- */
static
char
MMtype__doc__
[]
=
"MultiMapping -- Combine multiple mapping objects for lookup"
;
static
PyExtensionClass
MMtype
=
{
PyObject_HEAD_INIT
(
&
PyType_Type
)
0
,
/*ob_size*/
"MultMapping"
,
/*tp_name*/
sizeof
(
MMobject
),
/*tp_basicsize*/
0
,
/*tp_itemsize*/
/* methods */
(
destructor
)
MM_dealloc
,
/*tp_dealloc*/
(
printfunc
)
0
,
/*tp_print*/
(
getattrfunc
)
MM_getattr
,
/*tp_getattr*/
(
setattrfunc
)
0
,
/*tp_setattr*/
(
cmpfunc
)
0
,
/*tp_compare*/
(
reprfunc
)
0
,
/*tp_repr*/
0
,
/*tp_as_number*/
0
,
/*tp_as_sequence*/
&
MM_as_mapping
,
/*tp_as_mapping*/
(
hashfunc
)
0
,
/*tp_hash*/
(
ternaryfunc
)
0
,
/*tp_call*/
(
reprfunc
)
0
,
/*tp_str*/
/* Space for future expansion */
0L
,
0L
,
0L
,
0L
,
MMtype__doc__
,
/* Documentation string */
METHOD_CHAIN
(
MM_methods
)
};
static
struct
PyMethodDef
MultiMapping_methods
[]
=
{
{
NULL
,
NULL
}
/* sentinel */
};
void
initMultiMapping
()
{
PyObject
*
m
,
*
d
;
m
=
Py_InitModule4
(
"MultiMapping"
,
MultiMapping_methods
,
"MultiMapping -- Wrap multiple mapping objects for lookup"
,
(
PyObject
*
)
NULL
,
PYTHON_API_VERSION
);
d
=
PyModule_GetDict
(
m
);
PyExtensionClass_Export
(
d
,
"MultiMapping"
,
MMtype
);
if
(
PyErr_Occurred
())
Py_FatalError
(
"can't initialize module MultiMapping"
);
}
lib/Components/ExtensionClass/src/ExtensionClass.c
0 → 100644
View file @
3600c6a7
This diff is collapsed.
Click to expand it.
lib/Components/ExtensionClass/src/ExtensionClass.h
0 → 100644
View file @
3600c6a7
/*
$Id: ExtensionClass.h,v 1.1 1996/10/22 22:25:43 jim Exp $
Extension Class Definitions
Copyright
Copyright 1996 Digital Creations, L.C., 910 Princess Anne
Street, Suite 300, Fredericksburg, Virginia 22401 U.S.A. All
rights reserved. Copyright in this software is owned by DCLC,
unless otherwise indicated. Permission to use, copy and
distribute this software is hereby granted, provided that the
above copyright notice appear in all copies and that both that
copyright notice and this permission notice appear. Note that
any product, process or technology described in this software
may be the subject of other Intellectual Property rights
reserved by Digital Creations, L.C. and are not licensed
hereunder.
Trademarks
Digital Creations & DCLC, are trademarks of Digital Creations, L.C..
All other trademarks are owned by their respective companies.
No Warranty
The software is provided "as is" without warranty of any kind,
either express or implied, including, but not limited to, the
implied warranties of merchantability, fitness for a particular
purpose, or non-infringement. This software could include
technical inaccuracies or typographical errors. Changes are
periodically made to the software; these changes will be
incorporated in new editions of the software. DCLC may make
improvements and/or changes in this software at any time
without notice.
Limitation Of Liability
In no event will DCLC be liable for direct, indirect, special,
incidental, economic, cover, or consequential damages arising
out of the use of or inability to use this software even if
advised of the possibility of such damages. Some states do not
allow the exclusion or limitation of implied warranties or
limitation of liability for incidental or consequential
damages, so the above limitation or exclusion may not apply to
you.
If you have questions regarding this software,
contact:
Jim Fulton, jim@digicool.com
Digital Creations L.C.
(540) 371-6909
$Log: ExtensionClass.h,v $
Revision 1.1 1996/10/22 22:25:43 jim
*** empty log message ***
*/
#ifndef EXTENSIONCLASS_H
#define EXTENSIONCLASS_H
#include "Python.h"
#include "import.h"
/* Declarations for objects of type ExtensionClass */
typedef
struct
{
PyObject_VAR_HEAD
char
*
tp_name
;
/* For printing */
int
tp_basicsize
,
tp_itemsize
;
/* For allocation */
/* Methods to implement standard operations */
destructor
tp_dealloc
;
printfunc
tp_print
;
getattrfunc
tp_getattr
;
setattrfunc
tp_setattr
;
cmpfunc
tp_compare
;
reprfunc
tp_repr
;
/* Method suites for standard classes */
PyNumberMethods
*
tp_as_number
;
PySequenceMethods
*
tp_as_sequence
;
PyMappingMethods
*
tp_as_mapping
;
/* More standard operations (at end for binary compatibility) */
hashfunc
tp_hash
;
ternaryfunc
tp_call
;
reprfunc
tp_str
;
long
tp_xxx1
;
/*getattrofunc tp_getattro;*/
long
tp_xxx2
;
/*setattrofunc tp_setattro;*/
/* Space for future expansion */
long
tp_xxx3
;
long
tp_xxx4
;
char
*
tp_doc
;
/* Documentation string */
/* Here's the juicy stuff */
PyMethodChain
methods
;
PyObject
*
class_dictionary
;
PyObject
*
bases
;
long
class_flags
;
#define EXTENSIONCLASS_DYNAMIC_FLAG 1
#define EXTENSIONCLASS_BINDABLE_FLAG 2
#ifdef COUNT_ALLOCS
/* these must be last */
int
tp_alloc
;
int
tp_free
;
int
tp_maxalloc
;
struct
_typeobject
*
tp_next
;
#endif
}
PyExtensionClass
;
/* Don't look at this. :-) */
#define Py_FindMethod(M,SELF,NAME) \
((getattrfunc)(SELF->ob_type->ob_type->tp_getattr(SELF->ob_type,"."))) \
(SELF,NAME)
#define Py_FindAttrString(SELF,NAME) \
((getattrfunc)(SELF->ob_type->ob_type->tp_getattr(SELF->ob_type,"."))) \
(SELF,NAME)
#define PyExtensionClass_Export(D,N,T) { \
PyObject *_ExtensionClass_module; \
if(_ExtensionClass_module=PyImport_ImportModule("ExtensionClass")) { \
if(PyObject_CallMethod(_ExtensionClass_module, \
"ExtensionClassType", "Oi", &T, 42)) \
PyMapping_SetItemString(D,N,(PyObject*)&T); \
Py_DECREF(_ExtensionClass_module); \
} \
}
#define METHOD_CHAIN(DEF) { DEF, NULL }
#define CHECK_FOR_ERRORS(MESS) \
if(PyErr_Occurred()) { \
PyObject *__sys_exc_type, *__sys_exc_value, *__sys_exc_traceback; \
PyErr_Fetch( &__sys_exc_type, &__sys_exc_value, &__sys_exc_traceback); \
fprintf(stderr, # MESS ":\n\t"); \
PyObject_Print(__sys_exc_type, stderr,0); \
fprintf(stderr,", "); \
PyObject_Print(__sys_exc_value, stderr,0); \
fprintf(stderr,"\n"); \
fflush(stderr); \
Py_FatalError(# MESS); \
}
#endif
lib/Components/ExtensionClass/src/MultiMapping.c
0 → 100644
View file @
3600c6a7
/*
$Id: MultiMapping.c,v 1.1 1996/10/22 22:27:42 jim Exp $
Sample extension class program that implements multi-mapping objects.
Copyright
Copyright 1996 Digital Creations, L.C., 910 Princess Anne
Street, Suite 300, Fredericksburg, Virginia 22401 U.S.A. All
rights reserved. Copyright in this software is owned by DCLC,
unless otherwise indicated. Permission to use, copy and
distribute this software is hereby granted, provided that the
above copyright notice appear in all copies and that both that
copyright notice and this permission notice appear. Note that
any product, process or technology described in this software
may be the subject of other Intellectual Property rights
reserved by Digital Creations, L.C. and are not licensed
hereunder.
Trademarks
Digital Creations & DCLC, are trademarks of Digital Creations, L.C..
All other trademarks are owned by their respective companies.
No Warranty
The software is provided "as is" without warranty of any kind,
either express or implied, including, but not limited to, the
implied warranties of merchantability, fitness for a particular
purpose, or non-infringement. This software could include
technical inaccuracies or typographical errors. Changes are
periodically made to the software; these changes will be
incorporated in new editions of the software. DCLC may make
improvements and/or changes in this software at any time
without notice.
Limitation Of Liability
In no event will DCLC be liable for direct, indirect, special,
incidental, economic, cover, or consequential damages arising
out of the use of or inability to use this software even if
advised of the possibility of such damages. Some states do not
allow the exclusion or limitation of implied warranties or
limitation of liability for incidental or consequential
damages, so the above limitation or exclusion may not apply to
you.
If you have questions regarding this software,
contact:
Jim Fulton, jim@digicool.com
Digital Creations L.C.
(540) 371-6909
Full description
$Log: MultiMapping.c,v $
Revision 1.1 1996/10/22 22:27:42 jim
*** empty log message ***
*/
#include "Python.h"
#include "ExtensionClass.h"
#define UNLESS(E) if(!(E))
typedef
struct
{
PyObject_HEAD
PyObject
*
data
;
}
MMobject
;
staticforward
PyExtensionClass
MMtype
;
static
PyObject
*
MM_push
(
self
,
args
)
MMobject
*
self
;
PyObject
*
args
;
{
PyObject
*
src
;
UNLESS
(
PyArg_ParseTuple
(
args
,
"O"
,
&
src
))
return
NULL
;
UNLESS
(
-
1
!=
PyList_Append
(
self
->
data
,
src
))
return
NULL
;
Py_INCREF
(
Py_None
);
return
Py_None
;
}
static
PyObject
*
MM_pop
(
self
,
args
)
MMobject
*
self
;
PyObject
*
args
;
{
long
l
;
PyObject
*
r
;
static
PyObject
*
emptyList
=
0
;
UNLESS
(
emptyList
)
UNLESS
(
emptyList
=
PyList_New
(
0
))
return
NULL
;
UNLESS
(
PyArg_ParseTuple
(
args
,
""
))
return
NULL
;
UNLESS
(
-
1
!=
(
l
=
PyList_Size
(
self
->
data
)))
return
NULL
;
l
--
;
UNLESS
(
r
=
PySequence_GetItem
(
self
->
data
,
l
))
return
NULL
;
UNLESS
(
-
1
!=
PyList_SetSlice
(
self
->
data
,
l
,
l
+
1
,
emptyList
))
goto
err
;
return
r
;
err:
Py_DECREF
(
r
);
return
NULL
;
}
static
PyObject
*
MM__init__
(
self
,
args
)
MMobject
*
self
;
PyObject
*
args
;
{
UNLESS
(
PyArg_ParseTuple
(
args
,
""
))
return
NULL
;
UNLESS
(
self
->
data
=
PyList_New
(
0
))
goto
err
;
Py_INCREF
(
Py_None
);
return
Py_None
;
err:
Py_DECREF
(
self
);
return
NULL
;
}
static
struct
PyMethodDef
MM_methods
[]
=
{
{
"__init__"
,
(
PyCFunction
)
MM__init__
,
1
,
"__init__() -- Create a new empty multi-mapping"
},
{
"push"
,
(
PyCFunction
)
MM_push
,
1
,
"push(mapping_object) -- Add a data source"
},
{
"pop"
,
(
PyCFunction
)
MM_pop
,
1
,
"pop() -- Remove and return the last data source added"
},
{
NULL
,
NULL
}
/* sentinel */
};
static
void
MM_dealloc
(
self
)
MMobject
*
self
;
{
Py_XDECREF
(
self
->
data
);
PyMem_DEL
(
self
);
}
static
PyObject
*
MM_getattr
(
self
,
name
)
MMobject
*
self
;
char
*
name
;
{
return
Py_FindMethod
(
MM_methods
,
(
PyObject
*
)
self
,
name
);
}
static
int
MM_length
(
self
)
MMobject
*
self
;
{
long
l
=
0
,
el
,
i
;
PyObject
*
e
=
0
;
UNLESS
(
-
1
!=
(
i
=
PyList_Size
(
self
->
data
)))
return
-
1
;
while
(
--
i
>=
0
)
{
e
=
PyList_GetItem
(
self
->
data
,
i
);
UNLESS
(
-
1
!=
(
el
=
PyObject_Length
(
e
)))
return
-
1
;
l
+=
el
;
}
return
l
;
}
static
PyObject
*
MM_subscript
(
self
,
key
)
MMobject
*
self
;
PyObject
*
key
;
{
long
i
;
PyObject
*
e
;
UNLESS
(
-
1
!=
(
i
=
PyList_Size
(
self
->
data
)))
return
NULL
;
while
(
--
i
>=
0
)
{
e
=
PyList_GetItem
(
self
->
data
,
i
);
if
(
e
=
PyObject_GetItem
(
e
,
key
))
return
e
;
PyErr_Clear
();
}
PyErr_SetObject
(
PyExc_KeyError
,
key
);
return
NULL
;
}
static
PyMappingMethods
MM_as_mapping
=
{
(
inquiry
)
MM_length
,
/*mp_length*/
(
binaryfunc
)
MM_subscript
,
/*mp_subscript*/
(
objobjargproc
)
NULL
,
/*mp_ass_subscript*/
};
/* -------------------------------------------------------- */
static
char
MMtype__doc__
[]
=
"MultiMapping -- Combine multiple mapping objects for lookup"
;
static
PyExtensionClass
MMtype
=
{
PyObject_HEAD_INIT
(
&
PyType_Type
)
0
,
/*ob_size*/
"MultMapping"
,
/*tp_name*/
sizeof
(
MMobject
),
/*tp_basicsize*/
0
,
/*tp_itemsize*/
/* methods */
(
destructor
)
MM_dealloc
,
/*tp_dealloc*/
(
printfunc
)
0
,
/*tp_print*/
(
getattrfunc
)
MM_getattr
,
/*tp_getattr*/
(
setattrfunc
)
0
,
/*tp_setattr*/
(
cmpfunc
)
0
,
/*tp_compare*/
(
reprfunc
)
0
,
/*tp_repr*/
0
,
/*tp_as_number*/
0
,
/*tp_as_sequence*/
&
MM_as_mapping
,
/*tp_as_mapping*/
(
hashfunc
)
0
,
/*tp_hash*/
(
ternaryfunc
)
0
,
/*tp_call*/
(
reprfunc
)
0
,
/*tp_str*/
/* Space for future expansion */
0L
,
0L
,
0L
,
0L
,
MMtype__doc__
,
/* Documentation string */
METHOD_CHAIN
(
MM_methods
)
};
static
struct
PyMethodDef
MultiMapping_methods
[]
=
{
{
NULL
,
NULL
}
/* sentinel */
};
void
initMultiMapping
()
{
PyObject
*
m
,
*
d
;
m
=
Py_InitModule4
(
"MultiMapping"
,
MultiMapping_methods
,
"MultiMapping -- Wrap multiple mapping objects for lookup"
,
(
PyObject
*
)
NULL
,
PYTHON_API_VERSION
);
d
=
PyModule_GetDict
(
m
);
PyExtensionClass_Export
(
d
,
"MultiMapping"
,
MMtype
);
if
(
PyErr_Occurred
())
Py_FatalError
(
"can't initialize module MultiMapping"
);
}
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment