#
 #  Copyright (c) 2011 Edward Langley
 #  All rights reserved.
 #
 #  Redistribution and use in source and binary forms, with or without
 #  modification, are permitted provided that the following conditions
 #  are met:
 #
 #  Redistributions of source code must retain the above copyright notice,
 #  this list of conditions and the following disclaimer.
 #
 #  Redistributions in binary form must reproduce the above copyright
 #  notice, this list of conditions and the following disclaimer in the
 #  documentation and/or other materials provided with the distribution.
 #
 #  Neither the name of the project's author nor the names of its
 #  contributors may be used to endorse or promote products derived from
 #  this software without specific prior written permission.
 #
 #  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 #  "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 #  LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
 #  FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
 #  HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 #  SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
 #  TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
 #  PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
 #  LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
 #  NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 #  SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 #
 #

 import functools

 from twisted.trial import unittest
 import StringIO
 
 import mock
 
 import jsonrpc.server
 import jsonrpc.jsonutil
 
 from twisted.web.test.test_web import DummyRequest

 from twisted.internet.defer import succeed, DeferredList

 from twisted.web.static import server
 
 def _render(resource, request):
     result = resource.render(request)
     if isinstance(result, str):
         request.write(result)

         equest.finish()

         return succeed(None)
     elif result is server.NOT_DONE_YET:
         if request.finished:
             return succeed(None)
         else:
             return request.notifyFinish()
     else:
         raise ValueError("Unexpected return value: %r" % (result,))
 
 class SimpleEventHandler(jsonrpc.server.ServerEvents):

 	def log(self, result, request, error=False): pass

 	def findmethod(self, method, *_, **__):

 		if method in set(['echo', 'add']):
 			return getattr(self, method)
 
 	def add(self, a,b):
 		return a+b
 
 	def echo(self, v): return v
 

 def TestResource(setup):
 	def _inner1(tests):
 		@functools.wraps(setup)
 		def _inner2(self):
 			resource = jsonrpc.server.JSON_RPC()
 			resource.customize(SimpleEventHandler)

 			request = DummyRequest([''])
 			request.getCookie = mock.Mock()

 			result = setup(self, request, resource)
 			if result is not None:
 				request, resource = result

 			d = _render(resource, request).addCallback(tests, self, request, resource)
 			return d
 		return _inner2
 	return _inner1

 class TestJSONRPCServer(unittest.TestCase):

 	def setUp(self):
 		self.id_ = 'an_id'
 		self.param = "some data"

 	@TestResource
 	def test_eventhandler(self, request, resource):
 		resource.eventhandler = mock.Mock(wraps=resource.eventhandler)
 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": %s, "method": "echo", "id": "%s"}' % (jsonrpc.jsonutil.encode([self.param]), self.id_))
 		return request, resource
 
 	@test_eventhandler
 	def test_eventhandler(ignored, self, request, resource):
 		self.assertTrue( resource.eventhandler.processcontent.called )
 		self.assertTrue( resource.eventhandler.defer_with_rpcrequest.called )
 		self.assertTrue( resource.eventhandler.callmethod.called )
 		self.assertTrue( resource.eventhandler.defer.called )
 		self.assertTrue( resource.eventhandler.getresponsecode.called )
 		self.assertTrue( resource.eventhandler.log.called )
 
 	@TestResource
 	def test_requestid0(self, request, resource):
 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": %s, "method": "echo", "id": "%s"}' % (jsonrpc.jsonutil.encode([self.param]), self.id_))
 		return request, resource

 	@test_requestid0
 	def test_requestid0(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])

 		self.assertEqual(data["id"], self.id_)

 	@TestResource
 	def test_requestid1(self, request, resource):
 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": %s, "method": "echo", "id": 1}' % jsonrpc.jsonutil.encode([self.param]))
 		return request, resource

 	@test_requestid1
 	def test_requestid1(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])

 		self.assertEqual(data["id"], 1)

 	@TestResource
 	def test_requestid2(self, request, resource):
 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": %s, "method": "echo", "id": []}' % jsonrpc.jsonutil.encode([self.param]))
 		return request, resource

 	@test_requestid2
 	def test_requestid2(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])

 		self.assertNotEqual(data["id"], [])

 	@TestResource
 	def test_requestid3(self, request, resource):
 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": %s, "method": "echo", "id": {}}' % jsonrpc.jsonutil.encode([self.param]))
 		return request, resource

 	@test_requestid3
 	def test_requestid3(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])

 		self.assertNotEqual(data["id"], {})

 	@TestResource
 	def test_invalid_data(self, request, resource):

 		request.content = StringIO.StringIO(' {"v": %s}, "method": "echo"}' % (jsonrpc.jsonutil.encode(self.param)))

 		return request, resource

 	@test_invalid_data
 	def test_invalid_data(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])

 		self.assertEqual(data, {"jsonrpc": "2.0", "error": {"code": -32700, "message": "Parse error."}, "id": None})

 	@TestResource
 	def test_wrongversion(self, request, resource):

 		request.content = StringIO.StringIO('{"jsonrpc": "2.1", "params": %s, "method": "echo", "id": "%s"}' % (jsonrpc.jsonutil.encode([self.param]), self.id_))
 
 

 	@test_wrongversion
 	def rendered(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(data, {"jsonrpc": "2.0", "error": {"code": -32600, "message": "Invalid Request."}, "id": self.id_})

 	@TestResource
 	def test_invalidmethodname(self, request, resource):

 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": %s, "method": 0, "id": "%s"}' % (jsonrpc.jsonutil.encode([self.param]), self.id_))
 
 

 	@test_invalidmethodname
 	def rendered(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(data, {"jsonrpc": "2.0", "error": {"code": -32600, "message": "Invalid Request."}, "id": self.id_})

 	@TestResource
 	def test_missingmethod(self, request, resource):

 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": %s, "method": "non_existent", "id": "%s"}' % (jsonrpc.jsonutil.encode([self.param]), self.id_))
 
 

 	@test_missingmethod
 	def rendered(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(data, {"jsonrpc": "2.0", "error": {"code": -32601, "message": "Procedure not found."}, "id": self.id_})

 	@TestResource

 	def test_simplecall(self):
 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": %s, "method": "echo", "id": "%s"}' % (jsonrpc.jsonutil.encode([self.param]), self.id_))
 

 	@test_simplecall
 	def rendered(ignored):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])

 		self.assertEqual(data['id'], self.id_)
 		self.assertEqual(data['result'], self.param)

 	@TestResource
 	def test_notify(self, request, resource):

 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": {"v": %s}, "method": "echo"}' % (jsonrpc.jsonutil.encode(self.param)))
 

 	@test_notify
 	def test_notify(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 0)

 	@TestResource
 	def _test_kwcall(self, request, resource):

 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": {"v": %s}, "method": "echo", "id": "%s"}' % (jsonrpc.jsonutil.encode(self.param), self.id_))
 

 	@_test_kwcall
 	def test_kwcall_id(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])

 		self.assertEqual(data['id'], self.id_)

 	@_test_kwcall
 	def test_kwcall_result(ignored, self, request, resource):
 		data = jsonrpc.jsonutil.decode(request.written[0])

 		self.assertEqual(data['result'], self.param)

 	@TestResource
 	def test_err(self, request, resource):

 		request.content = StringIO.StringIO('{"jsonrpc": "2.0", "params": [1, "sss"], "method": "add", "id": "%s"}' % self.id_)

 		return request, resource

 	@test_err
 	def test_err(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 		data = jsonrpc.jsonutil.decode(request.written[0])

 		self.assertEqual(data['id'], self.id_)
 		self.assertTrue(data.get('error', False))

 	@TestResource
 	def _test_batchcall(self, request, resource):

 		request.content = StringIO.StringIO(
 			'[{"jsonrpc": "2.0", "params": [1, 2], "method": "add", "id": "1"},'
 				'{"jsonrpc": "2.0", "params": {"a": 3, "b": 2}, "method": "add", "id": "2"}]'
 		)

 		return request, resource
 
 	@_test_batchcall
 	def test_batchcall1(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)
 
 	@_test_batchcall
 	def test_batchcall2(ignored, self, request, resource):
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(len(data), 2)
 
 	@_test_batchcall
 	def test_batchcall3(ignored, self, request, resource):
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(set(x['result'] for x in data), set([3,5]))
 
 	@_test_batchcall
 	def test_batchcall4(ignored, self, request, resource):
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(set(x['id'] for x in data), set("12"))
 
 	@_test_batchcall
 	def test_batchcall5(ignored, self, request, resource):
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertFalse(any(x.get('error', False) for x in data))
 
 	@TestResource
 	def _test_batchcall_1err(self, request, resource):

 		request.content = StringIO.StringIO(
 			'[{"jsonrpc": "2.0", "params": [1, 2], "method": "add", "id": "1"},'
 				'{"jsonrpc": "2.0", "params": {"a": "3", "b": 2}, "method": "add", "id": "2"}]'
 		)

 		return request, resource

 	@_test_batchcall_1err
 	def test_batchcall_1err_1(ignored, self, request, resource):
 		self.assertEqual(len(request.written), 1)

 	@_test_batchcall_1err
 	def test_batchcall_1err_2(ignored, self, request, resource):
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(len(data), 2)

 	@_test_batchcall_1err
 	def test_batchcall_1err_3(ignored, self, request, resource):
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(set(x['id'] for x in data), set("12"))

 	@_test_batchcall_1err
 	def test_batchcall_1err_4(ignored, self, request, resource):
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(set(x.get('result', False) for x in data), set([3,False]))

 	@_test_batchcall_1err
 	def test_batchcall_1err_5(ignored, self, request, resource):
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(len(filter(None, [x.get('error') for x in data])), 1)

 	@TestResource
 	def _test_batchcall_emptylist(self, request, resource):

 		request.content = StringIO.StringIO('[]')
 

 	@_test_batchcall_emptylist
 	def test_batchcall_emptylist(ignored, self, request, resource):
 		data = jsonrpc.jsonutil.decode(request.written[0])
 		self.assertEqual(data, {"jsonrpc": "2.0", "error": {"code": -32600, "message": "Invalid Request."}, "id": None})