Added program to test PHP binding.

1 files changed, 199 insertions, 0 deletions

diff --git a/php/tests/binding_tests.php b/php/tests/binding_tests.php
new file mode 100755
index 00000000..a85d5009
--- /dev/null
+++ b/php/tests/binding_tests.php
@@ -0,0 +1,199 @@
+#! /usr/bin/php
+<?php
+
+$ret = @dl('lasso.' . PHP_SHLIB_SUFFIX);
+if ($ret == FALSE) {
+    print "lasso not found\n";
+    exit(1);
+}
+
+function test01()
+{
+        print "Create and delete nodes.";
+
+        $authnRequest = new LassoLibAuthnRequest();
+	$authnRequest = NULL;
+
+	print ".. OK\n";
+}
+
+function test02()
+{
+        print "Get & set simple attributes of nodes.";
+
+        $authnRequest = new LassoLibAuthnRequest();
+
+        # Test a string attribute.
+        assert($authnRequest->consent == NULL);
+        $authnRequest->consent = LassoLibConsentObtained;
+        assert($authnRequest->consent == LassoLibConsentObtained);
+	$authnRequest->consent = NULL;
+	assert($authnRequest->consent == NULL);
+
+        # Test a renamed string attribute. But renaming doesn't work with current SWIG PHP binding.
+        assert($authnRequest->RelayState == NULL);
+        $authnRequest->RelayState = 'Hello World!';
+        assert($authnRequest->RelayState == 'Hello World!');
+	$authnRequest->RelayState = NULL;
+	assert($authnRequest->RelayState == NULL);
+
+        # Test an integer attribute.
+        assert($authnRequest->majorVersion == 0);
+        $authnRequest->majorVersion = 314;
+	assert($authnRequest->majorVersion == 314);
+
+	$authnRequest = NULL;
+
+	print ".. OK\n";
+}
+
+function test03()
+{
+ 	print "Get & set attributes of nodes of type string list.";
+
+        $authnRequest = new LassoLibAuthnRequest();
+
+        assert($authnRequest->respondWith == NULL);
+
+        $respondWith = new LassoStringList();
+        assert($respondWith->length() == 0);
+        $respondWith->append('first string');
+        assert($respondWith->length() == 1);
+        assert($respondWith->getitem(0) == 'first string');
+        assert($respondWith->getitem(0) == 'first string');
+        $respondWith->append('second string');
+        assert($respondWith->length() == 2);
+        assert($respondWith->getitem(0) == 'first string');
+        assert($respondWith->getitem(1) == 'second string');
+        $respondWith->append('third string');
+        assert($respondWith->length() == 3);
+        assert($respondWith->getitem(0) == 'first string');
+        assert($respondWith->getitem(1) == 'second string');
+        assert($respondWith->getitem(2) == 'third string');
+        $authnRequest->RespondWith = $respondWith;
+	# $authnRequest->RespondWith->getitem(0) doesnt work. It raises:
+	# Fatal error: Class 'lassolibauthnrequest' does not support overloaded method calls
+	$authnRequestRespondWith = $authnRequest->RespondWith;
+        assert($authnRequestRespondWith->getitem(0) == 'first string');
+        assert($authnRequestRespondWith->getitem(1) == 'second string');
+        assert($authnRequestRespondWith->getitem(2) == 'third string');
+        assert($respondWith->getitem(0) == 'first string');
+        assert($respondWith->getitem(1) == 'second string');
+        assert($respondWith->getitem(2) == 'third string');
+        $respondWith = NULL;
+        assert($authnRequestRespondWith->getitem(0) == 'first string');
+        assert($authnRequestRespondWith->getitem(1) == 'second string');
+        assert($authnRequestRespondWith->getitem(2) == 'third string');
+        $respondWith = $authnRequest->RespondWith;
+        assert($respondWith->getitem(0) == 'first string');
+        assert($respondWith->getitem(1) == 'second string');
+        assert($respondWith->getitem(2) == 'third string');
+        $respondWith = NULL;
+        assert($authnRequestRespondWith->getitem(0) == 'first string');
+        assert($authnRequestRespondWith->getitem(1) == 'second string');
+        assert($authnRequestRespondWith->getitem(2) == 'third string');
+	$authnRequestRespondWith = NULL;
+        $authnRequest->RespondWith = NULL;
+	print_r($authnRequest->RespondWith);
+        assert($authnRequest->RespondWith == NULL);
+
+	$authnRequest = NULL;
+
+	print ".. OK\n";
+}
+
+function test04()
+{
+ 	print "Get & set attributes of nodes of type node list.";
+
+        $response = new LassoSamlpResponse();
+
+	assert($response->assertion == NULL);
+
+        $assertions = new LassoNodeList();
+        assert($assertions->length() == 0);
+        $assertion1 = new LassoSamlAssertion();
+        $assertion1->AssertionID = 'assertion 1';
+        $assertions->append($assertion1);
+        assert($assertions->length() == 1);
+	$assertionsItem0 = $assertions->getitem(0);
+        assert($assertionsItem0->AssertionID == 'assertion 1');
+	$assertionsItem0 = $assertions->getitem(0);
+        assert($assertionsItem0->AssertionID == 'assertion 1');
+        $assertion2 = new LassoSamlAssertion();
+        $assertion2->AssertionID = 'assertion 2';
+        $assertions->append($assertion2);
+        assert($assertions->length() == 2);
+	$assertionsItem0 = $assertions->getitem(0);
+        assert($assertionsItem0->AssertionID == 'assertion 1');
+	$assertionsItem1 = $assertions->getitem(1);
+        assert($assertionsItem1->AssertionID == 'assertion 2');
+        $assertion3 = new LassoSamlAssertion();
+        $assertion3->AssertionID = 'assertion 3';
+        $assertions->append($assertion3);
+        assert($assertions->length() == 3);
+	$assertionsItem0 = $assertions->getitem(0);
+        assert($assertionsItem0->AssertionID == 'assertion 1');
+	$assertionsItem1 = $assertions->getitem(1);
+        assert($assertionsItem1->AssertionID == 'assertion 2');
+	$assertionsItem2 = $assertions->getitem(2);
+        assert($assertionsItem2->AssertionID == 'assertion 3');
+        $response->assertion = $assertions;
+	$responseAssertion = $response->assertion;
+	$responseAssertionItem0 = $responseAssertion->getitem(0);
+        assert($responseAssertionItem0->AssertionID == 'assertion 1');
+	$responseAssertion = $response->assertion;
+	$responseAssertionItem1 = $responseAssertion->getitem(1);
+        assert($responseAssertionItem1->AssertionID == 'assertion 2');
+	$responseAssertion = $response->assertion;
+	$responseAssertionItem2 = $responseAssertion->getitem(2);
+        assert($responseAssertionItem2->AssertionID == 'assertion 3');
+	$assertionsItem0 = $assertions->getitem(0);
+        assert($assertionsItem0->AssertionID == 'assertion 1');
+	$assertionsItem1 = $assertions->getitem(1);
+        assert($assertionsItem1->AssertionID == 'assertion 2');
+	$assertionsItem2 = $assertions->getitem(2);
+        assert($assertionsItem2->AssertionID == 'assertion 3');
+        $assertions = NULL;
+	$responseAssertion = $response->assertion;
+	$responseAssertionItem0 = $responseAssertion->getitem(0);
+        assert($responseAssertionItem0->AssertionID == 'assertion 1');
+	$responseAssertion = $response->assertion;
+	$responseAssertionItem1 = $responseAssertion->getitem(1);
+        assert($responseAssertionItem1->AssertionID == 'assertion 2');
+	$responseAssertion = $response->assertion;
+	$responseAssertionItem2 = $responseAssertion->getitem(2);
+        assert($responseAssertionItem2->AssertionID == 'assertion 3');
+        $assertions = $response->assertion;
+	$assertionsItem0 = $assertions->getitem(0);
+        assert($assertionsItem0->AssertionID == 'assertion 1');
+	$assertionsItem1 = $assertions->getitem(1);
+        assert($assertionsItem1->AssertionID == 'assertion 2');
+	$assertionsItem2 = $assertions->getitem(2);
+        assert($assertionsItem2->AssertionID == 'assertion 3');
+        $assertions = NULL;
+	$responseAssertion = $response->assertion;
+	$responseAssertionItem0 = $responseAssertion->getitem(0);
+        assert($responseAssertionItem0->AssertionID == 'assertion 1');
+	$responseAssertion = $response->assertion;
+	$responseAssertionItem1 = $responseAssertion->getitem(1);
+        assert($responseAssertionItem1->AssertionID == 'assertion 2');
+	$responseAssertion = $response->assertion;
+	$responseAssertionItem2 = $responseAssertion->getitem(2);
+        assert($responseAssertionItem2->AssertionID == 'assertion 3');
+        $response->assertion = NULL;
+        assert($response->assertion == NULL);
+
+	$response = NULL;
+
+	print ".. OK\n";
+}
+
+lasso_init();
+test01();
+test02();
+test03();
+test04();
+lasso_shutdown();
+
+?>