From 5a6021599ad2d3f3bbc5ccef72535b3e5d6c1b81 Mon Sep 17 00:00:00 2001
From: "Edward Z. Yang" <edwardzyang@thewritingpot.com>
Date: Sun, 27 Jan 2008 18:50:36 +0000
Subject: [PATCH] [3.1.0] Add StringHashParser.

git-svn-id: http://htmlpurifier.org/svnroot/htmlpurifier/trunk@1522 48356398-32a2-884e-a903-53898d9a118a
---
 extras/ConfigSchema/DirectiveParser.php       | 10 ---
 extras/ConfigSchema/StringHashParser.php      | 67 +++++++++++++++++++
 tests/ConfigSchema/DirectiveParserTest.php    |  7 --
 .../StringHashParser/AppendMultiline.txt      |  4 ++
 .../ConfigSchema/StringHashParser/Default.txt |  1 +
 .../StringHashParser/OverrideSingle.txt       |  2 +
 .../ConfigSchema/StringHashParser/Simple.txt  |  5 ++
 tests/ConfigSchema/StringHashParserTest.php   | 53 +++++++++++++++
 tests/test_files.php                          |  2 +-
 9 files changed, 133 insertions(+), 18 deletions(-)
 delete mode 100644 extras/ConfigSchema/DirectiveParser.php
 create mode 100644 extras/ConfigSchema/StringHashParser.php
 delete mode 100644 tests/ConfigSchema/DirectiveParserTest.php
 create mode 100644 tests/ConfigSchema/StringHashParser/AppendMultiline.txt
 create mode 100644 tests/ConfigSchema/StringHashParser/Default.txt
 create mode 100644 tests/ConfigSchema/StringHashParser/OverrideSingle.txt
 create mode 100644 tests/ConfigSchema/StringHashParser/Simple.txt
 create mode 100644 tests/ConfigSchema/StringHashParserTest.php

