# copyright 2003-2014 LOGILAB S.A. (Paris, FRANCE), all rights reserved.

# contact http://www.logilab.fr/ -- mailto:contact@logilab.fr

#

# This file is part of CubicWeb.

#

# CubicWeb is free software: you can redistribute it and/or modify it under the

# terms of the GNU Lesser General Public License as published by the Free

# Software Foundation, either version 2.1 of the License, or (at your option)

# any later version.

#

# CubicWeb is distributed in the hope that it will be useful, but WITHOUT

# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS

# FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License for more

# details.

#

# You should have received a copy of the GNU Lesser General Public License along

# with CubicWeb.  If not, see <http://www.gnu.org/licenses/>.

from cubicweb import ValidationError

from cubicweb.devtools.testlib import CubicWebTC

def add_wf(shell, etype, name=None, default=False):

    if name is None:

        name = etype

    return shell.add_workflow(name, etype, default=default,

                              ensure_workflowable=False)

def parse_hist(wfhist):

    return [(ti.previous_state.name, ti.new_state.name,

             ti.transition and ti.transition.name, ti.comment)

            for ti in wfhist]

class WorkflowBuildingTC(CubicWebTC):

    def test_wf_construction(self):

        with self.admin_access.shell() as shell:

            wf = add_wf(shell, 'Company')

            foo = wf.add_state(u'foo', initial=True)

            bar = wf.add_state(u'bar')

            self.assertEqual(wf.state_by_name('bar').eid, bar.eid)

            self.assertEqual(wf.state_by_name('barrr'), None)

            baz = wf.add_transition(u'baz', (foo,), bar, ('managers',))

            self.assertEqual(wf.transition_by_name('baz').eid, baz.eid)

            self.assertEqual(len(baz.require_group), 1)

            self.assertEqual(baz.require_group[0].name, 'managers')

    def test_duplicated_state(self):

        with self.admin_access.shell() as shell:

            wf = add_wf(shell, 'Company')

            wf.add_state(u'foo', initial=True)

            shell.commit()

            with self.assertRaises(ValidationError) as cm:

                wf.add_state(u'foo')

            self.assertEqual({'name': u'%(KEY-rtype)s is part of violated unicity constraint',

                              'state_of': u'%(KEY-rtype)s is part of violated unicity constraint',

                              '': u'some relations violate a unicity constraint'},

                             cm.exception.errors)

            shell.rollback()

            # no pb if not in the same workflow

            wf2 = add_wf(shell, 'Company')

            foo = wf2.add_state(u'foo', initial=True)

            shell.commit()

            # gnark gnark

            bar = wf.add_state(u'bar')

            shell.commit()

            with self.assertRaises(ValidationError) as cm:

                bar.cw_set(name=u'foo')

            shell.rollback()

            self.assertEqual({'name': u'%(KEY-rtype)s is part of violated unicity constraint',

                              'state_of': u'%(KEY-rtype)s is part of violated unicity constraint',

                              '': u'some relations violate a unicity constraint'},

                             cm.exception.errors)

    def test_duplicated_transition(self):

        with self.admin_access.shell() as shell:

            wf = add_wf(shell, 'Company')

            foo = wf.add_state(u'foo', initial=True)

            bar = wf.add_state(u'bar')

            wf.add_transition(u'baz', (foo,), bar, ('managers',))

            with self.assertRaises(ValidationError) as cm:

                wf.add_transition(u'baz', (bar,), foo)

            self.assertEqual({'name': u'%(KEY-rtype)s is part of violated unicity constraint',

                              'transition_of': u'%(KEY-rtype)s is part of violated unicity constraint',

                              '': u'some relations violate a unicity constraint'},

                             cm.exception.errors)

            shell.rollback()

            # no pb if not in the same workflow

            wf2 = add_wf(shell, 'Company')

            foo = wf2.add_state(u'foo', initial=True)

            bar = wf2.add_state(u'bar')

            wf2.add_transition(u'baz', (foo,), bar, ('managers',))

            shell.commit()

            # gnark gnark

            biz = wf2.add_transition(u'biz', (bar,), foo)

            shell.commit()

            with self.assertRaises(ValidationError) as cm:

                biz.cw_set(name=u'baz')

            shell.rollback()

            self.assertEqual({'name': u'%(KEY-rtype)s is part of violated unicity constraint',

                              'transition_of': u'%(KEY-rtype)s is part of violated unicity constraint',

                              '': u'some relations violate a unicity constraint'},

                             cm.exception.errors)

