mirror of https://github.com/python/cpython
1781 lines
49 KiB
C
1781 lines
49 KiB
C
/* csv module */
|
|
|
|
/*
|
|
|
|
This module provides the low-level underpinnings of a CSV reading/writing
|
|
module. Users should not use this module directly, but import the csv.py
|
|
module instead.
|
|
|
|
*/
|
|
|
|
// clinic/_csv.c.h uses internal pycore_modsupport.h API
|
|
#ifndef Py_BUILD_CORE_BUILTIN
|
|
# define Py_BUILD_CORE_MODULE 1
|
|
#endif
|
|
|
|
#include "Python.h"
|
|
|
|
#include <stddef.h> // offsetof()
|
|
#include <stdbool.h>
|
|
|
|
/*[clinic input]
|
|
module _csv
|
|
[clinic start generated code]*/
|
|
/*[clinic end generated code: output=da39a3ee5e6b4b0d input=385118b71aa43706]*/
|
|
|
|
#include "clinic/_csv.c.h"
|
|
#define NOT_SET ((Py_UCS4)-1)
|
|
#define EOL ((Py_UCS4)-2)
|
|
|
|
|
|
typedef struct {
|
|
PyObject *error_obj; /* CSV exception */
|
|
PyObject *dialects; /* Dialect registry */
|
|
PyTypeObject *dialect_type;
|
|
PyTypeObject *reader_type;
|
|
PyTypeObject *writer_type;
|
|
long field_limit; /* max parsed field size */
|
|
PyObject *str_write;
|
|
} _csvstate;
|
|
|
|
static struct PyModuleDef _csvmodule;
|
|
|
|
static inline _csvstate*
|
|
get_csv_state(PyObject *module)
|
|
{
|
|
void *state = PyModule_GetState(module);
|
|
assert(state != NULL);
|
|
return (_csvstate *)state;
|
|
}
|
|
|
|
static int
|
|
_csv_clear(PyObject *module)
|
|
{
|
|
_csvstate *module_state = PyModule_GetState(module);
|
|
Py_CLEAR(module_state->error_obj);
|
|
Py_CLEAR(module_state->dialects);
|
|
Py_CLEAR(module_state->dialect_type);
|
|
Py_CLEAR(module_state->reader_type);
|
|
Py_CLEAR(module_state->writer_type);
|
|
Py_CLEAR(module_state->str_write);
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
_csv_traverse(PyObject *module, visitproc visit, void *arg)
|
|
{
|
|
_csvstate *module_state = PyModule_GetState(module);
|
|
Py_VISIT(module_state->error_obj);
|
|
Py_VISIT(module_state->dialects);
|
|
Py_VISIT(module_state->dialect_type);
|
|
Py_VISIT(module_state->reader_type);
|
|
Py_VISIT(module_state->writer_type);
|
|
return 0;
|
|
}
|
|
|
|
static void
|
|
_csv_free(void *module)
|
|
{
|
|
_csv_clear((PyObject *)module);
|
|
}
|
|
|
|
typedef enum {
|
|
START_RECORD, START_FIELD, ESCAPED_CHAR, IN_FIELD,
|
|
IN_QUOTED_FIELD, ESCAPE_IN_QUOTED_FIELD, QUOTE_IN_QUOTED_FIELD,
|
|
EAT_CRNL,AFTER_ESCAPED_CRNL
|
|
} ParserState;
|
|
|
|
typedef enum {
|
|
QUOTE_MINIMAL, QUOTE_ALL, QUOTE_NONNUMERIC, QUOTE_NONE,
|
|
QUOTE_STRINGS, QUOTE_NOTNULL
|
|
} QuoteStyle;
|
|
|
|
typedef struct {
|
|
QuoteStyle style;
|
|
const char *name;
|
|
} StyleDesc;
|
|
|
|
static const StyleDesc quote_styles[] = {
|
|
{ QUOTE_MINIMAL, "QUOTE_MINIMAL" },
|
|
{ QUOTE_ALL, "QUOTE_ALL" },
|
|
{ QUOTE_NONNUMERIC, "QUOTE_NONNUMERIC" },
|
|
{ QUOTE_NONE, "QUOTE_NONE" },
|
|
{ QUOTE_STRINGS, "QUOTE_STRINGS" },
|
|
{ QUOTE_NOTNULL, "QUOTE_NOTNULL" },
|
|
{ 0 }
|
|
};
|
|
|
|
typedef struct {
|
|
PyObject_HEAD
|
|
|
|
char doublequote; /* is " represented by ""? */
|
|
char skipinitialspace; /* ignore spaces following delimiter? */
|
|
char strict; /* raise exception on bad CSV */
|
|
int quoting; /* style of quoting to write */
|
|
Py_UCS4 delimiter; /* field separator */
|
|
Py_UCS4 quotechar; /* quote character */
|
|
Py_UCS4 escapechar; /* escape character */
|
|
PyObject *lineterminator; /* string to write between records */
|
|
|
|
} DialectObj;
|
|
|
|
typedef struct {
|
|
PyObject_HEAD
|
|
|
|
PyObject *input_iter; /* iterate over this for input lines */
|
|
|
|
DialectObj *dialect; /* parsing dialect */
|
|
|
|
PyObject *fields; /* field list for current record */
|
|
ParserState state; /* current CSV parse state */
|
|
Py_UCS4 *field; /* temporary buffer */
|
|
Py_ssize_t field_size; /* size of allocated buffer */
|
|
Py_ssize_t field_len; /* length of current field */
|
|
int numeric_field; /* treat field as numeric */
|
|
unsigned long line_num; /* Source-file line number */
|
|
} ReaderObj;
|
|
|
|
typedef struct {
|
|
PyObject_HEAD
|
|
|
|
PyObject *write; /* write output lines to this file */
|
|
|
|
DialectObj *dialect; /* parsing dialect */
|
|
|
|
Py_UCS4 *rec; /* buffer for parser.join */
|
|
Py_ssize_t rec_size; /* size of allocated record */
|
|
Py_ssize_t rec_len; /* length of record */
|
|
int num_fields; /* number of fields in record */
|
|
|
|
PyObject *error_obj; /* cached error object */
|
|
} WriterObj;
|
|
|
|
/*
|
|
* DIALECT class
|
|
*/
|
|
|
|
static PyObject *
|
|
get_dialect_from_registry(PyObject *name_obj, _csvstate *module_state)
|
|
{
|
|
PyObject *dialect_obj;
|
|
if (PyDict_GetItemRef(module_state->dialects, name_obj, &dialect_obj) == 0) {
|
|
PyErr_SetString(module_state->error_obj, "unknown dialect");
|
|
}
|
|
return dialect_obj;
|
|
}
|
|
|
|
static PyObject *
|
|
get_char_or_None(Py_UCS4 c)
|
|
{
|
|
if (c == NOT_SET) {
|
|
Py_RETURN_NONE;
|
|
}
|
|
else
|
|
return PyUnicode_FromOrdinal(c);
|
|
}
|
|
|
|
static PyObject *
|
|
Dialect_get_lineterminator(DialectObj *self, void *Py_UNUSED(ignored))
|
|
{
|
|
return Py_XNewRef(self->lineterminator);
|
|
}
|
|
|
|
static PyObject *
|
|
Dialect_get_delimiter(DialectObj *self, void *Py_UNUSED(ignored))
|
|
{
|
|
return get_char_or_None(self->delimiter);
|
|
}
|
|
|
|
static PyObject *
|
|
Dialect_get_escapechar(DialectObj *self, void *Py_UNUSED(ignored))
|
|
{
|
|
return get_char_or_None(self->escapechar);
|
|
}
|
|
|
|
static PyObject *
|
|
Dialect_get_quotechar(DialectObj *self, void *Py_UNUSED(ignored))
|
|
{
|
|
return get_char_or_None(self->quotechar);
|
|
}
|
|
|
|
static PyObject *
|
|
Dialect_get_quoting(DialectObj *self, void *Py_UNUSED(ignored))
|
|
{
|
|
return PyLong_FromLong(self->quoting);
|
|
}
|
|
|
|
static int
|
|
_set_bool(const char *name, char *target, PyObject *src, bool dflt)
|
|
{
|
|
if (src == NULL)
|
|
*target = dflt;
|
|
else {
|
|
int b = PyObject_IsTrue(src);
|
|
if (b < 0)
|
|
return -1;
|
|
*target = (char)b;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
_set_int(const char *name, int *target, PyObject *src, int dflt)
|
|
{
|
|
if (src == NULL)
|
|
*target = dflt;
|
|
else {
|
|
int value;
|
|
if (!PyLong_CheckExact(src)) {
|
|
PyErr_Format(PyExc_TypeError,
|
|
"\"%s\" must be an integer", name);
|
|
return -1;
|
|
}
|
|
value = PyLong_AsInt(src);
|
|
if (value == -1 && PyErr_Occurred()) {
|
|
return -1;
|
|
}
|
|
*target = value;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
_set_char_or_none(const char *name, Py_UCS4 *target, PyObject *src, Py_UCS4 dflt)
|
|
{
|
|
if (src == NULL) {
|
|
*target = dflt;
|
|
}
|
|
else {
|
|
*target = NOT_SET;
|
|
if (src != Py_None) {
|
|
if (!PyUnicode_Check(src)) {
|
|
PyErr_Format(PyExc_TypeError,
|
|
"\"%s\" must be string or None, not %.200s", name,
|
|
Py_TYPE(src)->tp_name);
|
|
return -1;
|
|
}
|
|
Py_ssize_t len = PyUnicode_GetLength(src);
|
|
if (len < 0) {
|
|
return -1;
|
|
}
|
|
if (len != 1) {
|
|
PyErr_Format(PyExc_TypeError,
|
|
"\"%s\" must be a 1-character string",
|
|
name);
|
|
return -1;
|
|
}
|
|
*target = PyUnicode_READ_CHAR(src, 0);
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
_set_char(const char *name, Py_UCS4 *target, PyObject *src, Py_UCS4 dflt)
|
|
{
|
|
if (src == NULL) {
|
|
*target = dflt;
|
|
}
|
|
else {
|
|
if (!PyUnicode_Check(src)) {
|
|
PyErr_Format(PyExc_TypeError,
|
|
"\"%s\" must be string, not %.200s", name,
|
|
Py_TYPE(src)->tp_name);
|
|
return -1;
|
|
}
|
|
Py_ssize_t len = PyUnicode_GetLength(src);
|
|
if (len < 0) {
|
|
return -1;
|
|
}
|
|
if (len != 1) {
|
|
PyErr_Format(PyExc_TypeError,
|
|
"\"%s\" must be a 1-character string",
|
|
name);
|
|
return -1;
|
|
}
|
|
*target = PyUnicode_READ_CHAR(src, 0);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
_set_str(const char *name, PyObject **target, PyObject *src, const char *dflt)
|
|
{
|
|
if (src == NULL)
|
|
*target = PyUnicode_DecodeASCII(dflt, strlen(dflt), NULL);
|
|
else {
|
|
if (src == Py_None)
|
|
*target = NULL;
|
|
else if (!PyUnicode_Check(src)) {
|
|
PyErr_Format(PyExc_TypeError,
|
|
"\"%s\" must be a string", name);
|
|
return -1;
|
|
}
|
|
else {
|
|
Py_XSETREF(*target, Py_NewRef(src));
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
dialect_check_quoting(int quoting)
|
|
{
|
|
const StyleDesc *qs;
|
|
|
|
for (qs = quote_styles; qs->name; qs++) {
|
|
if ((int)qs->style == quoting)
|
|
return 0;
|
|
}
|
|
PyErr_Format(PyExc_TypeError, "bad \"quoting\" value");
|
|
return -1;
|
|
}
|
|
|
|
static int
|
|
dialect_check_char(const char *name, Py_UCS4 c, DialectObj *dialect)
|
|
{
|
|
if (c == '\r' || c == '\n' || (dialect->skipinitialspace && c == ' ')) {
|
|
PyErr_Format(PyExc_ValueError, "bad %s value", name);
|
|
return -1;
|
|
}
|
|
if (PyUnicode_FindChar(
|
|
dialect->lineterminator, c, 0,
|
|
PyUnicode_GET_LENGTH(dialect->lineterminator), 1) >= 0)
|
|
{
|
|
PyErr_Format(PyExc_ValueError, "bad %s or lineterminator value", name);
|
|
return -1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
dialect_check_chars(const char *name1, const char *name2, Py_UCS4 c1, Py_UCS4 c2)
|
|
{
|
|
if (c1 == c2 && c1 != NOT_SET) {
|
|
PyErr_Format(PyExc_ValueError, "bad %s or %s value", name1, name2);
|
|
return -1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
#define D_OFF(x) offsetof(DialectObj, x)
|
|
|
|
static struct PyMemberDef Dialect_memberlist[] = {
|
|
{ "skipinitialspace", Py_T_BOOL, D_OFF(skipinitialspace), Py_READONLY },
|
|
{ "doublequote", Py_T_BOOL, D_OFF(doublequote), Py_READONLY },
|
|
{ "strict", Py_T_BOOL, D_OFF(strict), Py_READONLY },
|
|
{ NULL }
|
|
};
|
|
|
|
static PyGetSetDef Dialect_getsetlist[] = {
|
|
{ "delimiter", (getter)Dialect_get_delimiter},
|
|
{ "escapechar", (getter)Dialect_get_escapechar},
|
|
{ "lineterminator", (getter)Dialect_get_lineterminator},
|
|
{ "quotechar", (getter)Dialect_get_quotechar},
|
|
{ "quoting", (getter)Dialect_get_quoting},
|
|
{NULL},
|
|
};
|
|
|
|
static void
|
|
Dialect_dealloc(DialectObj *self)
|
|
{
|
|
PyTypeObject *tp = Py_TYPE(self);
|
|
PyObject_GC_UnTrack(self);
|
|
tp->tp_clear((PyObject *)self);
|
|
PyObject_GC_Del(self);
|
|
Py_DECREF(tp);
|
|
}
|
|
|
|
static char *dialect_kws[] = {
|
|
"dialect",
|
|
"delimiter",
|
|
"doublequote",
|
|
"escapechar",
|
|
"lineterminator",
|
|
"quotechar",
|
|
"quoting",
|
|
"skipinitialspace",
|
|
"strict",
|
|
NULL
|
|
};
|
|
|
|
static _csvstate *
|
|
_csv_state_from_type(PyTypeObject *type, const char *name)
|
|
{
|
|
PyObject *module = PyType_GetModuleByDef(type, &_csvmodule);
|
|
if (module == NULL) {
|
|
return NULL;
|
|
}
|
|
_csvstate *module_state = PyModule_GetState(module);
|
|
if (module_state == NULL) {
|
|
PyErr_Format(PyExc_SystemError,
|
|
"%s: No _csv module state found", name);
|
|
return NULL;
|
|
}
|
|
return module_state;
|
|
}
|
|
|
|
static PyObject *
|
|
dialect_new(PyTypeObject *type, PyObject *args, PyObject *kwargs)
|
|
{
|
|
DialectObj *self;
|
|
PyObject *ret = NULL;
|
|
PyObject *dialect = NULL;
|
|
PyObject *delimiter = NULL;
|
|
PyObject *doublequote = NULL;
|
|
PyObject *escapechar = NULL;
|
|
PyObject *lineterminator = NULL;
|
|
PyObject *quotechar = NULL;
|
|
PyObject *quoting = NULL;
|
|
PyObject *skipinitialspace = NULL;
|
|
PyObject *strict = NULL;
|
|
|
|
if (!PyArg_ParseTupleAndKeywords(args, kwargs,
|
|
"|OOOOOOOOO", dialect_kws,
|
|
&dialect,
|
|
&delimiter,
|
|
&doublequote,
|
|
&escapechar,
|
|
&lineterminator,
|
|
"echar,
|
|
"ing,
|
|
&skipinitialspace,
|
|
&strict))
|
|
return NULL;
|
|
|
|
_csvstate *module_state = _csv_state_from_type(type, "dialect_new");
|
|
if (module_state == NULL) {
|
|
return NULL;
|
|
}
|
|
|
|
if (dialect != NULL) {
|
|
if (PyUnicode_Check(dialect)) {
|
|
dialect = get_dialect_from_registry(dialect, module_state);
|
|
if (dialect == NULL)
|
|
return NULL;
|
|
}
|
|
else
|
|
Py_INCREF(dialect);
|
|
/* Can we reuse this instance? */
|
|
if (PyObject_TypeCheck(dialect, module_state->dialect_type) &&
|
|
delimiter == NULL &&
|
|
doublequote == NULL &&
|
|
escapechar == NULL &&
|
|
lineterminator == NULL &&
|
|
quotechar == NULL &&
|
|
quoting == NULL &&
|
|
skipinitialspace == NULL &&
|
|
strict == NULL)
|
|
return dialect;
|
|
}
|
|
|
|
self = (DialectObj *)type->tp_alloc(type, 0);
|
|
if (self == NULL) {
|
|
Py_CLEAR(dialect);
|
|
return NULL;
|
|
}
|
|
self->lineterminator = NULL;
|
|
|
|
Py_XINCREF(delimiter);
|
|
Py_XINCREF(doublequote);
|
|
Py_XINCREF(escapechar);
|
|
Py_XINCREF(lineterminator);
|
|
Py_XINCREF(quotechar);
|
|
Py_XINCREF(quoting);
|
|
Py_XINCREF(skipinitialspace);
|
|
Py_XINCREF(strict);
|
|
if (dialect != NULL) {
|
|
#define DIALECT_GETATTR(v, n) \
|
|
do { \
|
|
if (v == NULL) { \
|
|
v = PyObject_GetAttrString(dialect, n); \
|
|
if (v == NULL) \
|
|
PyErr_Clear(); \
|
|
} \
|
|
} while (0)
|
|
DIALECT_GETATTR(delimiter, "delimiter");
|
|
DIALECT_GETATTR(doublequote, "doublequote");
|
|
DIALECT_GETATTR(escapechar, "escapechar");
|
|
DIALECT_GETATTR(lineterminator, "lineterminator");
|
|
DIALECT_GETATTR(quotechar, "quotechar");
|
|
DIALECT_GETATTR(quoting, "quoting");
|
|
DIALECT_GETATTR(skipinitialspace, "skipinitialspace");
|
|
DIALECT_GETATTR(strict, "strict");
|
|
}
|
|
|
|
/* check types and convert to C values */
|
|
#define DIASET(meth, name, target, src, dflt) \
|
|
if (meth(name, target, src, dflt)) \
|
|
goto err
|
|
DIASET(_set_char, "delimiter", &self->delimiter, delimiter, ',');
|
|
DIASET(_set_bool, "doublequote", &self->doublequote, doublequote, true);
|
|
DIASET(_set_char_or_none, "escapechar", &self->escapechar, escapechar, NOT_SET);
|
|
DIASET(_set_str, "lineterminator", &self->lineterminator, lineterminator, "\r\n");
|
|
DIASET(_set_char_or_none, "quotechar", &self->quotechar, quotechar, '"');
|
|
DIASET(_set_int, "quoting", &self->quoting, quoting, QUOTE_MINIMAL);
|
|
DIASET(_set_bool, "skipinitialspace", &self->skipinitialspace, skipinitialspace, false);
|
|
DIASET(_set_bool, "strict", &self->strict, strict, false);
|
|
|
|
/* validate options */
|
|
if (dialect_check_quoting(self->quoting))
|
|
goto err;
|
|
if (self->delimiter == NOT_SET) {
|
|
PyErr_SetString(PyExc_TypeError,
|
|
"\"delimiter\" must be a 1-character string");
|
|
goto err;
|
|
}
|
|
if (quotechar == Py_None && quoting == NULL)
|
|
self->quoting = QUOTE_NONE;
|
|
if (self->quoting != QUOTE_NONE && self->quotechar == NOT_SET) {
|
|
PyErr_SetString(PyExc_TypeError,
|
|
"quotechar must be set if quoting enabled");
|
|
goto err;
|
|
}
|
|
if (self->lineterminator == NULL) {
|
|
PyErr_SetString(PyExc_TypeError, "lineterminator must be set");
|
|
goto err;
|
|
}
|
|
if (dialect_check_char("delimiter", self->delimiter, self) ||
|
|
dialect_check_char("escapechar", self->escapechar, self) ||
|
|
dialect_check_char("quotechar", self->quotechar, self) ||
|
|
dialect_check_chars("delimiter", "escapechar",
|
|
self->delimiter, self->escapechar) ||
|
|
dialect_check_chars("delimiter", "quotechar",
|
|
self->delimiter, self->quotechar) ||
|
|
dialect_check_chars("escapechar", "quotechar",
|
|
self->escapechar, self->quotechar))
|
|
{
|
|
goto err;
|
|
}
|
|
|
|
ret = Py_NewRef(self);
|
|
err:
|
|
Py_CLEAR(self);
|
|
Py_CLEAR(dialect);
|
|
Py_CLEAR(delimiter);
|
|
Py_CLEAR(doublequote);
|
|
Py_CLEAR(escapechar);
|
|
Py_CLEAR(lineterminator);
|
|
Py_CLEAR(quotechar);
|
|
Py_CLEAR(quoting);
|
|
Py_CLEAR(skipinitialspace);
|
|
Py_CLEAR(strict);
|
|
return ret;
|
|
}
|
|
|
|
/* Since dialect is now a heap type, it inherits pickling method for
|
|
* protocol 0 and 1 from object, therefore it needs to be overridden */
|
|
|
|
PyDoc_STRVAR(dialect_reduce_doc, "raises an exception to avoid pickling");
|
|
|
|
static PyObject *
|
|
Dialect_reduce(PyObject *self, PyObject *args) {
|
|
PyErr_Format(PyExc_TypeError,
|
|
"cannot pickle '%.100s' instances", _PyType_Name(Py_TYPE(self)));
|
|
return NULL;
|
|
}
|
|
|
|
static struct PyMethodDef dialect_methods[] = {
|
|
{"__reduce__", Dialect_reduce, METH_VARARGS, dialect_reduce_doc},
|
|
{"__reduce_ex__", Dialect_reduce, METH_VARARGS, dialect_reduce_doc},
|
|
{NULL, NULL}
|
|
};
|
|
|
|
PyDoc_STRVAR(Dialect_Type_doc,
|
|
"CSV dialect\n"
|
|
"\n"
|
|
"The Dialect type records CSV parsing and generation options.\n");
|
|
|
|
static int
|
|
Dialect_clear(DialectObj *self)
|
|
{
|
|
Py_CLEAR(self->lineterminator);
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
Dialect_traverse(DialectObj *self, visitproc visit, void *arg)
|
|
{
|
|
Py_VISIT(self->lineterminator);
|
|
Py_VISIT(Py_TYPE(self));
|
|
return 0;
|
|
}
|
|
|
|
static PyType_Slot Dialect_Type_slots[] = {
|
|
{Py_tp_doc, (char*)Dialect_Type_doc},
|
|
{Py_tp_members, Dialect_memberlist},
|
|
{Py_tp_getset, Dialect_getsetlist},
|
|
{Py_tp_new, dialect_new},
|
|
{Py_tp_methods, dialect_methods},
|
|
{Py_tp_dealloc, Dialect_dealloc},
|
|
{Py_tp_clear, Dialect_clear},
|
|
{Py_tp_traverse, Dialect_traverse},
|
|
{0, NULL}
|
|
};
|
|
|
|
PyType_Spec Dialect_Type_spec = {
|
|
.name = "_csv.Dialect",
|
|
.basicsize = sizeof(DialectObj),
|
|
.flags = (Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC |
|
|
Py_TPFLAGS_IMMUTABLETYPE),
|
|
.slots = Dialect_Type_slots,
|
|
};
|
|
|
|
|
|
/*
|
|
* Return an instance of the dialect type, given a Python instance or kwarg
|
|
* description of the dialect
|
|
*/
|
|
static PyObject *
|
|
_call_dialect(_csvstate *module_state, PyObject *dialect_inst, PyObject *kwargs)
|
|
{
|
|
PyObject *type = (PyObject *)module_state->dialect_type;
|
|
if (dialect_inst) {
|
|
return PyObject_VectorcallDict(type, &dialect_inst, 1, kwargs);
|
|
}
|
|
else {
|
|
return PyObject_VectorcallDict(type, NULL, 0, kwargs);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* READER
|
|
*/
|
|
static int
|
|
parse_save_field(ReaderObj *self)
|
|
{
|
|
PyObject *field;
|
|
|
|
field = PyUnicode_FromKindAndData(PyUnicode_4BYTE_KIND,
|
|
(void *) self->field, self->field_len);
|
|
if (field == NULL)
|
|
return -1;
|
|
self->field_len = 0;
|
|
if (self->numeric_field) {
|
|
PyObject *tmp;
|
|
|
|
self->numeric_field = 0;
|
|
tmp = PyNumber_Float(field);
|
|
Py_DECREF(field);
|
|
if (tmp == NULL)
|
|
return -1;
|
|
field = tmp;
|
|
}
|
|
if (PyList_Append(self->fields, field) < 0) {
|
|
Py_DECREF(field);
|
|
return -1;
|
|
}
|
|
Py_DECREF(field);
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
parse_grow_buff(ReaderObj *self)
|
|
{
|
|
assert((size_t)self->field_size <= PY_SSIZE_T_MAX / sizeof(Py_UCS4));
|
|
|
|
Py_ssize_t field_size_new = self->field_size ? 2 * self->field_size : 4096;
|
|
Py_UCS4 *field_new = self->field;
|
|
PyMem_Resize(field_new, Py_UCS4, field_size_new);
|
|
if (field_new == NULL) {
|
|
PyErr_NoMemory();
|
|
return 0;
|
|
}
|
|
self->field = field_new;
|
|
self->field_size = field_size_new;
|
|
return 1;
|
|
}
|
|
|
|
static int
|
|
parse_add_char(ReaderObj *self, _csvstate *module_state, Py_UCS4 c)
|
|
{
|
|
if (self->field_len >= module_state->field_limit) {
|
|
PyErr_Format(module_state->error_obj,
|
|
"field larger than field limit (%ld)",
|
|
module_state->field_limit);
|
|
return -1;
|
|
}
|
|
if (self->field_len == self->field_size && !parse_grow_buff(self))
|
|
return -1;
|
|
self->field[self->field_len++] = c;
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
parse_process_char(ReaderObj *self, _csvstate *module_state, Py_UCS4 c)
|
|
{
|
|
DialectObj *dialect = self->dialect;
|
|
|
|
switch (self->state) {
|
|
case START_RECORD:
|
|
/* start of record */
|
|
if (c == EOL)
|
|
/* empty line - return [] */
|
|
break;
|
|
else if (c == '\n' || c == '\r') {
|
|
self->state = EAT_CRNL;
|
|
break;
|
|
}
|
|
/* normal character - handle as START_FIELD */
|
|
self->state = START_FIELD;
|
|
/* fallthru */
|
|
case START_FIELD:
|
|
/* expecting field */
|
|
if (c == '\n' || c == '\r' || c == EOL) {
|
|
/* save empty field - return [fields] */
|
|
if (parse_save_field(self) < 0)
|
|
return -1;
|
|
self->state = (c == EOL ? START_RECORD : EAT_CRNL);
|
|
}
|
|
else if (c == dialect->quotechar &&
|
|
dialect->quoting != QUOTE_NONE) {
|
|
/* start quoted field */
|
|
self->state = IN_QUOTED_FIELD;
|
|
}
|
|
else if (c == dialect->escapechar) {
|
|
/* possible escaped character */
|
|
self->state = ESCAPED_CHAR;
|
|
}
|
|
else if (c == ' ' && dialect->skipinitialspace)
|
|
/* ignore spaces at start of field */
|
|
;
|
|
else if (c == dialect->delimiter) {
|
|
/* save empty field */
|
|
if (parse_save_field(self) < 0)
|
|
return -1;
|
|
}
|
|
else {
|
|
/* begin new unquoted field */
|
|
if (dialect->quoting == QUOTE_NONNUMERIC)
|
|
self->numeric_field = 1;
|
|
if (parse_add_char(self, module_state, c) < 0)
|
|
return -1;
|
|
self->state = IN_FIELD;
|
|
}
|
|
break;
|
|
|
|
case ESCAPED_CHAR:
|
|
if (c == '\n' || c=='\r') {
|
|
if (parse_add_char(self, module_state, c) < 0)
|
|
return -1;
|
|
self->state = AFTER_ESCAPED_CRNL;
|
|
break;
|
|
}
|
|
if (c == EOL)
|
|
c = '\n';
|
|
if (parse_add_char(self, module_state, c) < 0)
|
|
return -1;
|
|
self->state = IN_FIELD;
|
|
break;
|
|
|
|
case AFTER_ESCAPED_CRNL:
|
|
if (c == EOL)
|
|
break;
|
|
/*fallthru*/
|
|
|
|
case IN_FIELD:
|
|
/* in unquoted field */
|
|
if (c == '\n' || c == '\r' || c == EOL) {
|
|
/* end of line - return [fields] */
|
|
if (parse_save_field(self) < 0)
|
|
return -1;
|
|
self->state = (c == EOL ? START_RECORD : EAT_CRNL);
|
|
}
|
|
else if (c == dialect->escapechar) {
|
|
/* possible escaped character */
|
|
self->state = ESCAPED_CHAR;
|
|
}
|
|
else if (c == dialect->delimiter) {
|
|
/* save field - wait for new field */
|
|
if (parse_save_field(self) < 0)
|
|
return -1;
|
|
self->state = START_FIELD;
|
|
}
|
|
else {
|
|
/* normal character - save in field */
|
|
if (parse_add_char(self, module_state, c) < 0)
|
|
return -1;
|
|
}
|
|
break;
|
|
|
|
case IN_QUOTED_FIELD:
|
|
/* in quoted field */
|
|
if (c == EOL)
|
|
;
|
|
else if (c == dialect->escapechar) {
|
|
/* Possible escape character */
|
|
self->state = ESCAPE_IN_QUOTED_FIELD;
|
|
}
|
|
else if (c == dialect->quotechar &&
|
|
dialect->quoting != QUOTE_NONE) {
|
|
if (dialect->doublequote) {
|
|
/* doublequote; " represented by "" */
|
|
self->state = QUOTE_IN_QUOTED_FIELD;
|
|
}
|
|
else {
|
|
/* end of quote part of field */
|
|
self->state = IN_FIELD;
|
|
}
|
|
}
|
|
else {
|
|
/* normal character - save in field */
|
|
if (parse_add_char(self, module_state, c) < 0)
|
|
return -1;
|
|
}
|
|
break;
|
|
|
|
case ESCAPE_IN_QUOTED_FIELD:
|
|
if (c == EOL)
|
|
c = '\n';
|
|
if (parse_add_char(self, module_state, c) < 0)
|
|
return -1;
|
|
self->state = IN_QUOTED_FIELD;
|
|
break;
|
|
|
|
case QUOTE_IN_QUOTED_FIELD:
|
|
/* doublequote - seen a quote in a quoted field */
|
|
if (dialect->quoting != QUOTE_NONE &&
|
|
c == dialect->quotechar) {
|
|
/* save "" as " */
|
|
if (parse_add_char(self, module_state, c) < 0)
|
|
return -1;
|
|
self->state = IN_QUOTED_FIELD;
|
|
}
|
|
else if (c == dialect->delimiter) {
|
|
/* save field - wait for new field */
|
|
if (parse_save_field(self) < 0)
|
|
return -1;
|
|
self->state = START_FIELD;
|
|
}
|
|
else if (c == '\n' || c == '\r' || c == EOL) {
|
|
/* end of line - return [fields] */
|
|
if (parse_save_field(self) < 0)
|
|
return -1;
|
|
self->state = (c == EOL ? START_RECORD : EAT_CRNL);
|
|
}
|
|
else if (!dialect->strict) {
|
|
if (parse_add_char(self, module_state, c) < 0)
|
|
return -1;
|
|
self->state = IN_FIELD;
|
|
}
|
|
else {
|
|
/* illegal */
|
|
PyErr_Format(module_state->error_obj, "'%c' expected after '%c'",
|
|
dialect->delimiter,
|
|
dialect->quotechar);
|
|
return -1;
|
|
}
|
|
break;
|
|
|
|
case EAT_CRNL:
|
|
if (c == '\n' || c == '\r')
|
|
;
|
|
else if (c == EOL)
|
|
self->state = START_RECORD;
|
|
else {
|
|
PyErr_Format(module_state->error_obj,
|
|
"new-line character seen in unquoted field - "
|
|
"do you need to open the file with newline=''?");
|
|
return -1;
|
|
}
|
|
break;
|
|
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
parse_reset(ReaderObj *self)
|
|
{
|
|
Py_XSETREF(self->fields, PyList_New(0));
|
|
if (self->fields == NULL)
|
|
return -1;
|
|
self->field_len = 0;
|
|
self->state = START_RECORD;
|
|
self->numeric_field = 0;
|
|
return 0;
|
|
}
|
|
|
|
static PyObject *
|
|
Reader_iternext(ReaderObj *self)
|
|
{
|
|
PyObject *fields = NULL;
|
|
Py_UCS4 c;
|
|
Py_ssize_t pos, linelen;
|
|
int kind;
|
|
const void *data;
|
|
PyObject *lineobj;
|
|
|
|
_csvstate *module_state = _csv_state_from_type(Py_TYPE(self),
|
|
"Reader.__next__");
|
|
if (module_state == NULL) {
|
|
return NULL;
|
|
}
|
|
|
|
if (parse_reset(self) < 0)
|
|
return NULL;
|
|
do {
|
|
lineobj = PyIter_Next(self->input_iter);
|
|
if (lineobj == NULL) {
|
|
/* End of input OR exception */
|
|
if (!PyErr_Occurred() && (self->field_len != 0 ||
|
|
self->state == IN_QUOTED_FIELD)) {
|
|
if (self->dialect->strict)
|
|
PyErr_SetString(module_state->error_obj,
|
|
"unexpected end of data");
|
|
else if (parse_save_field(self) >= 0)
|
|
break;
|
|
}
|
|
return NULL;
|
|
}
|
|
if (!PyUnicode_Check(lineobj)) {
|
|
PyErr_Format(module_state->error_obj,
|
|
"iterator should return strings, "
|
|
"not %.200s "
|
|
"(the file should be opened in text mode)",
|
|
Py_TYPE(lineobj)->tp_name
|
|
);
|
|
Py_DECREF(lineobj);
|
|
return NULL;
|
|
}
|
|
++self->line_num;
|
|
kind = PyUnicode_KIND(lineobj);
|
|
data = PyUnicode_DATA(lineobj);
|
|
pos = 0;
|
|
linelen = PyUnicode_GET_LENGTH(lineobj);
|
|
while (linelen--) {
|
|
c = PyUnicode_READ(kind, data, pos);
|
|
if (parse_process_char(self, module_state, c) < 0) {
|
|
Py_DECREF(lineobj);
|
|
goto err;
|
|
}
|
|
pos++;
|
|
}
|
|
Py_DECREF(lineobj);
|
|
if (parse_process_char(self, module_state, EOL) < 0)
|
|
goto err;
|
|
} while (self->state != START_RECORD);
|
|
|
|
fields = self->fields;
|
|
self->fields = NULL;
|
|
err:
|
|
return fields;
|
|
}
|
|
|
|
static void
|
|
Reader_dealloc(ReaderObj *self)
|
|
{
|
|
PyTypeObject *tp = Py_TYPE(self);
|
|
PyObject_GC_UnTrack(self);
|
|
tp->tp_clear((PyObject *)self);
|
|
if (self->field != NULL) {
|
|
PyMem_Free(self->field);
|
|
self->field = NULL;
|
|
}
|
|
PyObject_GC_Del(self);
|
|
Py_DECREF(tp);
|
|
}
|
|
|
|
static int
|
|
Reader_traverse(ReaderObj *self, visitproc visit, void *arg)
|
|
{
|
|
Py_VISIT(self->dialect);
|
|
Py_VISIT(self->input_iter);
|
|
Py_VISIT(self->fields);
|
|
Py_VISIT(Py_TYPE(self));
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
Reader_clear(ReaderObj *self)
|
|
{
|
|
Py_CLEAR(self->dialect);
|
|
Py_CLEAR(self->input_iter);
|
|
Py_CLEAR(self->fields);
|
|
return 0;
|
|
}
|
|
|
|
PyDoc_STRVAR(Reader_Type_doc,
|
|
"CSV reader\n"
|
|
"\n"
|
|
"Reader objects are responsible for reading and parsing tabular data\n"
|
|
"in CSV format.\n"
|
|
);
|
|
|
|
static struct PyMethodDef Reader_methods[] = {
|
|
{ NULL, NULL }
|
|
};
|
|
#define R_OFF(x) offsetof(ReaderObj, x)
|
|
|
|
static struct PyMemberDef Reader_memberlist[] = {
|
|
{ "dialect", _Py_T_OBJECT, R_OFF(dialect), Py_READONLY },
|
|
{ "line_num", Py_T_ULONG, R_OFF(line_num), Py_READONLY },
|
|
{ NULL }
|
|
};
|
|
|
|
|
|
static PyType_Slot Reader_Type_slots[] = {
|
|
{Py_tp_doc, (char*)Reader_Type_doc},
|
|
{Py_tp_traverse, Reader_traverse},
|
|
{Py_tp_iter, PyObject_SelfIter},
|
|
{Py_tp_iternext, Reader_iternext},
|
|
{Py_tp_methods, Reader_methods},
|
|
{Py_tp_members, Reader_memberlist},
|
|
{Py_tp_clear, Reader_clear},
|
|
{Py_tp_dealloc, Reader_dealloc},
|
|
{0, NULL}
|
|
};
|
|
|
|
PyType_Spec Reader_Type_spec = {
|
|
.name = "_csv.reader",
|
|
.basicsize = sizeof(ReaderObj),
|
|
.flags = (Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC |
|
|
Py_TPFLAGS_IMMUTABLETYPE | Py_TPFLAGS_DISALLOW_INSTANTIATION),
|
|
.slots = Reader_Type_slots
|
|
};
|
|
|
|
|
|
static PyObject *
|
|
csv_reader(PyObject *module, PyObject *args, PyObject *keyword_args)
|
|
{
|
|
PyObject * iterator, * dialect = NULL;
|
|
_csvstate *module_state = get_csv_state(module);
|
|
ReaderObj * self = PyObject_GC_New(
|
|
ReaderObj,
|
|
module_state->reader_type);
|
|
|
|
if (!self)
|
|
return NULL;
|
|
|
|
self->dialect = NULL;
|
|
self->fields = NULL;
|
|
self->input_iter = NULL;
|
|
self->field = NULL;
|
|
self->field_size = 0;
|
|
self->line_num = 0;
|
|
|
|
if (parse_reset(self) < 0) {
|
|
Py_DECREF(self);
|
|
return NULL;
|
|
}
|
|
|
|
if (!PyArg_UnpackTuple(args, "", 1, 2, &iterator, &dialect)) {
|
|
Py_DECREF(self);
|
|
return NULL;
|
|
}
|
|
self->input_iter = PyObject_GetIter(iterator);
|
|
if (self->input_iter == NULL) {
|
|
Py_DECREF(self);
|
|
return NULL;
|
|
}
|
|
self->dialect = (DialectObj *)_call_dialect(module_state, dialect,
|
|
keyword_args);
|
|
if (self->dialect == NULL) {
|
|
Py_DECREF(self);
|
|
return NULL;
|
|
}
|
|
|
|
PyObject_GC_Track(self);
|
|
return (PyObject *)self;
|
|
}
|
|
|
|
/*
|
|
* WRITER
|
|
*/
|
|
/* ---------------------------------------------------------------- */
|
|
static void
|
|
join_reset(WriterObj *self)
|
|
{
|
|
self->rec_len = 0;
|
|
self->num_fields = 0;
|
|
}
|
|
|
|
#define MEM_INCR 32768
|
|
|
|
/* Calculate new record length or append field to record. Return new
|
|
* record length.
|
|
*/
|
|
static Py_ssize_t
|
|
join_append_data(WriterObj *self, int field_kind, const void *field_data,
|
|
Py_ssize_t field_len, int *quoted,
|
|
int copy_phase)
|
|
{
|
|
DialectObj *dialect = self->dialect;
|
|
int i;
|
|
Py_ssize_t rec_len;
|
|
|
|
#define INCLEN \
|
|
do {\
|
|
if (!copy_phase && rec_len == PY_SSIZE_T_MAX) { \
|
|
goto overflow; \
|
|
} \
|
|
rec_len++; \
|
|
} while(0)
|
|
|
|
#define ADDCH(c) \
|
|
do {\
|
|
if (copy_phase) \
|
|
self->rec[rec_len] = c;\
|
|
INCLEN;\
|
|
} while(0)
|
|
|
|
rec_len = self->rec_len;
|
|
|
|
/* If this is not the first field we need a field separator */
|
|
if (self->num_fields > 0)
|
|
ADDCH(dialect->delimiter);
|
|
|
|
/* Handle preceding quote */
|
|
if (copy_phase && *quoted)
|
|
ADDCH(dialect->quotechar);
|
|
|
|
/* Copy/count field data */
|
|
/* If field is null just pass over */
|
|
for (i = 0; field_data && (i < field_len); i++) {
|
|
Py_UCS4 c = PyUnicode_READ(field_kind, field_data, i);
|
|
int want_escape = 0;
|
|
|
|
if (c == dialect->delimiter ||
|
|
c == dialect->escapechar ||
|
|
c == dialect->quotechar ||
|
|
PyUnicode_FindChar(
|
|
dialect->lineterminator, c, 0,
|
|
PyUnicode_GET_LENGTH(dialect->lineterminator), 1) >= 0) {
|
|
if (dialect->quoting == QUOTE_NONE)
|
|
want_escape = 1;
|
|
else {
|
|
if (c == dialect->quotechar) {
|
|
if (dialect->doublequote)
|
|
ADDCH(dialect->quotechar);
|
|
else
|
|
want_escape = 1;
|
|
}
|
|
else if (c == dialect->escapechar) {
|
|
want_escape = 1;
|
|
}
|
|
if (!want_escape)
|
|
*quoted = 1;
|
|
}
|
|
if (want_escape) {
|
|
if (dialect->escapechar == NOT_SET) {
|
|
PyErr_Format(self->error_obj,
|
|
"need to escape, but no escapechar set");
|
|
return -1;
|
|
}
|
|
ADDCH(dialect->escapechar);
|
|
}
|
|
}
|
|
/* Copy field character into record buffer.
|
|
*/
|
|
ADDCH(c);
|
|
}
|
|
|
|
if (*quoted) {
|
|
if (copy_phase)
|
|
ADDCH(dialect->quotechar);
|
|
else {
|
|
INCLEN; /* starting quote */
|
|
INCLEN; /* ending quote */
|
|
}
|
|
}
|
|
return rec_len;
|
|
|
|
overflow:
|
|
PyErr_NoMemory();
|
|
return -1;
|
|
#undef ADDCH
|
|
#undef INCLEN
|
|
}
|
|
|
|
static int
|
|
join_check_rec_size(WriterObj *self, Py_ssize_t rec_len)
|
|
{
|
|
assert(rec_len >= 0);
|
|
|
|
if (rec_len > self->rec_size) {
|
|
size_t rec_size_new = (size_t)(rec_len / MEM_INCR + 1) * MEM_INCR;
|
|
Py_UCS4 *rec_new = self->rec;
|
|
PyMem_Resize(rec_new, Py_UCS4, rec_size_new);
|
|
if (rec_new == NULL) {
|
|
PyErr_NoMemory();
|
|
return 0;
|
|
}
|
|
self->rec = rec_new;
|
|
self->rec_size = (Py_ssize_t)rec_size_new;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
static int
|
|
join_append(WriterObj *self, PyObject *field, int quoted)
|
|
{
|
|
int field_kind = -1;
|
|
const void *field_data = NULL;
|
|
Py_ssize_t field_len = 0;
|
|
Py_ssize_t rec_len;
|
|
|
|
if (field != NULL) {
|
|
field_kind = PyUnicode_KIND(field);
|
|
field_data = PyUnicode_DATA(field);
|
|
field_len = PyUnicode_GET_LENGTH(field);
|
|
}
|
|
rec_len = join_append_data(self, field_kind, field_data, field_len,
|
|
"ed, 0);
|
|
if (rec_len < 0)
|
|
return 0;
|
|
|
|
/* grow record buffer if necessary */
|
|
if (!join_check_rec_size(self, rec_len))
|
|
return 0;
|
|
|
|
self->rec_len = join_append_data(self, field_kind, field_data, field_len,
|
|
"ed, 1);
|
|
self->num_fields++;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int
|
|
join_append_lineterminator(WriterObj *self)
|
|
{
|
|
Py_ssize_t terminator_len, i;
|
|
int term_kind;
|
|
const void *term_data;
|
|
|
|
terminator_len = PyUnicode_GET_LENGTH(self->dialect->lineterminator);
|
|
if (terminator_len == -1)
|
|
return 0;
|
|
|
|
/* grow record buffer if necessary */
|
|
if (!join_check_rec_size(self, self->rec_len + terminator_len))
|
|
return 0;
|
|
|
|
term_kind = PyUnicode_KIND(self->dialect->lineterminator);
|
|
term_data = PyUnicode_DATA(self->dialect->lineterminator);
|
|
for (i = 0; i < terminator_len; i++)
|
|
self->rec[self->rec_len + i] = PyUnicode_READ(term_kind, term_data, i);
|
|
self->rec_len += terminator_len;
|
|
|
|
return 1;
|
|
}
|
|
|
|
PyDoc_STRVAR(csv_writerow_doc,
|
|
"writerow(iterable)\n"
|
|
"\n"
|
|
"Construct and write a CSV record from an iterable of fields. Non-string\n"
|
|
"elements will be converted to string.");
|
|
|
|
static PyObject *
|
|
csv_writerow(WriterObj *self, PyObject *seq)
|
|
{
|
|
DialectObj *dialect = self->dialect;
|
|
PyObject *iter, *field, *line, *result;
|
|
|
|
iter = PyObject_GetIter(seq);
|
|
if (iter == NULL) {
|
|
if (PyErr_ExceptionMatches(PyExc_TypeError)) {
|
|
PyErr_Format(self->error_obj,
|
|
"iterable expected, not %.200s",
|
|
Py_TYPE(seq)->tp_name);
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
/* Join all fields in internal buffer.
|
|
*/
|
|
join_reset(self);
|
|
while ((field = PyIter_Next(iter))) {
|
|
int append_ok;
|
|
int quoted;
|
|
|
|
switch (dialect->quoting) {
|
|
case QUOTE_NONNUMERIC:
|
|
quoted = !PyNumber_Check(field);
|
|
break;
|
|
case QUOTE_ALL:
|
|
quoted = 1;
|
|
break;
|
|
case QUOTE_STRINGS:
|
|
quoted = PyUnicode_Check(field);
|
|
break;
|
|
case QUOTE_NOTNULL:
|
|
quoted = field != Py_None;
|
|
break;
|
|
default:
|
|
quoted = 0;
|
|
break;
|
|
}
|
|
|
|
if (PyUnicode_Check(field)) {
|
|
append_ok = join_append(self, field, quoted);
|
|
Py_DECREF(field);
|
|
}
|
|
else if (field == Py_None) {
|
|
append_ok = join_append(self, NULL, quoted);
|
|
Py_DECREF(field);
|
|
}
|
|
else {
|
|
PyObject *str;
|
|
|
|
str = PyObject_Str(field);
|
|
Py_DECREF(field);
|
|
if (str == NULL) {
|
|
Py_DECREF(iter);
|
|
return NULL;
|
|
}
|
|
append_ok = join_append(self, str, quoted);
|
|
Py_DECREF(str);
|
|
}
|
|
if (!append_ok) {
|
|
Py_DECREF(iter);
|
|
return NULL;
|
|
}
|
|
}
|
|
Py_DECREF(iter);
|
|
if (PyErr_Occurred())
|
|
return NULL;
|
|
|
|
if (self->num_fields > 0 && self->rec_len == 0) {
|
|
if (dialect->quoting == QUOTE_NONE) {
|
|
PyErr_Format(self->error_obj,
|
|
"single empty field record must be quoted");
|
|
return NULL;
|
|
}
|
|
self->num_fields--;
|
|
if (!join_append(self, NULL, 1))
|
|
return NULL;
|
|
}
|
|
|
|
/* Add line terminator.
|
|
*/
|
|
if (!join_append_lineterminator(self)) {
|
|
return NULL;
|
|
}
|
|
|
|
line = PyUnicode_FromKindAndData(PyUnicode_4BYTE_KIND,
|
|
(void *) self->rec, self->rec_len);
|
|
if (line == NULL) {
|
|
return NULL;
|
|
}
|
|
result = PyObject_CallOneArg(self->write, line);
|
|
Py_DECREF(line);
|
|
return result;
|
|
}
|
|
|
|
PyDoc_STRVAR(csv_writerows_doc,
|
|
"writerows(iterable of iterables)\n"
|
|
"\n"
|
|
"Construct and write a series of iterables to a csv file. Non-string\n"
|
|
"elements will be converted to string.");
|
|
|
|
static PyObject *
|
|
csv_writerows(WriterObj *self, PyObject *seqseq)
|
|
{
|
|
PyObject *row_iter, *row_obj, *result;
|
|
|
|
row_iter = PyObject_GetIter(seqseq);
|
|
if (row_iter == NULL) {
|
|
return NULL;
|
|
}
|
|
while ((row_obj = PyIter_Next(row_iter))) {
|
|
result = csv_writerow(self, row_obj);
|
|
Py_DECREF(row_obj);
|
|
if (!result) {
|
|
Py_DECREF(row_iter);
|
|
return NULL;
|
|
}
|
|
else
|
|
Py_DECREF(result);
|
|
}
|
|
Py_DECREF(row_iter);
|
|
if (PyErr_Occurred())
|
|
return NULL;
|
|
Py_RETURN_NONE;
|
|
}
|
|
|
|
static struct PyMethodDef Writer_methods[] = {
|
|
{ "writerow", (PyCFunction)csv_writerow, METH_O, csv_writerow_doc},
|
|
{ "writerows", (PyCFunction)csv_writerows, METH_O, csv_writerows_doc},
|
|
{ NULL, NULL }
|
|
};
|
|
|
|
#define W_OFF(x) offsetof(WriterObj, x)
|
|
|
|
static struct PyMemberDef Writer_memberlist[] = {
|
|
{ "dialect", _Py_T_OBJECT, W_OFF(dialect), Py_READONLY },
|
|
{ NULL }
|
|
};
|
|
|
|
static int
|
|
Writer_traverse(WriterObj *self, visitproc visit, void *arg)
|
|
{
|
|
Py_VISIT(self->dialect);
|
|
Py_VISIT(self->write);
|
|
Py_VISIT(self->error_obj);
|
|
Py_VISIT(Py_TYPE(self));
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
Writer_clear(WriterObj *self)
|
|
{
|
|
Py_CLEAR(self->dialect);
|
|
Py_CLEAR(self->write);
|
|
Py_CLEAR(self->error_obj);
|
|
return 0;
|
|
}
|
|
|
|
static void
|
|
Writer_dealloc(WriterObj *self)
|
|
{
|
|
PyTypeObject *tp = Py_TYPE(self);
|
|
PyObject_GC_UnTrack(self);
|
|
tp->tp_clear((PyObject *)self);
|
|
if (self->rec != NULL) {
|
|
PyMem_Free(self->rec);
|
|
}
|
|
PyObject_GC_Del(self);
|
|
Py_DECREF(tp);
|
|
}
|
|
|
|
PyDoc_STRVAR(Writer_Type_doc,
|
|
"CSV writer\n"
|
|
"\n"
|
|
"Writer objects are responsible for generating tabular data\n"
|
|
"in CSV format from sequence input.\n"
|
|
);
|
|
|
|
static PyType_Slot Writer_Type_slots[] = {
|
|
{Py_tp_doc, (char*)Writer_Type_doc},
|
|
{Py_tp_traverse, Writer_traverse},
|
|
{Py_tp_clear, Writer_clear},
|
|
{Py_tp_dealloc, Writer_dealloc},
|
|
{Py_tp_methods, Writer_methods},
|
|
{Py_tp_members, Writer_memberlist},
|
|
{0, NULL}
|
|
};
|
|
|
|
PyType_Spec Writer_Type_spec = {
|
|
.name = "_csv.writer",
|
|
.basicsize = sizeof(WriterObj),
|
|
.flags = (Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC |
|
|
Py_TPFLAGS_IMMUTABLETYPE | Py_TPFLAGS_DISALLOW_INSTANTIATION),
|
|
.slots = Writer_Type_slots,
|
|
};
|
|
|
|
|
|
static PyObject *
|
|
csv_writer(PyObject *module, PyObject *args, PyObject *keyword_args)
|
|
{
|
|
PyObject * output_file, * dialect = NULL;
|
|
_csvstate *module_state = get_csv_state(module);
|
|
WriterObj * self = PyObject_GC_New(WriterObj, module_state->writer_type);
|
|
|
|
if (!self)
|
|
return NULL;
|
|
|
|
self->dialect = NULL;
|
|
self->write = NULL;
|
|
|
|
self->rec = NULL;
|
|
self->rec_size = 0;
|
|
self->rec_len = 0;
|
|
self->num_fields = 0;
|
|
|
|
self->error_obj = Py_NewRef(module_state->error_obj);
|
|
|
|
if (!PyArg_UnpackTuple(args, "", 1, 2, &output_file, &dialect)) {
|
|
Py_DECREF(self);
|
|
return NULL;
|
|
}
|
|
if (PyObject_GetOptionalAttr(output_file,
|
|
module_state->str_write,
|
|
&self->write) < 0) {
|
|
Py_DECREF(self);
|
|
return NULL;
|
|
}
|
|
if (self->write == NULL || !PyCallable_Check(self->write)) {
|
|
PyErr_SetString(PyExc_TypeError,
|
|
"argument 1 must have a \"write\" method");
|
|
Py_DECREF(self);
|
|
return NULL;
|
|
}
|
|
self->dialect = (DialectObj *)_call_dialect(module_state, dialect,
|
|
keyword_args);
|
|
if (self->dialect == NULL) {
|
|
Py_DECREF(self);
|
|
return NULL;
|
|
}
|
|
PyObject_GC_Track(self);
|
|
return (PyObject *)self;
|
|
}
|
|
|
|
/*
|
|
* DIALECT REGISTRY
|
|
*/
|
|
|
|
/*[clinic input]
|
|
_csv.list_dialects
|
|
|
|
Return a list of all known dialect names.
|
|
|
|
names = csv.list_dialects()
|
|
[clinic start generated code]*/
|
|
|
|
static PyObject *
|
|
_csv_list_dialects_impl(PyObject *module)
|
|
/*[clinic end generated code: output=a5b92b215b006a6d input=8953943eb17d98ab]*/
|
|
{
|
|
return PyDict_Keys(get_csv_state(module)->dialects);
|
|
}
|
|
|
|
static PyObject *
|
|
csv_register_dialect(PyObject *module, PyObject *args, PyObject *kwargs)
|
|
{
|
|
PyObject *name_obj, *dialect_obj = NULL;
|
|
_csvstate *module_state = get_csv_state(module);
|
|
PyObject *dialect;
|
|
|
|
if (!PyArg_UnpackTuple(args, "", 1, 2, &name_obj, &dialect_obj))
|
|
return NULL;
|
|
if (!PyUnicode_Check(name_obj)) {
|
|
PyErr_SetString(PyExc_TypeError,
|
|
"dialect name must be a string");
|
|
return NULL;
|
|
}
|
|
dialect = _call_dialect(module_state, dialect_obj, kwargs);
|
|
if (dialect == NULL)
|
|
return NULL;
|
|
if (PyDict_SetItem(module_state->dialects, name_obj, dialect) < 0) {
|
|
Py_DECREF(dialect);
|
|
return NULL;
|
|
}
|
|
Py_DECREF(dialect);
|
|
Py_RETURN_NONE;
|
|
}
|
|
|
|
|
|
/*[clinic input]
|
|
_csv.unregister_dialect
|
|
|
|
name: object
|
|
|
|
Delete the name/dialect mapping associated with a string name.
|
|
|
|
csv.unregister_dialect(name)
|
|
[clinic start generated code]*/
|
|
|
|
static PyObject *
|
|
_csv_unregister_dialect_impl(PyObject *module, PyObject *name)
|
|
/*[clinic end generated code: output=0813ebca6c058df4 input=6b5c1557bf60c7e7]*/
|
|
{
|
|
_csvstate *module_state = get_csv_state(module);
|
|
if (PyDict_DelItem(module_state->dialects, name) < 0) {
|
|
if (PyErr_ExceptionMatches(PyExc_KeyError)) {
|
|
PyErr_Format(module_state->error_obj, "unknown dialect");
|
|
}
|
|
return NULL;
|
|
}
|
|
Py_RETURN_NONE;
|
|
}
|
|
|
|
/*[clinic input]
|
|
_csv.get_dialect
|
|
|
|
name: object
|
|
|
|
Return the dialect instance associated with name.
|
|
|
|
dialect = csv.get_dialect(name)
|
|
[clinic start generated code]*/
|
|
|
|
static PyObject *
|
|
_csv_get_dialect_impl(PyObject *module, PyObject *name)
|
|
/*[clinic end generated code: output=aa988cd573bebebb input=edf9ddab32e448fb]*/
|
|
{
|
|
return get_dialect_from_registry(name, get_csv_state(module));
|
|
}
|
|
|
|
/*[clinic input]
|
|
_csv.field_size_limit
|
|
|
|
new_limit: object = NULL
|
|
|
|
Sets an upper limit on parsed fields.
|
|
|
|
csv.field_size_limit([limit])
|
|
|
|
Returns old limit. If limit is not given, no new limit is set and
|
|
the old limit is returned
|
|
[clinic start generated code]*/
|
|
|
|
static PyObject *
|
|
_csv_field_size_limit_impl(PyObject *module, PyObject *new_limit)
|
|
/*[clinic end generated code: output=f2799ecd908e250b input=cec70e9226406435]*/
|
|
{
|
|
_csvstate *module_state = get_csv_state(module);
|
|
long old_limit = module_state->field_limit;
|
|
if (new_limit != NULL) {
|
|
if (!PyLong_CheckExact(new_limit)) {
|
|
PyErr_Format(PyExc_TypeError,
|
|
"limit must be an integer");
|
|
return NULL;
|
|
}
|
|
module_state->field_limit = PyLong_AsLong(new_limit);
|
|
if (module_state->field_limit == -1 && PyErr_Occurred()) {
|
|
module_state->field_limit = old_limit;
|
|
return NULL;
|
|
}
|
|
}
|
|
return PyLong_FromLong(old_limit);
|
|
}
|
|
|
|
static PyType_Slot error_slots[] = {
|
|
{0, NULL},
|
|
};
|
|
|
|
PyType_Spec error_spec = {
|
|
.name = "_csv.Error",
|
|
.flags = Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE,
|
|
.slots = error_slots,
|
|
};
|
|
|
|
/*
|
|
* MODULE
|
|
*/
|
|
|
|
PyDoc_STRVAR(csv_module_doc, "CSV parsing and writing.\n");
|
|
|
|
PyDoc_STRVAR(csv_reader_doc,
|
|
" csv_reader = reader(iterable [, dialect='excel']\n"
|
|
" [optional keyword args])\n"
|
|
" for row in csv_reader:\n"
|
|
" process(row)\n"
|
|
"\n"
|
|
"The \"iterable\" argument can be any object that returns a line\n"
|
|
"of input for each iteration, such as a file object or a list. The\n"
|
|
"optional \"dialect\" parameter is discussed below. The function\n"
|
|
"also accepts optional keyword arguments which override settings\n"
|
|
"provided by the dialect.\n"
|
|
"\n"
|
|
"The returned object is an iterator. Each iteration returns a row\n"
|
|
"of the CSV file (which can span multiple input lines).\n");
|
|
|
|
PyDoc_STRVAR(csv_writer_doc,
|
|
" csv_writer = csv.writer(fileobj [, dialect='excel']\n"
|
|
" [optional keyword args])\n"
|
|
" for row in sequence:\n"
|
|
" csv_writer.writerow(row)\n"
|
|
"\n"
|
|
" [or]\n"
|
|
"\n"
|
|
" csv_writer = csv.writer(fileobj [, dialect='excel']\n"
|
|
" [optional keyword args])\n"
|
|
" csv_writer.writerows(rows)\n"
|
|
"\n"
|
|
"The \"fileobj\" argument can be any object that supports the file API.\n");
|
|
|
|
PyDoc_STRVAR(csv_register_dialect_doc,
|
|
"Create a mapping from a string name to a dialect class.\n"
|
|
" dialect = csv.register_dialect(name[, dialect[, **fmtparams]])");
|
|
|
|
static struct PyMethodDef csv_methods[] = {
|
|
{ "reader", _PyCFunction_CAST(csv_reader),
|
|
METH_VARARGS | METH_KEYWORDS, csv_reader_doc},
|
|
{ "writer", _PyCFunction_CAST(csv_writer),
|
|
METH_VARARGS | METH_KEYWORDS, csv_writer_doc},
|
|
{ "register_dialect", _PyCFunction_CAST(csv_register_dialect),
|
|
METH_VARARGS | METH_KEYWORDS, csv_register_dialect_doc},
|
|
_CSV_LIST_DIALECTS_METHODDEF
|
|
_CSV_UNREGISTER_DIALECT_METHODDEF
|
|
_CSV_GET_DIALECT_METHODDEF
|
|
_CSV_FIELD_SIZE_LIMIT_METHODDEF
|
|
{ NULL, NULL }
|
|
};
|
|
|
|
static int
|
|
csv_exec(PyObject *module) {
|
|
const StyleDesc *style;
|
|
PyObject *temp;
|
|
_csvstate *module_state = get_csv_state(module);
|
|
|
|
temp = PyType_FromModuleAndSpec(module, &Dialect_Type_spec, NULL);
|
|
module_state->dialect_type = (PyTypeObject *)temp;
|
|
if (PyModule_AddObjectRef(module, "Dialect", temp) < 0) {
|
|
return -1;
|
|
}
|
|
|
|
temp = PyType_FromModuleAndSpec(module, &Reader_Type_spec, NULL);
|
|
module_state->reader_type = (PyTypeObject *)temp;
|
|
if (PyModule_AddObjectRef(module, "Reader", temp) < 0) {
|
|
return -1;
|
|
}
|
|
|
|
temp = PyType_FromModuleAndSpec(module, &Writer_Type_spec, NULL);
|
|
module_state->writer_type = (PyTypeObject *)temp;
|
|
if (PyModule_AddObjectRef(module, "Writer", temp) < 0) {
|
|
return -1;
|
|
}
|
|
|
|
/* Set the field limit */
|
|
module_state->field_limit = 128 * 1024;
|
|
|
|
/* Add _dialects dictionary */
|
|
module_state->dialects = PyDict_New();
|
|
if (PyModule_AddObjectRef(module, "_dialects", module_state->dialects) < 0) {
|
|
return -1;
|
|
}
|
|
|
|
/* Add quote styles into dictionary */
|
|
for (style = quote_styles; style->name; style++) {
|
|
if (PyModule_AddIntConstant(module, style->name,
|
|
style->style) == -1)
|
|
return -1;
|
|
}
|
|
|
|
/* Add the CSV exception object to the module. */
|
|
PyObject *bases = PyTuple_Pack(1, PyExc_Exception);
|
|
if (bases == NULL) {
|
|
return -1;
|
|
}
|
|
module_state->error_obj = PyType_FromModuleAndSpec(module, &error_spec,
|
|
bases);
|
|
Py_DECREF(bases);
|
|
if (module_state->error_obj == NULL) {
|
|
return -1;
|
|
}
|
|
if (PyModule_AddType(module, (PyTypeObject *)module_state->error_obj) != 0) {
|
|
return -1;
|
|
}
|
|
|
|
module_state->str_write = PyUnicode_InternFromString("write");
|
|
if (module_state->str_write == NULL) {
|
|
return -1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static PyModuleDef_Slot csv_slots[] = {
|
|
{Py_mod_exec, csv_exec},
|
|
{Py_mod_multiple_interpreters, Py_MOD_PER_INTERPRETER_GIL_SUPPORTED},
|
|
{0, NULL}
|
|
};
|
|
|
|
static struct PyModuleDef _csvmodule = {
|
|
PyModuleDef_HEAD_INIT,
|
|
"_csv",
|
|
csv_module_doc,
|
|
sizeof(_csvstate),
|
|
csv_methods,
|
|
csv_slots,
|
|
_csv_traverse,
|
|
_csv_clear,
|
|
_csv_free
|
|
};
|
|
|
|
PyMODINIT_FUNC
|
|
PyInit__csv(void)
|
|
{
|
|
return PyModuleDef_Init(&_csvmodule);
|
|
}
|