"""
    Tests for _LeCrud and LeCrud
"""

import copy

import unittest
from unittest import TestCase
from unittest.mock import patch

import EditorialModel
import DataSource.dummy
import leapi
import leapi.test.utils
from leapi.lecrud import _LeCrud

## @brief Test LeCrud methods
# @note those tests need the full dynamically generated code
class LeCrudTestCase(TestCase):
    @classmethod
    def setUpClass(cls):
        """ Write the generated code in a temporary directory and import it """
        cls.tmpdir = leapi.test.utils.tmp_load_factory_code()
    @classmethod
    def tearDownClass(cls):
        """ Remove the temporary directory created at class setup """
        leapi.test.utils.cleanup(cls.tmpdir)

    def test_split_query_filter(self):
        """ Tests the _split_filter() classmethod """
        import dyncode
        query_results = {
            'Hello = world' : ('Hello', '=', 'world'),
            'hello <= "world"': ('hello', '<=', '"world"'),
            '_he42_ll-o >= \'world"': ('_he42_ll-o', '>=', '\'world"'),
            'foo in ["foo", 42, \'bar\']': ('foo', ' in ', '["foo", 42, \'bar\']'),
            ' bar42              < 42': ('bar42', '<', '42'),
            ' _hidden > 1337': ('_hidden', '>', '1337'),
            '_42 not in foobar': ('_42', ' not in ', 'foobar'),
            'hello                       in      foo':('hello', ' in ', 'foo'),
            "\t\t\thello\t\t\nin\nfoo\t\t\n\t":('hello', ' in ', 'foo'),
            "hello \nnot\tin \nfoo":('hello', ' not in ', 'foo'),
            'hello != bar':('hello', '!=', 'bar'),
            'hello = "world>= <= != in not in"': ('hello', '=', '"world>= <= != in not in"'),
            'superior.parent = 13': ('superior.parent', '=', '13'),
            'hello like "%world%"': ('hello', ' like ', '"%world%"'),
            'world not like "foo%bar"': ('world', ' not like ', '"foo%bar"'),
        }
        for query, result in query_results.items():
            res = dyncode.LeCrud._split_filter(query)
            self.assertEqual(res, result, "When parsing the query : '%s' the returned value is different from the expected '%s'"%(query, result))

    def test_invalid_split_query_filter(self):
        """ Testing the _split_filter() method with invalid queries """
        import dyncode
        invalid_queries = [
            '42 = 42',
            '4hello = foo',
            'foo == bar',
            'hello >> world',
            'hello =    ',
            ' = world',
            '=',
            '42',
            '"hello" = world',
            'foo.bar = 15',
        ]
        for query in invalid_queries:
            with self.assertRaises(ValueError, msg='But the query was not valid : "%s"'%query):
                dyncode.LeCrud._split_filter(query)

    def test_field_is_relational(self):
        """ Testing the test to check if a field is relational """
        from dyncode import LeCrud

        test_fields = {
            'superior.parent': True,
            'subordinate.parent': True,
            'foofoo.foo': False,
        }

        for field, eres in test_fields.items():
            self.assertEqual(LeCrud._field_is_relational(field), eres)

    def test_check_datas(self):
        """ testing the check_datas* methods """
        from dyncode import Publication, Numero, LeObject

        datas = { 'titre':'foobar' }
        Numero.check_datas_value(datas, False, False)
        Numero.check_datas_value(datas, True, False)
        with self.assertRaises(leapi.lecrud.LeApiDataCheckError):
            Numero.check_datas_value({}, True)

    def test_prepare_filters(self):
        """ Testing the _prepare_filters() method """
        from dyncode import Publication, Numero, LeObject, Personnes
        
        #Simple filters
        filters = [
            'lodel_id = 1',
            'superior.parent  > 2'
        ]

        filt, rfilt = Numero._prepare_filters(filters)
        self.assertEqual(filt, [('lodel_id', '=', '1')])
        self.assertEqual(rfilt, [((leapi.leobject.REL_SUP,'parent'), '>', '2')])
        
        #All fields, no relationnal and class given
        filters = []
        res_filt = []
        for field in Numero._fields:
            filters.append('%s=1'%field)
            res_filt.append((field, '=', '1'))

        filt, rfilt = Publication._prepare_filters(filters)
        self.assertEqual(rfilt, [])
        self.assertEqual(filt, res_filt)
        
        #Mixed type filters (tuple and string)
        filters = [
            ('lodel_id', '<=', '0'),
            'subordinate.parent = 2',
        ]
        
        filt, rfilt = Numero._prepare_filters(filters)
        self.assertEqual(filt, [('lodel_id', '<=', '0')])
        self.assertEqual(rfilt, [((leapi.leobject.REL_SUB,'parent'), '=', '2')])
 
    def test_prepare_filters_invalid(self):
        """ Testing the _prepare_filters() method """
        from dyncode import LeCrud, Publication, Numero, Personnes, LeObject

        #Numero fields filters but no letype nor leclass given
        filters = []
        res_filt = []
        for field in Numero._fields:
            filters.append('%s=1'%field)
            res_filt.append((field, '=', '1'))
        
        with self.assertRaises(leapi.lecrud.LeApiDataCheckError):
            LeObject._prepare_filters(filters)


        #simply invalid filters
        filters = ['hello world !']
        with self.assertRaises(ValueError):
            Personnes._prepare_filters(filters)
    
    def test_prepare_order_fields(self):
        """ Testing the _prepare_order_fields """
        from dyncode import Article
        
        order_fields_list = [
            (
                ['titre'],
                [('titre', 'ASC')]
            ),
            (
                [('titre', 'asc')],
                [('titre', 'ASC')]
            ),
            (
                ['lodel_id', ('titre', 'asc')],
                [('lodel_id', 'ASC'), ('titre', 'ASC')]
            ),
            (
                [('titre', 'desc')],
                [('titre', 'DESC')]
            ),
        ]

        for fields_arg, expected_result in order_fields_list:
            result = Article._prepare_order_fields(fields_arg)
            self.assertEqual(result, expected_result)
        

    # 
    #   Tests mocking the datasource
    # 

    @patch('DataSource.dummy.leapidatasource.DummyDatasource.insert')
    def test_insert(self, dsmock):
        from dyncode import Publication, Numero, LeObject, Personne, Article
        ndatas = [
            (Numero, {'titre' : 'FooBar'}),
            (Numero, {'titre':'hello'}),
            (Personne, {'nom':'world', 'prenom':'hello'}),
            (Article, {'titre': 'Ar Boof', 'soustitre': 'Wow!'}),
        ]
        for lecclass, ndats in ndatas:
            lecclass.insert(ndats)

            # Adding default values for internal fields
            expt_dats = copy.copy(ndats)
            expt_dats['string'] = None
            expt_dats['class_id'] = lecclass._class_id
            expt_dats['type_id'] = lecclass._type_id if lecclass.implements_letype() else None

            dsmock.assert_called_once_with(lecclass, **expt_dats)
            dsmock.reset_mock()
            
            lecclass.insert(ndats)
            dsmock.assert_called_once_with(lecclass, **expt_dats)
            dsmock.reset_mock()
    
    ## @todo try failing on inserting from LeClass child or LeObject
    @patch('DataSource.dummy.leapidatasource.DummyDatasource.insert')
    def test_insert_fails(self, dsmock):
        from dyncode import Publication, Numero, LeObject, Personne, Article
        ndatas = [
            (Numero, dict()),
            (Numero, {'titre':'hello', 'lodel_id':42}),
            (Numero, {'tititre': 'hehello'}),
            (Personne, {'titre':'hello'}),
            (Article, {'titre': 'hello'}),
        ]
        for lecclass, ndats in ndatas:
            with self.assertRaises(leapi.lecrud.LeApiDataCheckError, msg="But trying to insert %s as %s"%(ndats, lecclass.__name__)):
                lecclass.insert(ndats)
                assert not dsmock.called
        pass
    
    @patch('DataSource.dummy.leapidatasource.DummyDatasource.update')
    def test_update(self, dsmock):
        from dyncode import Publication, Numero, LeObject
        
        args_l = [
            (
                Numero,
                {'lodel_id':'1'},
                {'titre': 'foobar'},

                1,
            ),
        ]

        for ccls, initarg, qdatas, eid in args_l:
            obji = ccls(**initarg)
            obji._instanciation_complete = True  # fake full-instance
            obji.update(qdatas)
            dsmock.assert_called_once_with(ccls, eid, **qdatas)
    
    ## @todo test invalid get
    @patch('DataSource.dummy.leapidatasource.DummyDatasource.select')
    def test_get(self, dsmock):
        """ Test the select method without group, limit, sort or offset """
        from dyncode import Publication, Numero, LeObject, Textes
        
        args = [
            (
                Numero,
                ['lodel_id', 'superior.parent'],
                ['titre != "foobar"'],

                ['lodel_id', (leapi.leobject.REL_SUP, 'parent')],
                [   ('titre','!=', '"foobar"'),
                    ('type_id', '=', Numero._type_id),
                    ('class_id', '=', Numero._class_id),
                ],
                []
            ),
            (
                Numero,
                ['lodel_id', 'titre', 'superior.parent', 'subordinate.translation'],
                ['superior.parent in  [1,2,3,4,5]'],

                ['lodel_id', 'titre', (leapi.leobject.REL_SUP,'parent'), (leapi.leobject.REL_SUB, 'translation')],
                [
                    ('type_id', '=', Numero._type_id),
                    ('class_id', '=', Numero._class_id),
                ],
                [( (leapi.leobject.REL_SUP, 'parent'), ' in ', '[1,2,3,4,5]')]
            ),
            (
                Numero,
                [],
                [],

                Numero.fieldlist(),
                [
                    ('type_id', '=', Numero._type_id),
                    ('class_id', '=', Numero._class_id),
                ],
                []
            ),
            (
                Textes,
                ['lodel_id', 'titre', 'soustitre', 'superior.parent'],
                ['titre != "foobar"'],

                ['lodel_id', 'titre', 'soustitre', (leapi.leobject.REL_SUP, 'parent')],
                [   ('titre','!=', '"foobar"'),
                    ('class_id', '=', Textes._class_id),
                ],
                [],
            ),
            (
                LeObject,
                ['lodel_id'],
                [],

                ['lodel_id'],
                [],
                [],
            ),
        ]

        for callcls, field_list, filters, fl_ds, filters_ds, rfilters_ds in args:
            callcls.get(filters, field_list)
            dsmock.assert_called_with(
                                        target_cls = callcls,
                                        field_list = fl_ds,
                                        filters = filters_ds,
                                        rel_filters = rfilters_ds,
                                        order=None,
                                        group=None,
                                        limit=None,
                                        offset=0,
                                        instanciate=True
                                    )
            dsmock.reset_mock()
    
    @patch('DataSource.dummy.leapidatasource.DummyDatasource.select')
    def test_get_complete(self, dsmock):
        """ Test the select method with group limit sort and offset arguments """
        from dyncode import Numero

        args = [
            (
                Numero,
                {
                    'query_filters': [],
                    'field_list': ['lodel_id'],
                    'group': ['titre'],
                    'limit': 10,

                },
                {
                    'target_cls': Numero,
                    'field_list': ['lodel_id'],
                    'filters': [],
                    'rel_filters': [],
                    'group': [('titre', 'ASC')],
                    'order': None,
                    'limit': 10,
                    'offset': 0,
                },
            ),
            (
                Numero,
                {
                    'query_filters': ['superior.parent = 20'],
                    'field_list': ['lodel_id'],
                    'offset': 1024,
                    'order': ['titre', ('lodel_id', 'desc')]

                },
                {
                    'target_cls': Numero,
                    'field_list': ['lodel_id'],
                    'filters': [],
                    'rel_filters': [((leapi.lecrud.REL_SUP, 'parent'), '=', '20')],
                    'group': None,
                    'order': [('titre', 'ASC'), ('lodel_id', 'DESC')],
                    'limit': None,
                    'offset': 1024,
                },
            ),
            (
                Numero,
                {
                    'query_filters': ['superior.parent = 20'],
                    'field_list': ['lodel_id'],
                    'offset': 1024,
                    'limit': 2,
                    'order': ['titre', ('lodel_id', 'desc')],
                    'group': ['titre'],

                },
                {
                    'target_cls': Numero,
                    'field_list': ['lodel_id'],
                    'filters': [],
                    'rel_filters': [((leapi.lecrud.REL_SUP, 'parent'), '=', '20')],
                    'group': [('titre', 'ASC')],
                    'order': [('titre', 'ASC'), ('lodel_id', 'DESC')],
                    'limit': 2,
                    'offset': 1024,
                },
            ),
        ]

        for callcls, getargs, exptargs in args:
            if callcls.implements_letype:
                exptargs['filters'].append( ('type_id', '=', callcls._type_id) )
            if callcls.implements_leclass:
                exptargs['filters'].append( ('class_id', '=', callcls._class_id) )
            exptargs['instanciate'] = True
            callcls.get(**getargs) 
            dsmock.assert_called_once_with(**exptargs)
            dsmock.reset_mock()
                
    #
    # Utils methods check
    #

    def test_name2class(self):
        """ Testing name2class method """
        from dyncode import LeCrud, LeObject, LeRel2Type
        # Fetch all leapi dyn classes
        cls_lst = ['LeCrud', 'LeObject', 'LeRelation', 'LeHierarch', 'LeRel2Type', 'LeClass', 'LeType']
        leo_lst = LeObject._me_uid.values()
        
        r2t_lst = list()
        for leo in leo_lst:
            if leo.is_leclass() and hasattr(leo, '_linked_types'):
                for relation_name, relleo in leo._linked_types.items():
                    r2t_lst.append(LeRel2Type.relname(leo, relleo, relation_name))
        leo_lst = [cls.__name__ for cls in leo_lst]

        # Begin test
        for clsname in cls_lst + leo_lst + r2t_lst:
            cls = LeCrud.name2class(clsname)
            self.assertEqual(cls.__name__, clsname)

        #Testing bad name or type
        badnames = ['_LeObject', 'foobar']
        for badname in badnames:
            self.assertFalse(LeCrud.name2class(badname))
        badnames = [int, LeObject]
        for badname in badnames:
            with self.assertRaises(ValueError):
                LeCrud.name2class(badname)

    def test_leobject(self):
        """ Test the LeObject shortcut getter """
        from dyncode import LeObject, LeCrud
        self.assertEqual(LeObject, LeCrud.leobject())

    def test_uidname(self):
        """ Tests the uid name getter """
        from dyncode import LeCrud, LeObject, LeRelation, Article, LeRel2Type

        with self.assertRaises(NotImplementedError):
            LeCrud.uidname()
        
        for lec in [LeObject, LeRelation, Article, LeRel2Type]:        
            self.assertIn(lec.uidname(), lec._uid_fieldtype.keys())

        self.assertEqual(LeObject.uidname(), 'lodel_id')
        self.assertEqual(LeRelation.uidname(), 'id_relation')

    def test_typeasserts(self):
        """ Tests te implements_le* and is_le* methods """
        from dyncode import LeObject, LeCrud, LeRelation, LeHierarch, LeRel2Type, Article, Textes, RelTextesPersonneAuteur

        self.assertTrue(LeObject.is_leobject())