Initial commit

production/modules/shipping/Canada_Post/classes/xmlize.inc.php

@@ -0,0 +1,168 @@
+<?php
+
+/* xmlize() is by Hans Anderson, www.hansanderson.com/contact/
+ *
+ * Ye Ole "Feel Free To Use it However" License [PHP, BSD, GPL].
+ * some code in xml_depth is based on code written by other PHPers
+ * as well as one Perl script.  Poor programming practice and organization
+ * on my part is to blame for the credit these people aren't receiving.
+ * None of the code was copyrighted, though.
+ *
+ * This is a stable release, 1.0.  I don't foresee any changes, but you
+ * might check http://www.hansanderson.com/php/xml/ to see
+ *
+ * usage: $xml = xmlize($xml_data);
+ *
+ * See the function traverse_xmlize() for information about the
+ * structure of the array, it's much easier to explain by showing you.
+ * Be aware that the array is very complex.  I use xmlize all the time,
+ * but still need to use traverse_xmlize or print_r() quite often to
+ * show me the structure!
+ *
+ */
+
+function xmlize($data, $WHITE=1) {
+
+    $data = trim($data);
+    $vals = $index = $array = array();
+    $parser = xml_parser_create();
+    xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, 0);
+    xml_parser_set_option($parser, XML_OPTION_SKIP_WHITE, $WHITE);
+    if ( !xml_parse_into_struct($parser, $data, $vals, $index) )
+    {
+	die(sprintf("XML error: %s at line %d",
+                    xml_error_string(xml_get_error_code($parser)),
+                    xml_get_current_line_number($parser)));
+
+    }
+    xml_parser_free($parser);
+
+    $i = 0; 
+
+    $tagname = $vals[$i]['tag'];
+    if ( isset ($vals[$i]['attributes'] ) )
+    {
+        $array[$tagname]['@'] = $vals[$i]['attributes'];
+    } else {
+        $array[$tagname]['@'] = array();
+    }
+
+    $array[$tagname]["#"] = xml_depth($vals, $i);
+
+    return $array;
+}
+
+/* 
+ *
+ * You don't need to do anything with this function, it's called by
+ * xmlize.  It's a recursive function, calling itself as it goes deeper
+ * into the xml levels.  If you make any improvements, please let me know.
+ *
+ *
+ */
+
+function xml_depth($vals, &$i) { 
+    $children = array(); 
+
+    if ( isset($vals[$i]['value']) )
+    {
+        array_push($children, $vals[$i]['value']);
+    }
+
+    while (++$i < count($vals)) { 
+
+        switch ($vals[$i]['type']) { 
+
+           case 'open': 
+
+                if ( isset ( $vals[$i]['tag'] ) )
+                {
+                    $tagname = $vals[$i]['tag'];
+                } else {
+                    $tagname = '';
+                }
+
+                if ( isset ( $children[$tagname] ) )
+                {
+                    $size = sizeof($children[$tagname]);
+                } else {
+                    $size = 0;
+                }
+
+                if ( isset ( $vals[$i]['attributes'] ) ) {
+                    $children[$tagname][$size]['@'] = $vals[$i]["attributes"];
+                }
+
+                $children[$tagname][$size]['#'] = xml_depth($vals, $i);
+
+            break; 
+
+
+            case 'cdata':
+                array_push($children, $vals[$i]['value']); 
+            break; 
+
+            case 'complete': 
+                $tagname = $vals[$i]['tag'];
+
+                if( isset ($children[$tagname]) )
+                {
+                    $size = sizeof($children[$tagname]);
+                } else {
+                    $size = 0;
+                }
+
+                if( isset ( $vals[$i]['value'] ) )
+                {
+                    $children[$tagname][$size]["#"] = $vals[$i]['value'];
+                } else {
+                    $children[$tagname][$size]["#"] = '';
+                }
+
+                if ( isset ($vals[$i]['attributes']) ) {
+                    $children[$tagname][$size]['@']
+                                             = $vals[$i]['attributes'];
+                }			
+
+            break; 
+
+            case 'close':
+                return $children; 
+            break;
+        } 
+
+    } 
+
+	return $children;
+
+}
+
+
+/* function by acebone@f2s.com, a HUGE help!
+ *
+ * this helps you understand the structure of the array xmlize() outputs
+ *
+ * usage:
+ * traverse_xmlize($xml, 'xml_');
+ * print '<pre>' . implode("", $traverse_array . '</pre>';
+ *
+ *
+ */ 
+
+function traverse_xmlize($array, $arrName = "array", $level = 0) {
+
+    foreach($array as $key=>$val)
+    {
+        if ( is_array($val) )
+        {
+            traverse_xmlize($val, $arrName . "[" . $key . "]", $level + 1);
+        } else {
+            $GLOBALS['traverse_array'][] = '$' . $arrName . '[' . $key . '] = "' . $val . "\"\n";
+        }
+    }
+
+    return 1;
+
+}
+
+?>