| |
| /* Map C struct members to Python object attributes */ |
| |
| #include "Python.h" |
| #include "pycore_abstract.h" // _PyNumber_Index() |
| #include "pycore_long.h" // _PyLong_IsNegative() |
| #include "pycore_object.h" // _Py_TryIncrefCompare(), FT_ATOMIC_*() |
| #include "pycore_critical_section.h" |
| |
| |
| static inline PyObject * |
| member_get_object(const char *addr, const char *obj_addr, PyMemberDef *l) |
| { |
| PyObject *v = FT_ATOMIC_LOAD_PTR(*(PyObject **) addr); |
| if (v == NULL) { |
| PyErr_Format(PyExc_AttributeError, |
| "'%T' object has no attribute '%s'", |
| (PyObject *)obj_addr, l->name); |
| } |
| return v; |
| } |
| |
| PyObject * |
| PyMember_GetOne(const char *obj_addr, PyMemberDef *l) |
| { |
| PyObject *v; |
| if (l->flags & Py_RELATIVE_OFFSET) { |
| PyErr_SetString( |
| PyExc_SystemError, |
| "PyMember_GetOne used with Py_RELATIVE_OFFSET"); |
| return NULL; |
| } |
| |
| const char* addr = obj_addr + l->offset; |
| switch (l->type) { |
| case Py_T_BOOL: |
| v = PyBool_FromLong(FT_ATOMIC_LOAD_CHAR_RELAXED(*(char*)addr)); |
| break; |
| case Py_T_BYTE: |
| v = PyLong_FromLong(FT_ATOMIC_LOAD_CHAR_RELAXED(*(char*)addr)); |
| break; |
| case Py_T_UBYTE: |
| v = PyLong_FromUnsignedLong(FT_ATOMIC_LOAD_UCHAR_RELAXED(*(unsigned char*)addr)); |
| break; |
| case Py_T_SHORT: |
| v = PyLong_FromLong(FT_ATOMIC_LOAD_SHORT_RELAXED(*(short*)addr)); |
| break; |
| case Py_T_USHORT: |
| v = PyLong_FromUnsignedLong(FT_ATOMIC_LOAD_USHORT_RELAXED(*(unsigned short*)addr)); |
| break; |
| case Py_T_INT: |
| v = PyLong_FromLong(FT_ATOMIC_LOAD_INT_RELAXED(*(int*)addr)); |
| break; |
| case Py_T_UINT: |
| v = PyLong_FromUnsignedLong(FT_ATOMIC_LOAD_UINT_RELAXED(*(unsigned int*)addr)); |
| break; |
| case Py_T_LONG: |
| v = PyLong_FromLong(FT_ATOMIC_LOAD_LONG_RELAXED(*(long*)addr)); |
| break; |
| case Py_T_ULONG: |
| v = PyLong_FromUnsignedLong(FT_ATOMIC_LOAD_ULONG_RELAXED(*(unsigned long*)addr)); |
| break; |
| case Py_T_PYSSIZET: |
| v = PyLong_FromSsize_t(FT_ATOMIC_LOAD_SSIZE_RELAXED(*(Py_ssize_t*)addr)); |
| break; |
| case Py_T_FLOAT: |
| v = PyFloat_FromDouble((double)FT_ATOMIC_LOAD_FLOAT_RELAXED(*(float*)addr)); |
| break; |
| case Py_T_DOUBLE: |
| v = PyFloat_FromDouble(FT_ATOMIC_LOAD_DOUBLE_RELAXED(*(double*)addr)); |
| break; |
| case Py_T_STRING: |
| if (*(char**)addr == NULL) { |
| v = Py_NewRef(Py_None); |
| } |
| else |
| v = PyUnicode_FromString(*(char**)addr); |
| break; |
| case Py_T_STRING_INPLACE: |
| v = PyUnicode_FromString((char*)addr); |
| break; |
| case Py_T_CHAR: { |
| char char_val = FT_ATOMIC_LOAD_CHAR_RELAXED(*addr); |
| v = PyUnicode_FromStringAndSize(&char_val, 1); |
| break; |
| } |
| case _Py_T_OBJECT: |
| v = FT_ATOMIC_LOAD_PTR(*(PyObject **) addr); |
| if (v != NULL) { |
| #ifdef Py_GIL_DISABLED |
| if (!_Py_TryIncrefCompare((PyObject **) addr, v)) { |
| Py_BEGIN_CRITICAL_SECTION((PyObject *) obj_addr); |
| v = FT_ATOMIC_LOAD_PTR(*(PyObject **) addr); |
| Py_XINCREF(v); |
| Py_END_CRITICAL_SECTION(); |
| } |
| #else |
| Py_INCREF(v); |
| #endif |
| } |
| if (v == NULL) { |
| v = Py_None; |
| } |
| break; |
| case Py_T_OBJECT_EX: |
| v = member_get_object(addr, obj_addr, l); |
| #ifndef Py_GIL_DISABLED |
| Py_XINCREF(v); |
| #else |
| if (v != NULL) { |
| if (!_Py_TryIncrefCompare((PyObject **) addr, v)) { |
| Py_BEGIN_CRITICAL_SECTION((PyObject *) obj_addr); |
| v = member_get_object(addr, obj_addr, l); |
| Py_XINCREF(v); |
| Py_END_CRITICAL_SECTION(); |
| } |
| } |
| #endif |
| break; |
| case Py_T_LONGLONG: |
| v = PyLong_FromLongLong(FT_ATOMIC_LOAD_LLONG_RELAXED(*(long long *)addr)); |
| break; |
| case Py_T_ULONGLONG: |
| v = PyLong_FromUnsignedLongLong(FT_ATOMIC_LOAD_ULLONG_RELAXED(*(unsigned long long *)addr)); |
| break; |
| case _Py_T_NONE: |
| // doesn't require free-threading code path |
| v = Py_NewRef(Py_None); |
| break; |
| default: |
| PyErr_SetString(PyExc_SystemError, "bad memberdescr type"); |
| v = NULL; |
| } |
| return v; |
| } |
| |
| #define WARN(msg) \ |
| do { \ |
| if (PyErr_WarnEx(PyExc_RuntimeWarning, msg, 1) < 0) \ |
| return -1; \ |
| } while (0) |
| |
| int |
| PyMember_SetOne(char *addr, PyMemberDef *l, PyObject *v) |
| { |
| PyObject *oldv; |
| if (l->flags & Py_RELATIVE_OFFSET) { |
| PyErr_SetString( |
| PyExc_SystemError, |
| "PyMember_SetOne used with Py_RELATIVE_OFFSET"); |
| return -1; |
| } |
| |
| #ifdef Py_GIL_DISABLED |
| PyObject *obj = (PyObject *) addr; |
| #endif |
| addr += l->offset; |
| |
| if ((l->flags & Py_READONLY)) |
| { |
| PyErr_SetString(PyExc_AttributeError, "readonly attribute"); |
| return -1; |
| } |
| if (v == NULL) { |
| if (l->type == Py_T_OBJECT_EX) { |
| /* Check if the attribute is set. */ |
| if (*(PyObject **)addr == NULL) { |
| PyErr_SetString(PyExc_AttributeError, l->name); |
| return -1; |
| } |
| } |
| else if (l->type != _Py_T_OBJECT) { |
| PyErr_SetString(PyExc_TypeError, |
| "can't delete numeric/char attribute"); |
| return -1; |
| } |
| } |
| switch (l->type) { |
| case Py_T_BOOL:{ |
| if (!PyBool_Check(v)) { |
| PyErr_SetString(PyExc_TypeError, |
| "attribute value type must be bool"); |
| return -1; |
| } |
| if (v == Py_True) |
| FT_ATOMIC_STORE_CHAR_RELAXED(*(char*)addr, 1); |
| else |
| FT_ATOMIC_STORE_CHAR_RELAXED(*(char*)addr, 0); |
| break; |
| } |
| case Py_T_BYTE:{ |
| long long_val = PyLong_AsLong(v); |
| if ((long_val == -1) && PyErr_Occurred()) |
| return -1; |
| FT_ATOMIC_STORE_CHAR_RELAXED(*(char*)addr, (char)long_val); |
| /* XXX: For compatibility, only warn about truncations |
| for now. */ |
| if ((long_val > CHAR_MAX) || (long_val < CHAR_MIN)) |
| WARN("Truncation of value to char"); |
| break; |
| } |
| case Py_T_UBYTE:{ |
| long long_val = PyLong_AsLong(v); |
| if ((long_val == -1) && PyErr_Occurred()) |
| return -1; |
| FT_ATOMIC_STORE_UCHAR_RELAXED(*(unsigned char*)addr, (unsigned char)long_val); |
| if ((long_val > UCHAR_MAX) || (long_val < 0)) |
| WARN("Truncation of value to unsigned char"); |
| break; |
| } |
| case Py_T_SHORT:{ |
| long long_val = PyLong_AsLong(v); |
| if ((long_val == -1) && PyErr_Occurred()) |
| return -1; |
| FT_ATOMIC_STORE_SHORT_RELAXED(*(short*)addr, (short)long_val); |
| if ((long_val > SHRT_MAX) || (long_val < SHRT_MIN)) |
| WARN("Truncation of value to short"); |
| break; |
| } |
| case Py_T_USHORT:{ |
| long long_val = PyLong_AsLong(v); |
| if ((long_val == -1) && PyErr_Occurred()) |
| return -1; |
| FT_ATOMIC_STORE_USHORT_RELAXED(*(unsigned short*)addr, (unsigned short)long_val); |
| if ((long_val > USHRT_MAX) || (long_val < 0)) |
| WARN("Truncation of value to unsigned short"); |
| break; |
| } |
| case Py_T_INT:{ |
| long long_val = PyLong_AsLong(v); |
| if ((long_val == -1) && PyErr_Occurred()) |
| return -1; |
| FT_ATOMIC_STORE_INT_RELAXED(*(int *)addr, (int)long_val); |
| if ((long_val > INT_MAX) || (long_val < INT_MIN)) |
| WARN("Truncation of value to int"); |
| break; |
| } |
| case Py_T_UINT: { |
| /* XXX: For compatibility, accept negative int values |
| as well. */ |
| v = _PyNumber_Index(v); |
| if (v == NULL) { |
| return -1; |
| } |
| if (_PyLong_IsNegative((PyLongObject *)v)) { |
| long long_val = PyLong_AsLong(v); |
| Py_DECREF(v); |
| if (long_val == -1 && PyErr_Occurred()) { |
| return -1; |
| } |
| FT_ATOMIC_STORE_UINT_RELAXED(*(unsigned int *)addr, (unsigned int)(unsigned long)long_val); |
| WARN("Writing negative value into unsigned field"); |
| } |
| else { |
| unsigned long ulong_val = PyLong_AsUnsignedLong(v); |
| Py_DECREF(v); |
| if (ulong_val == (unsigned long)-1 && PyErr_Occurred()) { |
| return -1; |
| } |
| FT_ATOMIC_STORE_UINT_RELAXED(*(unsigned int *)addr, (unsigned int)ulong_val); |
| if (ulong_val > UINT_MAX) { |
| WARN("Truncation of value to unsigned int"); |
| } |
| } |
| break; |
| } |
| case Py_T_LONG: { |
| const long long_val = PyLong_AsLong(v); |
| if ((long_val == -1) && PyErr_Occurred()) |
| return -1; |
| FT_ATOMIC_STORE_LONG_RELAXED(*(long*)addr, long_val); |
| break; |
| } |
| case Py_T_ULONG: { |
| /* XXX: For compatibility, accept negative int values |
| as well. */ |
| v = _PyNumber_Index(v); |
| if (v == NULL) { |
| return -1; |
| } |
| if (_PyLong_IsNegative((PyLongObject *)v)) { |
| long long_val = PyLong_AsLong(v); |
| Py_DECREF(v); |
| if (long_val == -1 && PyErr_Occurred()) { |
| return -1; |
| } |
| FT_ATOMIC_STORE_ULONG_RELAXED(*(unsigned long *)addr, (unsigned long)long_val); |
| WARN("Writing negative value into unsigned field"); |
| } |
| else { |
| unsigned long ulong_val = PyLong_AsUnsignedLong(v); |
| Py_DECREF(v); |
| if (ulong_val == (unsigned long)-1 && PyErr_Occurred()) { |
| return -1; |
| } |
| FT_ATOMIC_STORE_ULONG_RELAXED(*(unsigned long *)addr, ulong_val); |
| } |
| break; |
| } |
| case Py_T_PYSSIZET: { |
| const Py_ssize_t ssize_val = PyLong_AsSsize_t(v); |
| if ((ssize_val == (Py_ssize_t)-1) && PyErr_Occurred()) |
| return -1; |
| FT_ATOMIC_STORE_SSIZE_RELAXED(*(Py_ssize_t*)addr, ssize_val); |
| break; |
| } |
| case Py_T_FLOAT:{ |
| double double_val = PyFloat_AsDouble(v); |
| if ((double_val == -1) && PyErr_Occurred()) |
| return -1; |
| FT_ATOMIC_STORE_FLOAT_RELAXED(*(float*)addr, (float)double_val); |
| break; |
| } |
| case Py_T_DOUBLE: { |
| const double double_val = PyFloat_AsDouble(v); |
| if ((double_val == -1) && PyErr_Occurred()) |
| return -1; |
| FT_ATOMIC_STORE_DOUBLE_RELAXED(*(double *) addr, double_val); |
| break; |
| } |
| case _Py_T_OBJECT: |
| case Py_T_OBJECT_EX: |
| Py_BEGIN_CRITICAL_SECTION(obj); |
| oldv = *(PyObject **)addr; |
| FT_ATOMIC_STORE_PTR_RELEASE(*(PyObject **)addr, Py_XNewRef(v)); |
| Py_END_CRITICAL_SECTION(); |
| Py_XDECREF(oldv); |
| break; |
| case Py_T_CHAR: { |
| const char *string; |
| Py_ssize_t len; |
| |
| string = PyUnicode_AsUTF8AndSize(v, &len); |
| if (string == NULL || len != 1) { |
| PyErr_BadArgument(); |
| return -1; |
| } |
| FT_ATOMIC_STORE_CHAR_RELAXED(*(char*)addr, string[0]); |
| break; |
| } |
| case Py_T_STRING: |
| case Py_T_STRING_INPLACE: |
| PyErr_SetString(PyExc_TypeError, "readonly attribute"); |
| return -1; |
| case Py_T_LONGLONG:{ |
| long long value = PyLong_AsLongLong(v); |
| if ((value == -1) && PyErr_Occurred()) |
| return -1; |
| FT_ATOMIC_STORE_LLONG_RELAXED(*(long long*)addr, value); |
| break; |
| } |
| case Py_T_ULONGLONG: { |
| v = _PyNumber_Index(v); |
| if (v == NULL) { |
| return -1; |
| } |
| if (_PyLong_IsNegative((PyLongObject *)v)) { |
| long long_val = PyLong_AsLong(v); |
| Py_DECREF(v); |
| if (long_val == -1 && PyErr_Occurred()) { |
| return -1; |
| } |
| FT_ATOMIC_STORE_ULLONG_RELAXED(*(unsigned long long *)addr, (unsigned long long)(long long)long_val); |
| WARN("Writing negative value into unsigned field"); |
| } |
| else { |
| unsigned long long ulonglong_val = PyLong_AsUnsignedLongLong(v); |
| Py_DECREF(v); |
| if (ulonglong_val == (unsigned long long)-1 && PyErr_Occurred()) { |
| return -1; |
| } |
| FT_ATOMIC_STORE_ULLONG_RELAXED(*(unsigned long long *)addr, ulonglong_val); |
| } |
| break; |
| } |
| default: |
| PyErr_Format(PyExc_SystemError, |
| "bad memberdescr type for %s", l->name); |
| return -1; |
| } |
| return 0; |
| } |
