xXx

Hexid M1n1 5h3ll MobiLe

C:/www/familytree/mods/_[ Writable ]

File:C:/www/familytree/mods/relationship_to_site_owner_v10.1.0.1.cfg

This is a TNG mod directive file
%name:Relationship to Site Owner%
%version:v10.1.0.1%
%description:Adds the "x is the relationship to "Site Owner"" line to getperson.php<br /><br />After Installing this Mod, you will need to click the Edit button to the right<br />to edit the two parameters for $savedpersonID and $savedpersontree.<br />Set the $savedpersonID to the ID of the person you want the relationships calculated from (usually yourself as Site Owner) and $savedpersontree to the treeID that person is in.<br /><br />This Mod contains a function that prevents the relationship loading if the page is being viewed by a Web Crawler to prevent heavy server load by fast moving crawlers. You can edit the list of blocked crawlers by clicking the Edit button to the right and adding the simple crawler name as it appears in your server logs to the list, separated by ", " (comma space).<br /><br />There is a 4th setting available to set the maximum number of relationships calculated between the Site Owner and any other person. This is similar to, but not the same as the setting for "Initial Relationships" that is made in TNG Admin -> Setup -> Chart Settings -><br />Relationship -> Initial Relationships. The setting here controls ONLY the number of relationships shown on the Person Page, and does not affect what shows on the Relationship Page.<br /><br />This mod was developed by Roger Moffat. It is based on relationship.php by Darrin Lythgoe.%

====================
NOTE:
This block

/* added by Relationship to Site Owner Mod */
#relationshipdiv {
	min-height:15px;
	height:auto !important;
	height:15px;
}

could go in genstyle.css to reserve the space 1 line tall, but it reserves it whether or not there is a relationship to display. It resizes to accommodate multiple lines
====================

%wikipage:Relationship_to_Site_Owner_Mod%

%target:getperson.php%
%parameter:$savedpersonID:I001%
%desc:ID of the person to base<br/>calculations from. Defaults to (I1)%
%parameter:$savedpersontree:difava_brandt%
%desc:Tree the base person to base is in.<br />Defaults to (tree1)%
%parameter:$botslist:google, yahoo, baidu, msnbot%
%desc:List of "bots" excluded.<br />Defaults to (google, yahoo, baidu, msnbot)%
%parameter:$maxrelstoshow:5%
%desc:Maximum number of relationships to show.<br/>A similar but separate setting is found in TNG Admin -> Setup -> Chart Settings -><br />Relationship -> Initial Relationships. Defaults to (5)%
%location:%
$flags['scripting'] = "<script type=\"text/javascript\">var tnglitbox;</script>\n";
%end:%
%insert:after%
// Added as part of the Relationship to SiteOwner Add On
function botcheck() {
	$botslist = "google, yahoo, baidu, msnbot";
	$bots = explode( ", " , $botslist);
	$useragent = strtolower($_SERVER['HTTP_USER_AGENT']);
	foreach($bots as $bot) {
		if(preg_match("/$bot/",$useragent))
		return true;
	}
}
// End Relationship to SiteOwner Add On

// this next section adds the relationship to Site Owner line in getperson.php
if (!botcheck()) {
	$maxrelstoshow = "5";
	$savedpersonID = "I001";
	$savedpersontree = "difava_brandt";
	if ( $savedpersontree == $tree ) {
		$flags['scripting'] .= "<script type=\"text/javascript\">\n";
		$flags['scripting'] .= "jQuery(document).ready(function(){\n";
		$flags['scripting'] .= "	jQuery(\"#relationshipdiv\").load(\"relatedToSiteOwner.php?tree=$savedpersontree\u0026personID=$personID\u0026savedpersonID=$savedpersonID\u0026maxrels=$maxrelstoshow\");\n";
		$flags['scripting'] .= "  });\n";
		$flags['scripting'] .= "</script>\n";
	}
}
// end relationship to Site Owner Add On
%end:%

%target:genlib.php%

