import sys
import unittest
import ctypes
from dynd import nd, ndt, _lowlevel

class TestLowLevel(unittest.TestCase):
    def type_id_of(self, dt):
        assert isinstance(dt, ndt.type)
        bd = _lowlevel.get_base_type_ptr(dt)
        if bd < _lowlevel.type_id.BUILTIN_TYPE_ID_COUNT:
            return bd
        else:
            bdm = _lowlevel.BaseDTypeMembers.from_address(
                            _lowlevel.get_base_type_members(bd))
            return bdm.type_id

    def test_type_id(self):
        # Numeric type id
        self.assertEqual(self.type_id_of(ndt.bool),
                        _lowlevel.type_id.BOOL)
        self.assertEqual(self.type_id_of(ndt.int8),
                        _lowlevel.type_id.INT8)
        self.assertEqual(self.type_id_of(ndt.int16),
                        _lowlevel.type_id.INT16)
        self.assertEqual(self.type_id_of(ndt.int32),
                        _lowlevel.type_id.INT32)
        self.assertEqual(self.type_id_of(ndt.int64),
                        _lowlevel.type_id.INT64)
        self.assertEqual(self.type_id_of(ndt.uint8),
                        _lowlevel.type_id.UINT8)
        self.assertEqual(self.type_id_of(ndt.uint16),
                        _lowlevel.type_id.UINT16)
        self.assertEqual(self.type_id_of(ndt.uint32),
                        _lowlevel.type_id.UINT32)
        self.assertEqual(self.type_id_of(ndt.uint64),
                        _lowlevel.type_id.UINT64)
        self.assertEqual(self.type_id_of(ndt.float32),
                        _lowlevel.type_id.FLOAT32)
        self.assertEqual(self.type_id_of(ndt.float64),
                        _lowlevel.type_id.FLOAT64)
        self.assertEqual(self.type_id_of(ndt.complex_float32),
                        _lowlevel.type_id.COMPLEX_FLOAT32)
        self.assertEqual(self.type_id_of(ndt.complex_float64),
                        _lowlevel.type_id.COMPLEX_FLOAT64)
        # String/bytes
        self.assertEqual(self.type_id_of(ndt.string),
                        _lowlevel.type_id.STRING)
        self.assertEqual(self.type_id_of(ndt.make_fixedstring(16)),
                        _lowlevel.type_id.FIXEDSTRING)
        self.assertEqual(self.type_id_of(ndt.bytes),
                        _lowlevel.type_id.BYTES)
        self.assertEqual(self.type_id_of(ndt.make_fixedbytes(16)),
                        _lowlevel.type_id.FIXEDBYTES)
        self.assertEqual(self.type_id_of(ndt.json),
                        _lowlevel.type_id.JSON)
        # Date
        self.assertEqual(self.type_id_of(ndt.date),
                        _lowlevel.type_id.DATE)
        # Property
        self.assertEqual(self.type_id_of(nd.type_of(ndt.date(2000, 1, 1).year)),
                        _lowlevel.type_id.PROPERTY)
        # Categorical
        self.assertEqual(self.type_id_of(ndt.make_categorical([1, 2, 3])),
                        _lowlevel.type_id.CATEGORICAL)
        # Struct
        self.assertEqual(self.type_id_of(ndt.make_struct(
                                    [ndt.int32, ndt.int32], ['x', 'y'])),
                        _lowlevel.type_id.STRUCT)
        self.assertEqual(self.type_id_of(ndt.type('{x : int32; y : int32}')),
                        _lowlevel.type_id.FIXEDSTRUCT)
        # Convert/byteswap/view
        self.assertEqual(self.type_id_of(ndt.make_convert(
                                    ndt.int32, ndt.int8)),
                        _lowlevel.type_id.CONVERT)
        self.assertEqual(self.type_id_of(ndt.make_byteswap(ndt.int32)),
                        _lowlevel.type_id.BYTESWAP)
        self.assertEqual(self.type_id_of(ndt.make_view(
                                    ndt.int32, ndt.uint32)),
                        _lowlevel.type_id.VIEW)
        # Uniform arrays
        self.assertEqual(self.type_id_of(ndt.type('3, int32')),
                        _lowlevel.type_id.FIXED_DIM)
        self.assertEqual(self.type_id_of(ndt.type('M, int32')),
                        _lowlevel.type_id.STRIDED_DIM)
        self.assertEqual(self.type_id_of(ndt.type('var, int32')),
                        _lowlevel.type_id.VAR_DIM)
        # GroupBy
        self.assertEqual(self.type_id_of(nd.type_of(nd.groupby([1, 2], ['a', 'a']))),
                        _lowlevel.type_id.GROUPBY)
        # Type
        self.assertEqual(self.type_id_of(ndt.type('type')),
                        _lowlevel.type_id.DTYPE)

    def test_array_from_ptr(self):
        a = (ctypes.c_int32 * 3)()
        a[0] = 3
        a[1] = 6
        a[2] = 9
        # Readwrite version
        b = _lowlevel.array_from_ptr(ndt.type('3, int32'), ctypes.addressof(a),
                        a, 'readwrite')
        self.assertEqual(_lowlevel.data_address_of(b), ctypes.addressof(a))
        self.assertEqual(nd.dshape_of(b), '3, int32')
        self.assertEqual(nd.as_py(b), [3, 6, 9])
        b[1] = 10
        self.assertEqual(a[1], 10)
        # Readonly version
        b = _lowlevel.array_from_ptr(ndt.type('3, int32'), ctypes.addressof(a),
                        a, 'readonly')
        self.assertEqual(nd.as_py(b), [3, 10, 9])
        def assign_to(b):
            b[1] = 100
        self.assertRaises(RuntimeError, assign_to, b)

    def test_array_from_ptr_error(self):
        # Should raise an exception if the type has metadata
        a = (ctypes.c_int32 * 4)()
        self.assertRaises(RuntimeError, _lowlevel.array_from_ptr,
                        ndt.type('M, int32'), ctypes.addressof(a),
                        a, 'readwrite')

if __name__ == '__main__':
    unittest.main(verbosity=2)
