# -*- coding: utf-8 -*-
##############################################################################
# Copyright (c) 2009 Nexedi SA and Contributors. All Rights Reserved.
#          Ɓukasz Nowak <luke@nexedi.com>
#
# WARNING: This program as such is intended to be used by professional
# programmers who take the whole responsibility of assessing all potential
# consequences resulting from its eventual inadequacies and bugs
# End users who are looking for a ready-to-use solution with commercial
# guarantees and support are strongly adviced to contract a Free Software
# Service Company
#
# This program is Free Software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program 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 General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
##############################################################################

from Products.ERP5Type.tests.ERP5TypeTestCase import ERP5TypeTestCase
from zope.interface.verify import verifyClass
import unittest

# this list can be generated automatically using introspection or can be set
# manually and treated as reference to what implements what
implements_tuple_list = [
  ('TradeModelCell', 'ITransformation'),
  ('TradeModelCell', 'IVariated'),
  ('TradeModelLine', 'ITransformation'),
  ('TradeModelLine', 'IVariated'),
  ('Transformation', 'ITransformation'),
  ('Transformation', 'IVariated'),
  ('BusinessPath', 'IBusinessPath'),
  ('BusinessPath', 'IArrow'),
  ('BusinessPath', 'ICategoryAccessProvider'),
  ('TradeModelRule', 'IRule'),
  ('TradeModelRule', 'IPredicate'),
  ('TransformationRule', 'IRule'),
  ('TransformationRule', 'IPredicate'),
  ('TransformedResource', 'IVariated'),
]

class TestERP5Interfaces(ERP5TypeTestCase):
  """Test that every class implements interfaces properly"""

def makeTestMethod(document, interface):
  def testMethod(self):
    _temp = __import__('Products.ERP5Type.Document.%s' % document, globals(),
        locals(), ['%s' % document])
    Document = getattr(_temp, document)
    _temp = __import__('Products.ERP5Type.interfaces', globals(), locals(),
        ['%s' % interface])
    Interface = getattr(_temp, interface)

    verifyClass(Interface, Document)

  return testMethod

def addTestMethodDynamically():
  for document, interface in implements_tuple_list:
    method_name = 'test_%s_implements_%s' % (document, interface)
    method = makeTestMethod(document, interface)
    setattr(TestERP5Interfaces, method_name, method)


addTestMethodDynamically()

def test_suite():
  suite = unittest.TestSuite()
  suite.addTest(unittest.makeSuite(TestERP5Interfaces))
  return suite