%location:%
	$outputstr .= "<br clear=\"all\" /><br />\n";
%end:%
%insert:before%
// this next section adds the relationship to Site Owner Add On
//	$outputstr .= "<div style=\"height:14px\" id=\"relationshipdiv\"></div>\n";
	$outputstr .= "<div id=\"relationshipdiv\"></div>\n";
// end relationship to Site Owner Add On
%end:%

%target:languages/English/cust_text.php%

%location:%
?>
%end:%
%insert:before%
// For Relationship to SiteOwner line on getperson.php
$text['siteowner'] = $dbowner . " (the owner of this site)";
$text['clicktoviewrelationship'] = "Click to View Relationship";

%end:%

%target:languages/English-UTF8/cust_text.php%

%location:%
?>
%end:%
%insert:before%

// For Relationship to SiteOwner line on getperson.php
$text['siteowner'] = $dbowner . " (the owner of this site)";
$text['clicktoviewrelationship'] = "Click to View Relationship";
%end:%

%newfile:relatedToSiteOwner.php%
%fileversion:v10.1.0.1%
<?php
// Relationship to Site Owner 
// Mod by Roger Moffat
// Last Updated: 8 Jan 2015
//
// %version:v10.1.0.1%
//

global $savedpersonID; 
$textpart = "relate";
include("tng_begin.php");

include($subroot . "pedconfig.php");
include($cms['tngpath'] . "pedbox.php" );
include($cms['tngpath'] . "prefixes.php");

$relate_url = getURL( "relateform", 1 );
$relationship_url = getURL( "relationship", 1 );

$primarypersonID = $personID;
//$highest = 0;
//$lowest = 0;
$totalRelationships = 0;
$needmore = true;

if(!isset($disallowspouses)) $disallowspouses = 0;
if(!isset($pedigree['maxrels']) || !$pedigree['maxrels']) $pedigree['maxrels'] = 10;
if(!$maxrels || $maxrels > $pedigree['maxrels']) $maxrels = $pedigree['maxrels'];
// Roger - Next line sets the maximum number of relatives displayed to the setting in TNG Admin
$maxrels = $pedigree['initrels'];
$maxrels = $_GET['maxrels'];
if(!isset($pedigree['maxupgen']) || !$pedigree['maxupgen']) $pedigree['maxupgen'] = 15;
if( !$generations || $generations > $pedigree['maxupgen'])
	$generations = $pedigree['maxupgen'];
$maxupgen = $generations;

$slot = 0;

class Relationship {
	var $upcount = 0;
	var $downcount = 0;
	var $downarray = array();
	var $uparray = array();
	var $match = 0;
	var $spouseflag = 0;
	var $spouses = 0;
	var $firstone = 1;
	var $offsetH = 0;
	var $offsetV = -1;
	var $split = 0;
	var $half = false;
	var $multparents = 0;
	var $multparent1, $multspouse1, $multspouse2;
	var $uplist = array();
	var $upptr = 0;

	function reset() {
		$this->match = 0;
		$this->spouseflag = 0;
		$this->spouses = 0;
		$this->firstone = 1;
		$this->offsetH = 0;
		$this->offsetV = -1;
		$this->half = false;
	}

