PHP Basic Tutorials ,PHP Sources Code,PHP Online Example

Algorithms Arrays Passwords Uncategorized
Commerce Uncategorized
Databases Abstraction Layers Informix LDAP MS SQL MySQL ODBC PostgreSQL Uncategorized
Date & Time Calculators Conversion Translation Uncategorized
Discussion Chat Forums Guestbooks Polls Uncategorized
Email Validation Uncategorized
External Uncategorized
Files and Directories Uncategorized
Games Uncategorized
Graphics 3-D Graphs Resizing Thumbnails Uncategorized
HTML Forms Menus & Navigation Source Viewers Tables Templates Uncategorized
HTTP Authentication Cookies File Uploading Uncategorized
I18N Uncategorized
Math Uncategorized
Miscellaneous Uncategorized
Searching and Trees Uncategorized
Security Uncategorized
Text Uncategorized
Utilities Calendars Counters Link Checkers Weather Uncategorized
XML Uncategorized

php sample source codes
Don't lose your website visitors when they link out of your website!! A short frame with "Back To My Site" and "Remove Frame" will be added to the top of any external URL link. This script entails two files: redirect.php, and top.php. Here's the code for redirect.php: <? # Redirect.php Copyright 2001 Jim Fletcher jim@WebsiteCode.com # # This script, when called, will look like: # redirect.php?backtext=Back+To+My+World&backlink=http://www.myworld.com&linktitle=Microsoft+Website&url=http://www.microsoft.com # # All variables are optional, and you may set the default for left-out variables below. # if (!$sitetitle) { $sitetitle="WebCustomerService.com"; } if (!$url) { $url="http://www.websitecode.com"; } if (!$backtext) { $backtext="Go Back To Site"; } if (!$backlink) { $backlink=$HTTP_REFERER; } if (!$linktitle) { $linktitle="Redirection"; } ?> <HTML> <HEAD><TITLE><? echo $sitetitle; ?> Link To: <? echo $linktitle; ?></TITLE></HEAD> <FRAMESET FRAMEBORDER=0 FRAMESPACING=0 BORDER=0 ROWS="40,*"> <FRAME SRC="top.php?backtext=<? echo $backtext; ?>&backlink=<? echo $backlink; ?>&url=<? echo $url ?>" NAME="LinksFrame" MARGINWIDTH=0 MARGINHEIGHT=0 scrolling=no noresize BORDERCOLOR="#FFFFFF"> <FRAME SRC="<? echo $url; ?>" NAME="AnswerFrame" BORDERCOLOR="#FFFFFF"> <NOFRAMES> <BODY BGCOLOR="#FFFFFF"> <p>Links Redirection works well only with frame-capable browsers. Please upgrade your browser to take advantage of this script. </p> <P>Click on the link to proceed to <A HREF="<? echo $url; ?>" TARGET="_top"><? echo $linktitle; ?></A> </BODY> </NOFRAMES> </FRAMESET> </HTML> Here's The Code for top.php: <html><head> <SCRIPT Language="Javascript"> <!-- function RemoveFrames() { parent.location.href = parent.LinksFrame.document.forms[0].elements[0].value; return false; } function OpenPopup(strFileName) { popupWnd=window.open(strFileName, "PopupWindow", "toolbar=no,width=370,height=240,directories=no,status=no,scrollbars=yes,resize=no,menubar=no"); } //--> </SCRIPT> </head> <BODY BGCOLOR=#FFFFFF LINK=#000000> <!--javascript:top.location = parent.document.referrer;"--> <TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="2" BGCOLOR="#CCCC99"><TR ALIGN="CENTER"> <TD NOWRAP><FONT FACE="Verdana" SIZE="1"><B> <b><a href="<? echo $backlink; ?>" target="_top"><? echo $backtext; ?></a> \| <A HREF="<? echo $url; ?>" target="_top">Remove Frame</A></b> </body> </html>
This script allows you to send SMS (also long SMS), EMS, RTTTL-Ringtones, Logos (GIF, JPG, PNG) with automatic image resizing, EMS Pictures with copy protection and autosave feature, Nokia Operator Logos, Nokia Multipart messages and so on. Pictures and Ringtones can be HEX-included or specified to be downloaded from a HTTP-source. You can setup the 2-way service within minutes on TrueSenses.com. Requires NO additional libraries programs or databases. <html> <head> <title>TrueSenses Response</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body> <?php /* ************************************************************************************ * 2-way mobile messaging script, (c) 2003 TrueSenses.com - http://www.truesenses.com * * -> This script allows you to operate a 2-way SMS service and send ringtones, logos * -> and much more directly from your site. * * -> This script does not need any other execution rights like executing sub- * -> programs and should therefore run on almost every server supporting PHP. * * -> For outgoing SMS you will need to have a TrueSenses.com account. * -> For incoming SMS you will need to activate the keyword service for as low as * -> CHF 5.- (Swiss Francs) per keyword and month including unlimited incoming SMS. * * You will need to configure $truesenses_account,$truesenses_password and * $truesenses_origin * * This script is pre-configured to act on incoming SMS messages sent by the * TrueSenses.com SMS-Gateway. It will compare the incoming keyword and send back * the requested content. * * If you ONLY want to use this script to send messages (without 2-way service), * simply modify the MAIN program code to discard the incoming parameters provided * by the gateway: $NUMBER (origin number, international format) and $MESSAGE * * The following message-modes are supported: * * - SMS * - EMS * - EMS Images * - NOKIA Ringtones * - NOKIA Logos * - NOKIA Multipart messages (Picture Message with text) * * * In order to install the 2-way SMS script follow these steps: * * * 1. Open an account on TrueSenses.com * 2. Configure this script with your Account/Password and upload it to your server * 3. Buy some outgoing SMS credits * 4. Go to Configuration / Keyword services and add a keyword * 4.1 Click on the keyword and activate PUSH to forward incoming SMS to this script * example: http://www.[yoursitename].com/truesenses_2way.php * method: select POST method - dont forget to click on "Activated" * 4.2 Activate the keyword by clicking "Activate keyword" * 5. Your service is now up and running * * Send the following SMS to +41-79 381 60 10 or the number given by TrueSenses.com * * yourkeyword SMS * -> You will receive a SMS back to your phone. * * yourkeyword SMSFLASH * -> You will receive a flashing class 0 SMS back to your phone. * * yourkeyword NOKIARINGTONE * -> You will receive a ringtone for your NOKIA phone, downloaded from HTTP-Source. * * yourkeyword NOKIARINGTONEHEX * -> You will receive a ringtone for your NOKIA phone, included as hex-encoded. * * yourkeyword NOKIALOGO * -> You will receive an operator logo for your NOKIA phone, downloaded from HTTP- * -> source. IMPORTANT: configure the mnc and mmc settings first according to the * -> destination provider. Otherwise the logo will not show up. * * yourkeyword NOKIAMULTIPART * -> You will receive a picture message with a text for your NOKIA phone, downloaded * -> from a HTTP-source. * * yourkeyword EMSLOGO * -> You will receive a picture message for your NON-Nokia phone like SonyEricsson * -> and all other vendors who support the EMS-standard on their phones. The image * -> is by default copy protected and cannot be sent to another phone. You can de- * -> activate this by setting protected = "NO". * ************************************************************************************ / $truesenses_account = "YourAccountName"; // TrueSenses.com Account-Name $truesenses_password = "YourPassword"; // Account-Password $truesenses_origin = "TrueSenses"; // Message-Origin, 11 alpha chars or numeric number $debug = 0; // debug-output 0 = off, 1 = on // // open a http-channel, transmit data and return received buffer function sendToHost($host,$method,$path,$data,$useragent,$poststr) { global $debug; if (empty($method)) { // default GET $method = 'GET'; } $method = strtoupper($method); $fp = fsockopen($host, 80, $errno, $errstr, 30); if (!$fp) { if ($debug == 1) { echo("Could not open connection<br>$errstr ($errno)<br>\n"); } } else { if ($method == 'GET') $path .= '?' . $data; fputs($fp, "$method $path HTTP/1.0\r\n"); fputs($fp, "Host: $host\r\n"); fputs($fp, "Content-Type: application/x-www-form-urlencoded\r\n"); if ($method == 'POST') { fputs($fp, "Content-Length: " . strlen($data) . "\r\n"); } else { if (strlen($poststr)>0) { // if something to POST on GET method fputs($fp, "Content-Length: " . strlen($poststr) . "\r\n"); } } if (strlen($useragent)>0) { fputs($fp, "User-Agent: $useragent\r\n"); } else { fputs($fp, "User-Agent: TrueSensesPHP\r\n"); } fputs($fp, "Connection: close\r\n"); fputs($fp, "\r\n"); if ($method == 'POST') { fputs($fp, $data); } else { // GET method if (strlen($poststr)>0) { // if something to POST on GET method fputs($fp, $poststr); } } $buf = ""; $line = ""; $chr = "0"; $contentsize = "0"; // echo("reading response\n"); while ((!feof($fp)) && (strlen($buf)<=100000) && ($chr < 500)) { // read max 100000 bytes or 500 lines $chr = $chr + 1; $line = fgets($fp, 10000); // read one line $buf .= $line; // append to buffer } // sometimes contentsize was not received ...had to replace with part below / $contpos = strpos(strtoupper($buf), "CONTENT-LENGTH:"); if ($contpos > 0) { // determine content size if ($debug == 1) { echo("decoding content-length<br>\n"); } $contentsize = substr($buf, ($contpos + 16), 20); while (strpos($contentsize, "\n") > 0) { $contentsize = substr($contentsize, 0, strpos($contentsize, "\n") -1); } while (strpos($contentsize, "\r") > 0) { $contentsize = substr($contentsize, 0, strpos($contentsize, "\r") -1); } if ($debug == 1) { echo("contentsize::$contentsize::<br>\n"); } } else { if ($debug == 1) { echo("NO contentsize found in ::$buf::<br>\n"); } return "ERROR"; } */ // replaced above part with this one $contpos = strpos(strtoupper($buf), "CONTENT-TYPE"); if ($contpos > 0) { // echo("FOUND contenttype in ::$buf::<br>\n"); $buf = substr($buf, $contpos, strlen($buf) - $contpos); // echo("new buffer::$buf::<br>\n"); // $buf = substr($buf, strpos($buf, "\n") + 1, strlen($buf) - strpos($buf, "\n")); $buf = substr($buf, 27, strlen($buf) - (27 + 1)); // assumes Content-Type: text/html (27 chars) } else { if ($debug == 1) { echo("NO contenttype found in ::$buf::<br>\n"); } return "ERROR"; } // delete everything else than the content from the buffer // $buf = substr($buf, (strlen($buf) - $contentsize), $contentsize - 1); // echo("buffer::$buf::<br>\n"); // echo("after response\n"); fclose($fp); return $buf; // return the buffer } } // sendToHost // // compose the XML-message ans transfer it to sendToHost function sendXML($destination, $origin, $middle) { global $truesenses_account; global $truesenses_password; $poststring = "<?xml version=\"1.0\"?>\n"; $poststring .= "<Message>\n"; $poststring .= "<Destination>\n"; $poststring .= "<GSM number=\"$destination\" />\n"; $poststring .= "</Destination>\n"; $poststring .= "<ORIGINATOR value=\"$origin\" />\n"; $poststring .= $middle; // insert middle part here $poststring .= "</Message>\n"; $sendresp = sendToHost('www.truesenses.com','get','/cgi-bin/smsgateway.cgi', "FUNCTION=EXTERN_XMLUPLOAD&ACCOUNT=$truesenses_account&PASSWORD=$truesenses_password", "", "$poststring"); return $sendresp; // return response } // sendXML // MAIN program // Look if incoming message contains a space (keyword detected) // // Incoming message will contain the full message (no keyword required) if you // are hosting a dedicated access number on TrueSenses // $pos = strpos ($MESSAGE, " "); if ($pos === false) { // no space in message detected, keyword is message $KEYWORD = "$MESSAGE"; $MSGONLY = "$MESSAGE"; } else { // space detected, extract keyword $KEYWORD = substr($MESSAGE, 0, $pos); $MSGONLY = substr($MESSAGE, ($pos + 1), (strlen($MESSAGE) - ($pos))); } if ($debug == 1) { echo("Keyword::$KEYWORD:: Msgonly::$MSGONLY:: Fullmessage::$MESSAGE::<br>\n"); } if (strcmp(strtoupper($MSGONLY), "SMS") == 0) { // sends a normal SMS $xmlmsg = "<SMS encoded=\"YES\">\n"; // add the following line if you want to send long-SMS (spawning over multiple SMS) // $xmlmsg .= "<long />\n"; $xmlmsg .= "<CONTENT>"; $xmlmsg .= urlencode("Your keyword was $KEYWORD and your message was $MSGONLY"); // hex-encode the content $xmlmsg .= "</CONTENT>\n"; $xmlmsg .= "</SMS>\n"; $rcbuf = sendXML($NUMBER, $truesenses_origin, $xmlmsg); if ($debug == 1) { echo("RESPONSE::$rcbuf::\n"); } } // SMS reply if (strcmp(strtoupper($MSGONLY), "SMSFLASH") == 0) { // sends a flasing SMS $xmlmsg = "<SMS encoded=\"YES\">\n"; $xmlmsg .= "<flashing />\n"; // set msgclass 0 flag // add the following line if you want to send long-SMS (spawning over multiple SMS) // $xmlmsg .= "<long />\n"; $xmlmsg .= "<CONTENT>"; $xmlmsg .= urlencode("Your keyword was $KEYWORD and your message was $MSGONLY"); // hex-encode the content $xmlmsg .= "</CONTENT>\n"; $xmlmsg .= "</SMS>\n"; $rcbuf = sendXML($NUMBER, $truesenses_origin, $xmlmsg); if ($debug == 1) { echo("RESPONSE::$rcbuf::\n"); } } // SMS reply if (strcmp(strtoupper($MSGONLY), "NOKIARINGTONE") == 0) { // sends a nokiaringtone - input must be in RTTTL format // // assemble XML message $http_location = "http://www.simmcomm.ch/ringtone.txt"; // location of the ringtone $xmlmsg = "<NOKIARINGTONE>\n"; $xmlmsg .= "<RINGTONE source=\"HTTP\" type=\"RTTTL\">$http_location</RINGTONE>\n"; $xmlmsg .= "</NOKIARINGTONE>\n"; $rcbuf = sendXML($NUMBER, $truesenses_origin, $xmlmsg); if ($debug == 1) { echo("RESPONSE::$rcbuf::\n"); } } // NOKIARINGTONE if (strcmp(strtoupper($MSGONLY), "NOKIARINGTONEHEX") == 0) { // sends a nokiaringtone as hex include - input must be in RTTTL format // // assemble XML message $http_location = urlencode("KnightRider:d=4,o=5,b=125:16e,16p,16f,16e,16e,16p,16e,16e,16f,16e,16e,16e,16d#,16e,16e,16e,16e,16p,16f,16e,16e,16p,16f,16e,16f,16e,16e,16e,16d#,16e,16e,16e,16d,16p,16e,16d,16d,16p,16e,16d,16e,16d,16d,16d,16c,16d,16d,16d,16d,16p,16e,16d,16d,16p,16e,16d,16e,16d,16d,16d,16c,16d,16d,16d"); // free demo ringtone from the internet $xmlmsg = "<NOKIARINGTONE>\n"; $xmlmsg .= "<RINGTONE source=\"BINARY\" type=\"RTTTL\">$http_location</RINGTONE>\n"; $xmlmsg .= "</NOKIARINGTONE>\n"; $rcbuf = sendXML($NUMBER, $truesenses_origin, $xmlmsg); if ($debug == 1) { echo("RESPONSE::$rcbuf::\n"); } } // NOKIARINGTONEHEX if (strcmp(strtoupper($MSGONLY), "NOKIALOGO") == 0) { // sends a nokialogo - input must be in GIF, JPG or PNG // // parameters: // mcc = MobileCountryCode for destination (example 228 - switzerland) // mnc = MobileNetworkCode for destination (example 01 - swisscom, 02 sunrise, 03 orange) // assemble XML message $http_type = "GIF"; $http_location = "http://www.simmcomm.ch/nokialogo.gif"; // location of the logo $destination_mcc = "228"; // mandatory: MobileCountryCode for destination $destination_mnc = "01"; // mandatory: MobileNetworkCode for destination $xmlmsg = "<NOKIALOGO mcc=\"$destination_mcc\" mnc=\"$destination_mnc\">\n"; $xmlmsg .= "<IMAGE source=\"HTTP\" type=\"$http_type\">$http_location</IMAGE>\n"; $xmlmsg .= "</NOKIALOGO>\n"; $rcbuf = sendXML($NUMBER, $truesenses_origin, $xmlmsg); if ($debug == 1) { echo("RESPONSE::$rcbuf::\n"); } } // NOKIALOGO if (strcmp(strtoupper($MSGONLY), "NOKIAMULTIPART") == 0) { // sends a nokiamultipart message (picturemessage) - input must be in GIF, JPG or PNG // // options: // - specify <CONTENT> tag if you want to send some text with your image // assemble XML message $http_type = "GIF"; $http_location = "http://www.simmcomm.ch/nokialogo.gif"; // location of the logo $xmlmsg = "<NOKIAMULTIPART encoded=\"YES\">\n"; $xmlmsg .= "<IMAGE source=\"HTTP\" type=\"$http_type\">$http_location</IMAGE>\n"; $xmlmsg .= "<CONTENT>"; $xmlmsg .= urlencode("Your logo"); // hex-encode the content $xmlmsg .="</CONTENT>\n"; $xmlmsg .= "</NOKIAMULTIPART>\n"; $rcbuf = sendXML($NUMBER, $truesenses_origin, $xmlmsg); if ($debug == 1) { echo("RESPONSE::$rcbuf::\n"); } } // NOKIAMULTIPART if (strcmp(strtoupper($MSGONLY), "EMSLOGO") == 0) { // sends a logo to NON-nokia, EMS-capable phones like SonyEricsson // // parameters: // autosave = YES/NO (automatically ask user to save image) // protected = YES/NO (disallow re-distribution of image) // width = x (width of image, do not provide parameter for autosizing) // height = y (height of image, do not provide parameter for autosizing) // assemble XML message $http_type = "GIF"; $http_location = "http://www.simmcomm.ch/nokialogo.gif"; // location of the logo $xmlmsg = "<EMS>\n"; // no newline after <content> tag as it would convert to text-enter %0A in ems and would consume space $xmlmsg .= "<CONTENT><IMAGE source=\"HTTP\" type=\"$http_type\" autosave=\"YES\" protected=\"NO\">$http_location</IMAGE></CONTENT>\n"; $xmlmsg .= "</EMS>\n"; $rcbuf = sendXML($NUMBER, $truesenses_origin, $xmlmsg); if ($debug == 1) { echo("RESPONSE::$rcbuf::\n"); } } // EMSLOGO // send confirmation to TrueSenses.com that we have received the incoming sms echo("OK<br>\n"); ?> </body> </html>
Allows guests to rate something 1 to 5 stars, then takes the results and returns a number of stars based on the average rating. If you try the script and get an error regarding the file 'ratings.php', try downloading the zipped file at http://habitat675.port5.com/rate/ratings.zip and chmod ratings.php 666. File also includes star images which you are free to use if you like, or you can use your own. <HTML> <BODY> <?php /* IF YOU WOULD LIKE TO CHANGE THE IMAGES then edit the paths here! / $half_img = "half.gif"; $whole_img = "star.gif"; / No editing is needed beyond here / if(!file_exists('ratings.php')) { echo "FILE DOES NOT EXIST"; $fp = fopen("ratings.php","w"); if(!$fp) { echo "error! the file could not be opened"; exit; } $contents = "<"."?php $"."one = \"0\"; $"."two = \"0\"; $"."three = \"0\"; $"."four = \"0\"; $"."five = \"0\"; ?".">"; fwrite($fp, $contents); fclose($fp); chmod ("ratings.php", 0666); } require("ratings.php"); if(isset($_POST['your_rating'])) { $your_rating = $_POST['your_rating']; } if(isset($your_rating)) { ${$your_rating}++; $fp = fopen("ratings.php","w"); if(!$fp) { echo "error! the file could not be opened"; exit; } $contents = "<"."?php $"."one = \"$one\"; $"."two = \"$two\"; $"."three = \"$three\"; $"."four = \"$four\"; $"."five = \"$five\"; ?".">"; fwrite($fp, $contents); fclose($fp); } $total = $one + $two + $three + $four + $five; if($total != "0") { $ones = $one / $total; $ones = 1 $ones; $twos = $two / $total; $twos = 2 * $twos; $threes = $three / $total; $threes = 3 * $threes; $fours = $four / $total; $fours = 4 * $fours; $fives = $five / $total; $fives = 5 * $fives; $all = $ones + $twos + $threes + $fours + $fives; $whole = substr($all, 0, 1); $decimal = substr($all, 1, 4); $decimal = $decimal * 10; if($decimal >= 3.5 && $decimal <= 7.5) { $half = "true"; } elseif($decimal > 7.5) { $all++; $half = "false"; } else { $half = "false"; } $decimal = $decimal / 10; $all = floor($all); $i = 0; while($i < $all) { echo "<IMG src=\"$whole_img\">"; $i++; } if($half == "true") { echo "<IMG src=\"$half_img\">"; } } else { echo "This has no votes yet."; } ?> <!-- The following can be pasted anywhere on the page. Make sure the action goes to THIS page itself --> <FORM method="post" action="rate.php"> <SELECT name="your_rating"> <OPTION value="one">1</OPTION> <OPTION value="two">2</OPTION> <OPTION value="three">3</OPTION> <OPTION value="four">4</OPTION> <OPTION value="five">5</OPTION> </SELECT>   <INPUT type="submit" value="rate!"> </FORM> </BODY> </HTML>
A clean way to add a header and/or footer to pages automatically. To include a header or footer in scripts automatically, if you have access to apache's config files, you can add something like: php3_auto_prepend_file /path/to/include/prepend.php3 php3_auto_append_file /path/to/include/append.php3 (If you don't have access to the config files but can use .htaccess files, put the above lines in that file) Put the following code in the prepend.php3 file listed above. Make a copy of that named append.php3 and change the header.php3 to footer.php3 in the file. <? $prepend_dir=dirname($SCRIPT_FILENAME); if(file_exists("$prepend_dir/header.php3")){ include("$prepend_dir/header.php3"); } /* * Uncomment the next few lines to add a header if * there is no header.php3 in the current directory */ //else{ // include("/path/to/default/header.php3"); //} ?> Now you can just put a header.php3 or footer.php3 file in any directory you want and it will be included before/after any script that is called in that directory. Do make sure of permissions of the directories you do with with since if anyone can put a file named header.php3 or footer.php3 into the directory with your scripts, the file will get included automatically.
Works by fetching the whois server from whois.crsnic.net if com,net,org,edu address, sets the whois server it to countrycode.whois-servers.net for au,uk,etc. and sets the whois server to whois.arin.net for ips. Then it queries the aproprite whois server. <? /* Copyright (c) 2001, Martyn Allan All rights reserved. Usage: // To setup: $whois = new whois; $whois->setDomain($domain); // $domain is the domain you wish to lookup. $whois->find; $whois->lookup; $whois->ip_lookup; // If you are looking up an ip. // To view: echo $whois->server; // The whois server used to get the info. echo $whois->header; // The Information recieved from "whois.crsnic.net" (for com,net,org,edu Domains and IP's only). echo $whois->nomatch; // Did not find a match in "whois.crsnic.net". echo $whois->domain; // The domain. echo $whois->ip; // The ip (If you are looking up an ip). echo $whois->body; // The info on the domain. echo $whois->ipbody; // The info on the ip. */ function OutStr ($string_haystack, $needle_start, $needle_finish, $pos_add=0) { if (strpos ($string_haystack, $needle_start)) { $start = strpos ($string_haystack, $needle_start)+$pos_add; $count = strpos ($string_haystack, $needle_finish, $start)-$start; return substr ($string_haystack, $start, $count); } } class whois { var $server, $header, $body, $ipbody, $domain, $ip, $step, $nomatch; function setDomain ($lookup) { $this->domain = $lookup; $this->step = 1; } function find () { if ($this->step >= 1) { $lookup = $this->domain; $tld = array_reverse (explode ('.', $lookup)); $this->nomatch = false; if (preg_match ("/\d{1,3}/", $tld[0])) { $this->ip = $lookup; } if (preg_match ("/com\|net\|org\|edu\|\d{1,3}/i", $tld[0])): $whois = "whois.crsnic.net"; // rs.internic.net is an alternative address. $fp = fsockopen ($whois, 43, &$errno, &$errstr, 30); if (!$fp) { printf ("Error: %s (%s)", $errstr, $errno); $this->header = 0; return; } $lookup .= "\n"; fputs ($fp, $lookup); $this->header = fread ($fp, 16384); fclose ($fp); if (strpos ($this->header, "No match for")) { $this->nomatch = true; return; } $look_a = strtolower (OutStr ($this->header, "Server Name:", "\n", 13)); $look_b = strtolower (OutStr ($this->header, "Domain Name:", "\n", 13)); if ($look_a) { $look_p = array_reverse (explode ('.', $look_a)); $this->domain = $look_p[1].".".$look_p[0]; } if ($look_b) { $this->domain = $look_b; } $this->server = strtolower (OutStr ($this->header, "Whois Server:", "\n", 14)); else: $this->header = ''; $this->server = strtolower ($tld[0]).".whois-servers.net"; endif; $this->step = 2; } } function lookup () { if ($this->step >= 2) { $lookup = $this->domain; $whois = $this->server; $fp = fsockopen ($whois, 43, &$errno, &$errstr, 30); if (!$fp) { printf ("Error: %s (%s)", $errstr, $errno); $this->body = 0; return; } $lookup .= "\n"; fputs ($fp, $lookup); $this->body .= fread ($fp, 16384); fclose ($fp); $this->step = 3; } } function ip_lookup () { if ($this->ip) { $lookup = $this->ip; $whois = "whois.arin.net"; $fp = fsockopen ($whois, 43, &$errno, &$errstr, 30); if (!$fp) { printf ("Error: %s (%s)", $errstr, $errno); $this->ipbody = 0; return; } $lookup .= "\n"; fputs ($fp, $lookup); $this->ipbody .= fread ($fp, 16384); fclose ($fp); $this->step = 4; } } } ?>
Works with the new registry system. Fetches whois server for the domain then queries that server for the registration data. <?php // always scour user input $domain=escapeshellcmd($url); // path to whois $cmd="/usr/local/php/bin/whois $domain"; exec($cmd,$data); $max=count($data); $count=0; if($max): while($count <= $max): echo "$data[$count]<br>"; // check each line returned for the whois server for the domain if(ereg("Whois Server: ", $data[$count])): $whoserver=ereg_replace("Whois Server: ", "", $data[$count]); endif; $count++; endwhile; endif; if(isset($whoserver)): $cmd="/usr/local/php/bin/whois -h$whoserver $domain"; unset($data); exec($cmd,$data); $max=count($data); $count=0; if($max): while($count <= $max): echo "$data[$count]<br>"; $count++; endwhile; endif; endif; ?>
Add "Go Back" Frame to external links . Add "Go Back" Frame to external links Don't lose your website visitors when they link out of your website!! A short frame with "Back To My Site" and "Remove Frame" will be added to the top of any external URL link. Type: application Version: 1.0 Requires: PHP Added by: fletcher (email author) Entered: 11/03/2001 Last modified: 03/12/2000 Rating (5 votes) Views 5990 This script entails two files: redirect.php, and top.php. Here's the code for redirect.php: <? # Redirect.php Copyright 2001 Jim Fletcher jim@WebsiteCode.com # # This script, when called, will look like: # redirect.php?backtext=Back+To+My+World&backlink=http://www.myworld.com&linktitle=Microsoft+Website&url=http://www.microsoft.com # # All variables are optional, and you may set the default for left-out variables below. # if (!$sitetitle) { $sitetitle="WebCustomerService.com"; } if (!$url) { $url="http://www.websitecode.com"; } if (!$backtext) { $backtext="Go Back To Site"; } if (!$backlink) { $backlink=$HTTP_REFERER; } if (!$linktitle) { $linktitle="Redirection"; } ?> <HTML> <HEAD><TITLE><? echo $sitetitle; ?> Link To: <? echo $linktitle; ?></TITLE></HEAD> <FRAMESET FRAMEBORDER=0 FRAMESPACING=0 BORDER=0 ROWS="40,*"> <FRAME SRC="top.php?backtext=<? echo $backtext; ?>&backlink=<? echo $backlink; ?>&url=<? echo $url ?>" NAME="LinksFrame" MARGINWIDTH=0 MARGINHEIGHT=0 scrolling=no noresize BORDERCOLOR="#FFFFFF"> <FRAME SRC="<? echo $url; ?>" NAME="AnswerFrame" BORDERCOLOR="#FFFFFF"> <NOFRAMES> <BODY BGCOLOR="#FFFFFF"> <p>Links Redirection works well only with frame-capable browsers. Please upgrade your browser to take advantage of this script. </p> <P>Click on the link to proceed to <A HREF="<? echo $url; ?>" TARGET="_top"><? echo $linktitle; ?></A> </BODY> </NOFRAMES> </FRAMESET> </HTML> Here's The Code for top.php: <html><head> <SCRIPT Language="Javascript"> <!-- function RemoveFrames() { parent.location.href = parent.LinksFrame.document.forms[0].elements[0].value; return false; } function OpenPopup(strFileName) { popupWnd=window.open(strFileName, "PopupWindow", "toolbar=no,width=370,height=240,directories=no,status=no,scrollbars=yes,resize=no,menubar=no"); } //--> </SCRIPT> </head> <BODY BGCOLOR=#FFFFFF LINK=#000000> <!--javascript:top.location = parent.document.referrer;"--> <TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="2" BGCOLOR="#CCCC99"><TR ALIGN="CENTER"> <TD NOWRAP><FONT FACE="Verdana" SIZE="1"><B> <b><a href="<? echo $backlink; ?>" target="_top"><? echo $backtext; ?></a> \| <A HREF="<? echo $url; ?>" target="_top">Remove Frame</A></b> </body> </html> Example If you set all the variables in the script, then you can just link to script as: redirect.php?url=http://www.wherever.com However, if you want to specify any or all of the variables on a link by link basis, then a link might look like: redirect.php?sitetitle=My+World+Inc.&backtext=Back+To+The+My+World+Website&backlink=http://www.myworld.com&linktitle=Microsoft+Website&url=http://www.microsoft.com
Tired of tiping backslashes into the HTML-Code inside of PHP-code? Just drag and drop it into the Textbox and click. Ready. <p><font face="Arial, Helvetica, sans-serif" size="3"><b>Add Backslashes:</b></font></p> <? if(!$eingabe){ ?> <form name="form1" method="post" action=""> <textarea name="text" cols="80" rows="20"></textarea> <br> <input type="submit" name="Abschicken" value="Make it so!"> <input type="hidden" name="eingabe" value="1"> </form> <? }else{ $ausgabe = addcslashes($text,""); echo "<textarea name=\"text\" cols=\"80\" rows=\"20\">$ausgabe</textarea>"; echo "<br><a href=\"addslashes.php\"> Neue Eingabe</a>"; } ?>
This is a simple class that just alternates between values given to it, good for tables which alternating cell backgrounds. <? /* Author: Guillermo Roditi {Kaoslord} kaoslord@chaos-productions.com http://chaos-productions.com License: GPL Description: Alternating, a class to facilitate the alternating of values, especially good for sites with many tables that have alternating colors, the advantage of this over a function is that you can have many alternators simultaneously./ class alternator{ /Internal Variables/ var $pool; / value pool to pick values out of/ var $current_value; /The last value picked/ var $array_size; /The ammount of items in the array/ /Functions/ /init() initiates the class*/ function init($in_pool){ $this->pool = $in_pool; reset($this->pool); $this->array_size = count($this->pool); } function get_value(){ $this->current_value = current($this->pool); if(!next($this->pool)){reset($this->pool);} return($this->current_value); } } ?>
use print_array($variable) to dump the contents of a variable of any type including objects or arrays into any easy to read html format.. It supports recursive object and arrays function vardumparray(&$a) { if(is_array($a)==1) { $out.="\n<TABLE BORDER=1 CELLSPACING=1 CELLPADDING=5>"; $out.="\n\t<tr bgcolor=0066AA><td colspan=3 align=center><font color=white>Array</FONT></TD></TR>"; while(list($one,$two)=each($a)) { if (is_object($two)) { $out.="<tr bgcolor=006633><td colspan=3 align=center><Font color=white>Object</FONT></TD></TR>"; $out.= "<tr > <td valign=top>$one</td> <td valign=top>=></td> <td align=left valign=top>" . vardumparray($two) . "</td></tr>"; } elseif (is_array($two)) { $out.= "<tr> <td valign=top>$one</td> <td valign=top>=></td> <td align=left valign=top>" . vardumparray($two) . "</td></tr>"; } else { $out.= "<tr> <td valign=top>$one</td> <td valign=top>=></td> <td align=left valign=top>" . $two . "</td></tr>"; } } $out.= "\n</TABLE>"; return $out; } elseif (is_object($a)==1) { $out.="\n<TABLE BORDER=1 CELLSPACING=1 CELLPADDING=5>"; $out.="\n\t<tr bgcolor=#FF6666><td align=center><font color=white>Object</FONT></TD></TR>"; $out.='<tr bgcolor=white><td align=center>'; $arr=get_object_vars($a); $out.=vardumparray($arr); $out.='</TD></TR>'; $out.= "\n</TABLE>"; return $out; } else { printf( "%s",$a); } } function print_array($a) { print vardumparray($a); }
Function that appends a string to a specified log file. function append_to_log($logstr) { $timestamp = date("M d H:i:s"); $path = "/path/to/log/"; $logfile = "filename.log"; $log_append_str = "$timestamp " .$logstr; if(file_exists($path.$logfile) && is_writeable($path.$logfile)) { $fp = fopen($path.$logfile, 'a+'); fputs($fp, "$log_append_str\r\n"); fclose($fp); } else if(!file_exists($path.$logfile) && is_writeable($path)) { touch($path.$logfile); chmod($path.$logfile, 0600); $fp = fopen($path.$logfile, 'a+'); fputs($fp, "$log_append_str\r\n"); fclose($fp); } else { die("Unable to write to file.."); } }
This is a function I wrote that runs through a single dimensional array and assigns variables based on the key names. function assign_from_array($array) { $keys = array_keys($array); for ($i=0; $i<count($array); $i++) { $key = $keys[$i]; global ${$key}; ${$key} = $array[$key]; } }
Takes an array and assigns it to the global space. <?php // void make_global(array array[, bool overwrite[, bool reference]]) function make_global(&$array, $overwrite = TRUE, $reference = FALSE){ reset($array); while(list($k, $v) = each($array)) if(is_string($k) && (!isset($GLOBALS[$k]) \|\| $overwrite)){ if($reference) $GLOBALS[$k] = &$v; else $GLOBALS[$k] = $v> } } ?>
header and footer in php4 /* When i tried to add header and footer on my pages automatically with auto prepend/append on a server running php4, it did not work, so i changed the code in the .htaccess file to this and woila .. In htaccess: php_value auto_prepend_file /home/path/www/calcon/prep.php php_value auto_append_file /home/path/www/calcon/app.php I m a newbie in php and hopes this will be useful for someone. */
Tests bandwidth with a random string. The size of the random string can be altered. Warning: when the script is set up to generate a large amount of data, your server may crash. <?php /* Bandwidth Tester 0.92 / / Please wait for 1.0 patiently! / // How many bytes to test with. Mimimum=70. 128KB=131072. 1MB=1048576 $testsize = 131072; header ("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); // Date in the past header ("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT"); // always modified header ("Cache-Control: no-cache, must-revalidate"); // HTTP/1.1 header ("Pragma: no-cache"); // HTTP/1.0 header ("X-Notice: "); header ("X-Notice: Bandwidth-Tester is freeware."); header ("X-Notice: You may use it freely on your site."); header ("X-Notice: Just don't remove this notice."); header ("X-Notice: To get the source code, run this script "); header ("X-Notice: with downloadme=1 in the query string."); / How does it work? The script generates a variable amount of random data * sends it to the client and measures the time taken for transmission. The * bandwidth is then calculated from the time using a simple algorithm. * * WARNING: This script can bog down your server - as absolutely NO * optimization was used. * * * This script is best run on the Zend PHP Engine, with Zend Optimizer. * Any improvement in performance is not guaranteed with other * PHP Engines. * * History: * 0.9 - First public release * 0.91 - Reduced the size of the timing code * 0.92 - Reduced the size of the timing code even more * Forecast: * 0.921a - Adding a smaller test before the main to make results more accurate and to adjust test data according to first results * 1.0 - Looking to adding optimization code * 1.1 - Adding template support * 1.2 - Adding web-based administration / if($downloadme==1){ echo "<html><body>"; show_source($SCRIPT_FILENAME); echo "</body></html>"; } else { // First, initialize the test comment // seed random srand ((double) microtime() 1000000); if($testsize<70) {die("<script>alert('The test string size is less than 70. Cannot test.')</script>"); } $realtestsize = $testsize - 70; function GetTestString($drealtestsize){ $duhteststring = "<!"."--"; for($i=0;$i<$drealtestsize; $i++){ $duhteststring .= generatekeycode(); } $duhteststring .= "-"."->"; return $duhteststring; } function CalculateBandwidth($Ditt,$Dott){ $Datasize=$Dott; $LS=$Datasize/$Ditt; $kbps=(($LS8)101.02)/10; $mbps=$kbps/1024; if($mbps>=1){$speed=$mbps." Mbps aka ".$kbps." Kbps";} else {$speed=$kbps." Kbps aka ".$mbps." Mbps";} $speed .="<br>Time taken to test connection: ".(($Ditt1024)/1000)." Seconds <br>A number used to determine your speed: ".$LS."<br>Another number used to determine your speed: ".$Ditt."<br>Tested your connection with ".$Datasize."Bytes/".($Datasize/1024)."KB/".($Datasize/1048576)."MB of random data<br>"; return $speed; } function generatekeycode(){ // srand ((double) microtime() * 1000000); // Made the randomizer a little more "random"! :) srand ((double) microtime() * rand(100000,1000000) / rand(1,15)); $tester = rand(33,255); if($tester==45)return generatekeycode(); return chr($tester); } ?><html> <head><title>Bandwidth Tester</title></head> <body><?php if($HTTP_SERVER_VARS["REQUEST_METHOD"]=="GET" && $HTTP_GET_VARS["execute"]!="1"){ echo('<form action="'.$HTTP_SERVER_VARS["SCRIPT_NAME"].'" method="GET"> <input type="submit" value="Click Here To Begin Testing" onClick="this.value=\'Please wait while your request is being processed, it may take a while\'"> <input type="hidden" name="execute" value="1"> <input type="hidden" name="DO.NOT.CACHE" value="'.rand(255,65536).'"> </form>');} elseif($HTTP_GET_VARS["execute"]=="1"){ $teststring=GetTestString($realtestsize);echo('<form method="POST" action="'.$HTTP_SERVER_VARS["SCRIPT_NAME"].'"> <input type="hidden" name="td" value="No Test"> <input type="button" value="Please wait while your request is being processed, it may take a while"> </form> <script language="JavaScript"> var Hi = new Date(); </script>'.$teststring.'<script language="JavaScript"> var Bye = new Date(); var NiHao = new Array(Hi.getTime(),Bye.getTime()); var Factor=1024; if(NiHao[1]==NiHao[0]) Ditt=0; else Ditt=(NiHao[1]-NiHao[0])/Factor; document.forms[0].elements[0].value=Ditt; document.forms[0].submit(); </script><p>Tested. Now processing your request....</p>');} elseif($HTTP_SERVER_VARS["REQUEST_METHOD"]=="POST"&&$HTTP_POST_VARS["td"]>0){ echo('<p>We have tested your Internet connection.<br> The speed to which you connected to us is '.CalculateBandwidth($HTTP_POST_VARS["td"],$testsize).' Thank you!<br> <a href="?downloadme=1">Would you like one of these on your site? Click here.</a> </p>');} elseif($HTTP_SERVER_VARS["REQUEST_METHOD"]=="POST"&&$HTTP_POST_VARS["td"]==0){ echo('<p>We were unable to test your connection speed.<br>It was too fast to measure.<br> <a href="'.$HTTP_SERVER_VARS["SCRIPT_NAME"].'?execute=1&DO.NOT.CACHE='.rand(255,65536).'" onClick="this.innerText=\'The system is now generating the random test data to benchmark your connection speed. It will take a while.\'">If you would like to try testing again, click here.</a></p> <p>'.CalculateBandwidth($HTTP_POST_VARS["td"],$testsize).'</p>'); } ?> </body> </html><?php } ?>
Simple bbcode validating function <? //BBCode handler $bbend=array(); //replacement array $smilie_url=URL.'img/bbcode/smilies/'; $bb_stag=array( '[]', '[b]','[/b]', '[i]','[/i]', '[u]','[/u]', '[/original]','[/align]','[/list]','[/nlist]','[/quote]','[/code]','[/color]','[/size]', ':lol:',':wink:',':roll:',':oops:',':idea:', ':\|',':)',':(',':o',':x','8)',':?' ); $bb_srep=array( '<li>', '<strong>','</strong>', '<em>','</em>', '<span style="text-decoration:underline">','</span>', '</div>','</div>','</ul>','</ol>','</div>','</div>','</span>','</span>', '<img src="'.$smilie_url.'neutral.gif" alt="Neutral"/>', '<img src="'.$smilie_url.'smile.gif" alt="Smile"/>', '<img src="'.$smilie_url.'sad.gif" alt="Sad"/>', '<img src="'.$smilie_url.'surprised.gif" alt="Surprised"/>', '<img src="'.$smilie_url.'mad.gif" alt="Mad"/>', '<img src="'.$smilie_url.'cool.gif" alt="Cool"/>', '<img src="'.$smilie_url.'confused.gif" alt="Confused"/>', '<img src="'.$smilie_url.'lol.gif" alt="Laughing"/>', '<img src="'.$smilie_url.'wink.gif" alt="Wink"/>', '<img src="'.$smilie_url.'rolleyes.gif" alt="Roll eyes"/>', '<img src="'.$smilie_url.'redface.gif" alt="Red face"/>', '<img src="'.$smilie_url.'idea.gif" alt="Idea"/>' ); $bb_ptag=array( '/\[img\](.+?)\[\/img\]/s', '/\[url\](.+?)\[\/url\]/s', '/\[url\=(.+?)\](.+?)\[\/url\]/s', '/\[align\=(left\|center\|right\|justify)]/', '/\[quote\]/', '/\[quote\=(.+?)\]/', '/\[code\]/', '/\[original\=(.+?)\]/', '/\[color\=(.+?)\]/', '/\[size\=(.+?)\]/', '/\[list\]/', '/\[nlist\]/' ); $bb_prep=array( '<img src="$1" alt="Image"/>', '<a href="$1">$1</a>', '<a href="$1">$2</a>', '<div align="$1">', '<div class="quote"><div class="quote_t">Quote</div>', '<div class="quote"><div class="quote_t">Quote <span class="quote_st">$1</span></div>', '<div class="code"><div class="code_t">Code</div>', '<div class="ori"><div class="ori_t">Original message from $1</div>', '<span style="color:$1">', '<span style="font-size:$1%">', '<ul>', '<ol>' ); function bbcoder_safe($str) { global $bbend; $bbend=array(); //reset $str=trim($str); //clear spaces //valid start end tag $buf=preg_replace_callback("/\[(.?)\]/",'bbcoder_close',$str); $c=$p=''; while ($p=array_pop($bbend)) $c.='[/'.$p.']'; $buf.=$c; return $buf; } function bbcoder_close($tag) { global $bbend; $stok=array('*'); $t=explode('=',$tag[1]); $n=strtolower(trim($t[0])); //tag $p=strtolower(trim($t[1])); //param if ($p) $p='='.$p; //single tag if (in_array($n,$stok)) return '['.$n.$p.']'; //block tag if ($n[0]!='/') { array_push($bbend,$n); return '['.$n.$p.']'; } //open else { //close $n=ltrim($n,'/'); if (in_array($n,$bbend)) { $c=$t=''; while ($t!=$n) { $t=array_pop($bbend); $c.='[/'.$t.']'; } return $c; } else return '[/'.$n.']'; } return ''; } function bbcoder_parse($str) { global $bb_stag,$bb_srep,$bb_ptag,$bb_prep; $str=nl2br(htmlentities($str)); $str=str_replace($bb_stag,$bb_srep,$str); $str = preg_replace($bb_ptag,$bb_prep,$str); return $str; } ?>
Utility Class with some useful functions to populate and retrieve values of JavaBean-like objects. Inspired be Jakarta Commons BeanUtils (http://jakarta.apache.org) <?php /** * Utility Class with some useful functions to populate and retrieve values of JavaBean-like objects. * Inspired be Jakarta Commons BeanUtils (http://jakarta.apache.org) * Requires php5 (Reflection-Api) * @author Daniel Knapp (zend@knappes.de) * @version 0.1 / class BeanUtils{ /* * Copies properties from one object to another. * Objects have to include valid Java-style Getter-/Setter-Methods * @param $toCopyFrom the object to copy from * @param $toCopyTo the object to copy to / public static function copyProperties($toCopyFrom, $toCopyTo){ $classF = new ReflectionClass(get_class($toCopyFrom)); $classT = new ReflectionClass(get_class($toCopyTo)); $methods = $classF->getMethods(); foreach($methods as $method){ $mName = $method->getName(); if($method->isPublic() && strpos($mName,"get") === 0){ try{ $methodToInv = $classT->getMethod("set".substr($mName,3)); if($methodToInv != null && $methodToInv->isPublic()){ $val = $method->invoke($toCopyFrom); $methodToInv->invoke($toCopyTo,$val); } } catch (ReflectionException $e) { /noop, depends on intended bahaviour / } } } } /** * Returns the property's value of the surpassed bean * Objects have to include valid Java-style Getter-/Setter-Methods * @param $bean the object * @param $property the property's name ("getName" would be "name") * @return the property's value or null if no such property / public static function getProperty($bean,$property){ try{ $clazz = new ReflectionClass(get_class($bean)); $methodToInv = $clazz->getMethod("get".ucfirst($property)); if($methodToInv != null && $methodToInv->isPublic()) return $methodToInv->invoke($bean); else return null; } catch (ReflectionException $e) { return null; } } /* * Populates a new instance of the given Class-Type with values from * the given paramMap (e.g. RequestParams, Associative ResultSets) * Objects have to include valid Java-style Getter-/Setter-Methods * @param $paramMap associative array (RequestParams, one row of an associative ResultSet...) * @param $className the className * @return an instance of the class with values from $paramMap / public static function populate($paramMap, $className){ return self::populateExcl($paramMap, $className, null); } /* * Populates a new instance of the given Class-Type with values from * the given paramMap (e.g. RequestParams, Associative ResultSets) * Excludes Params surpassed via $excludedProps * Objects have to include valid Java-style Getter-/Setter-Methods * @param $paramMap associative array (RequestParams, one row of an associative ResultSet...) * @param $className the className * @param $excludedProps array with property names to exclude * @return an instance of the class with values from $paramMap / public static function populateExcl($paramMap, $className, $excludedProps ){ $class = new ReflectionClass( $className ); $object = $class->newInstance(); $map = array(); $map = $paramMap; foreach(array_keys($map) as $key){ if($excludedProps == null \|\| !in_array($key,$excludedProps)){ try{ $method = $class->getMethod("set".ucfirst($key)); if($method != null && $method->isPublic()){ $method->invoke($object,$map[$key]); } } catch (ReflectionException $e) { /noop/ } } } return $object; } /** * Populates a Map (associative array) of new instances of the * given Class-Type with values from * the given paramMap (e.g. RequestParams, Associative ResultSets) * Objects have to include valid Java-style Getter-/Setter-Methods * @param $paramMap associative array (RequestParams, multiple rows of an associative ResultSet...) * @param $className the className * @return an array of instances of the class with values from $paramMap / public static function populateCollection($paramMapCollection, $className){ return self::populateCollectionExcl($paramMapCollection, $className, null); } /* * Populates a Map (associative array) of new instances of the * given Class-Type with values from * the given paramMap (e.g. RequestParams, Associative ResultSets) * Excludes Params surpassed via $excludedProps * Objects have to include valid Java-style Getter-/Setter-Methods * @param $paramMap associative array (RequestParams, multiple rows of an associative ResultSet...) * @param $className the className * @param $excludedProps array with property names to exclude * @return an array of instances of the class with values from $paramMap / public static function populateCollectionExcl($paramMapCollection, $className, $excludedProps){ $retvals = array(); foreach ($paramMapCollection as $paramMap ) { $retvals[] = self::populateExcl($paramMap, $className, $excludedProps); } return $retvals; } /* * Exports object-Members to an associative array * Excludes Params surpassed via $excludedProps * Objects have to include valid Java-style Getter-/Setter-Methods * @param $object the object to export * @param $excludedProps array with property names to exclude * @return an associative array with property-names as keys and property-values as values / public static function toArrayExcl($object,$excludedProps){ $classF = new ReflectionClass(get_class($object)); $methods = $classF->getMethods(); $retVals = array(); foreach($methods as $method){ $mName = $method->getName(); if($excludedProps == null \|\| !in_array(strtolower(substr($mName,3,1)).substr($mName,4),$excludedProps)){ if($method->isPublic() && strpos($mName,"get") === 0){ $val = $method->invoke($object); $retVals[strtolower(substr($mName,3,1)).substr($mName,4)] = $val; } } } return $retVals; } /* * Exports object-Members to an associative array * Objects have to include valid Java-style Getter-/Setter-Methods * @param $object the object to export * @return an associative array with property-names as keys and property-values as values */ public static function toArray($object){ return self::toArrayExcl($object, null); } } ?>
A function that check best before dates on links to local files. Add new's flash or mark the link red on new files. Send a mail to the creator if the file are old. Check updates on your webcam and display a messgage if you are out of office. <?PHP // DOCTYPE PHP3 PUBLIC "-//www.php.org// PHP vers. 3 //EN"> // TITLE =" Best_Before_link " // Generator =" EditPlus " // Author =" Sven-Erik Tiberg <set@dc.luth.se> " // Keywords ="" // Description ="" // Version =" 0.2 " // Rev. Date =" 3 sept. 2000 " // Rev. sign. =" set " // Included/required files ="" Function Best_Before( $label, $file , $nf_days=60 , $new_mode="NEW" , $show_old=1 , $mailto_adr="" , $alt_txt="", $nf_hour=1 ){ ############################################### # Def of parrameters # $label label of link %s # $file linked file or page %s # $nf_days News flash time in days %i # $nf_hours News flash time in hours %i # $new_mode Mode of annoncing age of file. %s # "NEW" New image after link # "FLASH" Flashing New image # "RED" Red text on link while new. # "IMG" Display image # $show_old Dipsplay link after expired time b # $mailto_adr mail to adress %s # $alt_txt alternative text %s ############################################### # Rev. history # 1.2 # added timestamp dd month yyyy to new files # check for relative files # if $file != http://... then continue with best before procedure # else link direct to $file $new_mode=strtoupper( $new_mode ); if ( !strstr( $file, "http://" ) ) { setlocale ("LC_TIME","se"); # get date of file $basedir="..\\webroot\\"; $handle=opendir($basedir); $file_mod_time=filemtime($file); closedir($handle); # add $nf_days to modification date of $file $time_base = 126060; $file_new_time= $file_mod_time + $nf_days * $time_base + $nf_hours * 60*60; # if calculated best before date are older than todays date if not $new_mode=""; if ( $file_new_time <= time() ) { # send mail to $mailto_adr if ( $mailto_adr!="" ) { $update = " Please Update webpage:".$file."\n" ; $from = "From: webmaster@dc.luth.se\n"; $reply = "Reply-To: webmaster@dc.luth.se\n"; $x_Mailer = "X-Mailer: PHP ".phpversion()."\n"; Mail( $mailto_adr , $update, $update."It's out of date" , $from . $reply . $x_Mailer ); } if ( $show_old ) { $new_mode=""; } else { $new_mode="HIDE"; } } else {} } else { $new_mode=""; } switch( $new_mode ) { case "NEW": echo ("<A href=\"". $file."\" >".$label."</A>"); echo ("<A img src=\"file:/images/new.gif\" width=\"22\" height=\"22\" alt=\"".$alt_txt."></A>"); echo (" Updated ".strftime("%d %b %Y",$file_mod_time) ); break; case "FLASH": echo ("<A href=". $file." >".$label."</A>"); echo ("<A img src=\"file:/images/flash.gif\" width=\"22\" height=\"22\" alt=\"".$alt_txt."></A>"); echo (" Updated ".strftime("%d %b %Y",$file_mod_time) ); break; case "RED": echo ("<A href=". $file." ><font color=\"#FF0033\">".$label." </font></A>"); break; case "IMG": echo ("<img src=\"file:".$file."\">"); break; case "HIDE": echo ("Link to". $label." inactive or out of date. Last updated ".strftime("%d %b %Y",$file_mod_time)); break; default: echo ("<A href=". $file.">".$label."</A>"); } } ?>
A function that check best before dates on links to local files. Add new's flash or mark the link red on new files. Send a mail to the creator if the file are old. Check updates on your webcam and display a messgage if you are out of office. <?PHP // DOCTYPE PHP3 PUBLIC "-//www.php.org// PHP vers. 3 //EN"> // TITLE =" Best_Before_link " // Generator =" EditPlus " // Author =" Sven-Erik Tiberg <set@dc.luth.se> " // Keywords ="" // Description ="" // Version =" 0.2 " // Rev. Date =" 3 sept. 2000 " // Rev. sign. =" set " // Included/required files ="" Function Best_Before( $label, $file , $nf_days=60 , $new_mode="NEW" , $show_old=1 , $mailto_adr="" , $alt_txt="", $nf_hour=1 ){ ############################################### # Def of parrameters # $label label of link %s # $file linked file or page %s # $nf_days News flash time in days %i # $nf_hours News flash time in hours %i # $new_mode Mode of annoncing age of file. %s # "NEW" New image after link # "FLASH" Flashing New image # "RED" Red text on link while new. # "IMG" Display image # $show_old Dipsplay link after expired time b # $mailto_adr mail to adress %s # $alt_txt alternative text %s ############################################### # Rev. history # 1.2 # added timestamp dd month yyyy to new files # check for relative files # if $file != http://... then continue with best before procedure # else link direct to $file $new_mode=strtoupper( $new_mode ); if ( !strstr( $file, "http://" ) ) { setlocale ("LC_TIME","se"); # get date of file $basedir="..\\webroot\\"; $handle=opendir($basedir); $file_mod_time=filemtime($file); closedir($handle); # add $nf_days to modification date of $file $time_base = 126060; $file_new_time= $file_mod_time + $nf_days * $time_base + $nf_hours * 60*60; # if calculated best before date are older than todays date if not $new_mode=""; if ( $file_new_time <= time() ) { # send mail to $mailto_adr if ( $mailto_adr!="" ) { $update = " Please Update webpage:".$file."\n" ; $from = "From: webmaster@dc.luth.se\n"; $reply = "Reply-To: webmaster@dc.luth.se\n"; $x_Mailer = "X-Mailer: PHP ".phpversion()."\n"; Mail( $mailto_adr , $update, $update."It's out of date" , $from . $reply . $x_Mailer ); } if ( $show_old ) { $new_mode=""; } else { $new_mode="HIDE"; } } else {} } else { $new_mode=""; } switch( $new_mode ) { case "NEW": echo ("<A href=\"". $file."\" >".$label."</A>"); echo ("<A img src=\"file:/images/new.gif\" width=\"22\" height=\"22\" alt=\"".$alt_txt."></A>"); echo (" Updated ".strftime("%d %b %Y",$file_mod_time) ); break; case "FLASH": echo ("<A href=". $file." >".$label."</A>"); echo ("<A img src=\"file:/images/flash.gif\" width=\"22\" height=\"22\" alt=\"".$alt_txt."></A>"); echo (" Updated ".strftime("%d %b %Y",$file_mod_time) ); break; case "RED": echo ("<A href=". $file." ><font color=\"#FF0033\">".$label." </font></A>"); break; case "IMG": echo ("<img src=\"file:".$file."\">"); break; case "HIDE": echo ("Link to". $label." inactive or out of date. Last updated ".strftime("%d %b %Y",$file_mod_time)); break; default: echo ("<A href=". $file.">".$label."</A>"); } } ?>
A News-Frontend for the news-section of the german TV reality show "BigBrother". At this time the script is only in german. if someone from outside of germany is interested in an english version, please contact me!! <? /* -------------------------------------------------------------- BigBrother news-script 0.9 \|\| http://www.phpwelt.de Copyright (C) 2000 Mike R bsamen <mtr@phpwelt.de> Diese Software f llt unter die GNU General Public License. -------------------------------------------------------------- -------------------------------------------------------------- Bitte modifizieren Sie nur diesen Teil des Scripts -------------------------------------------------------------- / $font = "Arial"; $hlcolor = "#6666ff"; $hlsize = 3; $desccolor = ""; $descsize = 2; $linktarget = "_blank"; / -------------------------------------------------------------- Ende der Einstellungen -------------------------------------------------------------- */ $file = "http://www.bigbrother-haus.de/news/day.html"; $fpread = fopen($file, 'r'); while(! feof($fpread) ) { $zeile = ltrim(Chop(fgets($fpread, 1024))); if ((strstr($zeile,"</p>")) \|\| (strstr($zeile,"</h1>"))): if (strstr($zeile,"<a href=")): $zeile=str_replace("<h1>","",$zeile); $zeile=str_replace("<p class=\"hotnews\">","",$zeile); $startlink=strpos($zeile,"<"); $stoplink=strpos($zeile,">"); $link=substr($zeile,$startlink,$stoplink-$startlink+1); $link=str_replace("<a href=\"/","<a href=\"http://www.bigbrother-haus.de/",$link); $link=str_replace(">"," target=$linktarget>",$link); $zeile=strip_tags($zeile); echo "<font face=\"$font\" size=\"$hlsize\" color=\"$hlcolor\"><b>$link $zeile</a></b></font><br>"; else: $zeile=strip_tags($zeile); if ($zeile): echo "<font face=\"$font\" size=\"$descsize\" color=\"$desccolor\"><img src=button.gif> $zeile</font><br><br>"; else: echo "<br>"; endif; endif; endif; } fclose($fpread); ?>
If you need to keep track of a lot of on/off toggles, like user settings etc. There is only one easy way to store and manipulate these values: <B>Bitfields</B>. With these functions manipulating bitfields becomes easy. Everything you need is included below. /* Functions for manipulating BITFIELDS * * init_bit( bitfield ); * query_bit( bitfield, bit ); * set_bit( bitfield, bit ); * remove_bit( bitfield, bit ); * toggle_bit( bitfield, bit ); * / / Some handy bitvalues, easy to remember / define( "BIT_0", 0 ); define( "BIT_1", 1 ); define( "BIT_2", 2 ); define( "BIT_3", 4 ); define( "BIT_4", 8 ); define( "BIT_5", 16 ); define( "BIT_6", 32 ); define( "BIT_7", 64 ); define( "BIT_8", 128 ); define( "BIT_9", 256 ); define( "BIT_10", 512 ); define( "BIT_11", 1024 ); define( "BIT_12", 2048 ); define( "BIT_13", 4096 ); define( "BIT_14", 8192 ); define( "BIT_15", 16384 ); define( "BIT_16", 32768 ); define( "BIT_17", 65536 ); define( "BIT_18", 131072 ); define( "BIT_19", 262144 ); define( "BIT_20", 524288 ); define( "BIT_21", 1048576 ); define( "BIT_22", 2097152 ); define( "BIT_23", 4194304 ); define( "BIT_24", 8388608 ); define( "BIT_25", 16777216 ); define( "BIT_26", 33554432 ); define( "BIT_27", 67108864 ); define( "BIT_28", 134217728 ); define( "BIT_29", 268435456 ); define( "BIT_30", 536870912 ); define( "BIT_31", 1073741824 ); / Because of a bug in PHP we need this init function, * it's a workaround for the bug. If you want to know if * this bug has been fixed, check bugs.php.net, bugid: 3176 * So, best is to use this simple init every time you * create a new bitfield variable. / function init_bit( &$bitfield ) { $bitfield = ($bitfield \| 0); } / Return true or false, depending on if the bit is set / function query_bit( $bitfield, $bit ) { return ( $bitfield & $bit ); } / Force a specific bit(pattern) to ON / function set_bit( &$bitfield, $bit ) { $bitfield \|= $bit; } / Force a specific bit(pattern) to be OFF / function remove_bit( &$bitfield, $bit ) { $bitfield &= ~$bit; } / Toggle a bit(pattern), so bits that are on are turned off, and bits that are off are turned on. */ function toggle_bit( &$bitfield, $bit ) { $bitfield ^= $bit; }
Maniac's bit manipulation routines, wrapped into a simple class object.<p>Newbies, think of this class as a kind of array of up to 32 true or false values, squished into a tiny amount of space. <?php /* Constants */ define( "BIT_0", 0 ); define( "BIT_1", 1 ); define( "BIT_2", 2 ); define( "BIT_3", 4 ); define( "BIT_4", 8 ); define( "BIT_5", 16 ); define( "BIT_6", 32 ); define( "BIT_7", 64 ); define( "BIT_8", 128 ); define( "BIT_9", 256 ); define( "BIT_10", 512 ); define( "BIT_11", 1024 ); define( "BIT_12", 2048 ); define( "BIT_13", 4096 ); define( "BIT_14", 8192 ); define( "BIT_15", 16384 ); define( "BIT_16", 32768 ); define( "BIT_17", 65536 ); define( "BIT_18", 131072 ); define( "BIT_19", 262144 ); define( "BIT_20", 524288 ); define( "BIT_21", 1048576 ); define( "BIT_22", 2097152 ); define( "BIT_23", 4194304 ); define( "BIT_24", 8388608 ); define( "BIT_25", 16777216 ); define( "BIT_26", 33554432 ); define( "BIT_27", 67108864 ); define( "BIT_28", 134217728 ); define( "BIT_29", 268435456 ); define( "BIT_30", 536870912 ); define( "BIT_31", 1073741824 ); class CBitField { var $bitfield = 0; function CBitField () { $this -> bitfield = ($this -> bitfield \| 0); } function QueryBit ($bit) { if (($this -> bitfield & $bit) > 0 ) return 1; else return 0; } function SetBit ($bit, $boolean) { if ($boolean == 1) $this -> bitfield \|= $bit; else $this -> bitfield &= ~$bit; } function FlipBit ($bit) { $this -> bitfield ^= $bit; } } ?>
This function will count number of bit who are set to 1 in a integer. function bit_count($num) { return strlen(ereg_replace('0',NULL,decbin($num))); }
Blogsoft is a free blog script that allows you to retrieve your web-log from any web page on the Web with 1 line of javascript. <HTML> <HEAD> <LINK REL="stylesheet" TYPE="text/css" HREF="style.css"> <TITLE>KoRnDragon.net</TITLE> <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1"> <script> ie=document.all?1:0 n=document.layers?1:0 on=0 function scroll(h,s) { if(h > s) { x=h; while(x>s) { x-- menu.height=x } } if(h < s) { x=h; while(s>x) { x++ menu.height=x } } } //menu.height=eval(scrolled)+250 function moveMenu(){ if(on == 1) { if (scrolled) { h=menu.height s=eval(scrolled)+150 scroll(h,s) } } } scrolled=n?"window.pageYOffset":"document.body.scrollTop" if(on) ie?window.onscroll=moveMenu:moveMenu(); </script> </HEAD> <BODY topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" marginheight="0" marginwidth="0" oncontextmenu="return false"> <script> ie=document.all?1:0 n=document.layers?1:0 function getScrolled() { if(pageYOffset) return pageYOffset; else if(document.body && document.body.scrollTop) return document.body.scrollTop; else return 0 } function change_content(obj, pic, show) { if (document.getElementById) { el = document.getElementById(obj) ; } else if (document.all){ el = document.all[obj]; } else if (document.layers) { el = document.layers[obj]; } if(show == 1) { el.innerHTML = "<img src='"+pic+"'>" if (el.style) { if(ie) el.style.top=eval(scrolled) else el.style.top=getScrolled() } else if (el.style) el.pic.top = getScrolled(); } else el.innerHTML = "" } </script> <div style="position:absolute; top:0; left:0; Zindex: 99;" id="pic"></div> <div align="right"> <TABLE WIDTH=714 BORDER=0 CELLPADDING=0 CELLSPACING=0 height="100%"> <TR> <TD COLSPAN=3><IMG SRC="http://www.korndragon.net/images/top_bg.gif" WIDTH=714 HEIGHT=115 ALT=""></TD> </TR> <TR> <TD background="http://www.korndragon.net/images/left_bg.gif" WIDTH=223 HEIGHT="100%" ALT="" align="right" valign="top"> <table id="menu" BORDER=0 CELLPADDING=0 CELLSPACING=0 height="150"> <tr><td height="100%"></td></tr> <tr><td valign="top"> <table> <tr><td> <TABLE WIDTH=129 BORDER=0 CELLPADDING=0 CELLSPACING=0> <TR> <TD COLSPAN=3><IMG SRC="http://www.korndragon.net/images/menu_1.gif" WIDTH=129 HEIGHT=50 ALT=""></TD></TR> <TR> <TD background="http://www.korndragon.net/images/menu_2.gif" WIDTH=11 HEIGHT="100%" ALT=""></TD> <TD background="http://www.korndragon.net/images/menu_3.gif" WIDTH=74 HEIGHT="100%" ALT=""> <center><b><font color="#46464D">Main</font></b><hr></center> <a href="index.php?view=home">Home</a><br> <a href="index.php?view=about.php">About Me</a><br> <a href="index.php?view=portfolio.php">Portfolio</a><br> <br> <center><b><font color="#46464D">Misc</font></b><hr></center> <a href="index.php?view=blogsoft.php">Blogsoft</a><br> <a href="index.php?view=tutorials.php">Tutorials</a><br> <a href="index.php?view=reviews.php">Reviews</a><br> <a href="index.php?view=jokes.php">Jokes</a><br> <a href="index.php?view=stock.php">Stock Photos</a><br> <a href="index.php?view=lyrics.php">Lyrics</a><br> <br> <center><b><font color="#46464D">Shout</font></b><hr></center> <a href="index.php?view=contact.php">Contact</a><br> <a href="index.php?view=tagger.php">Tagger</a><br> <a href="index.php?view=link.php">Link To Me</a><br> </TD> <TD background="http://www.korndragon.net/images/menu_4.gif" WIDTH=44 HEIGHT="100%" ALT=""></TD> </TR> <TR> <TD COLSPAN=3> <IMG SRC="http://www.korndragon.net/images/menu_5.gif" WIDTH=129 HEIGHT=48 ALT=""></TD> </TR> </TABLE> </td> <td width="2"></td> </tr> </table> </td></tr> </table> </TD> <TD BGCOLOR=#55555D height="100%"> <table width="332" height="100%" BORDER=0 CELLPADDING=0 CELLSPACING=0> <tr><td valign="top" align="center"> <TABLE WIDTH=332 BORDER=0 CELLPADDING=0 CELLSPACING=0> <TR> <TD background="http://www.korndragon.net/images/spacer.gif" WIDTH=14 HEIGHT=1 ALT=""></TD> <TD background="http://www.korndragon.net/images/spacer.gif" WIDTH=45 HEIGHT=1 ALT=""></TD> <TD background="http://www.korndragon.net/images/spacer.gif" WIDTH=214 HEIGHT=1 ALT=""></TD> <TD background="http://www.korndragon.net/images/spacer.gif" WIDTH=43 HEIGHT=1 ALT=""></TD> <TD background="http://www.korndragon.net/images/spacer.gif" WIDTH=16 HEIGHT=1 ALT=""></TD> </TR> <TR> <TD COLSPAN=5 background="http://www.korndragon.net/images/content-content_01_1.gif" WIDTH=332 HEIGHT=10 ALT=""></TD> </TR> <TR> <TD COLSPAN=2 background="http://www.korndragon.net/images/content-content_02_2.gif" WIDTH=59 HEIGHT=15 ALT=""></TD> <TD BGCOLOR="#55555D" background="http://www.korndragon.net/images/content-title1_3.gif" WIDTH=214 HEIGHT=15 ALT=""><small><center>Blogsoft!</center></small></TD> <TD COLSPAN=2 background="http://www.korndragon.net/images/content-content_04_4.gif" WIDTH=59 HEIGHT=15 ALT=""></TD> </TR> <TR> <TD COLSPAN=5 background="http://www.korndragon.net/images/content-content_05_5.gif" WIDTH=332 HEIGHT=15 ALT=""></TD> </TR> <TR> <TD background="http://www.korndragon.net/images/content-content_06_6.gif" WIDTH=14 ALT=""></TD> <TD COLSPAN=3 background="http://www.korndragon.net/images/content-content_7.gif" WIDTH=302 ALT=""> <div align="center"><a href="http://www.korndragon.net/blogsoft/blogsoft.zip">Download Blogsoft v1.0</a></div><br> Blogsoft is a web-log script that allows you to retrieve your blog from anywhere on the web with 1 line of javascript code. </TD> <TD background="http://www.korndragon.net/images/content-content_08_8.gif" WIDTH=16 ALT=""></TD> </TR> <TR> <TD COLSPAN=5 background="http://www.korndragon.net/images/content-content_09_9.gif" WIDTH=332 HEIGHT=14 ALT=""></TD> </TR> <TR> <TD COLSPAN=2 ROWSPAN=3 background="http://www.korndragon.net/images/content-content_10_10.gif" WIDTH=59 HEIGHT=53></TD> <TD background="http://www.korndragon.net/images/content-bottom_text_11.gif" WIDTH=214 HEIGHT=14><font size="1"><center>6/3/2002</center></font></TD> <TD COLSPAN=2 ROWSPAN=3 background="http://www.korndragon.net/images/content-content_12_12.gif" WIDTH=59 HEIGHT=53></TD> </TR> <TR> <TD background="http://www.korndragon.net/images/content-content_13_13.gif" WIDTH=214 HEIGHT=24 ALT=""></TD> </TR> <TR> <TD background="http://www.korndragon.net/images/content-title2_14.gif" WIDTH=214 HEIGHT=15 ALT=""><font size="1"><center>Copyright 2002 KoRnDragon.net</center></font></TD> </TR> <TR> <TD COLSPAN=5 background="http://www.korndragon.net/images/content-content_15_15.gif" WIDTH=332 HEIGHT=12 ALT=""></TD> </TR> </TABLE> </td><tr> </table> </TD> <td height="100%" width="159"> <table height="100%" width="159" cellpadding="0" cellspacing="0"><tr> <TD><IMG SRC="http://www.korndragon.net/images/rt.gif" WIDTH=159 HEIGHT=53 ALT=""></TD> </TR> <TR> <TD background="http://www.korndragon.net/images/right_bg.gif" WIDTH=159 HEIGHT="100%" valign="top"><center> <table height="100%" cellpadding="0" cellspacing="0"> <tr> <td width="35" height="100%"></td> <td valign="top" height="100%"><center> <a href="?view=link.php" target="new_window"><img src="http://www.korndragon.net/images/buttons/kdnet-2.gif" border="0" alt="Link To KoRnDragon.net"></a><br> <a href="http://www.atesdesign.com" target="new_window"><img src="http://www.atesdesign.com/layimg/atesdesign2.jpg" border="0" alt="Atesdesign.com"></a><br> <a href="http://www.korndragon.net/korupted/" target="new_window"><img src="http://www.korndragon.net/korupted/buttons/ani-button1.gif" border="0" alt="Korupted"></a><br> <a href="http://www.kumzdezine.cjb.net" title="kumzdezine.cjb.net" target="new_window"><img src="http://www.korndragon.net/images/buttons/kumz.jpg" border="0"></a><br> <a href="http://brilliance.plex.nu" title="Brilliance" target="new_window"><img src="http://www.korndragon.net/images/buttons/brilliance.gif" border="0"></a> <a href="http://ip.trevorj.com:6080/" title="Trevorj" target="new_window"><img src="http://ip.trevorj.com:6080/images/banner_88x31.gif" border="0"></a> <br><br> <br><br> <form action="https://www.paypal.com/cgi-bin/webscr" method="post"> <input type="hidden" name="cmd" value="_xclick"> <input type="hidden" name="business" value="ilwrf_01@hotmail.com"> <input type="image" src="http://images.paypal.com/images/x-click-but04.gif" border="0" name="submit" alt="Make payments with PayPal - it's fast, free and secure!"> <br><br> <a href="http://www.pureguava.com/forums/toplist.php?action=in&topid=5" target="_blank"><img src="http://www.pureguava.com/forums/images/button.gif" border="0"></a> <br><br> <a href="http://www.goldenwebawards.com/officialawardwinner.shtml" target="New_Window"><img src="http://www.goldenwebawards.com/images/webaward2002f.gif" width="104" height="62" border="0"></a> </form> </td> </tr> </table> </TD> </TR> <TR> <TD><IMG SRC="http://www.korndragon.net/images/rb.gif" WIDTH=159 HEIGHT=53 ALT=""></TD> </TR> </table> </td></tr> <TR> <TD COLSPAN=3><IMG SRC="http://www.korndragon.net/images/bottom_bg.gif" WIDTH=714 HEIGHT=73 ALT=""></TD> </TR> </TABLE> </div> </BODY> </HTML>
This code takes in a string of keywords and evaluates the string, turning it into three collections of strings based on the boolean operators in the string. Please send comments on how I can improve the code. I'd love to get some feedback. #!/usr/local/bin/php <? /* BEGIN FUNCTION DEFINITIONS / / This function takes in an array and flushes all null values from the array. It returns the array - all null values. / function flush_alt($alts) { for($idx=0,$max=count($alts); $idx<$max; $idx++) { if ($alts[$idx]!="") { $alts2[]=$alts[$idx]; } } return($alts2); } / This takes in an array and eliminates all duplicate values within the array. / function flush_dupes($package) { for ( $count=0,$top=count($package); $count<$top; $count++ ) { if ($package[$count]!="" && ( $package[$count] != $package[$count+1] ) ) { $pack2[] = $package[$count]; } } return($pack2); } / This function takes in two arrays. It eliminates all the values in the first array from the second array. It then returns the corrected second array. / function rank_arrays ( $array1, $array2 ) { / Takes all of the values in $array1 out of $array2. / for ( $j=0,$max1=count($array1); $j<$max1; $j++ ) { for ( $h=0,$max2=count($array2); $h<$max2; $h++) { if ( ( $array2[$h] == $array1[$j] ) && ( $array1[$j] != "" ) ) { $array2[$h] = ""; } } } $array2 = flush_alt($array2); return($array2); } / END FUNCTION DEFINITIONS / if ( !$keywords ) { $temp=array(); $tpl ="final_search_table"; $temp["session_id"] = "session_id"; $temp["uid"] = "userid"; $temp["error"] = "error"; include "includes/function_PrintPage.php"; PrintPage( $tpl, $temp); exit; } else { $starttime = microtime(); print "keywords = $keywords<br><br>\n"; // Break up $keywords on whitespace. $pieces = split ( "[[:space:]]+", $keywords ); / Intialize three arrays / / $haves has all of the values that must be present / $haves = array(); / $havenots has all of the values that must not be present / $havenots = array(); / $alternates has all of the values that can be present / $alternates = array(); / $entities has all of the individual pieces of the keyword string. This includes both individual words and strings. / $objects = array(); / Initialize the $tmpstring. / $tmpstring=""; / Initialize the $flag. / $flag = ""; / ################################################# This code takes the keyword string passed in and breaks it into objects. It breaks everything into either individual words or strings, if a block of text is quoted within the keyword string. ################################################# / for ( $k=0; $k<count($pieces); $k++ ) { / Check individual words. / if ( ( substr($pieces[$k], -1) != '"' ) && ( substr($pieces[$k], 0, 1) != '"' ) ) { $objects[] = trim($pieces[$k]); } else { / This means that the $piece is either the beginning or the end of a string. So, we'll slurp up the $pieces and stick them together until we get to the end of the string or run out of pieces. / / Make sure the $tmpstring is empty. / $tmpstring = ""; / Add this word to the $tmpstring, starting the $tmpstring. / $tmpstring .= trim ( ereg_replace( '"', " ", $pieces[$k] ) ); / Check for one possible exception to the rule. That there is a single quoted word. / if ( substr(trim($pieces[$k]), -1 ) == '"' ) { / Turn the flag off for future iterations. / $flag = "off"; / Push the $tmpstring onto the $haves array. / $objects[] = trim($tmpstring); / Free the $tmpstring. / unset ( $tmpstring ); / Stop looking for the end of the string and move onto the next word. / continue; } / Otherwise, turn on the flag to indicate no quotes have been found attached to this word in the string. / $flag = "on"; //print "<br>".$pieces[$k]." turned the flag $flag.<br>\n"; / Move on to the next word. / $k++; / Keep reading until the end of the string as long as the $flag is on. / while ( $flag == "on" && ( $k < count( $pieces ) ) ) { / If the word doesn't end in double quotes, append it to the $tmpstring. / if ( substr(trim($pieces[$k]), -1) != '"' ) { / Tack this word onto the current string entity. / $tmpstring .= " $pieces[$k]"; / Move on to the next word. / $k++; continue; } / If the $piece ends in double quotes, strip the double quotes, tack the $piece onto the tail of the string, push the $tmpstring onto the $haves, kill the $tmpstring, turn the $flag "off", and return. / else { $tmpstring .= " ".trim ( ereg_replace( '"', " ", $pieces[$k] ) ); / Push the $tmpstring onto the array of stuff to search for. / $objects[] = trim($tmpstring); / Kill the $tmpstring. / unset ( $tmpstring ); / Turn off the flag to exit the loop. / $flag = "off"; //print "<br>$pieces[$k] turned the flag $flag.<br>\n"; } } } } / ################################################# Objects are now defined. ################################################# / / Now we've got our objects defined. We must now determine the relationships among them. By running through them and picking out key words or symbols. Relationships are determined by the presence of the Boolean keywords "AND", "OR", and "NOT", as well as the operators "+" and "-". / for ( $j=0; $j<count($objects); $j++ ) { / BEGIN CHECKING THE CURRENT OBJECT / / If the object starts in "+" it goes on the haves[]. / if ( substr ( $objects[$j], 0, 1 ) == "+" ) { //echo "echoing $objects[$j]<br>\n"; $haves[] = trim(ereg_replace("^\+", " ", $objects[$j])); } / If the object starts in "-" it goes on the havenots[]. / if ( substr ( $objects[$j], 0, 1 ) == "-" ) { $havenots[] = trim(ereg_replace("^-", " ", $objects[$j])); //$j++; } / END CHECKING THE CURRENT OBJECT / / BEGIN CHECKING THE NEXT OBJECT / if ( $objects[$j+1] == "AND" ) { / Hop onto the "AND". / $j++; if ( ! ereg("^[\+-]", $objects[$j-1]) ) { $haves[] = $objects[$j-1]; } else { / Just hang tight. / } $haves[] = $objects[$j+1]; while ( $objects[$j+2] == "OR" ) { // Hop on top of the OR. $j = $j+2; $haves[] = $objects[$j+1]; } } elseif ( $objects[$j+1] == "NOT") { / Hop on the NOT. / $j++; $alternates[] = $objects[$j-1]; $havenots[] = $objects[$j+1]; while ( $objects[$j+2] == "OR" ) { // Hop on top of the OR. $j = $j+2; $havenots[] = $objects[$j+1]; } } elseif ( $objects[$j+1] == "OR" ) { / Hop onto the OR. / $j++; $alternates[] = $objects[$j-1]; $alternates[] = $objects[$j+1]; } else { / It's just a regular word, throw it on the alternates. / if ( ( substr($objects[$j], 0, 1) != "+" ) && ( substr($objects[$j], 0, 1) != "-" ) && ( $objects[$j-1] != "AND" ) && ( $objects[$j-1] != "NOT" ) ) { $alternates[] = $objects[$j]; } } } / END CHECKING THE NEXT OBJECT / /***** BEGIN FILTER *****/ / Sort the arrays. / sort ( $haves ); sort ( $havenots ); sort ( $alternates ); / End sorting. / / Remove duplicates within each array. / $haves = flush_dupes($haves); $havenots = flush_dupes($havenots); $alternates = flush_dupes($alternates); / End removing duplicates within each array. / / Eliminate all of the duplicated values between the haves and alternates array. / $alternates = rank_arrays ( $haves, $alternates ); $alternates = rank_arrays ( $havenots, $alternates ); $haves = rank_arrays ( $havenots, $haves ); / End eliminating duplicates between arrays. / /***** END FILTER *****/ / Display the results of the search. / print "Search for:<p>\n"; print "<b>Objects:</b><ul>\n"; for($i=0; $i<count($objects); $i++) { print "<li>..$objects[$i]..</li>\n"; } print "</ul>\n\n"; print "<b>Records with:</b><ul>\n"; for($i=0; $i<count($haves); $i++) { print "<li>$haves[$i]</li>\n"; } print "</ul>\n\n"; print "<b>Records without:</b><ul>\n"; for($l=0; $l<count($havenots); $l++) { print "<li>$havenots[$l]</li>\n"; } print "</ul>\n\n"; print "<b>Records that have any of the following:</b>\n<ul>\n"; for($t=0; $t<count($alternates); $t++) { print "<li>$alternates[$t]</li>\n"; } print "</ul>\n\n"; exit; / EOF */ } ?>
Cacher allows you to cache variables (anything that can be put into a variable) for later use. This speeds up loading time, and reduces load on the data source. <? / class.cacher.php -- Class used to cache a variable in serialized form. Written by Serge Stepanov (serge_AT_gfxcafe.com). Feel free to email me with questions. If you find this useful, would be great to hear from you. version 1.0 - Changes: - First release. Notes: - Get() method will only use the first occurrence, after which the loop will be broken. Example: include("class.cacher.php"); $cache = new Cacher; // Get var if not 60 seconds old $variable = $cache->Get("variable_with_id", 60); if (!$variable) { // Cache file expired or is inexistant // Do something to get new data $cache->Set("variable_with_id", $newdata); $variable = $newdata; } echo $variable; / class Cacher { var $cacheDir = "/tmp/"; // Where things are cached to (must have trailing slash!) var $defaultCacheLife = "3600"; // How long to cache something for in seconds, default 1hr / Set($varId, $varValue) -- Creates a file named "cache.VARID.TIMESTAMP" and fills it with the serialized value from $varValue. If a cache file with the same varId exists, Delete() will remove it. / function Set($varId, $varValue) { $this->Delete($varId); // Clean up old caches with same varId $fileHandler = fopen($this->cacheDir . "cache." . $varId . "." . time(), "a"); // Create new file fwrite($fileHandler, serialize($varValue)); // Write serialized data fclose($fileHandler); } / Get($varID, $cacheLife) -- Retrives the value inside a cache file specified by $varID if the expiration time (specified by $cacheLife) is not over. If expired, returns FALSE / function Get($varId, $cacheLife="") { $cacheLife = (!empty($cacheLife)) ? $cacheLife : $this->defaultCacheLife; // Set default cache life /* Loop through the directory looking for cache file / $dirHandler = dir($this->cacheDir); while ($file = $dirHandler->read()) { / Check for cache file with requested varId / if (preg_match("/cache.$varId.[0-9]/", $file)) { $cacheFileName = explode(".", $file); // Cache filename array $cacheFileLife = $cacheFileName[2]; // Cache file creation time $cacheFile = $this->cacheDir . $file; // Full location / Check to see if cache file has expired or not / if ((time() - $cacheFileLife) < $cacheLife) { $fileHandler = fopen($cacheFile, "r"); $varValueResult = fread($fileHandler, filesize($cacheFile)); fclose($fileHandler); return unserialize($varValueResult); // Still good, return unseralized data } else { break; // Cache expired, break loop } } } $dirHandler->close(); return FALSE; // Return false } /* Delete($varId) -- Loops through the cache directory and removes any cache files with the varId specified in $varID **/ function Delete($varId) { $dirHandler = dir($this->cacheDir); while ($file = $dirHandler->read()) { if (preg_match("/cache.$varId.[0-9]/", $file)) { unlink($this->cacheDir . $file); // Delete cache file } } $dirHandler->close(); } } ?>
Totally useless script to caesar shift a given message. <?php /============================================================================= * caeser_shift.php * * Robert Fisher 11/2000 * * Just got sent a stupid little message which looked like it was ROT13-ed, * but it wasn't. It looked like a Caesar shift cypher, so I hacked * together a little script to decode it. It's really rubbish - it mangles * case, removes spaces completely, and it simply /has/ to be the * most useless script on this site. Hurrah! * ==========================================================================/ $msg = "insert your message here"; /* this loop prints all 25 caesar shifts of the message / for ($offset = 0; $offset < 26; $offset++) { echo "<P> shift of $offset : ", rot($msg, $offset); } function get_no($letter, $alphabet) { // crudely return the position in the alphabet of the letter we're given if (!ereg("^[a-zA-Z]$", $letter)) return false; for ($i = 0; $i < sizeof($alphabet); $i++) { if (strtolower($letter) == $alphabet[$i]) break; } return $i; } function rot($msg, $offset) { $from = $to = array(); $msg = explode(" ", trim(chunk_split($msg, 1, " "))); / generate an alphabet / for ($i = ord("a"); $i <= ord("z"); $i++) { $from[] = chr($i); } / join two alphabets together so we can do the Caesar shift / $to = array_merge($from, $from); / go through each letter, building up an array containing the shifted * message / for ($i = 0; $i < sizeof($msg); $i++) { if ($shifted = get_no($msg[$i], $from)) $out[] = $to[$shifted + $offset]; } / squash the shifted message into a string and return it */ return implode("", $out); } ?>
classKurs is a PHP class that lets you grab Bank Indonesia's content of kurs, then put the content on a single file. The grabber can be set as cron job. There is also the function to show the grabbed file in formated html tags, ready to go. <?php /*********************************************** * Class Name : classKurs * * Scripted By : Hermawan Haryanto * * Website : http://hermawan.dmonster.com * * Email : hermawan@dmonster.com * * License : GPL (General Public License) * * Created Date : 09/08/2001 * * Last Update : 11/11/2002 * * Instruction : Read INSTALL * ***********************************************/ class kurs { var $admin; var $file; var $graburl; var $chop; var $choptitle; var $jual = Array (); var $beli = Array (); var $titles = Array (); var $temp; function kurs() { global $conf; $this->admin = $conf["admin"]; $this->file = $conf["file"]; $this->graburl = $conf["graburl"]; $this->chop = $conf["chop"]; $this->choptitle = $conf["choptitle"]; $this->textTitle = $conf["textTitle"]; $this->textKurs = $conf["textKurs"]; $this->textBuy = $conf["textBuy"]; $this->textSell = $conf["textSell"]; } function writeToFile() { $fp = fopen($this->file,"w+"); @fwrite($fp,$this->temp); @fclose($fp); } function grab() { $fp = fopen ($this->graburl,"r"); $fp2 = fopen ($this->graburl,"r"); if (!$fp) { $this->sendAdminError(); exit(); } $this->getKurs ($fp); $this->getTitles ($fp2); $this->formatText(); $this->writeToFile(); } function formatText() { for ($i=0;$i<count($this->titles);$i++) { $this->temp .= $this->titles[$i]."\|".$this->jual[$i]."\|".$this->beli[$i]."\|".time()."\n"; } } function getTitles ($fp) { while(!feof($fp)){ $data = fgets($fp, 4096); if(ereg($this->choptitle,$data,$arr)) $this->titles[] = trim($arr[1]); } } function getKurs($fp) { while(!feof($fp)){ $data = fgets($fp, 4096); if(ereg($this->chop,$data,$arr)){ if ($i%2==0) $this->jual[] = str_replace(",","",trim($arr[1])); else $this->beli[] = str_replace(",","",trim($arr[1])); $i++; } } } function sendAdminError() { $to = $this->admin; $subject = "Kurs::Error"; $message = "Your Homepage\n"; $message.= "Kurs Module (".$_SERVER["SERVER_NAME"].")is generating this Error.\n"; $message.= "Please check!.\n\n"; $message.= "[MalFunction]"; $headers.= "From: Hermawan Haryanto <hermawan@dmonster.com>\r\n"; $headers.= "Reply-To: Hermawan Haryanto <hermawan@haryan.to>\r\n"; $headers.= "X-Mailer: Hermawan Haryanto"; @mail($to,$subject,$message,$headers); } function show() { $fp = @file($this->file); $rtn .= "<table width=100% border=0 cellpadding=0 cellspacing=0><tr><td><table width=100% border=0 cellpadding=2 cellspacing=1 bgcolor=#EEEEEE><tr class=header><td align=center valign=middle>$this->textTitle</td></tr><tr><td align=center valign=middle bgcolor=#FFFFFF><table width=100% border=0 cellspacing=1 cellpadding=2><tr align=center valign=top bgcolor=#CCCCCC class=subtitle><td>$this->textKurs</td><td width=100>$this->textSell</td><td width=100>$this->textBuy</td></tr>"; for ($i=0;$i<count($fp);$i++) { list ($mtu, $jual, $beli, $lastupdate) = explode("\|", $fp[$i]); $rtn .= "<tr align=left valign=top class=body><td>$mtu</td><td>Rp.".number_format($jual,2,",",".")."</td><td>Rp.".number_format($beli,2,",",".")."</td></tr>"; } $rtn .= "</table></td></tr><tr><td align=center valign=middle class=body>Update : ".date("j/n/Y H:i:s",$lastupdate)."</td></tr></table>"; $rtn .= "</td></tr><tr><td align=center>"; $rtn .= "<a href=\"http://www.bi.go.id/bank_indonesia2/moneter/kurs_valuta/default.asp\">Bank Indonesia</a>"; $rtn .= "</td></tr></table>"; return $rtn; } }; $fixpath = dirname(__FILE__); require_once ($fixpath."/ckConfig.php"); $kurs = new kurs($conf); ?>
Show everyone how many times you've been hit by the CodeRed Virus <? /*************************** OpenSource **************************** Created by the http://www.CodeHeadz.net team *********************************************** */ $file = "c:\\Apache\\logs\\error.log"; $fp = fopen($file, "r"); $contents = fread($fp, filesize($file)); fclose($fp); $count = preg_match_all('/(default.ida)/', $contents, $match); ?> <html> <head> <title>CodeRed Hits</title> </head> <body bgcolor="#000000" alink="#FFFFFF" vlink="#FFFFFF" > <center><font face="fixedsys" size="+3" color="#FF0000">CodeRed Hit Count</font> <br> <br> <font face="fixedsys" size="+11" color="#FF0000"><?php echo $count; ?></font></center> <br><br> <font face="fixedsys" size="1" color="#FFFFFF">Visit <a href="http://www.codeheadz.net">www.CodeHeadz.net</a></font> </body> </html>
ContentBuilder is a powerfull news- and article-management system for smaller sites. We call it pluggable CMS, because its possible to add own Modules without changing the running system. The system uses PHP and MySQL for data-processing. It allows you to easily add, delete and modify articles, users and headlines. It features multi-user access levels and multiple file upload. All settings can easily be configured via a web interface. http://www.content-builder.de
This is a down and dirty COPPA age verifier. This function takes 3 args. A birthday, a birthmonth and a birthyear and returns the users actual age if it's good and false if it's non-compliant. Throw this into a general include file and slap it in your library and you won't have to worry if you're letting any kids in. This is an important issue since it's illegal to gather user data if the person is under 13 years old. <? /********************************************************************* Name: coppa_check($day, $month, $year) Author: Jason DeFillippo <jason@mykungfu.com> Description: This is a down and dirty COPPA age verifier. This function takes 3 args. A birthday, a birthmonth and a birthyear and returns the users actual age if it's good and false if it's non-compliant. Throw this into a general include file and slap it in your library and you won't have to worry if you're letting any kids in. This is an important issue since it's illegal to gather user data if the person is under 13 years old. *********************************************************************/ function coppa_check($day, $month, $year){ //check to see if we have a 2 digit year. If so convert it to standard 4 char format if (strlen($year) == 2){$year = "19" . $year;} //First do a check to see if we have a good date $isgood = checkdate($month, $day, $year); //dump it if the date is bad... if ($isgood != 1){ return FALSE; } //do some date to timestamp conversions $birthdate = mktime(0,0,0,$month,$day,$year); $today = time(); //now do them back so we can get some different info. $old_date = getdate($birthdate); $current_date = getdate($today); //error check to make sure the date's not in the future if ($current_date[year] < $year){return FALSE;} //adjust for day of the month and get final age. if ($current_date[yday] >= $old_date[yday]){ $age = $current_date[year] - $year; }else{ $age = ($current_date[year] - $year) -1; } //age range check if ($age < 13 \|\| $age > 120){ return FALSE; } //fallthru and spit back the actual age just for fun. return $age; }//end coppa_check ?>
A class for doing serverstatus-queries against Halflife/Counterstrike servers <? // ******************************************************************************************** // Class CounterStrike // Author : Henrik Schack Jensen (henrik@schack.dk) // // Changelog: // Version 1.01 03/11/2001 Removed ASP style tags // Removed usort warning // Fixed error on empty server // Version 1.00 03/05/2001 Initial (& a bit messy ) release // // A utilityclass (PHP4 only) to do serverstatus-queries against Halflife/Counterstrike servers // // The following functions are available: // // Function getServerInfo(serveraddress,serverport) // Get info about servername,serveraddress,mapname,currentplayers & maxplayers. // // Function getServerPlayers(serveraddress,serverport) // Get info about players currently playing on the server. // Players are sortet by frags. // // Function getServerRules(serveraddress,serverport) // Get info about serverrules/settings. // // All results are returned in membervariables: // // // Demosource is available at http://www.gameserver.dk/ // ******************************************************************************************** // // Function used to sort players by frags // Needs to be defined globally in order for usort to call it // function fragsort ($a, $b) { if ($a["frags"] == $b["frags"]) return 0; if ($a["frags"] > $b["frags"]) { return -1; } else { return 1; } } Class CounterStrike { var $m_playerinfo =""; // Info about players var $m_servervars =""; // Info about the server current map, players etc var $m_serverrules =""; // Serverrules // // Get exact time, used for timeout counting // function timenow() { return doubleval(ereg_replace('^0\.([0-9]) ([0-9])$','\\2.\\1',microtime())); } // // Read raw data from server // function getServerData($command,$serveraddress,$portnumber,$waittime) { $serverdata =""; $serverdatalen=0; if ($waittime< 500) $waittime= 500; if ($waittime>2000) $waittime=2000; $waittime=doubleval($waittime/1000.0); if (!$cssocket=fsockopen("udp://".$serveraddress,$portnumber,$errnr)) { $this->errmsg="No connection"; return ""; } socket_set_blocking($cssocket,true); socket_set_timeout($cssocket,0,500000); fwrite($cssocket,$command,strlen($command)); // Mark $starttime=$this->timenow(); do { $serverdata.=fgetc($cssocket); $serverdatalen++; $socketstatus=socket_get_status($cssocket); if ($this->timenow()>($starttime+$waittime)) { $this->errmsg="Connection timed out"; fclose($cssocket); return ""; } } while ($socketstatus["unread_bytes"] ); fclose($cssocket); return $serverdata; } function getnextstring(&$data) { $temp=""; $counter=0; while (ord($data[$counter++])!=0) $temp.=$data[$counter-1]; $data=substr($data,strlen($temp)+1); return $temp; } function getnextbytevalue(&$data) { $temp=ord($data[0]); $data=substr($data,1); return $temp; } function getnextfragvalue(&$data) { $frags=ord($data[0])+(ord($data[1])<<8)+(ord($data[2])<<16)+(ord($data[3])<<24); if ($frags>=4294967294) $frags-=4294967296; $data=substr($data,4); return $frags; } function getnextplaytime(&$data) { $decnumber=ord($data[0])+(ord($data[1])<<8)+(ord($data[2])<<16)+(ord($data[3])<<24); $binnumber=base_convert($decnumber,10,2); while (strlen($binnumber) < 32) $binnumber="0".$binnumber; $exp=abs(base_convert(substr($binnumber,1,8),2,10))-127; if (substr($binnumber,0,1)=="1") $exp=0-$exp; $man=1;$manadd=0.5; for ($counter=9;$counter<32;$counter++) { if (substr($binnumber,$counter,1)=="1") $man+=$manadd; $manadd=$manadd/2; } $time=round(pow(2,$exp)$man); $playtime=""; if ($time>3600) { $playtime=sprintf("%2dh",$time/3600); } $time%=3600; $playtime=$playtime.sprintf("%2dm",$time/60); $time%=60; $playtime=$playtime.sprintf("%2ds",$time); $data=substr($data,5); return $playtime; } // ******************************************************************* // getServerRules // Read rules/setup from the gameserver into m_serverrules // Return true if successful // ******************************************************************** function getServerRules($serveraddress,$portnumber,$waittime) { $cmd="\xFF\xFF\xFF\xFFrules\x00"; $serverdata=$this->getServerData($cmd,$serveraddress,$portnumber,$waittime) ; // Check length of returned data, if < 5 something went wrong if (strlen($serverdata)<5) return false; // Figure out how many rules there are $rules=(ord($serverdata[5]))+(ord($serverdata[6])256); if ($rules!=0) { // Strip OOB data $serverdata=substr($serverdata,7); for ($i=1;$i<=$rules;$i++) { $rulename =$this->getnextstring($serverdata); $rulevalue =$this->getnextstring($serverdata); $this->m_serverrules[$rulename]=$rulevalue; } return true; } else { return false; } } // ******************************************************************* // getServerinfo // Read information about the gameserver into m_servervars // Serveraddress,servername,current map etc etc // Return true if successful // ****************************************************************** function getServerInfo($serveraddress,$portnumber,$waittime) { $cmd="\xFF\xFF\xFF\xFFinfo\x00"; $serverdata=$this->getServerData($cmd,$serveraddress,$portnumber,$waittime) ; // Check length of returned data, if < 5 something went wrong if (strlen($serverdata)<5) return false; // Strip OOB data $serverdata=substr($serverdata,5); $this->m_servervars["serveraddress"] =$this->getnextstring($serverdata); $this->m_servervars["servername"] =$this->getnextstring($serverdata); $this->m_servervars["mapname"] =$this->getnextstring($serverdata); $this->m_servervars["game"] =$this->getnextstring($serverdata); $this->m_servervars["gamename"] =$this->getnextstring($serverdata); $this->m_servervars["currentplayers"] =$this->getnextbytevalue($serverdata); $this->m_servervars["maxplayers"] =$this->getnextbytevalue($serverdata); return true; } // ****************************************************************** // Get Playerinfo // Read information about the players into m_playerinfo // Name,frags,playtime // Return true if successful // ******************************************************************** function getServerPlayers($serveraddress,$portnumber,$waittime) { // Servercommand $cmd="\xFF\xFF\xFF\xFFplayers\x00"; $serverdata=$this->getServerData($cmd,$serveraddress,$portnumber,$waittime); // Check length of returned data, if < 5 something went wrong if (strlen($serverdata)<5) return false; // Check number of players to read data for $players=ord($serverdata[5]); // Strip OOB data and other stuff $serverdata=substr($serverdata,7); for ($i=1;$i<=$players;$i++) { $playername =htmlspecialchars($this->getnextstring($serverdata)); $frags =$this->getnextfragvalue($serverdata); $playtime =$this->getnextplaytime($serverdata); $this->m_playerinfo[$i] =array("name"=>$playername,"frags"=>$frags,"time"=>$playtime); } // Sort players in fragorder if ($players>1) usort($this->m_playerinfo,"fragsort"); return true; } } ?>
I snagged the US State array posted here, but I needed countries as well. I snagged it as a CSV list at http://www.din.de/gremien/nas/nabd/iso3166ma/codlstp1/db_en.html and wrote a little function to print out the list in array format ;-] <?php $country_array = array('AF'=>'AFGHANISTAN', 'AL'=>'ALBANIA', 'DZ'=>'ALGERIA', 'AS'=>'AMERICAN SAMOA', 'AD'=>'ANDORRA', 'AO'=>'ANGOLA', 'AI'=>'ANGUILLA', 'AQ'=>'ANTARCTICA', 'AG'=>'ANTIGUA AND BARBUDA', 'AR'=>'ARGENTINA', 'AM'=>'ARMENIA', 'AW'=>'ARUBA', 'AU'=>'AUSTRALIA', 'AT'=>'AUSTRIA', 'AZ'=>'AZERBAIJAN', 'BS'=>'BAHAMAS', 'BH'=>'BAHRAIN', 'BD'=>'BANGLADESH', 'BB'=>'BARBADOS', 'BY'=>'BELARUS', 'BE'=>'BELGIUM', 'BZ'=>'BELIZE', 'BJ'=>'BENIN', 'BM'=>'BERMUDA', 'BT'=>'BHUTAN', 'BO'=>'BOLIVIA', 'BA'=>'BOSNIA AND HERZEGOVINA', 'BW'=>'BOTSWANA', 'BV'=>'BOUVET ISLAND', 'BR'=>'BRAZIL', 'IO'=>'BRITISH INDIAN OCEAN TERRITORY', 'BN'=>'BRUNEI DARUSSALAM', 'BG'=>'BULGARIA', 'BF'=>'BURKINA FASO', 'BI'=>'BURUNDI', 'KH'=>'CAMBODIA', 'CM'=>'CAMEROON', 'CA'=>'CANADA', 'CV'=>'CAPE VERDE', 'KY'=>'CAYMAN ISLANDS', 'CF'=>'CENTRAL AFRICAN REPUBLIC', 'TD'=>'CHAD', 'CL'=>'CHILE', 'CN'=>'CHINA', 'CX'=>'CHRISTMAS ISLAND', 'CC'=>'COCOS (KEELING) ISLANDS', 'CO'=>'COLOMBIA', 'KM'=>'COMOROS', 'CG'=>'CONGO', 'CD'=>'CONGO, THE DEMOCRATIC REPUBLIC OF THE', 'CK'=>'COOK ISLANDS', 'CR'=>'COSTA RICA', 'CI'=>'COTE D IVOIRE', 'HR'=>'CROATIA', 'CU'=>'CUBA', 'CY'=>'CYPRUS', 'CZ'=>'CZECH REPUBLIC', 'DK'=>'DENMARK', 'DJ'=>'DJIBOUTI', 'DM'=>'DOMINICA', 'DO'=>'DOMINICAN REPUBLIC', 'TP'=>'EAST TIMOR', 'EC'=>'ECUADOR', 'EG'=>'EGYPT', 'SV'=>'EL SALVADOR', 'GQ'=>'EQUATORIAL GUINEA', 'ER'=>'ERITREA', 'EE'=>'ESTONIA', 'ET'=>'ETHIOPIA', 'FK'=>'FALKLAND ISLANDS (MALVINAS)', 'FO'=>'FAROE ISLANDS', 'FJ'=>'FIJI', 'FI'=>'FINLAND', 'FR'=>'FRANCE', 'GF'=>'FRENCH GUIANA', 'PF'=>'FRENCH POLYNESIA', 'TF'=>'FRENCH SOUTHERN TERRITORIES', 'GA'=>'GABON', 'GM'=>'GAMBIA', 'GE'=>'GEORGIA', 'DE'=>'GERMANY', 'GH'=>'GHANA', 'GI'=>'GIBRALTAR', 'GR'=>'GREECE', 'GL'=>'GREENLAND', 'GD'=>'GRENADA', 'GP'=>'GUADELOUPE', 'GU'=>'GUAM', 'GT'=>'GUATEMALA', 'GN'=>'GUINEA', 'GW'=>'GUINEA-BISSAU', 'GY'=>'GUYANA', 'HT'=>'HAITI', 'HM'=>'HEARD ISLAND AND MCDONALD ISLANDS', 'VA'=>'HOLY SEE (VATICAN CITY STATE)', 'HN'=>'HONDURAS', 'HK'=>'HONG KONG', 'HU'=>'HUNGARY', 'IS'=>'ICELAND', 'IN'=>'INDIA', 'ID'=>'INDONESIA', 'IR'=>'IRAN, ISLAMIC REPUBLIC OF', 'IQ'=>'IRAQ', 'IE'=>'IRELAND', 'IL'=>'ISRAEL', 'IT'=>'ITALY', 'JM'=>'JAMAICA', 'JP'=>'JAPAN', 'JO'=>'JORDAN', 'KZ'=>'KAZAKSTAN', 'KE'=>'KENYA', 'KI'=>'KIRIBATI', 'KP'=>'KOREA DEMOCRATIC PEOPLES REPUBLIC OF', 'KR'=>'KOREA REPUBLIC OF', 'KW'=>'KUWAIT', 'KG'=>'KYRGYZSTAN', 'LA'=>'LAO PEOPLES DEMOCRATIC REPUBLIC', 'LV'=>'LATVIA', 'LB'=>'LEBANON', 'LS'=>'LESOTHO', 'LR'=>'LIBERIA', 'LY'=>'LIBYAN ARAB JAMAHIRIYA', 'LI'=>'LIECHTENSTEIN', 'LT'=>'LITHUANIA', 'LU'=>'LUXEMBOURG', 'MO'=>'MACAU', 'MK'=>'MACEDONIA, THE FORMER YUGOSLAV REPUBLIC OF', 'MG'=>'MADAGASCAR', 'MW'=>'MALAWI', 'MY'=>'MALAYSIA', 'MV'=>'MALDIVES', 'ML'=>'MALI', 'MT'=>'MALTA', 'MH'=>'MARSHALL ISLANDS', 'MQ'=>'MARTINIQUE', 'MR'=>'MAURITANIA', 'MU'=>'MAURITIUS', 'YT'=>'MAYOTTE', 'MX'=>'MEXICO', 'FM'=>'MICRONESIA, FEDERATED STATES OF', 'MD'=>'MOLDOVA, REPUBLIC OF', 'MC'=>'MONACO', 'MN'=>'MONGOLIA', 'MS'=>'MONTSERRAT', 'MA'=>'MOROCCO', 'MZ'=>'MOZAMBIQUE', 'MM'=>'MYANMAR', 'NA'=>'NAMIBIA', 'NR'=>'NAURU', 'NP'=>'NEPAL', 'NL'=>'NETHERLANDS', 'AN'=>'NETHERLANDS ANTILLES', 'NC'=>'NEW CALEDONIA', 'NZ'=>'NEW ZEALAND', 'NI'=>'NICARAGUA', 'NE'=>'NIGER', 'NG'=>'NIGERIA', 'NU'=>'NIUE', 'NF'=>'NORFOLK ISLAND', 'MP'=>'NORTHERN MARIANA ISLANDS', 'NO'=>'NORWAY', 'OM'=>'OMAN', 'PK'=>'PAKISTAN', 'PW'=>'PALAU', 'PS'=>'PALESTINIAN TERRITORY, OCCUPIED', 'PA'=>'PANAMA', 'PG'=>'PAPUA NEW GUINEA', 'PY'=>'PARAGUAY', 'PE'=>'PERU', 'PH'=>'PHILIPPINES', 'PN'=>'PITCAIRN', 'PL'=>'POLAND', 'PT'=>'PORTUGAL', 'PR'=>'PUERTO RICO', 'QA'=>'QATAR', 'RE'=>'REUNION', 'RO'=>'ROMANIA', 'RU'=>'RUSSIAN FEDERATION', 'RW'=>'RWANDA', 'SH'=>'SAINT HELENA', 'KN'=>'SAINT KITTS AND NEVIS', 'LC'=>'SAINT LUCIA', 'PM'=>'SAINT PIERRE AND MIQUELON', 'VC'=>'SAINT VINCENT AND THE GRENADINES', 'WS'=>'SAMOA', 'SM'=>'SAN MARINO', 'ST'=>'SAO TOME AND PRINCIPE', 'SA'=>'SAUDI ARABIA', 'SN'=>'SENEGAL', 'SC'=>'SEYCHELLES', 'SL'=>'SIERRA LEONE', 'SG'=>'SINGAPORE', 'SK'=>'SLOVAKIA', 'SI'=>'SLOVENIA', 'SB'=>'SOLOMON ISLANDS', 'SO'=>'SOMALIA', 'ZA'=>'SOUTH AFRICA', 'GS'=>'SOUTH GEORGIA AND THE SOUTH SANDWICH ISLANDS', 'ES'=>'SPAIN', 'LK'=>'SRI LANKA', 'SD'=>'SUDAN', 'SR'=>'SURINAME', 'SJ'=>'SVALBARD AND JAN MAYEN', 'SZ'=>'SWAZILAND', 'SE'=>'SWEDEN', 'CH'=>'SWITZERLAND', 'SY'=>'SYRIAN ARAB REPUBLIC', 'TW'=>'TAIWAN, PROVINCE OF CHINA', 'TJ'=>'TAJIKISTAN', 'TZ'=>'TANZANIA, UNITED REPUBLIC OF', 'TH'=>'THAILAND', 'TG'=>'TOGO', 'TK'=>'TOKELAU', 'TO'=>'TONGA', 'TT'=>'TRINIDAD AND TOBAGO', 'TN'=>'TUNISIA', 'TR'=>'TURKEY', 'TM'=>'TURKMENISTAN', 'TC'=>'TURKS AND CAICOS ISLANDS', 'TV'=>'TUVALU', 'UG'=>'UGANDA', 'UA'=>'UKRAINE', 'AE'=>'UNITED ARAB EMIRATES', 'GB'=>'UNITED KINGDOM', 'US'=>'UNITED STATES', 'UM'=>'UNITED STATES MINOR OUTLYING ISLANDS', 'UY'=>'URUGUAY', 'UZ'=>'UZBEKISTAN', 'VU'=>'VANUATU', 'VE'=>'VENEZUELA', 'VN'=>'VIET NAM', 'VG'=>'VIRGIN ISLANDS, BRITISH', 'VI'=>'VIRGIN ISLANDS, U.S.', 'WF'=>'WALLIS AND FUTUNA', 'EH'=>'WESTERN SAHARA', 'YE'=>'YEMEN', 'YU'=>'YUGOSLAVIA', 'ZM'=>'ZAMBIA', 'ZW'=>'ZIMBABWE', ); ?>
$argv handling function function getargs() { $argv = $GLOBALS['argv'] ; $args['self'] = array_shift( $argv ) ; while( 0 < sizeof( $argv ) ) { $arg = array_shift( $argv ) ; if( '--' == substr( $arg , 0 , 2 ) ) { $eq = strpos( $arg , '=' ) ; $name = substr( $arg , 2 , $eq - 2 ) ; $val = substr( $arg , $eq + 1 ) ; $args[$name][] = $val ; continue ; } if( '-' == $arg[0] ) { $name = substr( $arg , 1 ) ; if( '-' != $argv[0][0] ) { $val = array_shift( $argv ) ; } else { $val = '' ; } $args[$name][] = $val ; } } return $args ; }
a few simple functions to check the validity of internet hostnames, IP addresses etc. function is_hostname($hostname) { /* Internet hostnames must be made up of "." seperated tokens, each * which must begin with a letter, end with a number or letter, and * contain only digits, letters and hyphens. This function checks for * those conditions and returns false if any of them are not met / $tokens = explode(".", $hostname); for ($error = $j = 0; $j < sizeof($tokens); $j++) { if ((!ereg("^[a-zA-Z]", $tokens[$j])) \|\| ereg("[^a-zA-Z0-9\-]", $tokens[$j]) \|\| (!ereg("[a-zA-Z0-9]$", $tokens[$j]))): $error = 1; break; endif; } return ($error == 0) ? true : false; } function is_mac_address($mac_addr = "0") { / Returns true if the argument is a valid MAC address, false otherwise. * Looks for six colon separated positive hex numbers with values less * than or eqaul to 255 (The +ve check should be redundant, but you * never know.) / $eth_numbers = explode(":", $mac_addr); $ret_code = (sizeof($eth_numbers) == 6) ? true : false; for ($j = 0; $j < sizeof($eth_numbers); $j++) { if (hexdec($eth_numbers[$j]) > 255 \|\| $eth_numbers[$j] < 0 \|\| ereg("[^0-9a-fA-F]", $eth_numbers[$j]) \|\| $eth_numbers[$j] == "" \|\| $ret_code == false): $ret_code = false; break; endif; } return $ret_code; } function is_ip_address($ip_addr = "0") { / Returns true if the argument is a valid IP address, false otherwise. * Looks for four dot separated positive decimal integers less than or * equal to 255 (The +ve check should be redundant, but you never * know.) / $ip_numbers = explode(".", $ip_addr); $ret_code = (sizeof($ip_numbers) == 4) ? true : false; for ($j = 0; $j < sizeof($ip_numbers); $j++) { if ($ip_numbers[$j] > 255 \|\| $ip_numbers[$j] < 0 \|\| ereg('[^0-9]', $ip_numbers[$j]) \|\| $ip_numbers[$j] == "" \|\| $ret_code == false): $ret_code = false; break; endif; } return $ret_code; } function is_device($device = "null") { / Returns true if the argument is a valid Solaris disk device. e.g. * c0t0d0 */ return (ereg("^c[0-9]+t[0-9]+d[0-9]+$", $device)) ? true : false; }
If you have been looking for a databasesolution using locking of the session for the duration of the script, and couldn't find any, here is one. [Database sessionstorage, with locking to prevent simultanious access to the session] Hi all, I have been looking for a databasesolution using locking of the session for the duration of the script, and couldn't find any, so here is my own. I appologize for the long posting beforehand, but the script contains a lot of comments that explain what happens. Since this is my first (but tested) version, you might want to use the debugging-logic. Some notes: - The

php.ComLanka.com PHP Tutorial ,PHP source code, PHP online example