/[thuban]/branches/WIP-pyshapelib-bramz/libraries/pyshapelib/dbflibmodule.c
ViewVC logotype

Diff of /branches/WIP-pyshapelib-bramz/libraries/pyshapelib/dbflibmodule.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

trunk/thuban/libraries/pyshapelib/dbflib.i revision 1917 by bh, Mon Nov 3 17:31:11 2003 UTC branches/WIP-pyshapelib-bramz/libraries/pyshapelib/dbflibmodule.c revision 2750 by bramz, Thu Mar 22 20:35:08 2007 UTC
# Line 1  Line 1 
1  /* SWIG (www.swig.org) interface file for the dbf interface of shapelib  #include "pyshapelib_common.h"
  *  
  * At the moment (Dec 2000) this file is only useful to generate Python  
  * bindings. Invoke swig as follows:  
  *  
  *      swig -python -shadow dbflib.i  
  *  
  * to generate dbflib_wrap.c and dbflib.py. dbflib_wrap.c defines a  
  * bunch of Python-functions that wrap the appripriate dbflib functions  
  * and dbflib.py contains an object oriented wrapper around  
  * dbflib_wrap.c.  
  *  
  * This module defines one object type: DBFFile.  
  */  
   
 /* this is the dbflib module */  
 %module dbflib  
   
 /* first a %{,%} block. These blocks are copied verbatim to the  
  * dbflib_wrap.c file and are not parsed by SWIG. This is the place to  
  * import headerfiles and define helper-functions that are needed by the  
  * automatically generated wrappers.  
  */  
