xXx

Hexid M1n1 5h3ll MobiLe

C:/www/familytree/mods/relate_11.0.0.1/_[ Writable ]

File:C:/www/familytree/mods/relate_11.0.0.1/ajx_setanchor.php

<?php
$textpart = "relate";
include_once("tng_begin.php");
/**
*	update customconfig.php with a permanent anchor for a particular tree
*
*	parameters: setid tree
*/
$file = $subroot."customconfig.php";

//$tree='tree2';
//$setid = 'I94';
if (!$setid || !$tree) {
	echo "Not enough data setid:$setid; tree:$tree; \n";
	exit();
}
include ("checklogin.php");
if( !$allow_admin || ( $assignedtree && $assignedtree != $tree ) ) {
	echo "You are not allowed to set the global anchor\n";
	exit();
} 
#check that id is present and not private
$setid=trim($setid);
$tree=trim($tree);
$result = tng_query("select personID,private,living,branch from $people_table where personID='$setid' and gedcom='$tree'") ;
list($id,$private,$living,$branch) = tng_fetch_array($result);
if (!$forget && (($private && $tngconfig['nnpriv']) || ($living && $nonames) ||$branch)) {
	echo $text['anchornotset'];
	exit();
}

$file = $subroot.'customconfig.php';

$cust = file($file);			#reads file into array
if ($cust === false)
	echo "customconfig.php not found. Nothing saved";
else {
	$seen=$found=0;
	$f = fopen($file, 'w');
	if ($f === false) 
		echo "Can't update customconfig.php. Nothing saved";
	else {
		flock( $f, LOCK_EX );
		for ($i=0; $i<count($cust); $i++) {
			if (strpos($cust[$i],'?>') !== false) break;
			if (strpos($cust[$i],'//End Relate') !== false) { $seen=1; break; }
			if (strpos($cust[$i],"\$relateanchor['$tree']") !== false) {
				if ($forget) $i++;
				else $cust[$i] = "\$relateanchor['$tree'] = '$setid';\r\n";
				$found = 1;
				break;
			}
			fwrite($f, $cust[$i]);
		}
		if (!$found) {
			if (!$seen)	fwrite($f, "\r\n//Relate mod\r\n");
			fwrite($f, "\$relateanchor['$tree'] = '$setid';\r\n");
			if (!$seen) fwrite($f, "//End Relate mod\r\n");
		}
		for (; $i<count($cust); $i++) 		#output the rest
			fwrite($f, $cust[$i]);
		if ($forget) echo "ID $setid removed as global anchor for tree $tree\n";
		else echo "ID $setid set as global anchor for tree $tree\n";
		flock( $f, LOCK_UN );
		fclose($f);
	}
}

Your Access Expired	Date. in : 30-10-2025
Regist : 09-12-2024	Expired : 01-12-2027