diff --git a/extras/ConfigSchema/DirectiveParser.php b/extras/ConfigSchema/DirectiveParser.php
deleted file mode 100644
index 068c2bad..00000000
--- a/extras/ConfigSchema/DirectiveParser.php
+++ /dev/null
@@ -1,10 +0,0 @@
-<?php
-
-/**
- * Parses directive files, building up object representation of 
- * configuration directives for runtime use or for documentation.
- */
-class ConfigSchema_DirectiveParser
-{
-    
-}
diff --git a/extras/ConfigSchema/StringHashParser.php b/extras/ConfigSchema/StringHashParser.php
new file mode 100644
index 00000000..6709941f
--- /dev/null
+++ b/extras/ConfigSchema/StringHashParser.php
@@ -0,0 +1,67 @@
+<?php
+
+/**
+ * Parses string hash files. File format is as such:
+ * 
+ *      DefaultKeyValue
+ *      KEY: Value
+ *      KEY2: Value2
+ *      --MULTILINE-KEY--
+ *      Multiline
+ *      value.
+ *
+ * Which would output something similar to:
+ *
+ *      array(
+ *          'ID' => 'DefaultKeyValue',
+ *          'KEY' => 'Value',
+ *          'KEY2' => 'Value2',
+ *          'MULTILINE-KEY' => "Multiline\nvalue.\n",
+ *      )
+ *
+ * We use this as an easy to use file-format for configuration schema
+ * files.
+ */
+class ConfigSchema_StringHashParser
+{
+    
+    public $default = 'ID';
+    
+    public function parseFile($file) {
+        if (is_string($file)) $file = new FSTools_File($file);
+        if (!$file->exists()) throw new Exception('File does not exist');
+        $file->open('r');
+        $state   = false;
+        $single  = false;
+        $ret     = array();
+        while (($line = $file->getLine()) !== false) {
+            $line = rtrim($line, "\n\r");
+            if (!$state && $line === '') continue;
+            if (strncmp('--', $line, 2) === 0) {
+                // Multiline declaration
+                $state = trim($line, '- ');
+                continue;
+            } elseif (!$state) {
+                $single = true;
+                if (strpos($line, ':') !== false) {
+                    // Single-line declaration
+                    list($state, $line) = explode(': ', $line, 2);
+                } else {
+                    // Use default declaration
+                    $state  = $this->default;
+                }
+            }
+            if ($single) {
+                $ret[$state] = $line;
+                $single = false;
+                $state  = false;
+            } else {
+                if (!isset($ret[$state])) $ret[$state] = '';
+                $ret[$state] .= "$line\n";
+            }
+        }
+        $file->close();
+        return $ret;
+    }
+    
+}
diff --git a/tests/ConfigSchema/DirectiveParserTest.php b/tests/ConfigSchema/DirectiveParserTest.php
deleted file mode 100644
index 933c123a..00000000
--- a/tests/ConfigSchema/DirectiveParserTest.php
+++ /dev/null
@@ -1,7 +0,0 @@
-<?php
-
-class ConfigSchema_DirectiveParserTest extends UnitTestCase
-{
-    
-    
-}
diff --git a/tests/ConfigSchema/StringHashParser/AppendMultiline.txt b/tests/ConfigSchema/StringHashParser/AppendMultiline.txt
new file mode 100644
index 00000000..a22ccddc
--- /dev/null
+++ b/tests/ConfigSchema/StringHashParser/AppendMultiline.txt
@@ -0,0 +1,4 @@
+--KEY--
+Line1
+--KEY--
+Line2
diff --git a/tests/ConfigSchema/StringHashParser/Default.txt b/tests/ConfigSchema/StringHashParser/Default.txt
new file mode 100644
index 00000000..844acee9
--- /dev/null
+++ b/tests/ConfigSchema/StringHashParser/Default.txt
@@ -0,0 +1 @@
+DefaultValue
diff --git a/tests/ConfigSchema/StringHashParser/OverrideSingle.txt b/tests/ConfigSchema/StringHashParser/OverrideSingle.txt
new file mode 100644
index 00000000..88db3b46
--- /dev/null
+++ b/tests/ConfigSchema/StringHashParser/OverrideSingle.txt
@@ -0,0 +1,2 @@
+KEY: Original
+KEY: New
\ No newline at end of file
diff --git a/tests/ConfigSchema/StringHashParser/Simple.txt b/tests/ConfigSchema/StringHashParser/Simple.txt
new file mode 100644
index 00000000..fc3c4f0f
--- /dev/null
+++ b/tests/ConfigSchema/StringHashParser/Simple.txt
@@ -0,0 +1,5 @@
+Namespace.Directive
+TYPE: string
+--DESCRIPTION--
+Multiline
+stuff
diff --git a/tests/ConfigSchema/StringHashParserTest.php b/tests/ConfigSchema/StringHashParserTest.php
new file mode 100644
index 00000000..d6e95b86
--- /dev/null
+++ b/tests/ConfigSchema/StringHashParserTest.php
@@ -0,0 +1,53 @@
+<?php
+
+/**
+ * @note Sample input files are located in the StringHashParser/ directory.
+ */
+class ConfigSchema_StringHashParserTest extends UnitTestCase
+{
+    
+    /**
+     * Instance of ConfigSchema_StringHashParser being tested.
+     */
+    protected $parser;
+    
+    function setup() {
+        $this->parser = new ConfigSchema_StringHashParser();
+    }
+    
+    /**
+     * Assert that $file gets parsed into the form of $expect
+     */
+    function assertParse($file, $expect) {
+        $result = $this->parser->parseFile(dirname(__FILE__) . '/StringHashParser/' . $file);
+        $this->assertIdentical($result, $expect);
+    }
+    
+    function testSimple() {
+        $this->assertParse('Simple.txt', array(
+            'ID' => 'Namespace.Directive',
+            'TYPE' => 'string',
+            'DESCRIPTION' => "Multiline\nstuff\n"
+        ));
+    }
+    
+    function testOverrideSingle() {
+        $this->assertParse('OverrideSingle.txt', array(
+            'KEY' => 'New',
+        ));
+    }
+    
+    function testAppendMultiline() {
+        $this->assertParse('AppendMultiline.txt', array(
+            'KEY' => "Line1\nLine2\n",
+        ));
+    }
+    
+    function testDefault() {
+        $this->parser->default = 'NEW-ID';
+        $this->assertParse('Default.txt', array(
+            'NEW-ID' => 'DefaultValue',
+        ));
+    }
+    
+}
diff --git a/tests/test_files.php b/tests/test_files.php
index 91ccf672..dec38e1b 100644
--- a/tests/test_files.php
+++ b/tests/test_files.php
@@ -136,4 +136,4 @@ $test_files[] = 'FSTools/FileTest.php';
 
 // ConfigSchema auxiliary library
 
-$test_files[] = 'ConfigSchema/DirectiveParserTest.php';
+$test_files[] = 'ConfigSchema/StringHashParserTest.php';