<?php
/*
 * Copyright (C) 2007 Soft'N'Design.org
 * http://www.softndesign.org/
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

/* Read a raw XML string (one level only) and return an array of data */
function importxml($data, $base = false) {
  
  /* Create XML parser */
  $xml_parser = xml_parser_create();
  xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, 0);
  xml_parser_set_option($xml_parser, XML_OPTION_SKIP_WHITE, 1);
  xml_parse_into_struct($xml_parser, $data, $vals, $index);
  xml_parser_free($xml_parser);
  
  $params = array();
  $level = array();
  foreach ($vals as $xml_elem) {
    /* Create key from atribute */
    if ($xml_elem['type'] == 'open') {
      if (array_key_exists('attributes',$xml_elem)) {
        list($level[$xml_elem['level']],$extra) =
          array_values($xml_elem['attributes']);
      } else {
        $level[$xml_elem['level']] = $xml_elem['tag'];
      }
    }
    
    /* Go back to previous level */
    if ($xml_elem['type'] == 'complete') {
      $start_level = 1;
      $php_stmt = '$params';
      while($start_level < $xml_elem['level']) {
        $php_stmt .= '[$level['.$start_level.']]';
        $start_level++;
      }
      $php_stmt .= '[$xml_elem[\'tag\']] = $xml_elem[\'value\'];';
      eval($php_stmt);
    }
  }
  
  /* Remove base from XML tree */
  if ($base)
    return current($params) ? current($params) : array();
  
  return $params;
}

/** Create a CDATA field
 *
 * @param str a data string
 */
function cdata($str) {
  if (preg_match("/[<>&]/", $str))
    return "<![CDATA[$str]]>";
  return $str;
}

/** Create an XML string and return it
 *
 * @param data the array of data
 * @param base the XML structure base (optional)
 */
function exportxml($data, $base = false, $xmlstr = "") {
  
  /* Create header */
  if (!$xmlstr) {
    $xmlstr = "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n";
  }
  
  /* Starting tag */
  if ($base)
    $xmlstr .= "<".$base.">\n";
  
  /* For all key in  array... */
  foreach ($data as $key => $val)
    if (is_array($val))
      $xmlstr = exportxml($val, $key, $xmlstr);
    else
      $xmlstr .= "<".$key.">".cdata($val)."</".$key.">\n";
  
  /* Ending tag*/
  if ($base)
    $xmlstr .= "</".$base.">\n";
  
  return $xmlstr;
}