steps to share info between sites

1 files changed, 310 insertions, 331 deletions

diff --git a/src/fextdata.php b/src/fextdata.php
index 1b19f03..3db5a3b 100644
--- a/src/fextdata.php
+++ b/src/fextdata.php
@@ -15,7 +15,7 @@
 //    You should have received a copy of the GNU General Public License
 //    along with this program.  If not, see <http://www.gnu.org/licenses/>.
 ////////////////////////////////////////////////////////////////////////////////
-// Last modified 07/nov/2016 by cassio@ime.usp.br
+// Last modified 25/jul/2017 by cassio@ime.usp.br
 
 function scoretransfer($putname, $localsite) {
 	$ds = DIRECTORY_SEPARATOR;
@@ -45,7 +45,7 @@ $superlfile = $privatedir . $ds . "score_localsite_" . $localsite . "_x.dat";
    if($contest != '' && ($ct = DBContestInfo($contest)) != null) {
      if(trim($ct['contestmainsiteurl']) != '') {
        $tmp = explode(' ',$ct['contestmainsiteurl']);
-       if(count($tmp) == 3) {
+       if(count($tmp) >= 3) {
           $remotesite[count($remotesite)] = $ct['contestmainsiteurl'];
        }
      }
@@ -67,7 +67,7 @@ $superlfile = $privatedir . $ds . "score_localsite_" . $localsite . "_x.dat";
 //		LOGError("sess=$sess pass=" . trim($sitedata[2]) . " hash=" .  myhash(trim($sitedata[2])));
 		$user = trim($sitedata[1]);
 		$res = myhash( myhash (trim($sitedata[2])) . $sess);
-//		LOGError("url=" . $siteurl . $urldiv . "index.php?name=${user}&password=${res}&action=scoretransfer");
+//		LOGError("url=" . $siteurl . $urldiv . "index.php?name=${user}&password=${res}&action=transfer");
 		$opts = array(
 			'http' => array(
 				'method' => 'GET',
@@ -83,9 +83,9 @@ $superlfile = $privatedir . $ds . "score_localsite_" . $localsite . "_x.dat";
 		$context = stream_context_create($opts);
 
 
-		$ok = @file_get_contents($siteurl . $urldiv . "index.php?name=${user}&password=${res}&action=scoretransfer", 0, $context);
+		$ok = @file_get_contents($siteurl . $urldiv . "index.php?name=${user}&password=${res}&action=transfer", 0, $context);
 //		LOGError("ok=" . $ok);
-		if(substr($ok,strlen($ok)-strlen('SCORETRANSFER OK'),strlen('SCORETRANSFER OK')) == 'SCORETRANSFER OK') {
+		if(substr($ok,strlen($ok)-strlen('TRANSFER OK'),strlen('TRANSFER OK')) == 'TRANSFER OK') {
 			$res = @file_get_contents($siteurl . $urldiv . "scoretable.php?remote=-42", 0, $context);
 			@file_put_contents($privatedir . $ds . 'remotescores' . $ds . 'tmp.zip', $res);
 			if(is_readable($privatedir . $ds . 'remotescores' . $ds . 'tmp.zip')) {
@@ -173,349 +173,327 @@ $superlfile = $privatedir . $ds . "score_localsite_" . $localsite . "_x.dat";
 }
 
 
-function getMainXML($username,$sess,$pass,$pass2) {
-	$c = DBConnect();
-    if ($c==null) return array(false,"");
-	$contest = $_SESSION["usertable"]["contestnumber"];
-	$r = DBExec($c, "select * from contesttable where contestnumber=$contest");
-	if (DBnLines($r)==0) {
-		echo "Unable to find the contest $contest in the database.\n";
-		exit;
-	}
-	$ct = DBRow($r,0);
-	$localsite = $ct["contestlocalsite"];
-	$mainsite = $ct["contestmainsite"];
-	$siteurl = $ct['contestmainsiteurl'] . '/site/get.php';
-//	if ($mainsite==$localsite) return array(true,"");
-/*
-	$r = DBExec($c, "select * from sitetable where sitenumber=".$mainsite." and contestnumber=$contest");
-	if (DBnLines($r)==0) {
-		echo "Unable to find the main site in the database (site=$mainsite, contest=$contest).\n";
-		exit;
-	}
-	$st = DBRow($r,0);
-	$siteurl =  $st["siteip"] . '/site/get.php';
-*/
-	if(substr($siteurl,0,7) != 'http://')
-		$siteurl = 'http://' . $siteurl;
-	if($sess == '') {
-//		MSGError('session empty');
-		$s = file_get_contents($siteurl);
-		if($s === false) return array(false,'','');
-//		MSGError($s);
-		$t = strtok($s," \t");
-		while($t !== false && substr($t,0,8) != '<SESSION' && substr($t,0,6) != '<ERROR' && $t != '<OK>' && $t != '<NOTOK>') {
-			echo $t . " ";
-			$t = strtok(" \t");
-		}
-		if($t === false) return array(false,'','');
-		echo $t . " -->\n";
-		if(substr($t,0,8) == '<SESSION') {
-			$id = strtok(" \t");
-			return array(false,$id,$id);
-		}
-		else
-			return array(false,'','');
-	}
-	if($pass == $pass2) {
-//		MSGError('equal');
-		$opts = array(
-			'http' => array(
+function getMainXML() {
+  $ds = DIRECTORY_SEPARATOR;
+  if($ds=="") $ds = "/";
+  
+  if(is_readable('/etc/boca.conf')) {
+    $pif=parse_ini_file('/etc/boca.conf');
+    $bocaproxy = @trim($pif['proxy']);
+    if($bocaproxy != "" && substr($bocaproxy,0,6) != 'tcp://')
+      $bocaproxy = 'tcp://' . $bocaproxy;
+    $bocaproxylogin = @trim($pif['proxylogin']);
+    $bocaproxypass = @trim($pif['proxypassword']);
+    if($bocaproxylogin != "")
+      $bocaproxypass = base64_encode($bocaproxylogin . ":" . $bocaproxypass);
+  } else {
+    $bocaproxy = "";
+    $bocaproxypass = "";
+  }
+  
+  $privatedir = $_SESSION['locr'] . $ds . "private";
+  
+  $c = DBConnect();
+  if ($c==null) return false;
+  $contest = $_SESSION["usertable"]["contestnumber"];
+  $r = DBExec($c, "select * from contesttable where contestnumber=$contest");
+  if (DBnLines($r)==0) {
+    echo "Unable to find the contest $contest in the database.\n";
+    exit;
+  }
+  $ct = DBRow($r,0);
+  $localsite = $ct["contestlocalsite"];
+  $mainsite = $ct["contestmainsite"];
+  
+  if(trim($ct['contestmainsiteurl']) == '') {
+    return false;
+  }
+  $sitedata = explode(' ',$ct['contestmainsiteurl']);
+  if(count($sitedata) < 3) {
+    return false;
+  }
+  if(count($sitedata) == 3) {
+    $updatetime=0;
+  } else
+    $updatetime=trim($sitedata[3]);
+  $ti = time();
+
+  $siteurl = $sitedata[0];
+  if(strpos($siteurl,'#') !== false) continue;
+  LOGError("getMainXML: found site $siteurl");
+  if(substr($siteurl,0,7) != 'http://')
+    $siteurl = 'http://' . $siteurl;
+  $urldiv='/';
+  if(substr($siteurl,strlen($siteurl)-1,1) == '/')
+    $urldiv = '';
+  //		LOGError("url=" .$siteurl . $urldiv . "index.php?getsessionid=1");
+  $sess = @file_get_contents($siteurl . $urldiv . "index.php?getsessionid=1");
+  //		LOGError("sess=$sess pass=" . trim($sitedata[2]) . " hash=" .  myhash(trim($sitedata[2])));
+  $user = trim($sitedata[1]);
+  $res = myhash( myhash (trim($sitedata[2])) . $sess);
+  $opts = array(
+		'http' => array(
 				'method' => 'GET',
+				'request_fulluri' => true, 
 				'header' => 'Cookie: PHPSESSID=' . $sess
 				)
-			);
-		$context = stream_context_create($opts);
-		$s = file_get_contents($siteurl . '?name='. $username . '&password=' . 
-							   $pass . '&check=nocheck', 0, $context);
+		);
+  if($bocaproxy != "")
+    $opts['http']['proxy'] = $bocaproxy;
+  if($bocaproxypass != "")
+    $opts['http']['header'] .= "\r\nProxy-Authorization: Basic " . $bocaproxypass;
+  
+  $context = stream_context_create($opts);
+  $ok = @file_get_contents($siteurl . $urldiv . "index.php?name=${user}&password=${res}&action=transfer", 0, $context);
+  //		LOGError("ok=" . $ok);
+  if(substr($ok,strlen($ok)-strlen('TRANSFER OK'),strlen('TRANSFER OK')) == 'TRANSFER OK') {
+
+    $data = generateSiteXML($contest, $localsite, $updatetime-30);
+    
+    $data_url = http_build_query(array('xml' => $data, 'updatetime' => ($updatetime-30)
+				       ));
+    
+    $opts = array(
+		  'http' => array(
+				  'method' => 'POST',
+				  'request_fulluri' => true,
+				  'header' => 'Cookie: PHPSESSID=' . $sess . "\r\nContent-Type: application/x-www-form-urlencoded",
+				  'content' => $data_url
+				  )
+		  );
+    if($bocaproxy != "")
+      $opts['http']['proxy'] = $bocaproxy;
+    if($bocaproxypass != "")
+      $opts['http']['header'] .= "\r\nProxy-Authorization: Basic " . $bocaproxypass;
+
+    $context = stream_context_create($opts);
+    $s = @file_get_contents($siteurl . $urldiv . "site/getsite.php", 0, $context);
+    if(strpos($s,'<OK>') !== false)
+      LOGError("xmltransfer: OK");
+    else
+      LOGError("xmltransfer: failed (" . $s . ")");
+  } else {
+    LOGError("xmltransfer: failed (" . $ok . ")");
+  }
+    
+  $s = decryptData($s,myhash (trim($sitedata[2])));
+  if(strtoupper(substr($s,0,5)) != "<XML>") {
+    return false;
+  }
+  importFromXML($s, $contest, $localsite);
+  $str = $sitedata[0] . ' ' . $sitedata[1] . ' ' . $sitedata[2] . ' ' . $ti;
+  $param = array('contestnumber' => $contest, 'mainsiteurl' => $str, 'updatetime' => $ct['updatetime']);
+  DBUpdateContest ($param, $c);
+  return true;
+}
+
+function importFromXML($ar,$contest,$site) {
+  $data = implode("",explode("\n",$ar));
+  $parser = xml_parser_create();
+  xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, 1);
+  xml_parser_set_option($parser, XML_OPTION_SKIP_WHITE, 1);
+  xml_parse_into_struct($parser, $data, $values, $tags);
+  xml_parser_free($parser);
+//	print_r($tags);
+//	print_r($values);
+  $conn = DBConnect();
+  if ($conn==null) return false;
+  DBExec($conn,"begin work","importFromXML(begin)");
+//	DBExec($conn,"lock","importFromXML(lock)");
+  $r = DBExec($conn, "select * from contesttable where contestnumber=$contest");
+  if (DBnLines($r)==0) {
+    echo "Unable to find the contest $contest in the database.\n";
+    //    DBExec($conn,"rollback work");
+    return false;
+  }
+  $ct = DBRow($r,0);
+
+  DBClose($conn); 
+  $conn=null;
+
+  $tables = array('contesttable','answertable','langtable','problemtable','sitetable','usertable','clartable','runtable','tasktable');
+
+  foreach($tables as $table) {
+    foreach($tags as $key=>$val) {
+      if($values[$val[0]]['type'] != 'open') continue;
+      if($key == "XML") continue;
+      if($key != $table) continue;
+
+      foreach($val as $k=>$v) {
+	if($values[$v]['type'] != 'open') continue;
+	if(count($val) > $k+1) {
+	  $param = array();
+	  for($i=$v; $i < $val[$k+1]; $i++) {
+	    $p  = strtolower($values[$i]["tag"]);
+	    if($values[$i]["type"]=="complete" && isset($values[$i]["value"])) {
+	      $tmp = sanitizeText(trim(implode('',explode('\n',$values[$i]["value"]))));
+	      $param[$p] = $tmp;
+	    }
+	  }
+	}
+      }
+      //		  echo "\nKEY KEY KEY\n";
+      //		  print_r($key);
+      //		  echo "\nVAL VAL VAL\n";
+      //		  print_r($val);
+      //		  echo "\n";
+      //				print_r($param);
+      $param['contestnumber'] = $contest;
+      if(count($param) < 2) continue;
+      unset($param['number']);
+
+      if($key == "answertable") {
+	if(($ret=DBNewAnswer ($contest, $param, $conn))) {
+	  if($ret==2) {
+	    echo "Answer " . $param["answernumber"] . " updated<br>";
+	  }
+	}
+	else {
+	  if($conn != null)
+	    DBExec($conn,"rollback work");
+	  return false;
+	}
+      }
+      if($key == "langtable") {
+	if(($ret=DBNewLanguage ($contest,$param, $conn))) {
+	  if($ret==2) {
+	    echo "Language " . $param['langnumber'] ." updated<br>";
+	  }
+	}
+	else {
+	  if($conn != null)
+	    DBExec($conn,"rollback work");
+	  return false;
+	}
+      }
+      if($key == "problemtable") {
+	if(($ret=DBNewProblem ($contest,$param, $conn))) {
+	  if($ret==2)
+	    echo "Problem " . $param['problemnumber'] ." updated<br>";
+	}
+	else {
+	  if($conn != null)
+	    DBExec($conn,"rollback work");
+	  return false;
+	}
+      }
+      
+      if(!isset($param['sitenumber']) || $param['sitenumber'] != $site) continue;
+      
+      if($key == "sitetable") {
+	if(!DBNewSite($contest, $conn, $param)) {
+	  if($conn != null)
+	    DBExec($conn,"rollback work");
+	  return false;
+	}			
+	if(($ret=DBUpdateSite($param, $conn))) {
+	  if($ret==2) {
+	    echo "Site " . $param["sitenumber"] . " updated<br>";
+	  }
 	} else {
-		$data = encryptData(generateXML($contest),myhash($pass2));
-		$data_url = http_build_query(array('xml' => $data,
-										   'name' => $username,
-										   'password' => $pass,
-										   'check' => myhash($pass . $pass2)
-										 ));
-		$opts = array(
-			'http' => array(
-				'method' => 'POST',
-				'header' => 'Cookie: PHPSESSID=' . $sess . "\r\nContent-Type: application/x-www-form-urlencoded",
-				'content' => $data_url
-				));
-		$context = stream_context_create($opts);
-		$s = file_get_contents($siteurl, 0, $context);
+	  if($conn != null)
+	    DBExec($conn,"rollback work");
+	  return false;
+	}
+      }
+      if($key == "usertable") {
+	if(($ret=DBNewUser($param, $conn))) {
+	  if($ret==2) {
+	    echo "User " . $param["usernumber"]."/".$param['sitenumber']. " updated<br>";
+	  }
+	} else {
+	  if($conn != null)
+	    DBExec($conn,"rollback work");
+	  return false;
+	}
+      }
+      if($key == "tasktable") {
+	if(($ret=DBNewTask ($param, $conn))) {
+	  if($ret==2)
+	    echo "Task " . $param['tasknumber']."/".$param['sitenumber']." updated<br>";
+	}
+	else {
+	  if($conn != null)
+	    DBExec($conn,"rollback work");
+	  return false;
 	}
-	if($s === false) return array(false,"",'');
-//		MSGError('OPA1: ' . $s);
-	$t = strtok($s," \t");
-	while($t !== false && substr($t,0,8) != '<SESSION' && substr($t,0,6) != '<ERROR' && $t != '<OK>' && $t != '<NOTOK>') {
-		echo $t . " ";
-		$t = strtok(" \t");
+      }
+      if($key == "clartable") {
+	if(($ret=DBNewClar ($param, $conn))) {
+	  if($ret==2)
+	    echo "Clarification " . $param['clarnumber']."/".$param['sitenumber'] ." updated<br>";
 	}
-	if($t === false) return array(false,'','');
-	echo $t . " -->\n";
-	if(substr($t,0,6) == "<ERROR") {
-		$id = strtok(" \t");
-		if($id === false) return array(false,'','');
-		return array(false,$id,"");
+	else {
+	  if($conn != null)
+	    DBExec($conn,"rollback work");
+	  return false;
 	}
-	if(substr($t,0,8) == "<SESSION") {
-		$id = strtok(" \t");
-		if($id === false) return array(false,'','');
-		$idextra = strtok(" \t");
-		if($idextra === false) return array(false,'','');
-//		MSGError("id=$id  idextra=$idextra");
-		return array(false,$id,$idextra);
+      }
+      if($key == "runtable") {
+	if(($ret=DBNewRun ($param, $conn))) {
+	  if($ret==2)
+	    echo "Run " . $param['runnumber'] ."/".$param['sitenumber']." updated<br>";
 	}
-	$id = strtok(" \t");
-	if($id === false) return array(false,'','');
-//MSGError('OPA2: ' . $s);
-	if($pass2 != '')
-		$s = decryptData($id,myhash($pass2));
-	if(strtoupper(substr($s,0,5)) != "<XML>") {
-		return array(false,'',$t);
+	else {
+	  if($conn != null)
+	    DBExec($conn,"rollback work");
+	  return false;
 	}
-	return array(true,$s,$t);
+      }
+    }
+  }
+  //	DBExec($conn,"commit work","importFromXML(commit)");
+  return true;
 }
 
-function importFromXML($ar,$acr,$contest=0,$localsite=0) {
-	$data = implode("",explode("\n",$ar));
-	$parser = xml_parser_create();
-	xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, 1);
-	xml_parser_set_option($parser, XML_OPTION_SKIP_WHITE, 1);
-	xml_parse_into_struct($parser, $data, $values, $tags);
-	xml_parser_free($parser);
-//	print_r($tags);
-//	print_r($values);
+function genSQLs() {
+  $sql = array();
+  $sql['contesttable']="select * from contesttable where contestnumber=$contest and updatetime >= $updatetime";
+  $sql['sitetable']="select * from sitetable where contestnumber=$contest and sitenumber=$site and updatetime >= $updatetime";
+  $sql['answertable']="select * from answertable where contestnumber=$contest and fake='f' and updatetime >= $updatetime";
+  $sql['langtable']="select * from langtable where contestnumber=$contest and updatetime >= $updatetime";
+  $sql['problemtable']="select * from problemtable where contestnumber=$contest and fake='f' and updatetime >= $updatetime";
+  //  $sql['sitetimetable']="select * from sitetimetable where contestnumber=$contest and sitenumber=$site and updatetime >= $updatetime";
+  $sql['usertable']="select * from usertable where contestnumber=$contest and sitenumber=$site and updatetime >= $updatetime";
+  $sql['clartable']="select * from clartable where contestnumber=$contest and sitenumber=$site and updatetime >= $updatetime";
+  $sql['runtable']="select * from runtable where contestnumber=$contest and sitenumber=$site and updatetime >= $updatetime";
+  $sql['tasktable']="select * from tasktable where contestnumber=$contest and sitenumber=$site and updatetime >= $updatetime";
+  return $sql;
+}
 
-	$orderkeys=array('CONTESTREC','SITETIME','SITEREC','USERREC','ANSWERREC','LANGUAGEREC','PROBLEMREC','CLARREC','RUNREC','TASKREC');
-	$norderkeys=10;
-	$nc=0;
-	unset($sitetime);
-	unset($nsitetime);
-	$conn = DBConnect();
-    if ($conn==null) return false;
-//	DBExec($conn,"begin work","importFromXML(begin)");
-//	DBExec($conn,"lock","importFromXML(lock)");
-	if($contest != 0) {
-		$r = DBExec($conn, "select * from contesttable where contestnumber=$contest");
-		if (DBnLines($r)==0) {
-			echo "Unable to find the contest $contest in the database.\n";
-			DBExec($conn,"rollback work");
-			return false;
-		}
-		$ct = DBRow($r,0);
-		if($localsite==0)
-			$localsite = $ct["contestlocalsite"];
-	} else if($localsite==0) $localsite=1;
-//	$mainsite = $ct["contestmainsite"];
-	DBClose($conn); 
-	$conn=null;
-
-	for($keyindex=0; $keyindex < $norderkeys; $keyindex++) {
- 	  foreach($tags as $key=>$val) {
-		if($values[$val[0]]['type'] != 'open') continue;
-		if($key == "XML") continue;
-		if($key != $orderkeys[$keyindex]) continue;
-		if(isset($acr[$key]))
-			$ac = $acr[$key];
-		else
-			continue;
-		foreach($val as $k=>$v) {
-			if($values[$v]['type'] != 'open') continue;
-			if(count($val) > $k+1) {
-				$param = array();
-				if(isset($ac['site'])) {			
-					for($i=$v; $i < $val[$k+1]; $i++) {
-						$p  = strtolower($values[$i]["tag"]);
-						if($p=='site') {
-							if($values[$i]["type"]=="complete" && isset($values[$i]["value"])) {
-								$tmp = sanitizeText(trim(implode('',explode('\n',$values[$i]["value"]))));
-								if(is_array($ac['site']) && in_array($tmp,$ac['site'])) {									
-									$param['site'] = $tmp;
-								} else {
-									if($ac['site']==-1 || ($ac['site']==-2 && $tmp==$localsite) || ($ac['site']==-3 && $tmp!=$localsite) ||
-									   ($ac['site']>0 && $ac['site']==$tmp))
-										$param['site'] = $tmp;
-								}							
-							}
-						}
-					}
-				}
-				for($i=$v; $i < $val[$k+1]; $i++) {
-					$p  = strtolower($values[$i]["tag"]);
-					if(isset($ac[$p]) && $p != 'site') {
-						if($values[$i]["type"]=="complete" && isset($values[$i]["value"])) {
-							if(is_string($ac[$p])) $param[$p] = $ac[$p];
-							else {
-								$tmp = sanitizeText(trim(implode('',explode('\n',$values[$i]["value"]))));
-								if(is_array($ac[$p]) && in_array($tmp,$ac[$p])) {									
-									$param[$p] = $tmp;
-								} else {
-									if($ac[$p]==-1 || ($ac[$p]==-2 && $tmp==$localsite) || ($ac[$p]==-3 && $tmp!=$localsite) ||
-									   ($ac[$p]==0 && isset($param['site'])) || ($ac[$p]>0 && $ac[$p]==$tmp))
-										$param[$p] = $tmp;
-								}
-							}
-						}
-					}
-				}
-//		  echo "\nKEY KEY KEY\n";
-//		  print_r($key);
-//		  echo "\nVAL VAL VAL\n";
-//		  print_r($val);
-//		  echo "\n";
-//				print_r($param);
-				$param['contestnumber'] = $contest;
-				if($key == "CONTESTREC") {
-					$param['number'] = $contest;
-					if($contest == 0) {
-						$nc=1;
-						$contest = DBNewContest($param, $conn);
-						if($contest > 0)
-							echo "<br><u>Contest $contest created</u> (not active by default)<br>";
-						else {
-							echo "<br>Error creating contest<br>";
-							if($conn != null)
-								DBExec($conn,"rollback work");
-							return false;
-						}
-					}
-					$param['number'] = $contest;
-					$param['contestnumber'] = $contest;
-					if(($ret=DBUpdateContest($param, $conn))) {
-						if($ret==2)
-							echo "<br>Contest $contest updated<br>";
-					}
-					else {
-						if($conn != null)
-							DBExec($conn,"rollback work");
-						return false;
-					}
-				}
-				if(!isset($param['number']) || count($param) < 2) continue;
-				if($key == "SITEREC") {
-					if(!DBNewSite($contest, $conn, $param)) {
-						if($conn != null)
-							DBExec($conn,"rollback work");
-						return false;
-					}			
-					if(($ret=DBUpdateSite($param, $conn))) {
-						if($ret==2) {
-							echo "Site " . $param["number"] . " updated<br>";
-						}
-					} else {
-						if($conn != null)
-							DBExec($conn,"rollback work");
-						return false;
-					}
-					if(isset($nsitetime[$param["number"]])) {
-						if(($qtd=DBRenewSiteTime($sitetime[$param["number"]], $conn))) {
-							if($qtd==2) {
-								echo "Time for site " . $param["number"] . " updated<br>";
-							}
-						} else {
-							if($conn != null)
-								DBExec($conn,"rollback work");
-							return false;
-						}
-					}
-				}
-				if($key == "SITETIME") {
-					if(isset($param['site']) && is_numeric($param['site'])) {
-						$s = $param['site'];
-						if(!isset($nsitetime[$s])) $nsitetime[$s]=0;
-						$sitetime[$s][$nsitetime[$s]] = $param;
-						$nsitetime[$s]++;
-					}
-				}
-				if($key == "USERREC") {
-					if(($ret=DBNewUser($param, $conn))) {
-						if($ret==2) {
-							echo "User " . $param["number"]."/".$param['site']. " updated<br>";
-						}
-					} else {
-						if($conn != null)
-							DBExec($conn,"rollback work");
-						return false;
-					}
-				}
-				if($key == "ANSWERREC") {
-					if(($ret=DBNewAnswer ($contest, $param, $conn))) {
-						if($ret==2) {
-							echo "Answer " . $param["number"] . " updated<br>";
-						}
-					}
-					else {
-						if($conn != null)
-							DBExec($conn,"rollback work");
-						return false;
-					}
-				}
-				if($key == "LANGUAGEREC") {
-					if(($ret=DBNewLanguage ($contest,$param, $conn))) {
-						if($ret==2) {
-							echo "Language " . $param['number'] ." updated<br>";
-						}
-					}
-					else {
-						if($conn != null)
-							DBExec($conn,"rollback work");
-						return false;
-					}
-				}
-				if($key == "PROBLEMREC") {
-					if(($ret=DBNewProblem ($contest,$param, $conn))) {
-						if($ret==2)
-							echo "Problem " . $param['number'] ." updated<br>";
-					}
-					else {
-						if($conn != null)
-							DBExec($conn,"rollback work");
-						return false;
-					}
-				}
-				if($key == "TASKREC") {
-					if(($ret=DBNewTask ($param, $conn))) {
-						if($ret==2)
-							echo "Task " . $param['number']."/".$param['site']." updated<br>";
-					}
-					else {
-						if($conn != null)
-							DBExec($conn,"rollback work");
-						return false;
-					}
-				}
-				if($key == "CLARREC") {
-					if(($ret=DBNewClar ($param, $conn))) {
-						if($ret==2)
-							echo "Clarification " . $param['number']."/".$param['site'] ." updated<br>";
-					}
-					else {
-						if($conn != null)
-							DBExec($conn,"rollback work");
-						return false;
-					}
-				}
-				if($key == "RUNREC") {
-					if(($ret=DBNewRun ($param, $conn))) {
-						if($ret==2)
-							echo "Run " . $param['number'] ."/".$param['site']." updated<br>";
-					}
-					else {
-						if($conn != null)
-							DBExec($conn,"rollback work");
-						return false;
-					}
-				}
-			}
+function generateSiteXML($contest,$site,$updatetime) {
+  $sql = genSQL();
+  $c = DBConnect();
+  if ($c==null) return null;
+  DBExec($c, "begin work");
+  foreach($sql as $kk => $vv) {
+	  $meta = pg_meta_data($c, $kk);
+	  if (!is_array($meta)) return null;
+	  $r = DBExec ($c, $vv, "generateSiteXML($kk)");
+	  $n = DBnLines ($r);
+	  for($i=0; $i<$n; $i++) {
+	    $atual = DBRow($r,$i);
+	    $str .= "<" . $kk . ">\n";
+	    foreach($atual as $key => $val) {
+	      if($meta[$key]['type'] == 'oid') {
+		if (($lo = DB_lo_open ($c, $val, "r")) !== false) {
+		  $str .= "  <" . $key . ">base64:" . base64_encode(DB_lo_read($contest,$lo)) . "</" . $key . ">\n";
+		  DB_lo_close($lo);
 		}
+	      } else {
+		$str .= "  <" . $key . ">" . $val . "</" . $key . ">\n";
+
+	      }
+	      $str .= "</" . $kk . ">\n";
+	    }
 	  }
 	}
-//	DBExec($conn,"commit work","importFromXML(commit)");
-	return true;
+	$str .= "</XML>\n";
+	DBExec($c,"commit work","generateXML(commit)");
+	return $str;
 }
 
-
+/*
 function generateXML($contest,$localsite=0,$sites=null,$reduced=false) {
 	$str = "<XML>\n";
 	$ac['CONTESTREC']=array('number'=>'contestnumber', 
@@ -733,4 +711,5 @@ function generateXML($contest,$localsite=0,$sites=null,$reduced=false) {
 	DBExec($c,"commit work","generateXML(commit)");
 	return $str;
 }
+*/
 ?>