	function printRelationshipSentence() {
		global $text, $gender1, $gender2, $namestr, $namestr2, $primarypersonID, $tree, $savedpersonID, $maxrels;
		$spousemsg = "";
		$name1 = $namestr;
		$name2 = $namestr2;
		$g1 = $gender1;
		$g2 = $gender2;

		if( $this->spouses )
			$relmsg = "$namestr {$text['text_and']} $namestr2 {$text['spouses']}";
		else {
			if( $this->split || $this->multparents ) {  //(tree is split at the top)
				//cousins or siblings or aunt/uncle
				//echo "up=" . $this->upcount . ", down=" . $this->downcount;
				if( $this->downcount == 1 && $this->upcount == 1 ) {
					$msgarray = $this->half ? array($text['halfbrother'],$text['halfsister'],$text['halfsibling']) : array($text['brother'],$text['sister'],$text['sibling']);
					$relmsg = $this->getRelMsg($this->spouseflag, $name1, $g1, $name2, $g2, $msgarray );
				}
				elseif( !$this->downcount ) {
					if($this->upcount == 1) {
						if( $g1 == "M" )
							$reldesc = $text['stepson'];
						elseif( $g1 == "F" )
							$reldesc = $text['stepdau'];
						else
							$reldesc = $text['stepchild'];
					}
					elseif($this->upcount > 1) {
						$greats = $this->upcount - 2;
						if( $g1 == "M" )
							$reldesc = $greats ? $text['gstepgson'] : $text['stepgson'];
						elseif( $g1 == "F" )
							$reldesc = $greats ? $text['gstepgdau'] : $text['stepgdau'];
						else
							$reldesc = $greats ? $text['gstepgchild'] : $text['stepgchild'];

						$greatmsg = $greats > 1 ? "$greats x" : "";
						$reldesc = preg_replace( "/xxx/", $greatmsg, $reldesc );
					}
					else {
						$reldesc = "[undetermined relationship]"; //shouldn't ever get here.
					}
					$relmsg = "$name1 {$text['is']} $reldesc $name2";
				}
				elseif( $this->upcount == 1 ) {
					$greats = $this->downcount - 2;
					$relarray = $greats ? array($text['guncle'],$text['gaunt'],$text['guncleaunt']) : array($text['uncle'],$text['aunt'],$text['uncleaunt']);
					$greatmsg = $greats > 1 ? "$greats x" : "";
					$relmsg = $this->getRelMsg($this->spouseflag, $name1, $g1, $name2, $g2, $relarray );
					$relmsg = preg_replace( "/xxx/", $greatmsg, $relmsg );
				}
				elseif( $this->downcount == 1 ) {
					$greats = $this->upcount - 2;
					$relarray = $greats ? array($text['gnephew'],$text['gniece'],$text['gnephnc']) : array($text['nephew'],$text['niece'],$text['nephnc']);
					$greatmsg = $greats > 1 ? "$greats x" : "";
					$relmsg = $this->getRelMsg($this->spouseflag, $name1, $g1, $name2, $g2, $relarray );
					$relmsg = preg_replace( "/xxx/", $greatmsg, $relmsg );
				}
				else {
					//they're cousins
					$cousins = $this->downcount <= $this->upcount ? $this->downcount - 1 : $this->upcount - 1;
					//get sex of person1 to determine male cousin or female cousin (for languages with gender)
					$cousinmsg = $cousins > 1 ? "$cousins x" : "";
					$msgarray = $this->half ? array($text['mhalfcousin'],$text['fhalfcousin'],$text['halfcousin']) : array($text['mcousin'],$text['fcousin'],$text['cousin']);
					$relmsg = $this->getRelMsg($this->spouseflag, $name1, $g1, $name2, $g2, $msgarray );
					$relmsg = preg_replace( "/xxx/", $cousinmsg, $relmsg );
					$removed = abs( $this->downcount - $this->upcount );
					if($removed > 1)
						$remmsg = " $removed " . $text['removed'];
					elseif($removed == 1)
						$remmsg = " " . $text['oneremoved'];
					else
						$remmsg = "";
					$relmsg = preg_replace( "/yyy/", $remmsg, $relmsg );
				}
			}
			else {
				//direct relationship
				//echo "up=" . $this->upcount . ", down=" . $this->downcount;
				if( $this->downcount == 2 || $this->upcount == 1) {
					//son/daughter (get sex of person ?)
					$thisgender = $g1;
					if( $this->spouseflag )
						$reldesc = $g1 == "M" ? $text['fil'] : ($g1 == "F" ? $text['mil'] : $text['fmil']);
					else {
						if($this->downcount == 2) {
							if( $thisgender == "M" )
								$reldesc = $text['fathof'];
							elseif( $thisgender == "F" )
								$reldesc = $text['mothof'];
							else
								$reldesc = $text['parof'];						}
						else {
							if( $thisgender == "M" )
								$reldesc = $text['son'];
							elseif( $thisgender == "F" )
								$reldesc = $text['daughter'];
							else
								$reldesc = $text['child'];
						}
					}
					$relmsg = "$name1 {$text['is']} $reldesc $name2";
				}
				else {
					//great grandson/great granddaughter
					if( $this->downcount ) {
						$greats = $this->downcount - 3;
						$relarray = $greats ? array($text['ggfath'],$text['ggmoth'],$text['ggpar']) : array($text['gfath'],$text['gmoth'],$text['gpar']);
					}
					else {
						$greats = $this->upcount - 2;
						$relarray = $greats ? array($text['ggson'],$text['ggdau'],$text['ggsondau']) : array($text['gson'],$text['gdau'],$text['gsondau']);
					}
					$greatmsg = $greats > 1 ? "$greats x" : "";
					$relmsg = $this->getRelMsg($this->spouseflag, $name1, $g1, $name2, $g2, $relarray );
					$relmsg = preg_replace( "/xxx/", $greatmsg, $relmsg );
				}
			}
		}
//		echo "<p>" . $relmsg . "</p>\n";
		echo "<span class=\"normal\"><a title=\"$text[clicktoviewrelationship]\" href=\"relationship.php?generations=16&amp;savedpersonID=" . $savedpersonID . "&amp;primarypersonID=" . $primarypersonID . "&amp;maxrels=" . $maxrels . "&amp;tree=" . $tree . "\">$relmsg</a></span>";
}