2    
3  %{  /* --- DBFFile ------------------------------------------------------------------------------------------------------- */
 #include "shapefil.h"  
4    
5    typedef struct {
6            PyObject_HEAD
7            DBFHandle handle;
8    } DBFFileObject;
9    
 /* Read one attribute from the dbf handle and return it as a new python object  
  *  
  * If an error occurs, set the appropriate Python exception and return  
  * NULL.  
  *  
  * Assume that the values of the record and field arguments are valid.  
  * The name argument will be passed to DBFGetFieldInfo as is and should  
  * thus be either NULL or a pointer to an array of at least 12 chars  
  */  
 static PyObject *  
 do_read_attribute(DBFInfo * handle, int record, int field, char * name)  
 {  
     int type, width;  
     PyObject *value;  
   
     type = DBFGetFieldInfo(handle, field, name, &width, NULL);  
     /* For strings NULL and the empty string are indistinguishable  
      * in DBF files. We prefer empty strings instead for backwards  
      * compatibility reasons because older wrapper versions returned  
      * emtpy strings as empty strings.  
      */  
     if (type != FTString && DBFIsAttributeNULL(handle, record, field))  
     {  
         value = Py_None;  
         Py_INCREF(value);  
     }  
     else  
     {  
         switch (type)  
         {  
         case FTString:  
         {  
             const char * temp = DBFReadStringAttribute(handle, record, field);  
             if (temp)  
             {  
                 value = PyString_FromString(temp);  
             }  
             else  
             {  
                 PyErr_Format(PyExc_IOError,  
                              "Can't read value for row %d column %d",  
                              record, field);  
                 value = NULL;  
             }  
             break;  
         }  
         case FTInteger:  
             value = PyInt_FromLong(DBFReadIntegerAttribute(handle, record,  
                                                            field));  
             break;  
         case FTDouble:  
             value = PyFloat_FromDouble(DBFReadDoubleAttribute(handle, record,  
                                                               field));  
             break;  
         default:  
             PyErr_Format(PyExc_TypeError, "Invalid field data type %d",  
                          type);  
             value = NULL;  
         }  
     }  
     if (!value)  
         return NULL;  
10    
     return value;  
 }      
11    
12  /* the read_attribute method. Return the value of the given record and  /* allocator
13   * field as a python object of the appropriate type.  */
14   *  static PyObject* dbffile_new(PyTypeObject* type, PyObject* args, PyObject* kwds)
15   * In case of error, set a python exception and return NULL. Since that  {
16   * value will be returned to the python interpreter as is, the          DBFFileObject* self;    
17   * interpreter should recognize the exception.          self = (DBFFileObject*) type->tp_alloc(type, 0);
18   */          self->handle = NULL;
19            return (PyObject*) self;
20  static PyObject *  }
21  DBFInfo_read_attribute(DBFInfo * handle, int record, int field)  
 {  
     if (record < 0 || record >= DBFGetRecordCount(handle))  
     {  
         PyErr_Format(PyExc_ValueError,  
                      "record index %d out of bounds (record count: %d)",  
                      record, DBFGetRecordCount(handle));  
         return NULL;  
     }  
22    
     if (field < 0 || field >= DBFGetFieldCount(handle))  
     {  
         PyErr_Format(PyExc_ValueError,  
                      "field index %d out of bounds (field count: %d)",  
                      field, DBFGetFieldCount(handle));  
         return NULL;  
     }  
23    
24      return do_read_attribute(handle, record, field, NULL);  /* deallocator
25    */
26    static void dbffile_dealloc(DBFFileObject* self)
27    {
28            DBFClose(self->handle);
29            self->handle = NULL;
30            self->ob_type->tp_free((PyObject*)self);
31  }  }
       
32    
 /* the read_record method. Return the record record as a dictionary with  
  * whose keys are the names of the fields, and their values as the  
  * appropriate Python type.  
  *  
  * In case of error, set a python exception and return NULL. Since that  
  * value will be returned to the python interpreter as is, the  
  * interpreter should recognize the exception.  
  */  
   
 static PyObject *  
 DBFInfo_read_record(DBFInfo * handle, int record)  
 {  
     int num_fields;  
     int i;  
     int type, width;  
     char name[12];  
     PyObject *dict;  
     PyObject *value;  
   
     if (record < 0 || record >= DBFGetRecordCount(handle))  
     {  
         PyErr_Format(PyExc_ValueError,  
                      "record index %d out of bounds (record count: %d)",  
                      record, DBFGetRecordCount(handle));  
         return NULL;  
     }  
33    
34      dict = PyDict_New();  
35      if (!dict)  /* constructor
36          return NULL;  */
37    static int dbffile_init(DBFFileObject* self, PyObject* args, PyObject* kwds)
38    {
39            char* file;
40            char* mode = "rb";
41            static char *kwlist[] = {"name", "mode", NULL};
42            if (!PyArg_ParseTupleAndKeywords(args, kwds, "et|s:__init__", kwlist,
43                    Py_FileSystemDefaultEncoding, &file, &mode)) return -1;
44                    
45      num_fields = DBFGetFieldCount(handle);          self->handle = DBFOpen(file, mode);    
46      for (i = 0; i < num_fields; i++)          if (!self->handle)
47      {          {
48          value = do_read_attribute(handle, record, i, name);                  PyErr_SetFromErrnoWithFilename(PyExc_IOError, file);
49          if (!value)          }
             goto fail;  
   
         PyDict_SetItemString(dict, name, value);  
         Py_DECREF(value);  
     }  
   
     return dict;  
   
  fail:  
     Py_XDECREF(dict);  
     return NULL;  
 }  
   
 /* the write_record method. Write the record record given wither as a  
  * dictionary or a sequence (i.e. a list or a tuple).  
  *  
  * If it's a dictionary the keys must be the names of the fields and  
  * their value must have a suitable type. Only the fields actually  
  * contained in the dictionary are written. Fields for which there's no  
  * item in the dict are not modified.  
  *  
  * If it's a sequence, all fields must be present in the right order.  
  *  
  * In case of error, set a python exception and return NULL. Since that  
  * value will be returned to the python interpreter as is, the  
  * interpreter should recognize the exception.  
  *  
  * The method is implemented with two c-functions, write_field to write  
  * a single field and DBFInfo_write_record as the front-end.  
  */  
50    
51            PyMem_Free(file);
52            return self->handle ? 0 : -1;
53    }
54    
 /* write a single field of a record. */  
 static int  
 write_field(DBFHandle handle, int record, int field, int type,  
             PyObject * value)  
 {  
     char * string_value;  
     int int_value;  
     double double_value;  
   
     if (value == Py_None)  
     {  
         if (!DBFWriteNULLAttribute(handle, record, field))  
         {  
             PyErr_Format(PyExc_IOError,  
                          "can't write NULL field %d of record %d",  
                          field, record);  
             return 0;  
         }  
     }  
     else  
     {  
         switch (type)  
         {  
         case FTString:  
             string_value = PyString_AsString(value);  
             if (!string_value)  
                 return 0;  
             if (!DBFWriteStringAttribute(handle, record, field, string_value))  
             {  
                 PyErr_Format(PyExc_IOError,  
                              "can't write field %d of record %d",  
                              field, record);  
                 return 0;  
             }  
             break;  
   
         case FTInteger:  
             int_value = PyInt_AsLong(value);  
             if (int_value == -1 && PyErr_Occurred())  
                 return 0;  
             if (!DBFWriteIntegerAttribute(handle, record, field, int_value))  
             {  
                 PyErr_Format(PyExc_IOError,  
                              "can't write field %d of record %d",  
                              field, record);  
                 return 0;  
             }  
             break;  
   
         case FTDouble:  
             double_value = PyFloat_AsDouble(value);  
             if (double_value == -1 && PyErr_Occurred())  
                 return 0;  
             if (!DBFWriteDoubleAttribute(handle, record, field, double_value))  
             {  
                 PyErr_Format(PyExc_IOError,  
                              "can't write field %d of record %d",  
                              field, record);  
                 return 0;  
             }  
             break;  
   
         default:  
             PyErr_Format(PyExc_TypeError, "Invalid field data type %d", type);  
             return 0;  
         }  
     }  
   
     return 1;  
 }  
   
 static  
 PyObject *  
 DBFInfo_write_record(DBFHandle handle, int record, PyObject *record_object)  
 {  
     int num_fields;  
     int i, length;  
     int type, width;  
     char name[12];  
     PyObject * value = NULL;  
   
     num_fields = DBFGetFieldCount(handle);  
   
     /* We used to use PyMapping_Check to test whether record_object is a  
      * dictionary like object instead of PySequence_Check to test  
      * whether it's a sequence. Unfortunately in Python 2.3  
      * PyMapping_Check returns true for lists and tuples too so the old  
      * approach doesn't work anymore.  
      */  
     if (PySequence_Check(record_object))  
     {  
         /* It's a sequence object. Iterate through all items in the  
          * sequence and write them to the appropriate field.  
          */  
         length = PySequence_Length(record_object);  
         if (length != num_fields)  
         {  
             PyErr_SetString(PyExc_TypeError,  
                             "record must have one item for each field");  
             goto fail;  
         }  
         for (i = 0; i < length; i++)  
         {  
             type = DBFGetFieldInfo(handle, i, name, &width, NULL);  
             value = PySequence_GetItem(record_object, i);  
             if (value)  
             {  
                 if (!write_field(handle, record, i, type, value))  
                     goto fail;  
                 Py_DECREF(value);  
             }  
             else  
             {  
                 goto fail;  
             }  
         }  
     }  
     else  
     {  
         /* It's a dictionary-like object. Iterate over the names of the  
          * known fields and write the corresponding item  
          */  
         for (i = 0; i < num_fields; i++)  
         {  
             type = DBFGetFieldInfo(handle, i, name, &width, NULL);  
55    
             /* if the dictionary has the key name write that object to  
              * the appropriate field, other wise just clear the python  
              * exception and do nothing.  
              */  
             value = PyMapping_GetItemString(record_object, name);  
             if (value)  
             {  
                 if (!write_field(handle, record, i, type, value))  
                     goto fail;  
                 Py_DECREF(value);  
             }  
             else  
             {  
                 PyErr_Clear();  
             }  
         }  
     }  
   
     Py_INCREF(Py_None);  
     return Py_None;  
   
  fail:  
     Py_XDECREF(value);  
     return NULL;  
 }  
 %}  
   
   
 /*  
  * The SWIG Interface definition.  
  */  
   
 /* include some common SWIG type definitions and standard exception  
    handling code */  
 %include typemaps.i  
 %include exception.i  
   
 /* As for ShapeFile in shapelib.i, We define a new C-struct that holds  
  * the DBFHandle. This is mainly done so we can separate the close()  
  * method from the destructor but it also helps with exception handling.  
  *  
  * After the DBFFile has been opened or created the handle is not NULL.  
  * The close() method closes the file and sets handle to NULL as an  
  * indicator that the file has been closed.  
  */  
