/*

* New exceptions.c written in Iceland by Richard Jones and Georg Brandl.

*

* Thanks go to Tim Peters and Michael Hudson for debugging.

*/

#define PY_SSIZE_T_CLEAN

#include <Python.h>

#include "structmember.h"

#include "osdefs.h"

#define EXC_MODULE_NAME "exceptions."

/* NOTE: If the exception class hierarchy changes, don't forget to update

* Lib/test/exception_hierarchy.txt

*/

PyDoc_STRVAR(exceptions_doc, "Python's standard exception class hierarchy.\n\

\n\

Exceptions found here are defined both in the exceptions module and the\n\

built-in namespace. It is recommended that user-defined exceptions\n\

inherit from Exception. See the documentation for the exception\n\

inheritance hierarchy.\n\

");

/*

* BaseException

*/

static PyObject *

BaseException_new(PyTypeObject *type, PyObject *args, PyObject *kwds)

{

PyBaseExceptionObject *self;

self = (PyBaseExceptionObject *)type->tp_alloc(type, 0);

if (!self)

return NULL;

/* the dict is created on the fly in PyObject_GenericSetAttr */

self->message = self->dict = NULL;

self->args = PyTuple_New(0);

if (!self->args) {

Py_DECREF(self);

return NULL;

}

self->message = PyString_FromString("");

if (!self->message) {

Py_DECREF(self);

return NULL;

}

return (PyObject *)self;

}

static int

BaseException_init(PyBaseExceptionObject *self, PyObject *args, PyObject *kwds)

{

if (!_PyArg_NoKeywords(Py_TYPE(self)->tp_name, kwds))

return -1;

Py_INCREF(args);

Py_SETREF(self->args, args);

if (PyTuple_GET_SIZE(self->args) == 1) {

Py_INCREF(PyTuple_GET_ITEM(self->args, 0));

Py_XSETREF(self->message, PyTuple_GET_ITEM(self->args, 0));

}

return 0;

}

static int

BaseException_clear(PyBaseExceptionObject *self)

{

Py_CLEAR(self->dict);

Py_CLEAR(self->args);

Py_CLEAR(self->message);

return 0;

}

static void

BaseException_dealloc(PyBaseExceptionObject *self)

{

_PyObject_GC_UNTRACK(self);

BaseException_clear(self);

Py_TYPE(self)->tp_free((PyObject *)self);

}

static int

BaseException_traverse(PyBaseExceptionObject *self, visitproc visit, void *arg)

{

Py_VISIT(self->dict);

Py_VISIT(self->args);

Py_VISIT(self->message);

return 0;

}

static PyObject *

BaseException_str(PyBaseExceptionObject *self)

{

PyObject *out;

switch (PyTuple_GET_SIZE(self->args)) {

case 0:

out = PyString_FromString("");

break;

case 1:

out = PyObject_Str(PyTuple_GET_ITEM(self->args, 0));

break;

default:

out = PyObject_Str(self->args);

break;

}

return out;

}

#ifdef Py_USING_UNICODE

static PyObject *

BaseException_unicode(PyBaseExceptionObject *self)

{

PyObject *out;

/* issue6108: if __str__ has been overridden in the subclass, unicode()

should return the message returned by __str__ as used to happen

before this method was implemented. */

if (Py_TYPE(self)->tp_str != (reprfunc)BaseException_str) {

PyObject *str;

/* Unlike PyObject_Str, tp_str can return unicode (i.e. return the

equivalent of unicode(e.__str__()) instead of unicode(str(e))). */

str = Py_TYPE(self)->tp_str((PyObject*)self);

if (str == NULL)

return NULL;

out = PyObject_Unicode(str);

Py_DECREF(str);

return out;

}

switch (PyTuple_GET_SIZE(self->args)) {

case 0:

out = PyUnicode_FromString("");

break;

case 1:

out = PyObject_Unicode(PyTuple_GET_ITEM(self->args, 0));

break;

default:

out = PyObject_Unicode(self->args);

break;

}

return out;

}

#endif

static PyObject *

BaseException_repr(PyBaseExceptionObject *self)

{

PyObject *repr_suffix;

PyObject *repr;

char *name;

char *dot;

repr_suffix = PyObject_Repr(self->args);

if (!repr_suffix)

return NULL;

name = (char *)Py_TYPE(self)->tp_name;

dot = strrchr(name, '.');

if (dot != NULL) name = dot+1;

repr = PyString_FromString(name);

if (!repr) {

Py_DECREF(repr_suffix);

return NULL;

}

PyString_ConcatAndDel(&repr, repr_suffix);

return repr;

}

/* Pickling support */

static PyObject *

BaseException_reduce(PyBaseExceptionObject *self)

{

if (self->args && self->dict)

return PyTuple_Pack(3, Py_TYPE(self), self->args, self->dict);

else

return PyTuple_Pack(2, Py_TYPE(self), self->args);

}

/*

* Needed for backward compatibility, since exceptions used to store

* all their attributes in the __dict__. Code is taken from cPickle's

* load_build function.

*/

static PyObject *

BaseException_setstate(PyObject *self, PyObject *state)

{

PyObject *d_key, *d_value;

Py_ssize_t i = 0;

if (state != Py_None) {

if (!PyDict_Check(state)) {

PyErr_SetString(PyExc_TypeError, "state is not a dictionary");

return NULL;

}

while (PyDict_Next(state, &i, &d_key, &d_value)) {

if (PyObject_SetAttr(self, d_key, d_value) < 0)

return NULL;

}

}

Py_RETURN_NONE;

}

static PyMethodDef BaseException_methods[] = {

{"__reduce__", (PyCFunction)BaseException_reduce, METH_NOARGS },

{"__setstate__", (PyCFunction)BaseException_setstate, METH_O },

#ifdef Py_USING_UNICODE

{"__unicode__", (PyCFunction)BaseException_unicode, METH_NOARGS },

#endif

{NULL, NULL, 0, NULL},

};

static PyObject *

BaseException_getitem(PyBaseExceptionObject *self, Py_ssize_t index)

{

if (PyErr_WarnPy3k("__getitem__ not supported for exception "

"classes in 3.x; use args attribute", 1) < 0)

return NULL;

return PySequence_GetItem(self->args, index);

}

static PyObject *

BaseException_getslice(PyBaseExceptionObject *self,

Py_ssize_t start, Py_ssize_t stop)

{

if (PyErr_WarnPy3k("__getslice__ not supported for exception "

"classes in 3.x; use args attribute", 1) < 0)

return NULL;

return PySequence_GetSlice(self->args, start, stop);

}

static PySequenceMethods BaseException_as_sequence = {

0, /* sq_length; */

0, /* sq_concat; */

0, /* sq_repeat; */

(ssizeargfunc)BaseException_getitem, /* sq_item; */

(ssizessizeargfunc)BaseException_getslice, /* sq_slice; */

0, /* sq_ass_item; */

0, /* sq_ass_slice; */

0, /* sq_contains; */

0, /* sq_inplace_concat; */

0 /* sq_inplace_repeat; */

};

static PyObject *

BaseException_get_dict(PyBaseExceptionObject *self)

{

if (self->dict == NULL) {

self->dict = PyDict_New();

if (!self->dict)

return NULL;

}

Py_INCREF(self->dict);

return self->dict;

}

static int

BaseException_set_dict(PyBaseExceptionObject *self, PyObject *val)

{

if (val == NULL) {

PyErr_SetString(PyExc_TypeError, "__dict__ may not be deleted");

return -1;

}

if (!PyDict_Check(val)) {

PyErr_SetString(PyExc_TypeError, "__dict__ must be a dictionary");

return -1;

}

Py_INCREF(val);

Py_XSETREF(self->dict, val);

return 0;

}

static PyObject *

BaseException_get_args(PyBaseExceptionObject *self)

{

if (self->args == NULL) {

Py_INCREF(Py_None);

return Py_None;

}

Py_INCREF(self->args);

return self->args;

}

static int

BaseException_set_args(PyBaseExceptionObject *self, PyObject *val)

{

PyObject *seq;

if (val == NULL) {

PyErr_SetString(PyExc_TypeError, "args may not be deleted");

return -1;

}

seq = PySequence_Tuple(val);

if (!seq)

return -1;

Py_XSETREF(self->args, seq);

return 0;

}

static PyObject *

BaseException_get_message(PyBaseExceptionObject *self)

{

PyObject *msg;

/* if "message" is in self->dict, accessing a user-set message attribute */

if (self->dict &&

(msg = PyDict_GetItemString(self->dict, "message"))) {

Py_INCREF(msg);

return msg;

}

if (self->message == NULL) {

PyErr_SetString(PyExc_AttributeError, "message attribute was deleted");

return NULL;

}

/* accessing the deprecated "builtin" message attribute of Exception */

if (PyErr_WarnEx(PyExc_DeprecationWarning,

"BaseException.message has been deprecated as "

"of Python 2.6", 1) < 0)

return NULL;

Py_INCREF(self->message);

return self->message;

}

static int

BaseException_set_message(PyBaseExceptionObject *self, PyObject *val)

{

/* if val is NULL, delete the message attribute */

if (val == NULL) {

if (self->dict && PyDict_GetItemString(self->dict, "message")) {

if (PyDict_DelItemString(self->dict, "message") < 0)

return -1;

}

Py_CLEAR(self->message);

return 0;

}

/* else set it in __dict__, but may need to create the dict first */

if (self->dict == NULL) {

self->dict = PyDict_New();

if (!self->dict)

return -1;

}

return PyDict_SetItemString(self->dict, "message", val);

}

static PyGetSetDef BaseException_getset[] = {

{"__dict__", (getter)BaseException_get_dict, (setter)BaseException_set_dict},

{"args", (getter)BaseException_get_args, (setter)BaseException_set_args},

{"message", (getter)BaseException_get_message,

(setter)BaseException_set_message},

{NULL},

};

static PyTypeObject _PyExc_BaseException = {

PyVarObject_HEAD_INIT(NULL, 0)

EXC_MODULE_NAME "BaseException", /*tp_name*/

sizeof(PyBaseExceptionObject), /*tp_basicsize*/

0, /*tp_itemsize*/

(destructor)BaseException_dealloc, /*tp_dealloc*/

0, /*tp_print*/

0, /*tp_getattr*/

0, /*tp_setattr*/

0, /* tp_compare; */

(reprfunc)BaseException_repr, /*tp_repr*/

0, /*tp_as_number*/

&BaseException_as_sequence, /*tp_as_sequence*/

0, /*tp_as_mapping*/

0, /*tp_hash */

0, /*tp_call*/

(reprfunc)BaseException_str, /*tp_str*/

PyObject_GenericGetAttr, /*tp_getattro*/

PyObject_GenericSetAttr, /*tp_setattro*/

0, /*tp_as_buffer*/

Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC |

Py_TPFLAGS_BASE_EXC_SUBCLASS, /*tp_flags*/

PyDoc_STR("Common base class for all exceptions"), /* tp_doc */

(traverseproc)BaseException_traverse, /* tp_traverse */

(inquiry)BaseException_clear, /* tp_clear */

0, /* tp_richcompare */

0, /* tp_weaklistoffset */

0, /* tp_iter */

0, /* tp_iternext */

BaseException_methods, /* tp_methods */

0, /* tp_members */

BaseException_getset, /* tp_getset */

0, /* tp_base */

0, /* tp_dict */

0, /* tp_descr_get */

0, /* tp_descr_set */

offsetof(PyBaseExceptionObject, dict), /* tp_dictoffset */

(initproc)BaseException_init, /* tp_init */

0, /* tp_alloc */

BaseException_new, /* tp_new */

};

/* the CPython API expects exceptions to be (PyObject *) - both a hold-over

from the previous implmentation and also allowing Python objects to be used

in the API */

PyObject *PyExc_BaseException = (PyObject *)&_PyExc_BaseException;

/* note these macros omit the last semicolon so the macro invocation may

* include it and not look strange.

*/

#define SimpleExtendsException(EXCBASE, EXCNAME, EXCDOC) \

static PyTypeObject _PyExc_ ## EXCNAME = { \

PyVarObject_HEAD_INIT(NULL, 0) \

EXC_MODULE_NAME # EXCNAME, \

sizeof(PyBaseExceptionObject), \

0, (destructor)BaseException_dealloc, 0, 0, 0, 0, 0, 0, 0, \

0, 0, 0, 0, 0, 0, 0, \

Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC, \

PyDoc_STR(EXCDOC), (traverseproc)BaseException_traverse, \

(inquiry)BaseException_clear, 0, 0, 0, 0, 0, 0, 0, &_ ## EXCBASE, \

0, 0, 0, offsetof(PyBaseExceptionObject, dict), \

(initproc)BaseException_init, 0, BaseException_new,\

}; \