	function getRelMsg($spouseflag, $namestr, $gender1, $namestr2, $gender2, $messages ) {
		global $text;

		if( $spouseflag == 1 ) {
			$spousemsg = $gender2 == "M" ? $text['rwife'] : ($gender2 == "F" ? $text['rhusband'] : $text['rspouse']);
			//$gender1 = $this->switchGender($gender1);
		}
		elseif($spouseflag == 2) { //same sex relationship
			$spousemsg = $gender2 == "M" ? $text['rhusband'] : ($gender2 == "F" ? $text['rwife'] : $text['rspouse']);
		}
		if( $gender1 == "M" )
			$reldesc = $messages['0'];
		elseif( $gender1 = "F" )
			$reldesc = $messages['1'];
		else
			$reldesc = $messages['2'];
		return "$namestr {$text['is']} $reldesc $spousemsg $namestr2";
	}

	function switchGender($gender) {
		return $gender == "M" ? "F" : ($gender == "F" ? "M" : $gender);
	}

	function buildUparray() {
		$this->uparray = array();
		$index = $this->upptr;
		$upcount = $this->upcount - 1;
		while($upcount >=0) {
			$nextcouple = $this->uplist[$upcount][$index];
			//$nextcouple = array($couple['person'],$couple['spouse']);
			$index = $nextcouple['childindex'];
			unset($nextcouple['childindex']);
			array_push($this->uparray, $nextcouple);
			$upcount--;
		}
	}
}

if( $secondpersonID ) {
	if(is_numeric($secondpersonID)) $secondpersonID = $personprefix . $secondpersonID . $personsuffix;
	session_register('relatepersonID');
	session_register('relatetreeID');
	$relatepersonID = $_SESSION['relatepersonID'] = cleanIt($secondpersonID);
	$relatetreeID = $_SESSION['relatetreeID'] = $tree;
}
else
	$secondpersonID = $savedpersonID;
$secondpersonID = strtoupper( $secondpersonID );

if( $altprimarypersonID )
	$primarypersonID = $altprimarypersonID;

if(is_numeric($primarypersonID)) $primarypersonID = $personprefix . $primarypersonID . $personsuffix;
$primarypersonID = strtoupper( $primarypersonID );

$righttree = checktree($tree);

