"; // by editing RL_userhtml you can include your own html code which will be displayed // at the top of the index.php reciprocal link file if(file_exists("RL_header.htm")) { @include("RL_header.htm"); // user code for top of link page } else { if(empty($HeaderLogoFile)) { $HeaderLogoFile = $linkLogo1; } $szCleanPage = trim(StripHTTP($yourWebSite)); $szHomePageLink = "" . $szCleanPage .""; if(!empty($HeaderLogoFile)) { $szImageSourceTag = MakeImgSrcTag($HeaderLogoFile,$yourWebSite,$RL_directory); print ""; print ""; } print "
"; if(!empty($szImageSourceTag)) { print ""; print $szImageSourceTag; print ""; } print "$HeaderText1
"; if(!empty($HeaderText1)) { if($fDisplayYourHomeURL) { print "$szHomePageLink
"; } if(!empty($HeaderText2)) { print "
$HeaderText2"; } print "
"; } else // no logo { if(!empty($HeaderText1)) { print ""; print "
$szHomePageLink
$HeaderText1"; if(!empty($HeaderText2)) { print "
$HeaderText2"; } print "
"; } } } // end if/else RL_header // to change the layout and display of the Reciprocal links, // see RL_styles.css and rl_DATAvars.php // ************************************************* // There are no user editable lines beneath here. // ************************************************* if($fDisplayAdminLink) // turn off the 'Admin' link in the rl_DATAvars.php file { print ""; } print "
"; print ""; print ""; print ""; print "
$AddLinkText
"; $iLinksDisplayed = include($rl_display); // this is the core display component of the system. if(file_exists("RL_footer.htm")) { @include("RL_footer.htm"); // user code for top of link page } else { if(!empty($FooterText1)) { print "
"; print ""; print $FooterText1; print ""; if(!empty($HeaderText2)) { print "
$FooterText2
"; } print "
"; } } print "
"; if($fDisplayAdminLink) // turn off the 'Admin' link in the rl_DATAvars.php file { print ""; } // copyright 2003 Steve S. Saroff // The terms of the licence for free use of this software // require that the following footer be displayed on the web page and that this copyright notice must be // left intact here in on this page. // Contact www.edifygroup.com for permission to remove logo/copyright or to brand this software // as yours. Thank you. Steve S. Saroff www.saroff.com www.edifygroup.com print " "; function StripHTTP($szUrl) { if(strstr($szUrl,"//")) // cut and clean, if there are double backslashes { $szUrl = substr($szUrl,7); } return($szUrl); } function AddHTTP($szUrl) { // makes sure that http:// is at the start of string $szUrl = trim($szUrl); if(strstr($szUrl,'//')) // cut and clean, if there are double backslashes { $szUrl = substr($szUrl,7); } $szTemp = 'http://'. $szUrl; return($szTemp); } function MakeImgSrcTag($pImage,$yourWebSite,$RL_directory) { $szAltText = StripHTTP($yourWebSite); $szPlainSite = StripHTTP($yourWebSite); $szPlainSite = RemoveEndDash($szPlainSite); // http://site/imagefile // remove '/' from end of string. //$szImagePath1 = str_replace("/","", $szPlainSite); $szImagePath0 = $pImage; // looks just exactly for what is entered $szImagePath1 = $szPlainSite; $szImagePath1 = AddHTTP($szImagePath1) . "/" . $pImage; // http://imagefile (if the person put the full path in as a var. $szImagePath2 = AddHTTP($pImage); // http://site/$RL_directory/imagefile. $szImagePath3 = $szPlainSite; $szTemp = str_replace("/","",$RL_directory); $szImagePath3 = AddHTTP($szImagePath3) . "/" . $szTemp . "/" .$pImage; // try 1 , 2, 3 : most likely to least likely locations: // 1) http://www.yoursite.com/yourlogo.jpg // 2) http://yourlogo.jpg // in rl_DATAvars.php, if full path is entered to logo. // 3) http://www.yoursite.com/links/yourlogo.jpg $fImageFound = 0; if(!$apSize = @getimagesize($szImagePath0,$dummy)) { if(!$apSize = @getimagesize($szImagePath1,$dummy)) { if(!$apSize = @getimagesize($szImagePath2,$dummy)) { if(!$apSize = @getimagesize($szImagePath3,$dummy)) { $szDim = ""; } else { $fImageFound = 1; $szImagePath = $szImagePath3; } } //2 else { $fImageFound = 1; $szImagePath = $szImagePath2; } } // 1 else { $fImageFound = 1; $szImagePath = $szImagePath1; } } else { $fImageFound = 1; $szImagePath = $szImagePath0; } if(!$fImageFound) { $szDim = ""; return(""); } else { $szDim = $apSize[3]; $szDim = str_replace('"',"'",$szDim); } $szReturn = "".$szAltText.""; return($szReturn); } function RemoveEndDash($szString) { $szString = trim($szString); $i = strlen($szString); $c = substr($szString,$i-1,1); if($c == "/") { $szString = substr($szString,0,$i-1); } return($szString); } ?>