class WorkflowTC(CubicWebTC):

    def setup_database(self):

        rschema = self.schema['in_state']

        for rdef in rschema.rdefs.values():

            self.assertEqual(rdef.cardinality, '1*')

        with self.admin_access.client_cnx() as cnx:

            self.member_eid = self.create_user(cnx, 'member').eid

            cnx.commit()

    def test_workflow_base(self):

        with self.admin_access.web_request() as req:

            e = self.create_user(req, 'toto')

            iworkflowable = e.cw_adapt_to('IWorkflowable')

            self.assertEqual(iworkflowable.state, 'activated')

            iworkflowable.change_state('deactivated', u'deactivate 1')

            req.cnx.commit()

            iworkflowable.change_state('activated', u'activate 1')

            req.cnx.commit()

            iworkflowable.change_state('deactivated', u'deactivate 2')

            req.cnx.commit()

            e.cw_clear_relation_cache('wf_info_for', 'object')

            self.assertEqual([tr.comment for tr in e.reverse_wf_info_for],

                              ['deactivate 1', 'activate 1', 'deactivate 2'])

            self.assertEqual(iworkflowable.latest_trinfo().comment, 'deactivate 2')

    def test_possible_transitions(self):

        with self.admin_access.web_request() as req:

            user = req.execute('CWUser X').get_entity(0, 0)

            iworkflowable = user.cw_adapt_to('IWorkflowable')

            trs = list(iworkflowable.possible_transitions())

            self.assertEqual(len(trs), 1)

            self.assertEqual(trs[0].name, u'deactivate')

            self.assertEqual(trs[0].destination(None).name, u'deactivated')

        # test a std user get no possible transition

        with self.new_access('member').web_request() as req:

            # fetch the entity using the new session

            trs = list(req.user.cw_adapt_to('IWorkflowable').possible_transitions())

            self.assertEqual(len(trs), 0)

    def _test_manager_deactivate(self, user):

        iworkflowable = user.cw_adapt_to('IWorkflowable')

        user.cw_clear_relation_cache('in_state', 'subject')

        self.assertEqual(len(user.in_state), 1)

        self.assertEqual(iworkflowable.state, 'deactivated')

        trinfo = iworkflowable.latest_trinfo()

        self.assertEqual(trinfo.previous_state.name, 'activated')

        self.assertEqual(trinfo.new_state.name, 'deactivated')

        self.assertEqual(trinfo.comment, 'deactivate user')

        self.assertEqual(trinfo.comment_format, 'text/plain')

        return trinfo

    def test_change_state(self):

        with self.admin_access.client_cnx() as cnx:

            user = cnx.user

            iworkflowable = user.cw_adapt_to('IWorkflowable')

            iworkflowable.change_state('deactivated', comment=u'deactivate user')

            trinfo = self._test_manager_deactivate(user)

            self.assertEqual(trinfo.transition, None)

    def test_set_in_state_bad_wf(self):

        with self.admin_access.shell() as shell:

            wf = add_wf(shell, 'CWUser')

            s = wf.add_state(u'foo', initial=True)

            shell.commit()

        with self.admin_access.repo_cnx() as cnx:

            with cnx.security_enabled(write=False):

                with self.assertRaises(ValidationError) as cm:

                    cnx.execute('SET X in_state S WHERE X eid %(x)s, S eid %(s)s',

                                {'x': cnx.user.eid, 's': s.eid})

                self.assertEqual(cm.exception.errors, {'in_state-subject': "state doesn't belong to entity's workflow. "

                                          "You may want to set a custom workflow for this entity first."})

    def test_fire_transition(self):

        with self.admin_access.client_cnx() as cnx:

            user = cnx.user

            iworkflowable = user.cw_adapt_to('IWorkflowable')

            iworkflowable.fire_transition('deactivate', comment=u'deactivate user')

            user.cw_clear_all_caches()

            self.assertEqual(iworkflowable.state, 'deactivated')

            self._test_manager_deactivate(user)

            trinfo = self._test_manager_deactivate(user)

            self.assertEqual(trinfo.transition.name, 'deactivate')

    def test_goback_transition(self):

        with self.admin_access.web_request() as req:

            wf = req.user.cw_adapt_to('IWorkflowable').current_workflow

            asleep = wf.add_state('asleep')

            wf.add_transition('rest', (wf.state_by_name('activated'),

                                       wf.state_by_name('deactivated')),

                              asleep)

            wf.add_transition('wake up', asleep)

            user = self.create_user(req, 'stduser')

            iworkflowable = user.cw_adapt_to('IWorkflowable')

            iworkflowable.fire_transition('rest')

            req.cnx.commit()

            iworkflowable.fire_transition('wake up')

            req.cnx.commit()

            self.assertEqual(iworkflowable.state, 'activated')

            iworkflowable.fire_transition('deactivate')

            req.cnx.commit()

            iworkflowable.fire_transition('rest')

            req.cnx.commit()

            iworkflowable.fire_transition('wake up')

            req.cnx.commit()

            user.cw_clear_all_caches()

            self.assertEqual(iworkflowable.state, 'deactivated')

    # XXX test managers can change state without matching transition

    def _test_stduser_deactivate(self):

        with self.admin_access.repo_cnx() as cnx:

            self.create_user(cnx, 'tutu')

        with self.new_access('tutu').web_request() as req:

            iworkflowable = req.entity_from_eid(self.member_eid).cw_adapt_to('IWorkflowable')

            with self.assertRaises(ValidationError) as cm:

                iworkflowable.fire_transition('deactivate')

            self.assertEqual(cm.exception.errors, {'by_transition-subject': "transition may not be fired"})

        with self.new_access('member').web_request() as req:

            iworkflowable = req.entity_from_eid(self.member_eid).cw_adapt_to('IWorkflowable')

            iworkflowable.fire_transition('deactivate')

            req.cnx.commit()

            with self.assertRaises(ValidationError) as cm:

                iworkflowable.fire_transition('activate')

            self.assertEqual(cm.exception.errors, {'by_transition-subject': "transition may not be fired"})

    def test_fire_transition_owned_by(self):

        with self.admin_access.repo_cnx() as cnx:

            cnx.execute('INSERT RQLExpression X: X exprtype "ERQLExpression", '

                        'X expression "X owned_by U", T condition X '

                        'WHERE T name "deactivate"')

            cnx.commit()

        self._test_stduser_deactivate()

    def test_fire_transition_has_update_perm(self):

        with self.admin_access.repo_cnx() as cnx:

            cnx.execute('INSERT RQLExpression X: X exprtype "ERQLExpression", '

                        'X expression "U has_update_permission X", T condition X '

                        'WHERE T name "deactivate"')

            cnx.commit()

        self._test_stduser_deactivate()

    def test_swf_base(self):

        """subworkflow

        +-----------+  tr1   +-----------+

        | swfstate1 | ------>| swfstate2 |

        +-----------+        +-----------+

                  |  tr2  +-----------+

                  `------>| swfstate3 |

                          +-----------+

        main workflow

        +--------+  swftr1             +--------+

        | state1 | -------[swfstate2]->| state2 |

        +--------+     |               +--------+

                       |               +--------+

                       `-[swfstate3]-->| state3 |

                                       +--------+

        """

        # sub-workflow

        with self.admin_access.shell() as shell:

            swf = add_wf(shell, 'CWGroup', name='subworkflow')

            swfstate1 = swf.add_state(u'swfstate1', initial=True)

            swfstate2 = swf.add_state(u'swfstate2')

            swfstate3 = swf.add_state(u'swfstate3')

            tr1 = swf.add_transition(u'tr1', (swfstate1,), swfstate2)

            tr2 = swf.add_transition(u'tr2', (swfstate1,), swfstate3)

            # main workflow

            mwf = add_wf(shell, 'CWGroup', name='main workflow', default=True)

            state1 = mwf.add_state(u'state1', initial=True)

            state2 = mwf.add_state(u'state2')

            state3 = mwf.add_state(u'state3')

            swftr1 = mwf.add_wftransition(u'swftr1', swf, state1,

                                          [(swfstate2, state2), (swfstate3, state3)])

            swf.cw_clear_all_caches()

            self.assertEqual(swftr1.destination(None).eid, swfstate1.eid)

        # workflows built, begin test

        with self.admin_access.web_request() as req:

            group = req.create_entity('CWGroup', name=u'grp1')

            req.cnx.commit()

            iworkflowable = group.cw_adapt_to('IWorkflowable')

            self.assertEqual(iworkflowable.current_state.eid, state1.eid)

            self.assertEqual(iworkflowable.current_workflow.eid, mwf.eid)

            self.assertEqual(iworkflowable.main_workflow.eid, mwf.eid)

            self.assertEqual(iworkflowable.subworkflow_input_transition(), None)

            iworkflowable.fire_transition('swftr1', u'go')

            req.cnx.commit()

            group.cw_clear_all_caches()

            self.assertEqual(iworkflowable.current_state.eid, swfstate1.eid)

            self.assertEqual(iworkflowable.current_workflow.eid, swf.eid)

            self.assertEqual(iworkflowable.main_workflow.eid, mwf.eid)

            self.assertEqual(iworkflowable.subworkflow_input_transition().eid, swftr1.eid)

            iworkflowable.fire_transition('tr1', u'go')

            req.cnx.commit()

            group.cw_clear_all_caches()

            self.assertEqual(iworkflowable.current_state.eid, state2.eid)

            self.assertEqual(iworkflowable.current_workflow.eid, mwf.eid)

            self.assertEqual(iworkflowable.main_workflow.eid, mwf.eid)

            self.assertEqual(iworkflowable.subworkflow_input_transition(), None)

            # force back to swfstate1 is impossible since we can't any more find

            # subworkflow input transition

            with self.assertRaises(ValidationError) as cm:

                iworkflowable.change_state(swfstate1, u'gadget')

            self.assertEqual(cm.exception.errors, {'to_state-subject': "state doesn't belong to entity's workflow"})

            req.cnx.rollback()

            # force back to state1

            iworkflowable.change_state('state1', u'gadget')

            iworkflowable.fire_transition('swftr1', u'au')

            group.cw_clear_all_caches()

            iworkflowable.fire_transition('tr2', u'chapeau')

            req.cnx.commit()

            group.cw_clear_all_caches()

            self.assertEqual(iworkflowable.current_state.eid, state3.eid)

            self.assertEqual(iworkflowable.current_workflow.eid, mwf.eid)

            self.assertEqual(iworkflowable.main_workflow.eid, mwf.eid)

            self.assertListEqual(parse_hist(iworkflowable.workflow_history),

                                  [('state1', 'swfstate1', 'swftr1', 'go'),

                                   ('swfstate1', 'swfstate2', 'tr1', 'go'),

                                   ('swfstate2', 'state2', 'swftr1', 'exiting from subworkflow subworkflow'),

                                   ('state2', 'state1', None, 'gadget'),

                                   ('state1', 'swfstate1', 'swftr1', 'au'),

                                   ('swfstate1', 'swfstate3', 'tr2', 'chapeau'),

                                   ('swfstate3', 'state3', 'swftr1', 'exiting from subworkflow subworkflow'),

                                   ])

    def test_swf_exit_consistency(self):

        with self.admin_access.shell() as shell:

            # sub-workflow

            swf = add_wf(shell, 'CWGroup', name='subworkflow')

            swfstate1 = swf.add_state(u'swfstate1', initial=True)

            swfstate2 = swf.add_state(u'swfstate2')

            tr1 = swf.add_transition(u'tr1', (swfstate1,), swfstate2)

            # main workflow

            mwf = add_wf(shell, 'CWGroup', name='main workflow', default=True)