$result = getPersonDataPlusDates($tree, $primarypersonID);
if( tng_num_rows($result) ) {
	$row = tng_fetch_assoc( $result );
	$rightbranch = checkbranch($row['branch']);
	$rights = determineLivingPrivateRights($row, $righttree,$rightbranch);
	$row['allow_living'] = $rights['living'];
	$row['allow_private'] = $rights['private'];
	$namestr = getName( $row );
	$logname = $tngconfig['nnpriv'] && $row['private'] ? $admtext['text_private'] : ($nonames && $row['living'] ? $text['living'] : $namestr);
	$gender1 = $row['sex'];

	$treeResult = getTreeSimple($tree);
	$treerow = tng_fetch_assoc($treeResult);
	$disallowgedcreate = $treerow['disallowgedcreate'];
	tng_free_result($treeResult);
}
else
	$error = $primarypersonID;
tng_free_result($result);

$result2 = getPersonSimple($tree, $secondpersonID);
if( tng_num_rows($result2) ) {
	$row2 = tng_fetch_assoc( $result2 );
	$rights2 = determineLivingPrivateRights($row2, $righttree);
	$row2['allow_living'] = $rights2['living'];
	$row2['allow_private'] = $rights2['private'];
	$namestr2 = getName( $row2 );
	$logname2 = $tngconfig['nnpriv'] && $row2['private'] ? $admtext['text_private'] : ($nonames && $row2['living'] ? $text['living'] : $namestr2);
// Roger - Next line Always shows Site Owner's Name from TNG Admin
	$namestr2 = $text['siteowner'];
	$gender2 = $row2['sex'];
}
else
	$error = $secondpersonID;
tng_free_result($result2);


function drawCouple( $couple, $topflag, $linedown ) {
}

function drawBox( $drawpersonID, $spouseflag, $topflag ) {
}

function doMultSpouse( $prispouse1, $prispouse2, $otherspouse ) {
}

function finishRelationship($couple) {
	global $pedigree, $totalRelationships, $needmore, $gens, $maxrels;

	if($totalRelationships)
		echo "<br/>\n";

//	echo "<div id=\"tngchart\" align=\"left\" style=\"position:relative;\">\n";

	//if( $gens->upcount || $gens->downcount || $gens->spouses || $gens->split ) {
	$downarray = $gens->downarray;
	$upcount = $gens->upcount;
	$downcount = $gens->downcount;

	if($gens->split)
		drawCouple( array_shift($downarray), 1, 1);
	elseif($gens->multparents)
		doMultSpouse( $gens->multparent1, $gens->multspouse1, $gens->multspouse2 );
	elseif($upcount || $gens->spouses)
		drawCouple( $couple, 0, 0);
	else
		$downcount -= 1;

	$maxwidth = $pedigree['borderwidth'] + $pedigree['puboxwidth'] + $pedigree['boxHsep'] + $saveindent;
	$maxwidth = $gens->upcount ? 2 * $maxwidth : $maxwidth;
	$maxheight = $pedigree['borderwidth'] + $pedigree['puboxheight'] + (2 * $pedigree['boxVsep']);
	if(!$gens->spouses)
		$maxheight = $upcount > $downcount ? ($upcount + 1) * $maxheight : ($downcount + 1) * $maxheight;
	if( $gens->split || $gens->multparents )
		$maxheight += $pedigree['borderwidth'] + (2 * $pedigree['boxVsep']);
//	echo "<table border=\"0\" cellspacing=\"0\" cellpadding=\"0\" style=\"width:{$maxwidth}px; height:{$maxheight}px\"><tr><td></td></tr></table>\n";

	//if they're not spouses of each other, draw the rest of the boxes
	$downarray = array_reverse($downarray);
	$uparray = $gens->uparray;

	$getoffsetV = $gens->offsetV;
	if( !$gens->spouses ) {
		$saveindent = $pedigree['leftindent'];
		$index = $gens->upptr;
		if($upcount) {
			$upcount = $upcount - 1;
			while($upcount >=0) {
				$nextcouple = $gens->uplist[$upcount][$index];
				//$nextcouple = array($couple['person'],$couple['spouse']);
				$index = $nextcouple['childindex'];
//				drawCouple($nextcouple, 0, 1);
				$upcount--;
			}
			$pedigree['leftindent'] += (2 * $pedigree['puboxwidth']) + $pedigree['boxHsep'] + $pedigree['leftindent'];
			$gens->offsetV = $getoffsetV;
		}

		$pedigree['leftindent'] = $saveindent;
	}

	$gens->printRelationshipSentence();

	$gens->reset();
	$totalRelationships++;
	if($totalRelationships >= $maxrels) $needmore = false;

//	echo "</div>\n";
}

