Commit 8aca0f7dbb5dd41f34f8641893615d8801af4b4b

Authored by nbm
1 parent 5e3ff7ff

Tests for KTConfig


git-svn-id: https://kt-dms.svn.sourceforge.net/svnroot/kt-dms/trunk@3465 c91229c3-7414-0410-bfa2-8a42b809f60b
tests/config/bar.ini 0 → 100644
  1 +[bar]
  2 +bar = foo
  3 +asdf = foo
... ...
tests/config/expand.ini 0 → 100644
  1 +[expand]
  2 +a = b
  3 +b = ${expand/a}b
  4 +
  5 +[mail]
  6 +serverName = mail.example.org
  7 +emailFrom = kt@${mail/serverName}
  8 +
  9 +[multi]
  10 +a = asdf
  11 +b = rewq
  12 +c = zxcv${multi/a}zxcv${multi/b}zxcv${multi/a}
... ...
tests/config/foo.ini 0 → 100644
  1 +[asdf]
  2 +asdf=asdf
... ...
tests/config/testConfig.php 0 → 100644
  1 +<?php
  2 +
  3 +error_reporting(E_ALL);
  4 +
  5 +require_once("../../config/dmsDefaults.php");
  6 +require_once(KT_LIB_DIR . '/config/config.inc.php');
  7 +
  8 +$KTConfig = new KTConfig;
  9 +$KTConfig->loadFile("foo.ini");
  10 +$aExpectedRet = "asdf";
  11 +$aRet = $KTConfig->get("asdf");
  12 +if ($aRet === $aExpectedRet) {
  13 + print "Success!\n";
  14 +} else {
  15 + print "Failure!\n";
  16 + print "Expected: " . print_r($aExpectedRet, true) . "\n";
  17 + print "Got: " . print_r($aRet, true) . "\n";
  18 +}
  19 +$aRet = $KTConfig->get("asdf/asdf");
  20 +if ($aRet === $aExpectedRet) {
  21 + print "Success!\n";
  22 +} else {
  23 + print "Failure!\n";
  24 + print "Expected: " . print_r($aExpectedRet, true) . "\n";
  25 + print "Got: " . print_r($aRet, true) . "\n";
  26 +}
  27 +
  28 +?>
... ...
tests/config/testExpand.php 0 → 100644
  1 +<?php
  2 +
  3 +error_reporting(E_ALL);
  4 +
  5 +require_once("../../config/dmsDefaults.php");
  6 +require_once(KT_LIB_DIR . '/config/config.inc.php');
  7 +
  8 +$KTConfig = new KTConfig;
  9 +$KTConfig->loadFile("expand.ini");
  10 +$aExpectedRet = "bb";
  11 +$aRet = $KTConfig->get("expand/b");
  12 +if ($aRet === $aExpectedRet) {
  13 + print "Success!\n";
  14 +} else {
  15 + print "Failure!\n";
  16 + print "Expected: " . print_r($aExpectedRet, true) . "\n";
  17 + print "Got: " . print_r($aRet, true) . "\n";
  18 +}
  19 +
  20 +$aExpectedRet = "kt@mail.example.org";
  21 +$aRet = $KTConfig->get("mail/emailFrom");
  22 +if ($aRet === $aExpectedRet) {
  23 + print "Success!\n";
  24 +} else {
  25 + print "Failure!\n";
  26 + print "Expected: " . print_r($aExpectedRet, true) . "\n";
  27 + print "Got: " . print_r($aRet, true) . "\n";
  28 +}
  29 +
  30 +$aExpectedRet = "zxcvasdfzxcvrewqzxcvasdf";
  31 +$aRet = $KTConfig->get("multi/c");
  32 +if ($aRet === $aExpectedRet) {
  33 + print "Success!\n";
  34 +} else {
  35 + print "Failure!\n";
  36 + print "Expected: " . print_r($aExpectedRet, true) . "\n";
  37 + print "Got: " . print_r($aRet, true) . "\n";
  38 +}
  39 +
  40 +?>
... ...
tests/config/testMulti.php 0 → 100644
  1 +<?php
  2 +
  3 +error_reporting(E_ALL);
  4 +
  5 +require_once("../../config/dmsDefaults.php");
  6 +require_once(KT_LIB_DIR . '/config/config.inc.php');
  7 +
  8 +$KTConfig = new KTConfig;
  9 +$KTConfig->loadFile("foo.ini");
  10 +$KTConfig->loadFile("bar.ini");
  11 +$aExpectedRet = "foo";
  12 +$aRet = $KTConfig->get("bar");
  13 +if ($aRet === $aExpectedRet) {
  14 + print "Success!\n";
  15 +} else {
  16 + print "Failure!\n";
  17 + print "Expected: " . print_r($aExpectedRet, true) . "\n";
  18 + print "Got: " . print_r($aRet, true) . "\n";
  19 +}
  20 +$aRet = $KTConfig->get("bar/bar");
  21 +if ($aRet === $aExpectedRet) {
  22 + print "Success!\n";
  23 +} else {
  24 + print "Failure!\n";
  25 + print "Expected: " . print_r($aExpectedRet, true) . "\n";
  26 + print "Got: " . print_r($aRet, true) . "\n";
  27 +}
  28 +$aRet = $KTConfig->get("bar/asdf");
  29 +if ($aRet === $aExpectedRet) {
  30 + print "Success!\n";
  31 +} else {
  32 + print "Failure!\n";
  33 + print "Expected: " . print_r($aExpectedRet, true) . "\n";
  34 + print "Got: " . print_r($aRet, true) . "\n";
  35 +}
  36 +$aExpectedRet = "asdf";
  37 +$aRet = $KTConfig->get("asdf/asdf");
  38 +if ($aRet === $aExpectedRet) {
  39 + print "Success!\n";
  40 +} else {
  41 + print "Failure!\n";
  42 + print "Expected: " . print_r($aExpectedRet, true) . "\n";
  43 + print "Got: " . print_r($aRet, true) . "\n";
  44 +}
  45 +
  46 +?>
... ...