56    
57  %{  static PyObject* dbffile_close(DBFFileObject* self)
58      typedef struct {  {
59          DBFHandle handle;          DBFClose(self->handle);
60      } DBFFile;          self->handle = NULL;
61  %}          Py_RETURN_NONE;
62    }
63    
64    
 /* The first argument to the DBFFile methods is a DBFFile pointer.  
  * We have to check whether handle is not NULL in most methods but not  
  * all. In the destructor and the close method, it's OK for handle to be  
  * NULL. We achieve this by checking whether the preprocessor macro  
  * NOCHECK_$name is defined. SWIG replaces $name with the name of the  
  * function for which the code is inserted. In the %{,%}-block below we  
  * define the macros for the destructor and the close() method.  
  */  
65    
66  %typemap(python,check) DBFFile *{  static PyObject* dbffile_field_count(DBFFileObject* self)
67  %#ifndef NOCHECK_$name  {
68      if (!$target || !$target->handle)          return PyInt_FromLong((long)DBFGetFieldCount(self->handle));
         SWIG_exception(SWIG_TypeError, "dbffile already closed");  
 %#endif  
69  }  }
70    
 %{  
 #define NOCHECK_delete_DBFFile  
 #define NOCHECK_DBFFile_close  
 %}  
71    
72    
73  /* An exception handle for the constructor and the module level open()  static PyObject* dbffile_record_count(DBFFileObject* self)
74   * and create() functions.  {
75   *          return PyInt_FromLong((long)DBFGetRecordCount(self->handle));
  * Annoyingly, we *have* to put braces around the SWIG_exception()  
  * calls, at least in the python case, because of the way the macro is  
  * written. Of course, always putting braces around the branches of an  
  * if-statement is often considered good practice.  
  */  
 %typemap(python,except) DBFFile * {  
     $function;  
     if (!$source)  
     {  
         SWIG_exception(SWIG_MemoryError, "no memory");  
     }  
     else if (!$source->handle)  
     {  
         SWIG_exception(SWIG_IOError, "$name failed");  
     }  
76  }  }
77    
78  /* Exception handler for the add_field method */  
79  %typemap(python,except) int DBFFile_add_field {  
80      $function;  static PyObject* dbffile_field_info(DBFFileObject* self, PyObject* args)
81      if ($source < 0)  {
82      {          char field_name[12];
83          SWIG_exception(SWIG_RuntimeError, "add_field failed");          int field, width = 0, decimals = 0, field_type;
84      }          
85            if (!PyArg_ParseTuple(args, "i:field_info", &field)) return NULL;
86            
87            field_name[0] = '\0';
88            field_type = DBFGetFieldInfo(self->handle, field, field_name, &width, &decimals);
89            
90            return Py_BuildValue("isii", field_type, field_name, width, decimals);
91  }  }
92    
 /* define and use some typemaps for the field_info() method whose  
  * C-implementation has three output parameters that are returned  
  * through pointers passed into the function. SWIG already has  
  * definitions for common types such as int* and we can use those for  
  * the last two parameters:  
  */  