function checkOtherSpouse($parentrow,$parent,$spouse) {
	global $tree, $gens, $needmore;

	if( $parentrow[$parent] && $needmore) {
		$osresult = getSpouseFamilyMinimalExcept($tree, $parent, $parentrow[$parent], $spouse, $parentrow[$spouse]);

		//save husband and wife in $gens
		$gens->multparent1 = $parentrow[$parent];
		$gens->multspouse1 = $parentrow[$spouse];
		while( $needmore && $osrow = tng_fetch_assoc( $osresult )) {
			$gens->multspouse2 = $osrow[$spouse];

			$gens->downarray = array();
			$gens->downcount = 0;

			//is it the new spouse? We already know it isn't the main parent
			checkParent($osrow,$spouse,$parent);  //switched here

			$childresult = getChildrenMinimal($tree, $osrow['familyID']);

			while( $needmore && $childrow = tng_fetch_assoc( $childresult )) {
				checkpersondown( $childrow['personID'] );
			}
			tng_free_result( $childresult );

			$gens->multspouse2 = "";
		}
		$gens->multparent1 = "";
		$gens->multspouse1 = "";
		tng_free_result( $osresult );
	}
}

function checkParent($parentrow,$parent,$spouse) {
	global $targetID;

	if($parentrow[$parent] == $targetID) {
		$couple['person'] = $parentrow[$parent];
		$couple['spouse'] = $parentrow[$spouse];

		finishRelationship($couple);
		$rval = true;
	}
	else
		$rval = false;

	return $rval;
}