PyObject *PyExc_ ## EXCNAME = (PyObject *)&_PyExc_ ## EXCNAME

#define MiddlingExtendsException(EXCBASE, EXCNAME, EXCSTORE, EXCDOC) \

static PyTypeObject _PyExc_ ## EXCNAME = { \

PyVarObject_HEAD_INIT(NULL, 0) \

EXC_MODULE_NAME # EXCNAME, \

sizeof(Py ## EXCSTORE ## Object), \

0, (destructor)EXCSTORE ## _dealloc, 0, 0, 0, 0, 0, 0, 0, 0, 0, \

0, 0, 0, 0, 0, \

Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC, \

PyDoc_STR(EXCDOC), (traverseproc)EXCSTORE ## _traverse, \

(inquiry)EXCSTORE ## _clear, 0, 0, 0, 0, 0, 0, 0, &_ ## EXCBASE, \

0, 0, 0, offsetof(Py ## EXCSTORE ## Object, dict), \

(initproc)EXCSTORE ## _init, 0, BaseException_new,\

}; \

PyObject *PyExc_ ## EXCNAME = (PyObject *)&_PyExc_ ## EXCNAME

#define ComplexExtendsException(EXCBASE, EXCNAME, EXCSTORE, EXCDEALLOC, EXCMETHODS, EXCMEMBERS, EXCSTR, EXCDOC) \

static PyTypeObject _PyExc_ ## EXCNAME = { \

PyVarObject_HEAD_INIT(NULL, 0) \

EXC_MODULE_NAME # EXCNAME, \

sizeof(Py ## EXCSTORE ## Object), 0, \

(destructor)EXCSTORE ## _dealloc, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, \

(reprfunc)EXCSTR, 0, 0, 0, \

Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC, \

PyDoc_STR(EXCDOC), (traverseproc)EXCSTORE ## _traverse, \

(inquiry)EXCSTORE ## _clear, 0, 0, 0, 0, EXCMETHODS, \

EXCMEMBERS, 0, &_ ## EXCBASE, \

0, 0, 0, offsetof(Py ## EXCSTORE ## Object, dict), \

(initproc)EXCSTORE ## _init, 0, BaseException_new,\

}; \

PyObject *PyExc_ ## EXCNAME = (PyObject *)&_PyExc_ ## EXCNAME

/*

* Exception extends BaseException

*/

SimpleExtendsException(PyExc_BaseException, Exception,

"Common base class for all non-exit exceptions.");

/*

* StandardError extends Exception

*/

SimpleExtendsException(PyExc_Exception, StandardError,

"Base class for all standard Python exceptions that do not represent\n"

"interpreter exiting.");

/*

* TypeError extends StandardError

*/

SimpleExtendsException(PyExc_StandardError, TypeError,

"Inappropriate argument type.");

/*

* StopIteration extends Exception

*/

SimpleExtendsException(PyExc_Exception, StopIteration,

"Signal the end from iterator.next().");

/*

* GeneratorExit extends BaseException

*/

SimpleExtendsException(PyExc_BaseException, GeneratorExit,

"Request that a generator exit.");

/*

* SystemExit extends BaseException

*/

static int

SystemExit_init(PySystemExitObject *self, PyObject *args, PyObject *kwds)

{

Py_ssize_t size = PyTuple_GET_SIZE(args);

if (BaseException_init((PyBaseExceptionObject *)self, args, kwds) == -1)

return -1;

if (size == 0)

return 0;

if (size == 1) {

Py_INCREF(PyTuple_GET_ITEM(args, 0));

Py_XSETREF(self->code, PyTuple_GET_ITEM(args, 0));

}

else { /* size > 1 */

Py_INCREF(args);

Py_XSETREF(self->code, args);

}

return 0;

}

static int

SystemExit_clear(PySystemExitObject *self)

{

Py_CLEAR(self->code);

return BaseException_clear((PyBaseExceptionObject *)self);

}

static void

SystemExit_dealloc(PySystemExitObject *self)

{

_PyObject_GC_UNTRACK(self);

SystemExit_clear(self);

Py_TYPE(self)->tp_free((PyObject *)self);

}

static int

SystemExit_traverse(PySystemExitObject *self, visitproc visit, void *arg)

{

Py_VISIT(self->code);

return BaseException_traverse((PyBaseExceptionObject *)self, visit, arg);

}

static PyMemberDef SystemExit_members[] = {

{"code", T_OBJECT, offsetof(PySystemExitObject, code), 0,

PyDoc_STR("exception code")},

{NULL} /* Sentinel */

};

ComplexExtendsException(PyExc_BaseException, SystemExit, SystemExit,

SystemExit_dealloc, 0, SystemExit_members, 0,

"Request to exit from the interpreter.");

/*

* KeyboardInterrupt extends BaseException

*/

SimpleExtendsException(PyExc_BaseException, KeyboardInterrupt,

"Program interrupted by user.");

/*

* ImportError extends StandardError

*/

SimpleExtendsException(PyExc_StandardError, ImportError,

"Import can't find module, or can't find name in module.");

/*

* EnvironmentError extends StandardError

*/

/* Where a function has a single filename, such as open() or some

* of the os module functions, PyErr_SetFromErrnoWithFilename() is

* called, giving a third argument which is the filename. But, so

* that old code using in-place unpacking doesn't break, e.g.:

*

* except IOError, (errno, strerror):

*

* we hack args so that it only contains two items. This also

* means we need our own __str__() which prints out the filename

* when it was supplied.

*/

static int

EnvironmentError_init(PyEnvironmentErrorObject *self, PyObject *args,

PyObject *kwds)

{

PyObject *myerrno = NULL, *strerror = NULL, *filename = NULL;

PyObject *subslice = NULL;

if (BaseException_init((PyBaseExceptionObject *)self, args, kwds) == -1)

return -1;

if (PyTuple_GET_SIZE(args) <= 1 || PyTuple_GET_SIZE(args) > 3) {

return 0;

}

if (!PyArg_UnpackTuple(args, "EnvironmentError", 2, 3,

&myerrno, &strerror, &filename)) {

return -1;

}

Py_INCREF(myerrno);

Py_XSETREF(self->myerrno, myerrno);

Py_INCREF(strerror);

Py_XSETREF(self->strerror, strerror);

/* self->filename will remain Py_None otherwise */

if (filename != NULL) {

Py_INCREF(filename);

Py_XSETREF(self->filename, filename);

subslice = PyTuple_GetSlice(args, 0, 2);

if (!subslice)

return -1;

Py_SETREF(self->args, subslice);

}

return 0;

}

static int

EnvironmentError_clear(PyEnvironmentErrorObject *self)

{

Py_CLEAR(self->myerrno);

Py_CLEAR(self->strerror);

Py_CLEAR(self->filename);

return BaseException_clear((PyBaseExceptionObject *)self);

}

static void

EnvironmentError_dealloc(PyEnvironmentErrorObject *self)

{

_PyObject_GC_UNTRACK(self);

EnvironmentError_clear(self);

Py_TYPE(self)->tp_free((PyObject *)self);

}

static int

EnvironmentError_traverse(PyEnvironmentErrorObject *self, visitproc visit,

void *arg)

{

Py_VISIT(self->myerrno);

Py_VISIT(self->strerror);

Py_VISIT(self->filename);

return BaseException_traverse((PyBaseExceptionObject *)self, visit, arg);

}

static PyObject *

EnvironmentError_str(PyEnvironmentErrorObject *self)

{

PyObject *rtnval = NULL;

if (self->filename) {

PyObject *fmt;

PyObject *repr;

PyObject *tuple;

fmt = PyString_FromString("[Errno %s] %s: %s");

if (!fmt)

return NULL;

repr = PyObject_Repr(self->filename);

if (!repr) {

Py_DECREF(fmt);

return NULL;

}

tuple = PyTuple_New(3);

if (!tuple) {

Py_DECREF(repr);

Py_DECREF(fmt);

return NULL;

}

if (self->myerrno) {

Py_INCREF(self->myerrno);

PyTuple_SET_ITEM(tuple, 0, self->myerrno);

}

else {

Py_INCREF(Py_None);

PyTuple_SET_ITEM(tuple, 0, Py_None);

}

if (self->strerror) {

Py_INCREF(self->strerror);

PyTuple_SET_ITEM(tuple, 1, self->strerror);

}

else {

Py_INCREF(Py_None);

PyTuple_SET_ITEM(tuple, 1, Py_None);

}

PyTuple_SET_ITEM(tuple, 2, repr);

rtnval = PyString_Format(fmt, tuple);

Py_DECREF(fmt);

Py_DECREF(tuple);

}

else if (self->myerrno && self->strerror) {

PyObject *fmt;

PyObject *tuple;

fmt = PyString_FromString("[Errno %s] %s");

if (!fmt)

return NULL;

tuple = PyTuple_New(2);

if (!tuple) {

Py_DECREF(fmt);

return NULL;

}

if (self->myerrno) {

Py_INCREF(self->myerrno);

PyTuple_SET_ITEM(tuple, 0, self->myerrno);

}

else {

Py_INCREF(Py_None);

PyTuple_SET_ITEM(tuple, 0, Py_None);

}

if (self->strerror) {

Py_INCREF(self->strerror);

PyTuple_SET_ITEM(tuple, 1, self->strerror);

}

else {

Py_INCREF(Py_None);

PyTuple_SET_ITEM(tuple, 1, Py_None);

}

rtnval = PyString_Format(fmt, tuple);

Py_DECREF(fmt);

Py_DECREF(tuple);

}

else

rtnval = BaseException_str((PyBaseExceptionObject *)self);

return rtnval;

}

static PyMemberDef EnvironmentError_members[] = {

{"errno", T_OBJECT, offsetof(PyEnvironmentErrorObject, myerrno), 0,

PyDoc_STR("exception errno")},

{"strerror", T_OBJECT, offsetof(PyEnvironmentErrorObject, strerror), 0,

PyDoc_STR("exception strerror")},

{"filename", T_OBJECT, offsetof(PyEnvironmentErrorObject, filename), 0,

PyDoc_STR("exception filename")},

{NULL} /* Sentinel */

};

static PyObject *

EnvironmentError_reduce(PyEnvironmentErrorObject *self)

{

PyObject *args = self->args;

PyObject *res = NULL, *tmp;

/* self->args is only the first two real arguments if there was a

* file name given to EnvironmentError. */

if (PyTuple_GET_SIZE(args) == 2 && self->filename) {

args = PyTuple_New(3);

if (!args)

return NULL;

tmp = PyTuple_GET_ITEM(self->args, 0);

Py_INCREF(tmp);

PyTuple_SET_ITEM(args, 0, tmp);

tmp = PyTuple_GET_ITEM(self->args, 1);

Py_INCREF(tmp);

PyTuple_SET_ITEM(args, 1, tmp);

Py_INCREF(self->filename);

PyTuple_SET_ITEM(args, 2, self->filename);

} else

Py_INCREF(args);

if (self->dict)

res = PyTuple_Pack(3, Py_TYPE(self), args, self->dict);

else

res = PyTuple_Pack(2, Py_TYPE(self), args);

Py_DECREF(args);

return res;

}

static PyMethodDef EnvironmentError_methods[] = {

{"__reduce__", (PyCFunction)EnvironmentError_reduce, METH_NOARGS},

{NULL}

};

ComplexExtendsException(PyExc_StandardError, EnvironmentError,

EnvironmentError, EnvironmentError_dealloc,

EnvironmentError_methods, EnvironmentError_members,

EnvironmentError_str,

"Base class for I/O related errors.");

/*

* IOError extends EnvironmentError

*/

MiddlingExtendsException(PyExc_EnvironmentError, IOError,

EnvironmentError, "I/O operation failed.");

/*

* OSError extends EnvironmentError

*/

MiddlingExtendsException(PyExc_EnvironmentError, OSError,

EnvironmentError, "OS system call failed.");

/*

* WindowsError extends OSError

*/

#ifdef MS_WINDOWS

#include "errmap.h"

static int

WindowsError_clear(PyWindowsErrorObject *self)

{

Py_CLEAR(self->myerrno);

Py_CLEAR(self->strerror);

Py_CLEAR(self->filename);

Py_CLEAR(self->winerror);

return BaseException_clear((PyBaseExceptionObject *)self);

}

static void

WindowsError_dealloc(PyWindowsErrorObject *self)

{

_PyObject_GC_UNTRACK(self);

WindowsError_clear(self);

Py_TYPE(self)->tp_free((PyObject *)self);

}

static int

WindowsError_traverse(PyWindowsErrorObject *self, visitproc visit, void *arg)

{

Py_VISIT(self->myerrno);

Py_VISIT(self->strerror);

Py_VISIT(self->filename);

Py_VISIT(self->winerror);

return BaseException_traverse((PyBaseExceptionObject *)self, visit, arg);

}

static int

WindowsError_init(PyWindowsErrorObject *self, PyObject *args, PyObject *kwds)

{

PyObject *o_errcode = NULL;

long errcode;

long posix_errno;

if (EnvironmentError_init((PyEnvironmentErrorObject *)self, args, kwds)

== -1)

return -1;

if (self->myerrno == NULL)

return 0;

/* Set errno to the POSIX errno, and winerror to the Win32

error code. */

errcode = PyInt_AsLong(self->myerrno);

if (errcode == -1 && PyErr_Occurred())

return -1;

posix_errno = winerror_to_errno(errcode);

Py_XSETREF(self->winerror, self->myerrno);

o_errcode = PyInt_FromLong(posix_errno);

if (!o_errcode)

return -1;

self->myerrno = o_errcode;

return 0;

}

static PyObject *

WindowsError_str(PyWindowsErrorObject *self)

{

PyObject *rtnval = NULL;

if (self->filename) {

PyObject *fmt;

PyObject *repr;

PyObject *tuple;

fmt = PyString_FromString("[Error %s] %s: %s");

if (!fmt)

return NULL;

repr = PyObject_Repr(self->filename);

if (!repr) {

Py_DECREF(fmt);

return NULL;

}

tuple = PyTuple_New(3);

if (!tuple) {

Py_DECREF(repr);

Py_DECREF(fmt);

return NULL;

}

if (self->winerror) {

Py_INCREF(self->winerror);

PyTuple_SET_ITEM(tuple, 0, self->winerror);

}

else {

Py_INCREF(Py_None);

PyTuple_SET_ITEM(tuple, 0, Py_None);

}

if (self->strerror) {

Py_INCREF(self->strerror);

PyTuple_SET_ITEM(tuple, 1, self->strerror);

}

else {

Py_INCREF(Py_None);

PyTuple_SET_ITEM(tuple, 1, Py_None);

}

PyTuple_SET_ITEM(tuple, 2, repr);

rtnval = PyString_Format(fmt, tuple);

Py_DECREF(fmt);

Py_DECREF(tuple);

}

else if (self->winerror && self->strerror) {

PyObject *fmt;

PyObject *tuple;

fmt = PyString_FromString("[Error %s] %s");

if (!fmt)

return NULL;

tuple = PyTuple_New(2);

if (!tuple) {

Py_DECREF(fmt);

return NULL;

}

if (self->winerror) {

Py_INCREF(self->winerror);

PyTuple_SET_ITEM(tuple, 0, self->winerror);

}

else {

Py_INCREF(Py_None);

PyTuple_SET_ITEM(tuple, 0, Py_None);

}

if (self->strerror) {

Py_INCREF(self->strerror);

PyTuple_SET_ITEM(tuple, 1, self->strerror);

}

else {

Py_INCREF(Py_None);

PyTuple_SET_ITEM(tuple, 1, Py_None);

}

rtnval = PyString_Format(fmt, tuple);

Py_DECREF(fmt);

Py_DECREF(tuple);

}

else

rtnval = EnvironmentError_str((PyEnvironmentErrorObject *)self);

return rtnval;

}

static PyMemberDef WindowsError_members[] = {

{"errno", T_OBJECT, offsetof(PyWindowsErrorObject, myerrno), 0,

PyDoc_STR("POSIX exception code")},

{"strerror", T_OBJECT, offsetof(PyWindowsErrorObject, strerror), 0,

PyDoc_STR("exception strerror")},

{"filename", T_OBJECT, offsetof(PyWindowsErrorObject, filename), 0,

PyDoc_STR("exception filename")},

{"winerror", T_OBJECT, offsetof(PyWindowsErrorObject, winerror), 0,

PyDoc_STR("Win32 exception code")},

{NULL} /* Sentinel */

};

ComplexExtendsException(PyExc_OSError, WindowsError, WindowsError,

WindowsError_dealloc, 0, WindowsError_members,

WindowsError_str, "MS-Windows OS system call failed.");

#endif /* MS_WINDOWS */

/*

* VMSError extends OSError (I think)

*/

#ifdef __VMS

MiddlingExtendsException(PyExc_OSError, VMSError, EnvironmentError,

"OpenVMS OS system call failed.");