93    
 %apply int * OUTPUT { int * output_width }  
 %apply int * OUTPUT { int * output_decimals }  
94    
95  /* the fieldname has to be defined manually: */  static PyObject* dbffile_add_field(DBFFileObject* self, PyObject* args)
96  %typemap(python,ignore) char *fieldname_out(char temp[12]) {  {
97      $target = temp;          char* name;
98            int type, width, decimals;
99            int field;
100            
101            if (!PyArg_ParseTuple(args, "siii:add_field", &name, &type, &width, &decimals)) return NULL;
102            
103            field = DBFAddField(self->handle, name, (DBFFieldType)type, width, decimals);
104            
105            if (field < 0)
106            {
107                    PyErr_SetString(PyExc_ValueError, "Failed to add field due to inappropriate field definition");
108                    return NULL;
109            }
110            return PyInt_FromLong((long)field);
111  }  }
112    
 %typemap(python,argout) char *fieldname_out() {  
     PyObject * string = PyString_FromString($source);  
     $target = t_output_helper($target,string);  
 }  
113    
114    
115    /* Read one attribute from the dbf handle and return it as a new python object
116    *
117    * If an error occurs, set the appropriate Python exception and return
118    * NULL.
119    *
120    * Assume that the values of the record and field arguments are valid.
121    * The name argument will be passed to DBFGetFieldInfo as is and should
122    * thus be either NULL or a pointer to an array of at least 12 chars
123    */
124    static PyObject* do_read_attribute(DBFHandle handle, int record, int field, char * name)
125    {
126            int type, width;
127            const char* temp;
128            type = DBFGetFieldInfo(handle, field, name, &width, NULL);
129            
130            /* For strings NULL and the empty string are indistinguishable
131            * in DBF files. We prefer empty strings instead for backwards
132            * compatibility reasons because older wrapper versions returned
133            * emtpy strings as empty strings.
134            */
135            if (type != FTString && DBFIsAttributeNULL(handle, record, field))
136            {
137                    Py_RETURN_NONE;
138            }
139            else
140            {
141                    switch (type)
142                    {
143                    case FTString:
144                            temp = DBFReadStringAttribute(handle, record, field);
145                            if (temp) return PyString_FromString(temp);
146    
147                    case FTInteger:
148                            return PyInt_FromLong((long)DBFReadIntegerAttribute(handle, record, field));
149    
150                    case FTDouble:
151                            return PyFloat_FromDouble(DBFReadDoubleAttribute(handle, record, field));
152                            
153                    case FTLogical:
154                            temp = DBFReadLogicalAttribute(handle, record, field);
155                            if (temp)
156                            {
157                                    switch (temp[0])
158                                    {
159                                    case 'F':
160                                    case 'N':
161                                            Py_RETURN_FALSE;
162                                    case 'T':
163                                    case 'Y':
164                                            Py_RETURN_TRUE;
165                                    }
166                            }
167                            break;
168    
169                    default:
170                            PyErr_Format(PyExc_TypeError, "Invalid field data type %d", type);
171                            return NULL;
172                    }
173            }
174            
175            PyErr_Format(PyExc_IOError,     "Can't read value for row %d column %d", record, field);
176            return NULL;
177    }    
178    
 /*  
  * The SWIG-version of the DBFFile struct  
  */  
