Tryag File Manager

//home/cluster1/data/bu01/1121861/jlex/php4/field_orderer.php4

class field_orderer {
    var $parser;
    
    var $new_fields;
    var $dialects;
    var $types;

var $data;
    
    var $out;

var $cur_refs;
    
    function fields_orderer() {
	$this->new_fields = array();
	$this->dialects = array();
	$this->types = array();
	$this->xml = "";
	$this->data = "";
    }

function rewrite($field, $value) {
	$new_field = $this->new_fields[$field];
	$dialect = $this->dialects[$field];
	$type = $this->types[$field];
	$s = "\\$new_field $value\n";
	$s .= "\\".$new_field."_t $type \n";
	$s .= "\\".$new_field."_d $dialect\n";
	return $s;
    }

function startHandler($xp,$element,$attribs) {
	$element = strtolower($element);
	if($element == "refgroup") {
	    $this->cur_refs = array();
	}
    }

function cDataHandler($xp,$data) {	
	$data = trim($data);
	if($data != "") {
	    $data = ereg_replace("&amp;","&",$data);
	    $data = ereg_replace("&lt;","<",$data);
	    $data = ereg_replace("&gt;",">",$data);
	    //$data = utf8_encode($data);
	    $this->data .= $data;
	}
    }

function get_reordered_shoebox($xml, $new_shoebox_name, $fields_file) {
	$this->out = fopen($new_shoebox_name,"w");
        $this->get_fields($fields_file);

$this->parser = xml_parser_create();
	xml_set_object($this->parser,$this);
	xml_set_element_handler($this->parser,"startHandler","endHandler");
	xml_set_character_data_handler($this->parser,"cDataHandler");

$in = fopen($xml,"r");
	while($line = fgets($in)) {
	    xml_parse($this->parser,$line,false);
	}
	fclose($this->out);
	fclose($in);
    }	
}

$fo = new field_orderer();
$fo->get_reordered_shoebox("ActiveNahuatl_2005_august_penult.xml","reordered.txt","field conversion.txt");