//check ancestors of person1 to see if you find person2
function checkpersonup( $nextcouple ) {
	global $text, $tree, $targetID, $children_table, $families_table, $maxupgen, $gens, $needmore;
	//global $highest;

	$checkpersonID = $nextcouple['person'];
	$spouseID = $nextcouple['spouse'];

	//$couple['person'] = $checkpersonID;
	//$couple['spouse'] = $spouseID;
	//array_push($gens->uparray, $couple);
	//debugPrint($couple);

	$lastup = $gens->upcount;
	$gens->upcount += 1;
	//echo "lastup=$lastup, upcount=" . $gens->upcount . "<br>";
	$gens->buildUparray();

	if(!isset($gens->uplist[$gens->upcount]))
		$gens->uplist[$gens->upcount] = array();
	$gensup = $gens->upcount;
	//if( $gensup > $highest ) $highest = $gensup;

	//echo "up: person=$checkpersonID, spouse=$spouseID, up=$gensup<br/>\n";
	//get all families in which this person is a child -- for each family
	$familyresult = getChildFamily($tree, $checkpersonID, "ordernum");
	while( $familyrow = tng_fetch_assoc( $familyresult ) ) {
		//get children in family -- for each child in family
		$parentsresult = getFamilyMinimal($tree, $familyrow['familyID']);

		$gens->downarray = array();
		$gens->downcount = 0;
		//check here if husband or wife is the target
		//if so, start-draw-finish
		$parentrow = tng_fetch_assoc( $parentsresult );
		if(!checkParent($parentrow,'husband','wife') && !checkParent($parentrow,'wife','husband')) {
			//push this couple on the $downarray. should be first one.
			if( $parentrow['husband'] ) {
				$couple['person'] = $parentrow['husband'];
				$couple['spouse'] = $parentrow['wife'];
			}
			else {
				$couple['person'] = $parentrow['wife'];
				$couple['spouse'] = "";
			}
			array_push($gens->downarray,$couple);
			//we're going down again, so we're assuming cousins or siblings
			$gens->split = 1;

			$childresult = getChildrenMinimalExcept($tree, $familyrow['familyID'], $checkpersonID);
			while( $needmore && $childrow = tng_fetch_assoc( $childresult )) {
				checkpersondown( $childrow['personID'] );
			}
			tng_free_result( $childresult );
			$gens->split = 0;

			//now we need to check children of other spouses of each parent
			//find all families where the husband is the same but the wife is different
			$gens->multparents = 1;
			checkOtherSpouse($parentrow,'husband','wife');
			checkOtherSpouse($parentrow,'wife','husband');
			$gens->multparents = 0;
			//if found, then draw original parents on left, other parents to right with line connecting the common spouse
		}
		if( $parentrow['husband'] && ($gensup < $maxupgen) ) {
			array_push($gens->uplist[$gensup],array("person"=>$parentrow['husband'],"spouse"=>$parentrow['wife'],"childindex"=>$gens->upptr));
		}
		if( $parentrow['wife'] && ($gensup < $maxupgen) ) {
			array_push($gens->uplist[$gensup],array("person"=>$parentrow['wife'],"spouse"=>$parentrow['husband'],"childindex"=>$gens->upptr));
		}

		tng_free_result( $parentsresult );
	}
	tng_free_result( $familyresult );

	/* exp */
	if($needmore) {
		$gens->upptr++;
			//echo "upx=" . $gens->upcount . ", ptr=" . $gens->upptr . ", lastup=$lastup<br>";
			//debugPrint($gens->uplist[$lastup]);
		if($gens->upptr < count($gens->uplist[$lastup])) {
			$nextcouple = $gens->uplist[$lastup][$gens->upptr];
			$gens->upcount--;
			//echo "up=" . $gens->upcount . ", ptr=" . $gens->upptr . "<br>";
			//debugPrint($nextcouple);
		}
		elseif(is_array($gens->uplist[$gensup])) {
			$gens->upptr = 0;
			$nextcouple = $gens->uplist[$gensup][$gens->upptr];
			//debugPrint($nextcouple);
		   //	echo "done<br>";
		}

		if($nextcouple)
			checkpersonup($nextcouple);
	}
	/* exp */

	//array_pop($gens->uparray);
	//echo "popped it<br>";
	//$gens->upcount -= 1;
}