179    
180  typedef struct  
181    /* the read_attribute method. Return the value of the given record and
182    * field as a python object of the appropriate type.
183    */
184    static PyObject* dbffile_read_attribute(DBFFileObject* self, PyObject* args)
185  {  {
186      %addmethods {          int record, field;
187          DBFFile(const char *file, const char * mode = "rb") {  
188              DBFFile * self = malloc(sizeof(DBFFile));          if (!PyArg_ParseTuple(args, "ii:read_field", &record, &field)) return NULL;
189              if (self)          
190                  self->handle = DBFOpen(file, mode);          if (record < 0 || record >= DBFGetRecordCount(self->handle))
191              return self;          {
192          }                  PyErr_Format(PyExc_ValueError,
193                                                "record index %d out of bounds (record count: %d)",
194          ~DBFFile() {                                  record, DBFGetRecordCount(self->handle));
195              if (self->handle)                  return NULL;
                 DBFClose(self->handle);  
             free(self);  
196          }          }
197    
198          void close() {          if (field < 0 || field >= DBFGetFieldCount(self->handle))
199              if (self->handle)          {
200                  DBFClose(self->handle);                  PyErr_Format(PyExc_ValueError,
201              self->handle = NULL;                                  "field index %d out of bounds (field count: %d)",
202                                    field, DBFGetFieldCount(self->handle));
203                    return NULL;
204          }          }
205    
206          int field_count() {          return do_read_attribute(self->handle, record, field, NULL);
207              return DBFGetFieldCount(self->handle);  }
208    
209    
210    
211    /* the read_record method. Return the record record as a dictionary with
212    * whose keys are the names of the fields, and their values as the
213    * appropriate Python type.
214    */
215    static PyObject* dbffile_read_record(DBFFileObject* self, PyObject* args)
216    {
217            int record;
218            int num_fields;
219            int i;
220            char name[12];
221            PyObject *dict;
222            PyObject *value = NULL;
223    
224            if (!PyArg_ParseTuple(args, "i:read_record", &record)) return NULL;
225    
226            if (record < 0 || record >= DBFGetRecordCount(self->handle))
227            {
228                    PyErr_Format(PyExc_ValueError,
229                            "record index %d out of bounds (record count: %d)",
230                            record, DBFGetRecordCount(self->handle));
231                    return NULL;
232          }          }
233    
234          int record_count() {          dict = PyDict_New();
235              return DBFGetRecordCount(self->handle);          if (!dict) return NULL;
236            
237            num_fields = DBFGetFieldCount(self->handle);
238            for (i = 0; i < num_fields; i++)
239            {
240                    value = do_read_attribute(self->handle, record, i, name);
241                    if (!value || PyDict_SetItemString(dict, name, value) < 0) goto fail;
242                    Py_DECREF(value);
243                    value = NULL;
244          }          }
245    
246          int field_info(int iField, char * fieldname_out,          return dict;
247                         int * output_width, int * output_decimals) {  
248              return DBFGetFieldInfo(self->handle, iField, fieldname_out,  fail:
249                                     output_width, output_decimals);          Py_XDECREF(value);
250            Py_DECREF(dict);
251            return NULL;
252    }
253    
254    
255    
256    /* write a single field of a record. */
257    static int do_write_field(DBFHandle handle, int record, int field, int type, PyObject* value)
258    {
259            char * string_value;
260            int int_value;
261            double double_value;
262            int logical_value;
263    
264            if (value == Py_None)
265            {
266                    if (DBFWriteNULLAttribute(handle, record, field)) return 1;
267          }          }
268                        else
269          PyObject * read_record(int record) {          {
270              return DBFInfo_read_record(self->handle, record);                  switch (type)
271                    {
272                    case FTString:
273                            string_value = PyString_AsString(value);
274                            if (!string_value) return 0;
275                            if (DBFWriteStringAttribute(handle, record, field, string_value)) return 1;
276                            break;
277    
278                    case FTInteger:
279                            int_value = PyInt_AsLong(value);
280                            if (int_value == -1 && PyErr_Occurred()) return 0;
281                            if (DBFWriteIntegerAttribute(handle, record, field, int_value)) return 1;
282                            break;
283    
284                    case FTDouble:
285                            double_value = PyFloat_AsDouble(value);
286                            if (double_value == -1 && PyErr_Occurred()) return 0;
287                            if (DBFWriteDoubleAttribute(handle, record, field, double_value)) return 1;
288                            break;
289                            
290                    case FTLogical:
291                            logical_value = PyObject_IsTrue(value);
292                            if (logical_value == -1) return 0;
293                            if (DBFWriteLogicalAttribute(handle, record, field, logical_value ? 'T' : 'F')) return 1;
294                            break;
295    
296                    default:
297                            PyErr_Format(PyExc_TypeError, "Invalid field data type %d", type);
298                            return 0;
299                    }
300          }          }
301    
302          PyObject * read_attribute(int record, int field) {          PyErr_Format(PyExc_IOError,     "can't write field %d of record %d", field, record);
303              return DBFInfo_read_attribute(self->handle, record, field);          return 0;
304          }  }
305    
306    
307    
308          int add_field(const char * pszFieldName, DBFFieldType eType,  static PyObject* dbffile_write_field(DBFFileObject* self, PyObject* args)
309                        int nWidth, int nDecimals) {  {
310              return DBFAddField(self->handle, pszFieldName, eType, nWidth,          int record, field;
311                                 nDecimals);          PyObject* value;
312            int type;
313    
314            if (!PyArg_ParseTuple(args, "iiO:write_field", &record, &field, &value)) return NULL;
315            
316            if (field < 0 || field >= DBFGetFieldCount(self->handle))
317            {
318                    PyErr_Format(PyExc_ValueError,
319                                    "field index %d out of bounds (field count: %d)",
320                                    field, DBFGetFieldCount(self->handle));
321                    return NULL;
322          }          }
323    
324          PyObject *write_record(int record, PyObject *dict_or_sequence) {          type = DBFGetFieldInfo(self->handle, field, NULL, NULL, NULL);
325              return DBFInfo_write_record(self->handle, record,          if (!do_write_field(self->handle, record, field, type, value)) return NULL;
326                                          dict_or_sequence);          Py_RETURN_NONE;
327    }
328    
329    
330    
331    static PyObject* dbffile_write_record(DBFFileObject* self, PyObject* args)
332    {
333            int record;
334            PyObject* record_object;
335            int i, num_fields;
336            
337            int type;
338            char name[12];
339            PyObject* value = NULL;
340            
341            if (!PyArg_ParseTuple(args, "iO:write_record", &record, &record_object)) return NULL;
342            
343            num_fields = DBFGetFieldCount(self->handle);
344            
345            /* mimic ShapeFile functionality where id = -1 means appending */
346            if (record == -1)
347            {
348                    record = num_fields;
349          }          }
350    
351          int commit() {          if (PySequence_Check(record_object))
352              return DBFCommit(self->handle);          {
353                    /* It's a sequence object. Iterate through all items in the
354                    * sequence and write them to the appropriate field.
355                    */
356                    if (PySequence_Length(record_object) != num_fields)
357                    {
358                            PyErr_SetString(PyExc_TypeError, "record must have one item for each field");
359                            return NULL;
360                    }
361                    for (i = 0; i < num_fields; ++i)
362                    {
363                            type = DBFGetFieldInfo(self->handle, i, NULL, NULL, NULL);
364                            value = PySequence_GetItem(record_object, i);
365                            if (!value) return NULL;
366                            if (!do_write_field(self->handle, record, i, type, value))
367                            {
368                                    Py_DECREF(value);
369                                    return NULL;
370                            }
371                            Py_DECREF(value);
372                    }
373            }
374            else
375            {
376                    /* It's a dictionary-like object. Iterate over the names of the
377                    * known fields and write the corresponding item
378                    */
379                    for (i = 0; i < num_fields; ++i)
380                    {
381                            name[0] = '\0';
382                            type = DBFGetFieldInfo(self->handle, i, name, NULL, NULL);
383                            value = PyDict_GetItemString(record_object, name);
384                            if (value && !do_write_field(self->handle, record, i, type, value)) return NULL;
385                    }
386          }          }
387            
388            return PyInt_FromLong((long)record);
389    }
390    
     }  
 } DBFFile;  
