git.sesse.net Git - xml-template/blob - php5/xml-template.php

   1 <?php
   2
   3 function XML_Template_process_file($filename, $obj, $clean = 1)
   4 {
   5         $doc = new DOMDocument;
   6         $doc->load($filename);
   7         XML_Template_process($doc, $obj, $clean);
   8         return $doc;
   9 }
  10
  11 function XML_Template_process($node, $obj, $clean = 1)
  12 {
  13         if (is_a($obj, 'domnode')) {                          # overwrite
  14                 for ($i = 0; $i < $node->childNodes->length; ++$i) {
  15                         $child = $node->childNodes->item($i);
  16                         $node->removeChild($child);
  17                 }
  18
  19                 if (is_a($obj, 'domdocument')) {
  20                         $obj = $obj->document_element();
  21                 }
  22
  23                 $newobj = own_clone_node($obj, $node->ownerDocument);
  24                 $node->appendChild($newobj);
  25
  26                 XML_Template_process($newobj, array(), $clean);
  27         } else if (!is_array($obj)) {                         # overwrite
  28                 for ($i = 0; $i < $node->childNodes->length; ++$i) {
  29                         $child = $node->childNodes->item($i);
  30                         $node->removeChild($child);
  31                 }
  32                 $doc = $node->ownerDocument;
  33                 $node->appendChild($doc->createTextNode($obj));
  34         } else if (is_associative_array($obj)) {              # substitute
  35                 for ($i = 0; $i < $node->childNodes->length; ++$i) {
  36                         $child = $node->childNodes->item($i);
  37                         $processed = false;
  38
  39                         if ($child->nodeType == XML_ELEMENT_NODE) {
  40                                 unset($id);
  41
  42                                 $tag = $child->nodeName;
  43                                 $attrs = $child->attributes;
  44                                 if (isset($attrs)) {
  45                                         foreach ($child->attributes as $attr) {
  46                                                 if ($attr->namespaceURI == 'http://template.sesse.net/' && $attr->name == 'id') {
  47                                                         $id = $attr->value;
  48                                                         if ($clean) {
  49                                                                 $child->removeAttributeNode($attr);
  50                                                         }
  51                                                 }
  52                                         }
  53                                 }
  54
  55                                 # check all substitutions to see if we found anything
  56                                 # appropriate
  57                                 foreach (array_keys($obj) as $key) {
  58                                         # FIXME: we would want something like \Q and \E here...
  59                                         if (preg_match('/^' . $tag . '\/(.*)$/', $key, $matches) ||
  60                                             (isset($id) && preg_match('/^#' . $id . '\/(.*)$/', $key, $matches))) {
  61                                                 $child->set_attribute($matches[1], $obj[$key]);
  62                                         }
  63
  64                                         if ($processed) {
  65                                                 continue;
  66                                         }
  67                                         if ($key == $tag || (isset($id) && $key == ('#'.$id))) {
  68                                                 XML_Template_process($child, $obj[$key], $clean);
  69                                                 $processed = true;
  70                                         }
  71                                 }
  72                         }
  73
  74                         if (!$processed) {
  75                                 XML_Template_process($child, $obj, $clean);
  76                         }
  77                 }
  78         } else {                                                # repeat
  79                 $doc = $node->ownerDocument;
  80                 $frag = $doc->createElement("temporary-fragment");    # ugh
  81
  82                 while ($node->childNodes->length > 0) {
  83                         $child = $node->childNodes->item(0);
  84                         $frag->appendChild($child);
  85                 }
  86
  87                 foreach ($obj as $instance) {
  88                         if (!isset($instance)) {
  89                                 continue;
  90                         }
  91
  92                         $newnode = own_clone_node($frag, $frag->ownerDocument);
  93                         $node->appendChild($newnode);
  94                         XML_Template_process($newnode, $instance, $clean);
  95                         if ($clean) {
  96                                 XML_Template_clean($newnode);
  97                         }
  98                 }
  99
 100                 # remove all the <fragment> tags
 101
 102                 for ($i = 0; $i < $node->childNodes->length; ++$i) {
 103                         $child = $node->childNodes->item($i);
 104                         if ($child->name != 'temporary-fragment') {
 105                                 continue;
 106                         }
 107                         for ($j = 0; $j < $child->childNodes->length; ++$j) {
 108                                 $child2 = $child->childNodes->item($j);
 109                                 $node->appendChild($child2);
 110                         }
 111                         $node->removeChild($child);
 112                 }
 113         }
 114
 115         if ($clean) {
 116                 XML_Template_clean($node);
 117         }
 118 }
 119
 120 function XML_Template_clean($node)
 121 {
 122         if ($node->nodeType == XML_ELEMENT_NODE) {
 123                 if ($node->namespaceURI != 'http://template.sesse.net/') {
 124                         return;
 125                 }
 126
 127                 # as this is a dummy node, we want to remove it and move everything further up
 128                 # after we've done any required replacements
 129                 $doc = $node->ownerDocument;
 130                 $parent = $node->parentNode;
 131                 for ($i = 0; $i < $node->childNodes->length; ++$i) {
 132                         $child = $node->childNodes->item($i);
 133                         $node->removeChild($child);
 134                         $node->insert_before($child, $node);
 135                 }
 136                 $parent->removeChild($node);
 137         }
 138 }
 139
 140 # FIXME: use varargs here
 141 function XML_Template_alternate($tag, $array, $elems)
 142 {
 143         $num = count($elems);
 144
 145         for ($i = 0, $j = 0; $i < count($array); $i++) {
 146                 if (isset($array[$i])) {
 147                         $array[$i][$tag] = $elems[$j++ % $num];
 148                 }
 149         }
 150
 151         return $array;
 152 }
 153
 154 # Ideally, this would be "return $obj->clone_node(true)". But surprise, surprise,
 155 # PHP is buggy (at least both PHP4 and PHP5); it removes the prefix information
 156 # from all attributes during a clone. IOW, we'll have to clone evverything
 157 # ourselves.
 158 function own_clone_node($node, $doc)
 159 {
 160         // we only need these two
 161         if ($node->nodeType == XML_ELEMENT_NODE) {
 162                 $nsuri = $node->namespaceURI;
 163                 if (isset($nsuri)) {
 164                         $newnode = $doc->createElementNS($node->namespaceURI, $node->nodeName, $node->prefix);
 165                 } else {
 166                         $newnode = $doc->createElement($node->nodeName);
 167                 }
 168
 169                 $attrs = $node->attributes;
 170                 if (isset($attrs)) {
 171                         foreach ($node->attributes as $attr) {
 172                                 $nsuri = $attr->namespaceURI;
 173                                 if (isset($nsuri)) {
 174                                         $attr2 = $doc->createAttribute($attr->name);
 175                                 } else {
 176                                         $attr2 = $doc->createAttributeNS($nsuri, $attr->prefix . ":" . $attr->name);
 177                                 }
 178                                 $attr2->value = $attr->value;
 179                                 $newnode->appendChild($attr2);
 180                         }
 181                 }
 182                 for ($i = 0; $i < $node->childNodes->length; ++$i) {
 183                         $child = $node->childNodes->item($i);
 184                         $newnode->appendChild(own_clone_node($child, $doc));
 185                 }
 186                 return $newnode;
 187         } else {
 188                 return $node->cloneNode(true);
 189         }
 190 }
 191
 192 function is_associative_array($arr)
 193 {
 194         if (!is_array($arr)) {
 195                 return false;
 196         }
 197         $diff = array_diff(range(0, count($arr) - 1), array_keys($arr));
 198         return (count($diff) > 0);
 199 }
 200 ?>