//check descendants of person1 to see if you find person2
function checkpersondown( $checkpersonID ) {
	global $text, $tree, $targetID, $families_table, $people_table, $children_table, $primarypersonID, $secondpersonID, $maxupgen;
	global $msg, $gens, $otherID, $disallowspouses, $needmore;
	//global $lowest, $highest;

	$gens->downcount += 1;
	$gensdown = $gens->downcount;
	//if( $gensdown > $lowest ) $lowest = $gensdown;

	//echo "down: person=$checkpersonID, target=$targetID, down=$gensdown, up = $gensup<br/>\n";
	//check person
	if( $checkpersonID != $targetID ) {
		//get sex of each individual
		$result = getPersonGender($tree, $checkpersonID);
		if( $result ) {
			$row = tng_fetch_assoc($result);
			if ( $row['sex'] == "M" ) {
				$spouse = "wife"; $self = "husband"; $spouseorder = "husborder";
			}
			else if ($row['sex'] == "F" ) {
				$spouse = "husband"; $self = "wife"; $spouseorder = "wifeorder";
			}
			else
				$spouseorder = "";
			if( $spouseorder ) {
				//get spouses -- for each spouse
				$spouseresult = getSpousesSimple($tree, $self, $checkpersonID, $spouse, $spouseorder);

				while( $needmore && $spouserow = tng_fetch_assoc( $spouseresult )) {
					//build couple
					$couple['person'] = $checkpersonID;
					$couple['spouse'] = $spouserow[$spouse];

					$revcouple['person'] = $spouserow[$spouse];
					$revcouple['spouse'] = $checkpersonID;
					//push couple on downarray here
					//don't push couple after, like previously done
					$pushed = false;
					if(!in_array($couple, $gens->uparray) && !in_array($revcouple, $gens->uparray)) {
						array_push($gens->downarray,$couple);
						$pushed = true;
					}
					//pop it off again after all children checked

					//check spouse
					if( $spouserow[$spouse] != $targetID || $disallowspouses ) {
						//get children -- for each child
						if( $pushed ) {
							if( $gensdown < $maxupgen ) {
								$childresult = getChildrenMinimal($tree, $spouserow['familyID']);
								while( $needmore && $childrow = tng_fetch_assoc( $childresult )) {
										checkpersondown( $childrow['personID'] );
								}
								tng_free_result( $childresult );
							}
							array_pop($gens->downarray);
						}
					}
					elseif($pushed) {
						$gens->match = 1;
						//echo "got match 1, spouse=" . $spouserow[$spouse] . ", lowest=$lowest, sec=$secondpersonID<br>\n";
						$gens->spouseflag = $row['sex'] != $spouserow['sex'] ? 1 : 2;
						if( $gens->downcount == 1 && !$gensup && $spouserow[$spouse] == $targetID && $checkpersonID == $otherID ) {
							$gens->spouses = 1;
						}
						else
							$couple = $revcouple;
						//echo "d=$gens[down], u=$gens[up], s={$spouserow[$spouse]}, targ=$targetID, check=$checkpersonID, oth=$otherID";
						finishRelationship($couple);
						array_pop($gens->downarray);
					}
				}
				tng_free_result( $spouseresult );
			}
			tng_free_result($result);
		}
	}
	else {
		$gens->downcount = $gensdown;
		//echo "got match 2<br>\n";
		$gens->match = 1;
		$couple['person'] = $checkpersonID;
		$couple['spouse'] = "";
		array_push($gens->downarray, $couple);
		finishRelationship($couple);
		array_pop($gens->downarray);
	}
	$gens->downcount -= 1;
}

function swapPeople() {
	global $namestr, $namestr2, $gender1, $gender2;

	$namestr3 = $namestr2;
	$namestr2 = $namestr;
	$namestr = $namestr3;
	$gender3 = $gender2;
	$gender2 = $gender1;
	$gender1 = $gender3;
}

?>
<?php
	if( $error )
		echo "<p>$error {$text['notvalid']}</p>\n";
	elseif( $primarypersonID == $secondpersonID )
		echo "";
	else {
		$gens = new Relationship();

		$personID1 = $secondpersonID;
		$targetID = $secondpersonID;
		$otherID = $primarypersonID;

		checkpersondown( $primarypersonID );
		$couple['person'] = $primarypersonID;
		$couple['spouse'] = "";
		$couple['childindex'] = 0;
		$gens->uplist[0] = array();
		array_push($gens->uplist[0],$couple); //exp

		checkpersonup( $couple );

		if( !$totalRelationships ) {
			$gens = new Relationship();

			$personID1 = $primarypersonID;
			$targetID = $primarypersonID;
			$otherID = $secondpersonID;

			swapPeople();

			checkpersondown( $secondpersonID );
			$couple['person'] = $secondpersonID;
			$couple['spouse'] = "";
			$couple['childindex'] = 0;
			$gens->uplist[0] = array();
			array_push($gens->uplist[0],$couple);

			checkpersonup( $couple );
		}

		if( !$totalRelationships ) {
// the next line writes out "is not related to siteowner within xxx generations." if there's no relationship
			echo $namestr2 . " is not related to " . $text['siteowner'] . " within " . preg_replace( "/xxx/", $generations, "xxx generations." );
// the next line writes out nothing if there's no relationship
//			echo "";
		}
	}
	//echo "down=$gens->downcount, up=$gens->upcount, sp=$gens->spouses, par=$gens->split<br>";
$_SESSION['destinationpage8'] = "";
?>
%fileend:%

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