391    
392    
393  /*  static PyObject* dbffile_repr(DBFFileObject* self)
394   * Two module level functions, open() and create() that correspond to  {
395   * DBFOpen and DBFCreate respectively. open() is equivalent to the          /* TODO: it would be nice to do something like "dbflib.DBFFile(filename, mode)" instead */
396   * DBFFile constructor.          return PyString_FromFormat("<dbflib.DBFFile object at %p>", self->handle);
397   */  }
398    
399    
 %{  
     DBFFile * open_DBFFile(const char * file, const char * mode)  
     {  
         DBFFile * self = malloc(sizeof(DBFFile));  
         if (self)  
             self->handle = DBFOpen(file, mode);  
         return self;  
     }  
 %}  
400    
401  %name(open) %new DBFFile * open_DBFFile(const char * file,  /* The commit method implementation
402                                          const char * mode = "rb");  *
403    * The method relies on the DBFUpdateHeader method which is not
404    * available in shapelib <= 1.2.10.  setup.py defines
405    * HAVE_UPDATE_HEADER's value depending on whether the function is
406    * available in the shapelib version the code is compiled with.
407    */
408    #if HAVE_UPDATE_HEADER
409    static PyObject* dbffile_commit(DBFFileObject* self)
410    {
411            DBFUpdateHeader(self->handle);
412            Py_RETURN_NONE;
413    }
414    #endif
415    
416  %{  
417      DBFFile * create_DBFFile(const char * file)  
418      {  static struct PyMethodDef dbffile_methods[] =
419          DBFFile * self = malloc(sizeof(DBFFile));  {
420          if (self)          {"close", (PyCFunction)dbffile_close, METH_NOARGS,
421              self->handle = DBFCreate(file);                  "close() -> None\n\n"
422          return self;                  "closes DBFFile"},
423      }          {"field_count", (PyCFunction)dbffile_field_count, METH_NOARGS,
424  %}                  "field_count() -> integer\n\n"
425  %name(create) %new DBFFile * create_DBFFile(const char * file);                  "returns number of fields currently defined"},
426            {"record_count", (PyCFunction)dbffile_record_count, METH_NOARGS,
427                    "record_count() -> integer\n\n"
428                    "returns number of records that currently exist"},
429            {"field_info", (PyCFunction)dbffile_field_info, METH_VARARGS,
430                    "field_info(field_index) -> (type, name, width, decimals)\n\n"
431                    "returns info of a field as a tuple with:\n"
432                    "- type: the type of the field corresponding to the integer value of one "
433                    " of the constants FTString, FTInteger, ...\n"
434                    "- name: the name of the field as a string\n"
435                    "- width: the width of the field as a number of characters\n"
436                    "- decimals: the number of decimal digits" },
437            {"add_field", (PyCFunction)dbffile_add_field, METH_VARARGS,
438                    "add_field(type, name, width, decimals) -> field_index\n\n"
439                    "adds a new field and returns field index if successful\n"
440                    "- type: the type of the field corresponding to the integer value of one "
441                    " of the constants FTString, FTInteger, ...\n"
442                    "- name: the name of the field as a string\n"
443                    "- width: the width of the field as a number of characters\n"
444                    "- decimals: the number of decimal digits" },
445            {"read_attribute", (PyCFunction)dbffile_read_attribute, METH_VARARGS,
446                    "read_attribute(record_index, field_index) -> value\n\n"
447                    "returns the value of one field of a record"},
448            {"read_record", (PyCFunction)dbffile_read_record, METH_VARARGS,
449                    "read_record(record_index) -> dict\n\n"
450                    "returns an entire record as a dictionary of field names and values"},
451            {"write_field", (PyCFunction)dbffile_write_field, METH_VARARGS,
452                    "write_field(record_index, field_index, new_value)\n"
453                    "writes a single field of a record"},
454            {"write_record", (PyCFunction)dbffile_write_record, METH_VARARGS,
455                    "write_record(record_index, record) -> record_index\n\n"
456                    "Writes an entire record as a dict or a sequence, and return index of record\n"
457                    "Record can either be a dictionary in which case the keys are used as field names, "
458                    "or a sequence that must have an item for every field (length = field_count())"},
459    #if HAVE_UPDATE_HEADER
460            {"commit", (PyCFunction)dbffile_commit, METH_NOARGS,
461                    "commit() -> None"},
462    #endif
463            {NULL}
464    };
465    
466    
467    
468    static struct PyGetSetDef dbffile_getsetters[] =
469    {
470            {NULL}
471    };
472    
473    
474    
475    static PyTypeObject DBFFileType = PYSHAPELIB_DEFINE_TYPE(DBFFileObject, dbffile, "shapelib.DBFFile", 0);
476    
477    
478    
479  /* constant definitions copied from shapefil.h */  /* --- dbflib -------------------------------------------------------------------------------------------------------- */
480  typedef enum {  
481    FTString,  static PyObject* dbflib_open(PyObject* module, PyObject* args)
482    FTInteger,  {
483    FTDouble,          return PyObject_CallObject((PyObject*)&DBFFileType, args);
484    FTInvalid  }
485  } DBFFieldType;  
486    
487    
488    static PyObject* dbflib_create(PyObject* module, PyObject* args)
489    {
490            char* file;
491            DBFFileObject* result;
492            
493            if (!PyArg_ParseTuple(args, "et:create", Py_FileSystemDefaultEncoding, &file)) return NULL;
494            
495            result = PyObject_New(DBFFileObject, &DBFFileType);
496            if (!result)
497            {
498                    return PyErr_NoMemory();
499            }
500            
501            result->handle = DBFCreate(file);
502            if (!result->handle)
503            {
504                    PyObject_Del((PyObject*)result);
505                    PyErr_SetString(PyExc_RuntimeError, "Failed to create DBFFile");
506                    return NULL;
507            }
508            
509            return (PyObject*) result;
510    }
511    
512    
513    
514    static struct PyMethodDef dbflib_methods[] =
515    {
516            {"open", (PyCFunction)dbflib_open, METH_VARARGS,
517                    "open(name [, mode]) -> DBFFile\n\n"
518                    "opens a DBFFile" },
519            {"create", (PyCFunction)dbflib_create, METH_VARARGS,
520                    "create(name) -> DBFFile\n\n"
521                    "create a DBFFile" },
522            {NULL}
523    };
524    
525    
526    
527    PyMODINIT_FUNC initdbflib(void)
528    {
529            PyObject* module = Py_InitModule("dbflib", dbflib_methods);
530            if (!module) return;
531            
532            PYSHAPELIB_ADD_TYPE(DBFFileType, "DBFFile");
533            
534            PYSHAPELIB_ADD_CONSTANT(FTString);
535            PYSHAPELIB_ADD_CONSTANT(FTInteger);
536            PYSHAPELIB_ADD_CONSTANT(FTDouble);
537            PYSHAPELIB_ADD_CONSTANT(FTLogical);
538            PYSHAPELIB_ADD_CONSTANT(FTInvalid);
539            PyModule_AddIntConstant(module, "_have_commit", HAVE_UPDATE_HEADER);
540    }
Legend:
Removed from v.1917  
changed lines
  Added in v.2750
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26