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
This is a Bubble Sort function for sorting an array. It takes two parameters, the array to be sorted, and an integer. If the integer is non-zero, the array output will be sorted in reverse numerical order. The output is the sorted array. Code is a modified (but working) version of BubbleSort v1.0 written by "skizz" found on phpbuilder.net <? #------------------------------------------------------------------- # BubbleSort: # Performs a bubble sort on a give array. # Parameters: # $sort_array - the array to be sorted # $reverse - sorts the array in reverse order if set to non-zero # Output: # Returns the sorted array. #------------------------------------------------------------------- function BubbleSort($sort_array,$reverse) { for ($i = 0; $i < sizeof($sort_array); $i++){ for ($j = $i + 1; $j < sizeof($sort_array); $j++){ if($reverse){ if ($sort_array[$i] < $sort_array[$j]){ $tmp = $sort_array[$i]; $sort_array[$i] = $sort_array[$j]; $sort_array[$j] = $tmp; } }else{ if ($sort_array[$i] > $sort_array[$j]){ $tmp = $sort_array[$i]; $sort_array[$i] = $sort_array[$j]; $sort_array[$j] = $tmp; } } } } return $sort_array; } ?>
Checks validity of Israeli interim ID number (teudat zehut) using algorithm described in http://www.halemo.com/info/idcard (the link in Hebrew). <?php function is_valid_zehut( $zehut ) { /* This function checks validity of Israeli interim ID number (teudat zehut) See http://www.halemo.com/info/idcard for more info (in Hebrew). The script has been thoroughly tested. However, no warranties is given that it ever works. The script is distributed under GPL v2. **** Parameter: $zehut - 9 digits. Use "012345674" to check. Returns: true if number is correct, false otherwise Tested under 4.3.2. Requires PHP 3.0.9 Author: Oleg Sverdlov <info@ols.co.il> OLS Software http://www.ols.co.il / function add10( $num ) { // handles max 999 $d100 = floor($num/100); $num = $num-($d100100); $d10 = floor($num/10); $num = $num-($d1010); return $d100 + $d10 + $num; }; if( strlen($zehut) > 9 ) { return false; } $arrZehut = array(); if( preg_match( '/(\d)(\d)(\d)(\d)(\d)(\d)(\d)(\d)(\d)/', $zehut, $arrZehut ) == 0 ) { // Do not match return false; } $pos = 1; $s = 0; for( $i=1; $i<=9; $i++ ) { $s += add10( $arrZehut[$i] $pos ); $pos = 3-$pos; // pos is 1-2-1-2-1-2-1-2-1 } return (( $s % 10 ) == 0 ); } // end of is_valid_zehut() ?>
Calculates the checkdigit, cdv 10, for either a integer or string value. Cdv10 are often used in account-numbers etc. function cdv10($str) { if (is_string($str)) { for ($i=0;$i<strlen($str); $i++) { $out = $out . Ord(substr($str,$i,1)); } } else $out=$str; // is the length odd or even if ((int)(strlen($out)/2) == (int)((strlen($out)/2)+0.9)) $m=0; else $m=1; // sum the values for each digit, take care of values > 9 for ($i=0;$i<strlen($out); $i++) { $m=($m==1)?2:1; $v=$msubstr($out, $i, 1); if ($v>9) $v=(substr($v, 0, 1)+substr($v, 1, 1)); $sum = $sum + $v; } // what is the check digit?? $cd=(round($sum/10+0.49)10) - $sum; return $cd; }
chopSent is very simplistic script/function intended to limit the character output of a given string and emphasize that the string does indeed continue, however input source is NOT limited, so use your imagination. <?php /* kriek at phpfreaks dot com Keep this block intact please */ function chopSent($varb, $num) { $dNum = intval($num); if (strlen($varb) > $dNum) { $nVarb = substr($varb, 0, $dNum); $nVarb .= '...'; } elseif(strlen($varb) < $dNum) { $nVarb = $varb; } return $nVarb; } // Usage of function $theSent = 'PHP is a widely-used general-purpose scripting language that is especially suited for Web development and can be embedded into HTML'; $theSent = chopSent($theSent, 55); echo $theSent; ?>
Convert IP string (XXX.YYY.WWW.ZZZ) to integer function strtoint($str) { $ip = 0; $tetr = explode(".", $str); for ($i = 0; $i < 4; $i++) { $ip = $ip << 8; $ip += $tetr[$i]; }; return $ip; }
Shows the steps involved in converting a number from a given base to base 10. I wrote the example for a book, but after I was mostly finished it, it seemed too off topic. I hope that someone finds it useful. :) <?php # Show the steps involved in converting a number # from any base (like octal or hex) to base 10 # See below for examples, instructions and copyright function show_convert_to_base_10 ($number, $base) { // If the number contains a decimal component if (strstr ($number, '.')) { // Get the integer and decimal components list ($integer, $decimal) = explode ('.', $number); } else { // The number is an integer $integer = $number; } print "<b>Convert the base $base number $number to a base 10 number:</b><blockquote>"; print "Convert the integer component ($integer) of the number:<blockquote>"; // Compute the value of the integer component // Loop through the integer digit by digit // Reverse the number for easier handling $integer = strrev ($integer); $length = strlen ($integer); for ($pos = 0; $pos < $length; ++$pos) { /* PHP lets you treat strings and numbers like arrays Specify an offset and get the character at that position / $digit = $integer[$pos]; // Handle character values for digits // (for bases greater than 10) if (eregi ('[a-z]', $digit)) { $digit_value = (ord (strtolower ($digit)) - ord ('a')) + 10; $digit = "$digit ($digit_value)"; } else { $digit_value = $digit; } // Multiply the current digit by the radix // raised to the power of the current position $result = $digit_value pow ($base, $pos); print "Multiply the value of the digit at position $pos by the value of the radix ($base) raised to the power of the position ($pos):<br />"; print "$digit * $base<sup>$pos</sup> = $result <br /><br />"; $sums[] = $result; } print '</blockquote>'; if (isset ($decimal)) { print "Convert the decimal component (0.$decimal) of the number:<blockquote>"; // Pad the number with a leading 0 so that we can // start at position 1 $decimal = '0'.$decimal; $length = strlen ($decimal); for ($pos = 1; $pos < $length; ++$pos) { $digit = $decimal[$pos]; // Handle character values for digits // (for bases greater than 10) if (eregi ('[a-z]', $digit)) { $digit_value = (ord (strtolower ($digit)) - ord ('a')) + 10; $digit = "$digit ($digit_value)"; } else { $digit_value = $digit; } // Multiply the current digit by the radix // raised to the power of the current position $result = $digit_value * pow (1/$base, $pos); print "Multiply the value of the digit at position $pos by the value of the 1/radix ($base) raised to the power of the position ($pos):<br />"; print "$digit * 1/$base<sup>$pos</sup> = $result<br /><br />"; $sums[] = $result; } print '</blockquote>'; } $sums = implode (' + ', $sums); eval ("\$base_10_value = $sums;"); print "</blockquote>The value of the base $base number $number in base 10 is $base_10_value. <br />"; print "This number is derived from the sum of the values of the previous operations ($sums). <br /> <br />"; } /* DESCRIPTION ============================================================ show_convert_to_base_10: Shows the steps involved in converting a number from a given base to base 10. I wrote the example for a book, but after I was mostly finished it, it seemed too off topic. I hope that someone finds it useful. :) ============================================================ CREDITS ============================================================ Author: J. A. Greant ( zak@nucleus.com ) Version 1: November 19, 2000 ============================================================ NOTICES ============================================================ If you: Modify this code and want to share your changes :) Find a bug Have other questions or comments Please write: Zak Greant (zak@nucleus.com) ============================================================ USAGE EXAMPLES ============================================================ # Convert a hexadecimal number (base 16) show_convert_to_base_10 ('FF', 16); # Convert a binary number (base 2) show_convert_to_base_10 ('1101001', 2); # Convert a base 36 number show_convert_to_base_10 ('1ab.00z9', 36); ============================================================ COPYRIGHT ============================================================ Copyright (c) 2000 J. A. Greant ( zak@nucleus.com ) All rights reserved. This function is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This function is distributed in the hope that it will be useful,but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this function; if not, write to the: Free Software Foundation, Inc. 59 Temple Place, Suite 330 Boston, MA 02111-1307 USA http://www.gnu.org/ ============================================================ */ ?>
Function that calculates the CRC check sum of the given file. This will help you to write a file download script for EzWeb(a famouse WAP service in Japan). <?php function CheckCRC($fname) { /* This function calculates the CRC checksum of the given file and returns it in chars of lower 16 bits. */ // Check sum table $crctab16 =array( 0x0000, 0x1021, 0x2042, 0x3063, 0x4084, 0x50a5, 0x60c6, 0x70e7, 0x8108, 0x9129, 0xa14a, 0xb16b, 0xc18c, 0xd1ad, 0xe1ce, 0xf1ef, 0x1231, 0x0210, 0x3273, 0x2252, 0x52b5, 0x4294, 0x72f7, 0x62d6, 0x9339, 0x8318, 0xb37b, 0xa35a, 0xd3bd, 0xc39c, 0xf3ff, 0xe3de, 0x2462, 0x3443, 0x0420, 0x1401, 0x64e6, 0x74c7, 0x44a4, 0x5485, 0xa56a, 0xb54b, 0x8528, 0x9509, 0xe5ee, 0xf5cf, 0xc5ac, 0xd58d, 0x3653, 0x2672, 0x1611, 0x0630, 0x76d7, 0x66f6, 0x5695, 0x46b4, 0xb75b, 0xa77a, 0x9719, 0x8738, 0xf7df, 0xe7fe, 0xd79d, 0xc7bc, 0x48c4, 0x58e5, 0x6886, 0x78a7, 0x0840, 0x1861, 0x2802, 0x3823, 0xc9cc, 0xd9ed, 0xe98e, 0xf9af, 0x8948, 0x9969, 0xa90a, 0xb92b, 0x5af5, 0x4ad4, 0x7ab7, 0x6a96, 0x1a71, 0x0a50, 0x3a33, 0x2a12, 0xdbfd, 0xcbdc, 0xfbbf, 0xeb9e, 0x9b79, 0x8b58, 0xbb3b, 0xab1a, 0x6ca6, 0x7c87, 0x4ce4, 0x5cc5, 0x2c22, 0x3c03, 0x0c60, 0x1c41, 0xedae, 0xfd8f, 0xcdec, 0xddcd, 0xad2a, 0xbd0b, 0x8d68, 0x9d49, 0x7e97, 0x6eb6, 0x5ed5, 0x4ef4, 0x3e13, 0x2e32, 0x1e51, 0x0e70, 0xff9f, 0xefbe, 0xdfdd, 0xcffc, 0xbf1b, 0xaf3a, 0x9f59, 0x8f78, 0x9188, 0x81a9, 0xb1ca, 0xa1eb, 0xd10c, 0xc12d, 0xf14e, 0xe16f, 0x1080, 0x00a1, 0x30c2, 0x20e3, 0x5004, 0x4025, 0x7046, 0x6067, 0x83b9, 0x9398, 0xa3fb, 0xb3da, 0xc33d, 0xd31c, 0xe37f, 0xf35e, 0x02b1, 0x1290, 0x22f3, 0x32d2, 0x4235, 0x5214, 0x6277, 0x7256, 0xb5ea, 0xa5cb, 0x95a8, 0x8589, 0xf56e, 0xe54f, 0xd52c, 0xc50d, 0x34e2, 0x24c3, 0x14a0, 0x0481, 0x7466, 0x6447, 0x5424, 0x4405, 0xa7db, 0xb7fa, 0x8799, 0x97b8, 0xe75f, 0xf77e, 0xc71d, 0xd73c, 0x26d3, 0x36f2, 0x0691, 0x16b0, 0x6657, 0x7676, 0x4615, 0x5634, 0xd94c, 0xc96d, 0xf90e, 0xe92f, 0x99c8, 0x89e9, 0xb98a, 0xa9ab, 0x5844, 0x4865, 0x7806, 0x6827, 0x18c0, 0x08e1, 0x3882, 0x28a3, 0xcb7d, 0xdb5c, 0xeb3f, 0xfb1e, 0x8bf9, 0x9bd8, 0xabbb, 0xbb9a, 0x4a75, 0x5a54, 0x6a37, 0x7a16, 0x0af1, 0x1ad0, 0x2ab3, 0x3a92, 0xfd2e, 0xed0f, 0xdd6c, 0xcd4d, 0xbdaa, 0xad8b, 0x9de8, 0x8dc9, 0x7c26, 0x6c07, 0x5c64, 0x4c45, 0x3ca2, 0x2c83, 0x1ce0, 0x0cc1, 0xef1f, 0xff3e, 0xcf5d, 0xdf7c, 0xaf9b, 0xbfba, 0x8fd9, 0x9ff8, 0x6e17, 0x7e36, 0x4e55, 0x5e74, 0x2e93, 0x3eb2, 0x0ed1, 0x1ef0); // calculate the checksum of the file $fp=fopen($fname,"r"); $crc=0xffff; while(1){ $a=fgetc($fp); if(feof($fp)){ break; } $crc = $crctab16[ ( $crc >> 8 ^ ord($a) ) & 0xFF ] ^ ( ($crc << 8) & 0xffff ); } fclose($fp); $h=sprintf("%04x",$crc); list($a,$b)=array(substr($h,0,2),substr($h,2,2)); return chr(intval($a,16)).chr(intval($b,16)); } ?>
Below are two functions I use to create unique ids: The first uses unique_id() and md5(). (I think I copied it from the manual). The second is useful if you want to restrict the unique id to a specific length and character set ( I think I copied it from Core PHP). function get_md5_unique_id(){ mt_srand ((double) microtime() * 1000000); return $unique_id = md5(uniqid(mt_rand(),1)); }// end get_md5_unique_id function get_unique_id($length=32, $pool=""){ // set pool of possible char if($pool == ""){ $pool = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"; $pool .= "abcdefghijklmnopqrstuvwxyz"; $pool .= "0123456789"; }// end if mt_srand ((double) microtime() * 1000000); $unique_id = ""; for ($index = 0; $index < $length; $index++) { $unique_id .= substr($pool, (mt_rand()%(strlen($pool))), 1); }// end for return($unique_id); }// end get_unique_id
This class returns the whois information an checks the availability of at least 250 different top level domains. Also it validates the domains name (Thought have been given to the new IDN special chars). CNO WHOIS informations where returned completely. <? /** * This class checks the availability of a domain and gets the whois data * * @author Sven Wagener <sven.wagener@intertribe.de> * @copyright inDot media * @include Funktion:_include_ / class domain{ var $domain=""; /****************************** * Initializing server variables * array(top level domain,whois_Server,not_found_string or MAX number of CHARS: MAXCHARS:n) */ var $servers=array( array("ac","whois.nic.ac","No match"), array("ac.cn","whois.cnnic.net.cn","no matching record"), array("ac.jp","whois.nic.ad.jp","No match"), array("ac.uk","whois.ja.net","No such domain"), array("ad.jp","whois.nic.ad.jp","No match"), array("adm.br","whois.nic.br","No match"), array("adv.br","whois.nic.br","No match"), array("aero","whois.information.aero","is available"), array("ag","whois.nic.ag","does not exist"), array("agr.br","whois.nic.br","No match"), array("ah.cn","whois.cnnic.net.cn","No entries found"), array("al","whois.ripe.net","No entries found"), array("am","whois.amnic.net","No match"), array("am.br","whois.nic.br","No match"), array("arq.br","whois.nic.br","No match"), array("at","whois.nic.at","nothing found"), array("au","whois.aunic.net","No Data Found"), array("art.br","whois.nic.br","No match"), array("as","whois.nic.as","Domain Not Found"), array("asn.au","whois.aunic.net","No Data Found"), array("ato.br","whois.nic.br","No match"), array("az","whois.ripe.net","no entries found"), array("ba","whois.ripe.net","No match for"), array("be","whois.geektools.com","No such domain"), array("bg","whois.digsys.bg","does not exist"), array("bio.br","whois.nic.br","No match"), array("biz","whois.biz","Not found"), array("bj.cn","whois.cnnic.net.cn","No entries found"), array("bmd.br","whois.nic.br","No match"), array("br","whois.registro.br","No match"), array("by","whois.ripe.net","no entries found"), array("ca","whois.cira.ca","Status: AVAIL"), array("cc","whois.nic.cc","No match"), array("cd","whois.cd","No match"), array("ch","whois.nic.ch","We do not have an entry"), array("cim.br","whois.nic.br","No match"), array("ck","whois.ck-nic.org.ck","No entries found"), array("cl","whois.nic.cl","no existe"), array("cn","whois.cnnic.net.cn","No entries found"), array("cng.br","whois.nic.br","No match"), array("cnt.br","whois.nic.br","No match"), array("com","whois.crsnic.net","No match"), array("com.au","whois.aunic.net","No Data Found"), array("com.br","whois.nic.br","No match"), array("com.cn","whois.cnnic.net.cn","No entries found"), array("com.eg","whois.ripe.net","No entries found"), // array("com.hk","whois.hknic.net.hk","No Match for"), /does not work !!!/ array("com.mx","whois.nic.mx","Nombre del Dominio"), array("com.ru","whois.ripn.ru","No entries found"), array("com.tw","whois.twnic.net","NO MATCH TIP"), array("conf.au","whois.aunic.net","No entries found"), array("co.jp","whois.nic.ad.jp","No match"), array("co.uk","whois.nic.uk","No match for"), array("cq.cn","whois.cnnic.net.cn","No entries found"), array("csiro.au","whois.aunic.net","No Data Found"), array("cx","whois.nic.cx","No match"), array("cy","whois.ripe.net","no entries found"), array("cz","whois.nic.cz","No data found"), array("de","whois.denic.de","No entries found"), array("dk","whois.dk-hostmaster.dk","No entries found"), array("dz","whois.ripe.net","no entries found"), array("ecn.br","whois.nic.br","No match"), array("ee","whois.eenet.ee","NOT FOUND"), // array("edu","whois.verisign-grs.net","No match"), /does not work !!!/ array("edu","whois.crsnic.net","No match"), array("edu.au","whois.aunic.net","No Data Found"), array("edu.br","whois.nic.br","No match"), array("eg","whois.ripe.net","No entries found"), array("es","whois.ripe.net","No entries found"), array("esp.br","whois.nic.br","No match"), array("etc.br","whois.nic.br","No match"), array("eti.br","whois.nic.br","No match"), array("eun.eg","whois.ripe.net","No entries found"), array("emu.id.au","whois.aunic.net","No Data Found"), array("eng.br","whois.nic.br","No match"), array("far.br","whois.nic.br","No match"), array("fi","whois.ripe.net","No entries found"), // array("fj","whois.usp.ac.fj",""), /does not work !!!/ array("fj.cn","whois.cnnic.net.cn","No entries found"), array("fm.br","whois.nic.br","No match"), array("fnd.br","whois.nic.br","No match"), array("fo","whois.ripe.net","no entries found"), array("fot.br","whois.nic.br","No match"), array("fst.br","whois.nic.br","No match"), array("fr","whois.nic.fr","No entries found"), array("gb","whois.ripe.net","No match for"), // array("gb.com","whois.nomination.net","No match for"), /does not work !!!/ // array("gb.net","whois.nomination.net","No match for"), /does not work !!!/ array("g12.br","whois.nic.br","No match"), array("gd.cn","whois.cnnic.net.cn","No entries found"), array("ge","whois.ripe.net","no entries found"), array("ggf.br","whois.nic.br","No match"), array("gl","whois.ripe.net","no entries found"), array("gr","whois.ripe.net","no entries found"), array("gr.jp","whois.nic.ad.jp","No match"), array("gs","whois.adamsnames.tc","is not registered"), /twice gs/ array("gs.cn","whois.cnnic.net.cn","No entries found"), array("gov.au","whois.aunic.net","No Data Found"), array("gov.br","whois.nic.br","No match"), array("gov.cn","whois.cnnic.net.cn","No entries found"), // array("gov.hk","whois.hknic.net.hk","No Match for"), /does not work !!!/ array("gob.mx","whois.nic.mx","Nombre del Dominio"), array("gz.cn","whois.cnnic.net.cn","No entries found"), array("gx.cn","whois.cnnic.net.cn","No entries found"), array("he.cn","whois.cnnic.net.cn","No entries found"), array("ha.cn","whois.cnnic.net.cn","No entries found"), array("hb.cn","whois.cnnic.net.cn","No entries found"), array("hi.cn","whois.cnnic.net.cn","No entries found"), array("hl.cn","whois.cnnic.net.cn","No entries found"), array("hn.cn","whois.cnnic.net.cn","No entries found"), array("hm","whois.registry.hm","(null)"), // array("hk","whois.hknic.net.hk","No Match for"), /does not work !!!/ array("hk.cn","whois.cnnic.net.cn","No entries found"), array("hu","whois.ripe.net","MAXCHARS:500"), array("id.au","whois.aunic.net","No Data Found"), array("ie","whois.domainregistry.ie","no match"), array("ind.br","whois.nic.br","No match"), array("imb.br","whois.nic.br","No match"), array("inf.br","whois.nic.br","No match"), array("info","whois.afilias.info","Not found"), array("info.au","whois.aunic.net","No Data Found"), array("it","whois.nic.it","No entries found"), array("idv.tw","whois.twnic.net","NO MATCH TIP"), array("int","whois.iana.org","not found"), array("is","whois.isnic.is","No entries found"), array("il","whois.isoc.org.il","No data was found"), array("jl.cn","whois.cnnic.net.cn","No entries found"), array("jor.br","whois.nic.br","No match"), array("jp","whois.nic.ad.jp","No match"), array("js.cn","whois.cnnic.net.cn","No entries found"), array("jx.cn","whois.cnnic.net.cn","No entries found"), array("ke","whois.rg.net","No match for"), array("kr","whois.krnic.net","is not registered"), array("la","whois.nic.la","NO MATCH"), array("lel.br","whois.nic.br","No match"), array("li","whois.nic.ch","We do not have an entry"), // array("lk","whois.nic.lk","No domain registered"), /does not work !!!/ array("ln.cn","whois.cnnic.net.cn","No entries found"), array("lt","ns.litnet.lt","No matches found"), array("lu","whois.dns.lu","No entries found"), array("lv","whois.ripe.net","no entries found"), array("ltd.uk","whois.nic.uk","No match for"), array("ma","whois.ripe.net","No entries found"), array("mat.br","whois.nic.br","No match"), array("mc","whois.ripe.net","No entries found"), array("md","whois.ripe.net","No match for"), array("me.uk","whois.nic.uk","No match for"), array("med.br","whois.nic.br","No match"), array("mil","whois.nic.mil","No match"), array("mil.br","whois.nic.br","No match"), array("mk","whois.ripe.net","No match for"), array("mn","whois.nic.mn","Domain not found"), array("mo.cn","whois.cnnic.net.cn","No entries found"), array("ms","whois.adamsnames.tc","is not registered"), array("mt","whois.ripe.net","No Entries found"), array("mus.br","whois.nic.br","No match"), array("mx","whois.nic.mx","Nombre del Dominio"), array("name","whois.nic.name","No match"), array("ne.jp","whois.nic.ad.jp","No match"), array("net","whois.crsnic.net","No match"), array("net.au","whois.aunic.net","No Data Found"), array("net.br","whois.nic.br","No match"), array("net.cn","whois.cnnic.net.cn","No entries found"), array("net.eg","whois.ripe.net","No entries found"), // array("net.hk","whois.hknic.net.hk","No Match for"), /does not work !!!/ array("net.lu","whois.dns.lu","No entries found"), array("net.mx","whois.nic.mx","Nombre del Dominio"), array("net.uk","whois.nic.uk","No match for "), array("net.ru","whois.ripn.ru","No entries found"), array("net.tw","whois.twnic.net","NO MATCH TIP"), array("nl","whois.domain-registry.nl","is not a registered domain"), array("nm.cn","whois.cnnic.net.cn","No entries found"), array("no","whois.norid.no","no matches"), // array("no.com","whois.nomination.net","No match for"), /does not work !!!/ array("nom.br","whois.nic.br","No match"), array("not.br","whois.nic.br","No match"), array("ntr.br","whois.nic.br","No match"), array("nu","whois.nic.nu","NO MATCH for"), array("nx.cn","whois.cnnic.net.cn","No entries found"), array("nz","whois.domainz.net.nz","Not Listed"), array("plc.uk","whois.nic.uk","No match for"), array("odo.br","whois.nic.br","No match"), array("oop.br","whois.nic.br","No match"), array("or.jp","whois.nic.ad.jp","No match"), array("org","whois.pir.org","No match"), array("org.au","whois.aunic.net","No Data Found"), array("org.br","whois.nic.br","No match"), array("org.cn","whois.cnnic.net.cn","No entries found"), // array("org.hk","whois.hknic.net.hk","No Match for"), /does not work !!!/ array("org.lu","whois.dns.lu","No entries found"), array("org.ru","whois.ripn.ru","No entries found"), array("org.tw","whois.twnic.net","NO MATCH TIP"), array("org.uk","whois.nic.uk","No match for"), // array("pk","whois.pknic.net","is not registered"), /does not work !!!/ array("pl","whois.ripe.net","No information about"), array("pp.ru","whois.ripn.ru","No entries found"), array("ppg.br","whois.nic.br","No match"), array("pro.br","whois.nic.br","No match"), array("psi.br","whois.nic.br","No match"), array("psc.br","whois.nic.br","No match"), array("pt","whois.ripe.net","No match for"), array("qh.cn","whois.cnnic.net.cn","No entries found"), array("qsl.br","whois.nic.br","No match"), array("rec.br","whois.nic.br","No match"), array("ro","whois.ripe.net","No entries found"), array("ru","whois.ripn.ru","No entries found"), array("sc.cn","whois.cnnic.net.cn","No entries found"), array("sd.cn","whois.cnnic.net.cn","No entries found"), array("se","whois.nic-se.se","No data found"), // array("se.com","whois.nomination.net","No match for"), /does not work !!!/ // array("se.net","whois.nomination.net","No match for"), /does not work !!!/ array("sg","whois.nic.net.sg","NO entry found"), array("sh","whois.nic.sh","No match for"), array("sh.cn","whois.cnnic.net.cn","No entries found"), array("si","whois.arnes.si","No entries found"), array("sk","whois.ripe.net","no entries found"), array("slg.br","whois.nic.br","No match"), array("sm","whois.ripe.net","no entries found"), array("sn.cn","whois.cnnic.net.cn","No entries found"), array("srv.br","whois.nic.br","No match"), array("st","whois.nic.st","No entries found"), array("su","whois.ripe.net","No entries found"), array("sx.cn","whois.cnnic.net.cn","No entries found"), array("tc","whois.adamsnames.tc","is not registered"), array("th","whois.nic.uk","No entries found"), array("tj.cn","whois.cnnic.net.cn","No entries found"), array("tm","whois.nic.tm","No match for"), array("tn","whois.ripe.net","No entries found"), array("tmp.br","whois.nic.br","No match"), array("to","whois.tonic.to","No match"), array("tr","whois.ripe.net","Not found in database"), array("trd.br","whois.nic.br","No match"), array("tur.br","whois.nic.br","No match"), // array("tv","whois.tv","MAXCHARS:75"), /does not work !!!/ array("tv.br","whois.nic.br","No match"), array("tw","whois.twnic.net","NO MATCH TIP"), array("tw.cn","whois.cnnic.net.cn","No entries found"), array("ua","whois.ripe.net","No entries found"), array("uk","whois.thnic.net","No match for"), // array("uk.com","whois.nomination.net","No match for"), /does not work !!!/ // array("uk.net","whois.nomination.net","No match for"), /does not work !!!/ array("us","whois.nic.us","Not found"), array("va","whois.ripe.net","No entries found"), array("vet.br","whois.nic.br","No match"), array("vg","whois.adamsnames.tc","is not registered"), array("wattle.id.au","whois.aunic.net","No Data Found"), array("ws","whois.worldsite.ws","No match for"), array("xj.cn","whois.cnnic.net.cn","No entries found"), array("xz.cn","whois.cnnic.net.cn","No entries found"), array("yn.cn","whois.cnnic.net.cn","No entries found"), array("yu","whois.ripe.net","No entries found"), // array("za","whois.frd.ac.za","No match for"), /does not work !!!/ array("zlg.br","whois.nic.br","No match"), array("zj.cn","whois.cnnic.net.cn","No entries found") ); var $idn=array(224,225,226,227,228,229,230,231,232,233,234,235,240,236,237,238,239,241,242,243,244,245,246,248,254,249,250,251,252,253,255); // var $idn=array("00E0","00E1","00E2","00E3","00E4","00E5","0101","0103","0105","00E6","00E7","0107","0109","010B","010D","010F","0111","00E8","00E9","00EA","00EB","0113","0115","0117","0119","011B","014B","00F0","011D","011F","0121","0123","0125","0127","00EC","00ED","00EE","00EF","0129","012B","012D","012F","0131","0135","0137","0138","013A","013C","013E","0142","00F1","0144","0146","0148","00F2","00F3","00F4","00F5","00F6","00F8","014D","014F","0151","0153","0155","0157","0159","015B","015D","015F","0161","0163","0165","0167","00FE","00F9","00FA","00FB","00FC","0169","016B","016D","016F","0171","0173","0175","00FD","00FF","0177","017A","017C","017E"); /* * Constructor of class domain * @param string $str_domainame the full name of the domain * @desc Constructor of class domain / function domain($str_domainname){ $this->domain=$str_domainname; } /* * Returns the whois data of the domain * @return string $whoisdata Whois data as string * @desc Returns the whois data of the domain / function info(){ if($this->is_valid()){ $tldname=$this->get_tld(); $domainname=$this->get_domain(); $whois_server=$this->get_whois_server(); // If tldname have been found if($whois_server!=""){ // Getting whois information $fp = fsockopen($whois_server,43); $dom=$domainname.".".$tldname; fputs($fp, "$dom\r\n"); // Getting string $string=""; // Checking whois server for .com and .net if($tldname=="com" \|\| $tldname=="net" \|\| $tldname=="edu"){ while(!feof($fp)){ $line=trim(fgets($fp,128)); $string.=$line; $lineArr=split(":",$line); if(strtolower($lineArr[0])=="whois server"){ $whois_server=trim($lineArr[1]); } } // Getting whois information $fp = fsockopen($whois_server,43); $dom=$domainname.".".$tldname; fputs($fp, "$dom\r\n"); // Getting string $string=""; while(!feof($fp)){ $string.=fgets($fp,128); } // Checking for other tld's }else{ while(!feof($fp)){ $string.=fgets($fp,128); } } fclose($fp); return $string; }else{ return "No whois server for this tld in list!"; } }else{ return "Domainname isn't valid!"; } } /* * Returns the whois data of the domain in HTML format * @return string $whoisdata Whois data as string in HTML * @desc Returns the whois data of the domain in HTML format / function html_info(){ return nl2br($this->info()); } /* * Returns name of the whois server of the tld * @return string $server the whois servers hostname * @desc Returns name of the whois server of the tld / function get_whois_server(){ $found=false; $tldname=$this->get_tld(); for($i=0;$i<count($this->servers);$i++){ if($this->servers[$i][0]==$tldname){ $server=$this->servers[$i][1]; $full_dom=$this->servers[$i][3]; $found=true; } } return $server; } /* * Returns the tld of the domain without domain name * @return string $tldname the tlds name without domain name * @desc Returns the tld of the domain without domain name / function get_tld(){ // Splitting domainname $domain=split("\.",$this->domain); if(count($domain)>2){ $domainname=$domain[0]; for($i=1;$i<count($domain);$i++){ if($i==1){ $tldname=$domain[$i]; }else{ $tldname.=".".$domain[$i]; } } }else{ $domainname=$domain[0]; $tldname=$domain[1]; } return $tldname; } /* * Returns all tlds which are supported by the class * @return array $tlds all tlds as array * @desc Returns all tlds which are supported by the class / function get_tlds(){ $tlds=""; for($i=0;$i<count($this->servers);$i++){ $tlds[$i]=$this->servers[$i][0]; } return $tlds; } /* * Returns the name of the domain without tld * @return string $domain the domains name without tld name * @desc Returns the name of the domain without tld / function get_domain(){ // Splitting domainname $domain=split("\.",$this->domain); return $domain[0]; } /* * Returns the string which will be returned by the whois server of the tld if a domain is avalable * @return string $notfound the string which will be returned by the whois server of the tld if a domain is avalable * @desc Returns the string which will be returned by the whois server of the tld if a domain is avalable / function get_notfound_string(){ $found=false; $tldname=$this->get_tld(); for($i=0;$i<count($this->servers);$i++){ if($this->servers[$i][0]==$tldname){ $notfound=$this->servers[$i][2]; } } return $notfound; } /* * Returns if the domain is available for registering * @return boolean $is_available Returns 1 if domain is available and 0 if domain isn't available * @desc Returns if the domain is available for registering / function is_available(){ $whois_string=$this->info(); // Gets the entire WHOIS query from registrar $not_found_string=$this->get_notfound_string(); // Gets 3rd item from array $domain=$this->domain; // Gets current domain being queried $whois_string2=@ereg_replace("$domain","",$whois_string); $whois_string =@preg_replace("/\s+/"," ",$whois_string); //Replace whitespace with single space $array=split(":",$not_found_string); if($array[0]=="MAXCHARS"){ if(strlen($whois_string2)<=$array[1]){ return true; }else{ return false; } }else{ if(preg_match("/".$not_found_string."/i",$whois_string)){ return true; }else{ return false; } } } function get_cn_server($whois_text){ } /* * Returns if the domain name is valid * @return boolean $is_valid Returns 1 if domain is valid and 0 if domain isn't valid * @desc Returns if the domain name is valid */ function is_valid(){ $domainArr=split("\.",$this->domain); // If it's a tld with two Strings (like co.uk) if(count($domainArr)==3){ $tld=$domainArr[1].".".$domainArr[2]; $found=false; for($i=0;$i<count($this->servers) && $found==false;$i++){ if($this->servers[$i][0]==$tld){ $found=true; } } if(!$found){ return false; } }else if(count($domainArr)>3){ return false; } // Creating regular expression for if($this->get_tld()=="de"){ for($i=0;$i<count($this->idn);$i++){ $idn.=chr($this->idn[$i]); // $idn.="\x".$this->idn[$i].""; } $pattern="^[a-z".$idn."0-9\-]{3,}$"; }else{ $pattern="^[a-z0-9\-]{3,}$"; } if(ereg($pattern,strtolower($this->get_domain())) && !preg_match("/--/",strtolower($this->get_domain()))){ return true; }else{ return false; } } } ?>
This runs as a cron job and notifies the administrator of all the php fatal errors that happened in the last specified time. This is a low-overhead solution to fatal error reporting.... some solutions suggested output buffering each page, running a regex, but that has huge overhead. Others say no production code should ever have fatal errors. However, in my business we maintain many different sites each low budget and testing may not always be efficent. Sometimes a change on one file affects our code in more than one place and we forget to look somewhere and fatal errors happen. This has saved our butt a few times. <?php /** * This class was written because php's custom error handler does NOT * catch PHP Fatal Errors. To me, Fatal Errors are a big deal. So you set * the cron up every 30 min to run this. It checks the error logs you listed * and within the last 30 min if there are any php fatal errors, it parses * them out and emails the specified address. * * This file instantizes itself at the bottom, so all you have to call is this * file in your cron script. * * CONFIGURATION.... * Very Easy, just make sure that your temp location is writable by your * webserver, and make sure your $check_min is set to the same time as your * cron. Every 15 min, 30 min etc. * * Also this script was wrtten with the logformat: * [Sat Mar 18 16:16:13 2006] [error] PHP Fatal error: * * @author Kevin Korb - kevin@pearlmarley.com * @version .2 / Class phpFatal { var $check_min = "30"; var $log_location = "/var/log/httpd/"; var $temp_location = "/library/webserver/CronScripts/temp/phpfatal.txt"; var $logs_array = array("qpd_error_log", "grmc_error_log", "henrycounty_error_log", "foodguru_error_log", "kirby_error_log", "meddev_error_log", "blackdiamond_error_log", "espebe_error_log", "aroundtown_error_log"); var $email = "you@yourdomain.com"; var $error_log; var $output; var $total_output; var $from_email = "Fatal Error Reporter <yourserver@yourdomain.com>\n\r"; function phpFatal() { foreach ($this->logs_array AS $log) { $this->error_log = $log; $this->grep_log_to_temp(); $this->parse_file_for_results(); if($this->output != '') { $this->total_output .= "############# {$this->error_log} #############\n\n"; $this->total_output .= $this->output; } } if($this->total_output != '') { mail($this->email, "Fatal Errors Found", $this->total_output, "From: {$this->from_email}"); } } function grep_log_to_temp() { system("grep 'PHP Fatal error' {$this->log_location}{$this->error_log} >> {$this->temp_location}"); } function parse_file_for_results() { $this->output = ''; $file = fopen($this->temp_location , 'r'); while (!feof($file)) { $line = fgets($file, 4096); if($this->check_timestamp($line) == true) { $this->output .= $line."\n"; } } fclose($file); @unlink($this->temp_location); } function check_timestamp($line) { $current_time = time(); $month_name = substr($line,5,3); $month = $this->month_name_to_number($month_name); $day = substr($line,9,2); $hour = substr($line,12,2); $min = substr($line, 15,2); $sec = substr($line, 18,2); $year = substr($line, 21,4); echo "year = {$year}\n"; $this_timestamp = mktime($hour, $min, $sec, $month, $day, $year); $seconds_difference = $this->check_min 60; if(($current_time - $this_timestamp) <= $seconds_difference) { return true; } else { return false; } } function month_name_to_number($month) { switch ($month) { case "Jan": return '1'; break; case "Feb": return '2'; break; case "Mar": return '3'; break; case 'Apr': return '4'; break; case 'May': return '5'; break; case 'Jun': return '6'; break; case 'Jul': return '7'; break; case 'Aug': return '8'; break; case 'Sep': return '9'; break; case 'Oct'; return '10'; break; case 'Nov': return '10'; break; case 'Dec': return '12'; break; } } } $phpFatal = new phpFatal; ?>
Just a quick fuzzy logic algorithm I whipped up out of some C code for a project I am working on. ####################################################################### # fuzzy logic - Joel De Gan # basic fuzzy logic.. # extends out our boolean logic further... # # truth(not x) = 1.0 - truth(x) # truth(x and y) = minimum (truth(x), truth(y)) # truth(x or y) = maximum (truth(x), truth(y)) # uncomment below to test. /* $fz1 = 0.5; // 0.5 start $fz2 = fuzz(fuzz($fz1, 0.4, "&") , fuzz(0.45, "", "\|"), "&");// 0.45 $fz3 = fuzz(fuzz($fz2, $fz2, "!"), $fz2, "\|");// 0.55 $fz4 = fuzz(fuzz($fz1, $fz1, "!"), $fz2, "-"); // 0.95 $bl5 = fuzz ($fz3, $fz2); // false $bl6 = fuzz ($fz2, $fz3);// true echo "fz1 = " .$fz1 . "<br>"; echo "fz2 = " .$fz2 . "<br>"; echo "fz3 = " .$fz3 . "<br>"; echo "fz4 = " .$fz4 . "<br>"; echo "bl5 = " . (($bl5) ? "true" : "false") ."<br>"; echo "bl6 = " . (($bl6) ? "true" : "false"); / function fuzmin($a, $b){ return (($a < $b) ? $a : $b); }// end function function fuzmax($a, $b){ return (($a > $b) ? $a : $b); }// end function function fuzz($a, $b=0, $op=""){ switch ($op){ case "\|": return ($a > $b) ? $a : $b; break; case "&": return ($a < $b) ? $a : $b; break; case "!": return 1 - $a; break; case "+": return $a+$b; break; case "-": return $a-$b; case "": return $a*$b; case "/": return $a/$b; default : return ($a <= $b); }//case }//function #######################################################################
easy function to convert hexdata to bindata. It's very good to use decode mcrypt hexdata. function hex2bin($source) { $strlen = strlen($source); for ($i=0;$i<strlen($source);$i=$i+2) { $bin .= chr(hexdec(substr ($source, $i,2))); } return $bin; }
Convert integer to IP (XXX.YYY.WWW.ZZZ)string function inttostr($ip) { $str = ""; for ($i = 0; $i < 4; $i++) { if ($i) $str = "." . $str; $str = ($ip & 0x000000FF) . $str; $ip = $ip >> 8; }; return $str; };
Computes the shortest distance between 2 points (locations) on the earth surface given the Latitude/Longitude. <?php function calcMiles($lat1, $lon1, $lat2, $lon2) { $deg2mile = 69.09; //for earth $temp1 = cos(deg2rad($lat1)); $temp2 = cos(deg2rad($lat2)); $dist = sqrt( $temp1 * $temp2 * pow($lon1 - $lon2 , 2) + pow($lat1 - $lat2, 2) ); $miles = $dist * $deg2mile; $miles = sprintf("%0.2f",$miles); return $miles; } ?>
this class i made when i learning data structure and algorithm . linked list usually made from compiled programming language or programming language that have Pointer. but i try to make linkedlist using PHP nothing diference . this class implements single linked list that just have one pointer (next). this class can use to make stack or queue using linkedlist more info please contact me <? /* name : linkedlist.php * author : panji (panji6887@yahoo.com) * purpose : make the abstract data type of linked list * date : 2006/06/22 */ //define the struct node list class ADTlist{ var $fill; var $next; } //type and operation definition of linkedlist class linkedlist{ var $firstPointer; var $lastPointer; //list initialization //make the first and last pointer of list function linkedlist($e=''){ $this->firstPointer = $this->factorylist(); $this->lastPointer = $this->factorylist(); $this->firstPointer->next = null; $this->firstPointer->fill = $e; $this->lastPointer = $this->firstPointer; } //inserting data before first element of list function insertfirst($e){ $help= $this->factorylist(); $help->fill = $e; $help->next = $this->firstPointer; $this->firstPointer = $help; } //inserting data after last element of list function insertlast($e){ $help= $this->factorylist(); $help->fill = $e; $help->next = null; $this->lastPointer->next = $help; $this->lastPointer = $help; } //deleting data in the first position of list function deletefirst(){ $this->firstPointer = $this->firstPointer->next; } //deleting data in the last position of list function deletelast(){ $help=$this->factorylist(); $help=$this->firstPointer; while($help->next!=$this->lastPointer && $help->next!=null){ $help=$help->next; } $this->lastPointer=$help; $this->lastPointer->next=null; } // returning the Linkedlist struct function factorylist(){ return new ADTlist(); } // to write all list element function writelist(){ $help = $this->firstPointer; while($help->fill!=null && $help->fill!=null){ echo" ".$help->fill." -> "; $help = $help->next; } echo"nil"; } } //example $list = new linkedlist(); $list->insertfirst('panji'); $list->insertfirst('agus'); $list->insertfirst('mutt'); $list->insertlast('aqin'); $list->insertlast('ganteng'); $list->insertlast('sekali'); $list->insertfirst('test1'); $list->insertfirst('test2'); $list->deletelast(); $list->deletefirst(); $list->deletelast(); $list->writelist(); ?>
Simple customisable (colors, fonts etc) calendar. Dates are clickable to navigate to a schedule or events for any day in the current month. 1st file: calendar.php ////// CALENDAR.PHP ///////////////////////// <!-- PHP Calendar Script by Ricardo Assing. URL: http://ra13.l1h.net email: boanerges1320@yahoo.com --> <?php ///////////////////////////////////////////////////////////////////// ///////// EDIT HERE ////////////////////////////////////////////// $hFont = "Verdana, Arial, Helvetica, sans-serif";//sets header font $hColor = "#333333";//sets header color $hBgColor = "999999";//sets header background for days of week $monthColor = "#000000";//font color of month $dColor = "000000";//color of days $dFont = "Verdana, Arial, Helvetica, sans-serif";//days font $dBgColor = "dddddd";//background of days $notsetDays = "eeeeee";//background of extra days $dBgColordef = "dddddd";//background of days *should be same as above $todayBg = "#ffffff";//background of today $calBg = "#333333";//background of calendar $headBg = "ffffff";//background of month $overColordef = "#ffffff";//same as below $overColor = "#ffffff";//Mouse over color $todayOver = "#ffffcc";//Mouse over color for current day $fontSize = "7";//Font Size $calWidth = "170";//Overall Calendar width pixels /////////// END EDIT ////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////// $currentYear = date(Y);//year ex. 2003 $currentMonth = date(F); $currentMonth = strtoupper($currentMonth);//month ex. JANUARY $currentMonthNum = date(n); $currentDay = date(j);//current day 1 - 31 $amtDays = date(t);//days in month 28 - 31 $firstDay = date("w",mktime(1,1,1,$currentMonthNum,1,$currentYear)); $lastDay = date("w",mktime(1,1,1,$currentMonthNum,$amtDays,$currentYear)); $days = array("S","M","T","W","T","F","S"); $daysNum = range(1,7); $day = date(w);//sets numeric day 0 - 6 where 0 = Sunday $colWidth = $calWidth/7; ?> <script language="JavaScript" type="text/JavaScript"> <!-- function MM_findObj(n, d) { //v4.01 var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) { d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);} if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n]; for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document); if(!x && d.getElementById) x=d.getElementById(n); return x; } function MM_setTextOfLayer(objName,x,newText) { //v4.01 if ((obj=MM_findObj(objName))!=null) with (obj) if (document.layers) {document.write(unescape(newText)); document.close();} else innerHTML = unescape(newText); } //--> </script> <!-- START HEADERS --> <table width="<?php echo $calWidth; ?>" border="0" cellspacing="1" cellpadding="1" bgcolor="<?php echo $calBg; ?>" id="cal"> <tr bgcolor="<?php echo $headBg; ?>"> <td colspan="7" style="font-size:<?php echo $fontSize; ?>pt"><div align="center"><font color="<?php echo $monthColor; ?>" face="<?php echo $hFont; ?>"><strong><?php echo $currentDay." ".$currentMonth." ".$currentYear; ?></strong></font></div></td> </tr> <tr bgcolor="<?php echo $hBgColor; ?>"> <?php foreach ($days as $value){ ?> <!-- DAYS OF THE WEEK ex. MON TUE --> <td width="<?php echo $colWidth; ?>" style="font-size:<?php echo $fontSize; ?>pt"><div align="center"><strong><font color="<?php echo $hColor; ?>" face="<?php echo $hFont; ?>"><?php echo $value; ?></font></strong></div></td> <!-- --> <?php } ?> </tr> <!-- END HEADERS --> <!-- START OUTPUT --> <tr> <?php $row1=7-$firstDay; $i=0; $x=0; $days = range(1,$amtDays); while ($x < $firstDay){ echo "<td bgcolor=\"$notsetDays\" width=\"$colWidth\"></td>"; $x++; } while ($i < $row1){ if ($currentDay == $days[$i]){ $dBgColor = $todayBg; $overColor = $todayOver; } else { $dBgColor = $dBgColordef; $overColor = $overColor; } ?> <td align="center" style="font-size:<?php echo $fontSize; ?>pt" width="<?php echo $colWidth; ?>" bgcolor="<?php echo $dBgColor; ?>" onMouseOver="style.cursor='hand';style.background='<?php echo $overColor; ?>';MM_setTextOfLayer('dis','','<?php echo $days[$i]." ".$currentMonth." ".$currentYear; ?>')" onMouseOut="style.background='<?php echo $dBgColor; ?>';MM_setTextOfLayer('dis','','')" onclick="window.navigate('schedule.php&fileName=<?php echo $days[$i]." ".$currentMonth." ".$currentYear; ?>')"><div align="center"><strong><font color="<?php echo $dColor; ?>" face="<?php echo $dFont; ?>"><?php echo $days[$i]; ?></font></strong></div></td> <?php $i++; $dBgColor = $dBgColordef; $overColor = $overColordef; } ?> </tr> <?php $n=0; $ar = array(6,13,20,27); $ar1 = array(0,7,14,21,28); $var = $amtDays-$i; $var1 = $var-$daysNum[$lastDay]; while ($n < $var1){ if ($currentDay == $days[$i]){ $dBgColor = $todayBg; $overColor = $todayOver; } else { $dBgColor = $dBgColordef; $overColor = $overColor; } if (in_array($n,$ar1)){ ?> <tr> <td align="center" style="font-size:<?php echo $fontSize; ?>pt" width="<?php echo $colWidth; ?>" bgcolor="<?php echo $dBgColor; ?>" onMouseOver="style.cursor='hand';style.background='<?php echo $overColor; ?>';MM_setTextOfLayer('dis','','<?php echo $days[$i]." ".$currentMonth." ".$currentYear; ?>')" onMouseOut="style.background='<?php echo $dBgColor; ?>';MM_setTextOfLayer('dis','','')" onclick="window.navigate('schedule.php&fileName=<?php echo $days[$i]." ".$currentMonth." ".$currentYear; ?>')"><div align="center"><strong><font color="<?php echo $dColor; ?>" face="<?php echo $dFont; ?>"><?php echo $days[$i]; ?></font></strong></div></td> <?php } elseif (in_array($n,$ar)) { ?> <td align="center" style="font-size:<?php echo $fontSize; ?>pt" width="<?php echo $colWidth; ?>" bgcolor="<?php echo $dBgColor; ?>" onMouseOver="style.cursor='hand';style.background='<?php echo $overColor; ?>';MM_setTextOfLayer('dis','','<?php echo $days[$i]." ".$currentMonth." ".$currentYear; ?>')" onMouseOut="style.background='<?php echo $dBgColor; ?>';MM_setTextOfLayer('dis','','')" onclick="window.navigate('schedule.php&fileName=<?php echo $days[$i]." ".$currentMonth." ".$currentYear; ?>')"><div align="center"><strong><font color="<?php echo $dColor; ?>" face="<?php echo $dFont; ?>"><?php echo $days[$i]; ?></font></strong></div></td> </tr> <?php } else { ?> <td align="center" style="font-size:<?php echo $fontSize; ?>pt" width="<?php echo $colWidth; ?>" bgcolor="<?php echo $dBgColor; ?>" onMouseOver="style.cursor='hand';style.background='<?php echo $overColor; ?>';MM_setTextOfLayer('dis','','<?php echo $days[$i]." ".$currentMonth." ".$currentYear; ?>')" onMouseOut="style.background='<?php echo $dBgColor; ?>';MM_setTextOfLayer('dis','','')" onclick="window.navigate('schedule.php&fileName=<?php echo $days[$i]." ".$currentMonth." ".$currentYear; ?>')"><div align="center"><strong><font color="<?php echo $dColor; ?>" face="<?php echo $dFont; ?>"><?php echo $days[$i]; ?></font></strong></div></td> <?php } $n++; $i++; $dBgColor = $dBgColordef; $overColor = $overColordef; }//end while echo "<tr>"; $x=0; while ($i < $amtDays){ if ($currentDay == $days[$i]){ $dBgColor = $todayBg; $overColor = $todayOver; } else { $dBgColor = $dBgColordef; $overColor = $overColor; } ?> <td align="center" style="font-size:<?php echo $fontSize; ?>pt" width="<?php echo $colWidth; ?>" bgcolor="<?php echo $dBgColor; ?>" onMouseOver="style.cursor='hand';style.background='<?php echo $overColor; ?>';MM_setTextOfLayer('dis','','<?php echo $days[$i]." ".$currentMonth." ".$currentYear; ?>')" onMouseOut="style.background='<?php echo $dBgColor; ?>';MM_setTextOfLayer('dis','','')" onclick="window.navigate('schedule.php&fileName=<?php echo $days[$i]." ".$currentMonth." ".$currentYear; ?>')"><div align="center"><strong><font color="<?php echo $dColor; ?>" face="<?php echo $dFont; ?>"><?php echo $days[$i]; ?></font></strong></div></td> <?php $i++; $dBgColor = $dBgColordef; $overColor = $overColordef; $x++; } while ($x < 7){ ?> <td bgcolor="<?php echo $notsetDays; ?>" width="<?php echo $colWidth; ?>"></td> <?php $x++; } ?> </tr> <!-- END OUTPUT --> <tr><td colspan="7" bgcolor="<?php echo $headBg; ?>" id="varMes">  <div id="dis" style="position:absolute; width:173px; height:19px; z-index:1;" align="center"> </div> </td></tr> </table> /////////////////////////////////////////////////////// 2nd file: schedule.php ///////// SCHEDULE.PHP ////////////////////////// <table width="100%" border="0" cellpadding="0" cellspacing="0" class="blackMain"> <tr> <td> <table width="100%" border="0" cellpadding="0" cellspacing="0" class="TLwhite"> <tr> <td bgcolor="#CCCCCC" class="Botborder"><strong>Reminders for:<font color="7895a5" face="Verdana, Arial, Helvetica, sans-serif"><strong> <font color="#660000"><?php echo $_REQUEST['fileName']; ?></font> </strong></font></strong></td> </tr> </table></td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0" class="blackMain"> <tr> <td> <table width="100%" border="0" cellpadding="0" cellspacing="0" class="TLwhite"> <tr> <td bgcolor="#CCCCCC" class="Botborder"><strong></strong></td> </tr> </table></td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0" class="blackMain"> <tr> <td> <table width="100%" border="0" cellpadding="0" cellspacing="0" class="TLwhite"> <tr> <td class="Botborder"><strong> <?php include("read.php"); ?> </strong></td> </tr> </table></td> </tr> </table> ///////////////////////////////////////////////////////// 3rd file: read.php ////////// READ.PHP ///////////////////////////////// <?php $fileSch = $_REQUEST['fileName']; $str = str_replace(" ","",$fileSch); $file = "events/$str.txt"; //echo $file; if (file_exists($file)){ $lines = file($file); if( !($fd = fopen($file,"r")) ) die("Could not open $file for reading!"); for( $i = 0; $lines[$i]; $i++ ) { echo $lines[$i]; } if( !(flock($fd,LOCK_UN)) ) die("Could not release lock on $file!"); if( !(fclose($fd)) ) die("Could not close file pointer for $file!"); } else { echo "Schedule not set!"; } ?> ///////////////////////////////////////////////////////// 1. All three files must be in the same directory. 2. A directory named "events" should be created and placed with the three files. 3. To set schedules, just create a .txt file with the name being that of the date for the events. example: 13JULY2003.txt 4. Events, reminders etc. are stored in the .txt files
Distance in miles between two lan/lon pairs. Uses spherical geometry. $milesDiff = 3958.75 * acos( sin($FirstLatitude/57.2958) * sin($SecondLatitude/57.2958) + cos($FirstLatitude/57.2958) * cos($SecondLatitude/57.2958) * cos($SecondLongitude/57.2958 - $FirstLongitude/57.2958));
This code solves the "numbers game", a popular UK television show. It is a winner of the Codewalkers PHP Coding Contest. See example URL for more info. <?php /* Zack Coburn zack@zackcoburn.com http://www.zackcoburn.com / list($usec, $sec) = explode(" ",microtime()); $start=((float)$usec + (float)$sec); $ops=array("+","-",""); $vars=array("a","b","c","d","e","f"); $random=array(round(mt_rand(2,100)),round(mt_rand(2,100)),round(mt_rand(2,100)),round(mt_rand(2,100)),round(mt_rand(2,100)),round(mt_rand(2,100))); $count=0; class numbersgame { function getmicrotime(){ list($usec, $sec) = explode(" ",microtime()); return ((float)$usec + (float)$sec); } function timelimit($grandtotal){ global $log; global $start; global $input; if ($_GET["checkme"]==1){ $end = $this->getmicrotime(); $time = sprintf('%.16f', $end - $start); if ($time>=29.8){ exit; } }elseif($_GET["checkme"]!=1){ $end = $this->getmicrotime(); $time = sprintf('%.16f', $end - $start); if ($time>=29.8){ $input=basename($input); $writefile=fopen($input.".out","w"); fwrite($writefile,$log); echo $grandtotal; exit; } } } function parse_input($inputfile){ $handle = fopen ($inputfile, "r"); $input = fread ($handle, filesize ($inputfile)); fclose ($handle); $input=explode("\n",$input); foreach($input as $key=>$value){ $problems[$key]=explode(",",$input[$key]); } return $problems; } function sets($numbers){ $set[0]=array($numbers[0],$numbers[1],$numbers[2],$numbers[3],$numbers[4],$numbers[5]); global $setsorted; $setsorted=$set[0]; arsort($setsorted); $set[2]=array(); $set[3]=array(); $set[4]=array(); $set[5]=array(); $set[6]=array(); foreach($set[0] as $value1){ foreach($set[0] as $value2){ if ($value2<>$value1){ array_push($set[2],array($value1,$value2)); foreach($set[0] as $value3){ if ($value3<>$value1 and $value3<>$value2){ array_push($set[3],array($value1,$value2,$value3)); foreach($set[0] as $value4){ if ($value4<>$value1 and $value4<>$value2 and $value4<>$value3){ array_push($set[4],array($value1,$value2,$value3,$value4)); foreach($set[0] as $value5){ if ($value5<>$value1 and $value5<>$value2 and $value5<>$value3 and $value5<>$value4){ array_push($set[5],array($value1,$value2,$value3,$value4,$value5)); foreach($set[0] as $value6){ if ($value6<>$value1 and $value6<>$value2 and $value6<>$value3 and $value6<>$value4 and $value6<>$value5){ array_push($set[6],array($value1,$value2,$value3,$value4,$value5,$value6)); } } } } } } } } } } } return $set; } function expressions(){ global $ops; global $vars; //generate all expression permutations $i=0; $expressions[2]=array(); $expressions[3]=array(); $expressions[4]=array(); $expressions[5]=array(); $expressions[6]=array(); foreach($ops as $op){ array_push($expressions[2],$vars[0].$op.$vars[1]); } foreach($ops as $op){ foreach($expressions[2] as $expr){ array_push($expressions[3],$expr.$op.$vars[2]); array_push($expressions[3],"(".$expr.")".$op.$vars[2]); } } foreach($ops as $op){ foreach($expressions[3] as $expr){ array_push($expressions[4],$expr.$op.$vars[3]); array_push($expressions[4],"(".$expr.")".$op.$vars[3]); } } foreach($ops as $op){ foreach($expressions[4] as $expr){ array_push($expressions[5],$expr.$op.$vars[4]); array_push($expressions[5],"(".$expr.")".$op.$vars[4]); } } foreach($ops as $op){ foreach($expressions[5] as $expr){ array_push($expressions[6],$expr.$op.$vars[5]); array_push($expressions[6],"(".$expr.")".$op.$vars[5]); } } return $expressions; } function duplicate($eq,$set=""){ global $random; global $equations; global $used; global $vars; foreach($equations as $key=>$value){ if ($used[$key]==$set or $set==""){ if (eval("return @(".str_replace($vars,$random,$equations[$key]).");")==eval("return @(".str_replace($vars,$random,$eq).");")){ return TRUE; } } } return FALSE; } } if ($_GET["checkme"]==1){ ?> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en"> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <title>Codewalkers PHP Coding Contest - The Numbers Game - Zack Coburn</title> </head> <body> <form name="form1" method="post" action="<?php echo $_SERVER["PHP_SELF"];?>?checkme=1"> <strong>Numbers</strong>: <input type="text" name="n1" size="2"> <input type="text" name="n2" size="2"> <input type="text" name="n3" size="2"> <input type="text" name="n4" size="2"> <input type="text" name="n5" size="2"> <input type="text" name="n6" size="2"> <br /> <strong>Target Number</strong>: <input type="text" name="n7" size="3"> <br /> <input type="submit" name="Submit" value="Find Solutions"> </form> <?php if ($_POST["n1"]>0 and $_POST["n2"]>0 and $_POST["n3"]>0 and $_POST["n4"]>0 and $_POST["n5"]>0 and $_POST["n6"]>0 and $_POST["n7"]>0){ $numbersgame=new numbersgame; $problem[0]=$_POST["n1"]; $problem[1]=$_POST["n2"]; $problem[2]=$_POST["n3"]; $problem[3]=$_POST["n4"]; $problem[4]=$_POST["n5"]; $problem[5]=$_POST["n6"]; $problem[6]=$_POST["n7"]; $expressions=$numbersgame->expressions(); $sets=$numbersgame->sets($problem); $used=array(); //sets used $solutions=array(); //solutions f=equation using a-f, corresponding with set used $equations=array(); //equations with numbers, for display for ($n=2;$n<=6;$n++){ foreach($expressions[$n] as $key=>$expr){ $num=substr_count(strtr($expr,"abcdefg","aaaaaa"),"a"); for ($i=0;$i<count($sets[$num]);$i+=floor(count($sets[$num])/round(mt_rand(15,40),0))){ $set=$sets[$num][$i]; $replace=str_replace($vars,$set,$expr); $test=eval("return @(".$replace.");"); $numbersgame->timelimit($grandtotal); if ($test==$problem[6]){ $eq=$replace; foreach($setsorted as $key1=>$value1){ $eq=str_replace($value1,$vars[$key1],$eq); } $theset=sort($set); if ($numbersgame->duplicate($eq,$theset)==FALSE){ $solutions[$count++]=$replace; $equations[$count]=$eq; $used[$count]=$theset; echo $replace."<br />\n"; $grandtotal++; break; } break; } } } } } ?> </body> </html> <?php }elseif($_GET["checkme"]!=1 and $_GET["input"]<>""){ $input=$_GET["input"]; $numbersgame=new numbersgame; $numbers=$numbersgame->parse_input($input); $expressions=$numbersgame->expressions(); $grandtotal=0; foreach ($numbers as $problem){ $log.=$problem[0].",".$problem[1].",".$problem[2].",".$problem[3].",".$problem[4].",".$problem[5].",".$problem[6]."\n"; $sets=$numbersgame->sets($problem); $used=array(); //sets used $solutions=array(); //solutions f=equation using a-f, corresponding with set used $equations=array(); //equations with numbers, for display for ($n=2;$n<=6;$n++){ foreach($expressions[$n] as $key=>$expr){ $num=substr_count(strtr($expr,"abcdefg","aaaaaa"),"a"); for ($i=0;$i<count($sets[$num]);$i+=floor(count($sets[$num])/round(mt_rand(15,40),0))){ $set=$sets[$num][$i]; $replace=str_replace($vars,$set,$expr); $test=eval("return @(".$replace.");"); $numbersgame->timelimit($grandtotal); if ($test==$problem[6]){ $eq=$replace; foreach($setsorted as $key1=>$value1){ $eq=str_replace($value1,$vars[$key1],$eq); } $theset=sort($set); if ($numbersgame->duplicate($eq,$theset)==FALSE){ $solutions[$count++]=$replace; $equations[$count]=$eq; $used[$count]=$theset; $log.=$replace."\n"; $grandtotal++; break; } break; } } } } } } ?>
The query builder builds a query as per the previous HTML page selections /* previous HTML page */ create an html page with multiple select boxes (multiple select) and put three radio buttons as for operators (and, or , none). As per the users selection the query will be generated on this page. This tools uses a fixed query string and also an array. All the conditions are pushed into an array.After the conditions are decided the arroy is converted into a ',' comma separated string containing the conditions. here $access is a variable through which we control the access to the system <?php $connection = db_connect(); $query ="select report_date, client_name, brand_name, project_name, activity, time_qty, department_name, username, remark, team_name from super_data where "; $Namein =""; $Deptin ="" ; $CompanyNamein =""; $Brandin =""; $Activityin ="" ; $Teamin=""; $conditioner = array($conditioner); //echo $tname; ?> if($Name != "") { $Namein = implode("' , '",$Name); $Namein = "upper(username) in ( '" . $Namein . "' )"; $count = array_push($conditioner, $Namein); } if($Dept != "") { $Deptin = implode("', '" ,$Dept); $Deptin = "upper(department_name) in ( '" . $Deptin . "' )"; $count = array_push($conditioner, $Deptin); } if($CompanyName != "") { $CompanyNamein = implode("' , '" , $CompanyName); $CompanyNamein = "upper(client_name) in ( '" . $CompanyNamein . "' )" ; $count = array_push($conditioner, $CompanyNamein); } if($Brand != "") { $Brandin = implode("', '" , $Brand); $Brandin = "upper(brand_name) in ( '" . $Brandin . "' )"; $count = array_push($conditioner, $Brandin); } if($Activity != "") { $Activityin = implode("', '" , $Activity); $Activityin = " upper(activity) in ( '" . $Activityin . "' )"; $count = array_push($conditioner, $Activityin); } if($Team != "") { $Teamin = implode("', '" , $Team); $Teamin = " upper(team_name) in ( '" . $Teamin . "' )"; $count = array_push($conditioner, $Teamin); } //if($oper!='none') //{ $condition = implode(" $oper ", $conditioner); //} //echo $condition .'before cut'; if($oper=="or") { $condition = substr($condition,3,(strlen($condition) - 1)) ; //echo $condition .'after cut'; } else if($oper=="and") { $condition = substr($condition,4,(strlen($condition) - 1)) ; //echo $condition .'after cut'; } else { $condition = substr($condition,1,(strlen($condition) - 1)) ; } if($access==1) { $query = $query . '((' . $condition . ') and (upper(team_name) =upper(\'' . $tname . '\'))' . ')' ; //echo $query ; echo $query; } if($access==2) { $query = $query . '((' . $condition . ') and (upper(department_name) =upper(\'' . $dept_name . '\'))' . ')' ; //echo $query ; echo $query; } if($access==3) { $query = $query . '((' . $condition . ')' . ')' ; //echo $query ; //echo $query; } ?>
A very easy to use RC4 function, written entirely in php, using the function on plaintext returns the Encrypted string and using it on encrypted text returns the plaintext... its that simple. The security of the algorythmn is dependant on the size of the key used and any size key can be used with this function. function RC4($keyfile, $data) { //ecncrypt $data with the key in $keyfile with an rc4 algorithm $pwd = implode('', file($keyfile)); $pwd_length = strlen($pwd); for ($i = 0; $i < 255; $i++) { $key[$i] = ord(substr($pwd, ($i % $pwd_length)+1, 1)); $counter[$i] = $i; } for ($i = 0; $i < 255; $i++) { $x = ($x + $counter[$i] + $key[$i]) % 256; $temp_swap = $counter[$i]; $counter[$i] = $counter[$x]; $counter[$x] = $temp_swap; } for ($i = 0; $i < strlen($data); $i++) { $a = ($a + 1) % 256; $j = ($j + $counter[$a]) % 256; $temp = $counter[$a]; $counter[$a] = $counter[$j]; $counter[$j] = $temp; $k = $counter[(($counter[$a] + $counter[$j]) % 256)]; $Zcipher = ord(substr($data, $i, 1)) ^ $k; $Zcrypt .= chr($Zcipher); } return $Zcrypt; }
This script came first place in the PHP-Editors.com PHP Programming Contest (Pizza Dude). The script find the shortest route to multiple destinations using a single and double route path. <?php $iResultLength = -1; // result length $arrResultPath = array(); // result path $arrNodes = $arrNodeToWay = $arrNodeFromWay = array(); foreach(file("map.txt") as $sLine){ $arrLine = explode(" ",strtoupper(trim($sLine))); if((sizeof($arrLine)==4) && $arrLine[0]!=$arrLine[2]){ // ignore empty/damaged lines and routes that start and end at the same point if(!isset($arrNodes[$arrLine[0]][$arrLine[2]]) \|\| $arrNodes[$arrLine[0]][$arrLine[2]]>$arrLine[1]){ $arrNodes[$arrLine[0]][$arrLine[2]] = $arrLine[1]; if(!isset($arrNodeToWay[$arrLine[2]]) \|\| $arrLine[1]<$arrNodeToWay[$arrLine[2]]){ $arrNodeToWay[$arrLine[2]] = $arrLine[1]; } if(!isset($arrNodeFromWay[$arrLine[0]]) \|\| $arrLine[1]<$arrNodeFromWay[$arrLine[0]]){ $arrNodeFromWay[$arrLine[0]] = $arrLine[1]; } } if($arrLine[3]==2){ // bidirectional if(!isset($arrNodes[$arrLine[2]][$arrLine[0]]) \|\| $arrNodes[$arrLine[2]][$arrLine[0]]>$arrLine[1]){ $arrNodes[$arrLine[2]][$arrLine[0]] = $arrLine[1]; if(!isset($arrNodeToWay[$arrLine[0]]) \|\| $arrLine[1]<$arrNodeToWay[$arrLine[0]]){ $arrNodeToWay[$arrLine[0]] = $arrLine[1]; } if(!isset($arrNodeFromWay[$arrLine[2]]) \|\| $arrLine[1]<$arrNodeFromWay[$arrLine[2]]){ $arrNodeFromWay[$arrLine[2]] = $arrLine[1]; } } } } } reset($arrNodes); while(list($sKey,) = each($arrNodes)){ asort($arrNodes[$sKey],SORT_NUMERIC); } $arrDelivery = array(); foreach(file("dest.txt") as $sLine){ if($sLine = trim($sLine)) $arrDelivery = explode(" ",strtoupper($sLine)); } $sDelivery = implode("",$arrDelivery); usort($arrDelivery,"cmpDeliveryNode"); $arrCountDelivery = array_count_values($arrDelivery); foreach($arrDelivery as $sStartPoint){ if(isset($GLOBALS["arrNodes"][$sStartPoint])){ processNode(array($sStartPoint),0); } } echo implode(" ",array_intersect($arrResultPath,$arrDelivery))." ".$iResultLength; function processNode($arrPath,$iLength){ global $arrNodes, $arrCountDelivery, $arrDelivery, $sDelivery, $arrNodeFromWay, $arrNodeToWay, $iResultLength, $arrResultPath; $sPath = implode("",$arrPath); $iStartElement = end($arrPath); $iLastElement = prev($arrPath); $arrCountPath = array_count_values($arrPath); $arrFirst = $arrSecond = $arrThird = array(); foreach($arrNodes[$iStartElement] as $sDest=>$iLengthDest){ if(!isset($arrCountPath[$sDest])){ if(isset($arrCountDelivery[$sDest])){ $arrFirst[$sDest] = $iLengthDest; } else{ $arrSecond[$sDest] = $iLengthDest; } } else{ if($iLastElement !== $sDest \|\| ($arrCountPath[$iStartElement]<2 && isset($arrCountDelivery[$iStartElement]))){ $arrThird[$sDest] = $iLengthDest; } } } $arrTodo = array_diff($arrDelivery,$arrPath); foreach($arrFirst+$arrSecond+$arrThird as $sDest=>$iLengthDest){ $iEstimatedMinLength = $iTmpLength = $iLength+$iLengthDest; $arrPathTmp = $arrPath; $arrPathTmp[] = $sDest; $arrTodoTmp = $arrTodo; if(($iDestKey = array_search($sDest,$arrTodoTmp))!==FALSE){ unset($arrTodoTmp[$iDestKey]); } if($arrTodoTmp && !array_intersect($arrTodoTmp,array_keys($arrNodes[$sDest]))){ $iEstimatedMinLength += $arrNodeFromWay[$sDest]; } foreach($arrTodoTmp as $sDeliveryElement){ $iEstimatedMinLength += $arrNodeToWay[$sDeliveryElement]; } if($iResultLength>=0 && $iEstimatedMinLength>=$iResultLength){ continue; } if(!$arrTodoTmp){ $iResultLength = $iTmpLength; $arrResultPath = $arrPathTmp; # echo implode("",$arrPathTmp).": $iTmpLength\n"; break; } if(($iPos = strrpos($sPath,$sDest))!==FALSE){ $sSearch = substr($sPath.$sDest,$iPos+1); $sSearchLength = strlen($sSearch); if((strcspn($sSearch,$sDelivery)===$sSearchLength-1) \|\| substr($sPath,($sSearchLength*-2)+1,$sSearchLength)===$sSearch \|\| strpos($sPath,$sDest.$sSearch)!==FALSE){ continue; } } if(isset($arrNodes[$sDest])){ processNode($arrPathTmp,$iTmpLength); } } } function cmpDeliveryNode($a,$b){ global $arrNodes; if(isset($arrNodes[$a]) && isset($arrNodes[$b])){ $aSize = sizeof($arrNodes[$a]); $bSize = sizeof($arrNodes[$b]); if($aSize==$bSize){ if($aSize==1){ $aLength = end($arrNodes[$a]); $bLength = end($arrNodes[$b]); if($aLength==$bLength) return 0; else return($aLength>$bLength)?-1:1; } else return 0; } else return($aSize<$bSize)?-1:1; } else return 0; } ?>
This is a winner of the PHP Coding Contest at Codewalkers.com. This program will play the game of trilite. http://codewalkers.com/contests/trilite/winner.phps more info: http://codewalkers.com/php-contest.php
Its Generating a simple Turing Number with background image,place the mouse over the image if the number is not clear <? /* * Requirement : Uncomment 'extension=php_gd2.dll' in PHP.INI [Remove the semi-colon(;)] * Usage : Generating Turing Number,place the mouse over the image if the number is not clear * EMail : saneeshkv@yahoo.com / header("Content-type: image/png"); $new_string=""; echo "<html> <head> <title> Verification </title> </head> <body>"; $im = ImageCreate(58,22); // ImageCreate(X,Y) //$im = imagecreatefrompng("San.png"); // Also can set image as background function make_seed() { list($usec, $sec) = explode(' ', microtime()); return (float) $sec + ((float) $usec 100000); } srand(make_seed()); $string = md5(rand(0,9999)); $new_string = strtoupper(substr($string, rand(0,26), 5)); $color_back = ImageColorAllocate($im, 255,255,255); // ImageColorAllocate(Image Resource,R,G,B) ImageFill($im, 0, 0, $color_back); // Image's Background Color. //$text_color = ImageColorAllocate($im, rand(0,225), rand(0,225), rand(0,225)); $text_color = ImageColorAllocate($im, 225,0,0); // imagestring ($im,5,5,3, $new_string , $text_color); ImageTTFText ($im, 10, 0, 8, 15, $text_color, "Verdana.ttf", $new_string); //$color_line = ImageColorAllocate($im, 225,190,102); $color_line = ImageColorAllocate($im, rand(0,225), rand(0,225), rand(0,225)); for($i=0;$i<25;$i+=5) imageline ($im,0,$i,54,$i,$color_line); // Horizondal Lines for($i=0;$i<60;$i+=5) imageline ($im,$i,0,$i,22,$color_line); // Vertical Lines ImagePNG($im, "verify.png"); // Create file named 'verify.png' $new_spaced_string = ""; for($i=0;$i<strlen($new_string);$i++) $new_spaced_string .= " ".$new_string[$i]." "; print '<img src="verify.png" border=0 alt = "'.$new_spaced_string.'">'; ImageDestroy($im); echo " </body> </html>"; exit; /* header("Content-type: image/png"); $string = "1234";//$_GET['text']; $im = imagecreatefrompng("san3.png"); $orange = imagecolorallocate($im, 220, 210, 60); $px = (imagesx($im) - 7.5 * strlen($string)) / 2; imagestring($im, 3, $px, 9, $string, $orange); imagepng($im); imagedestroy($im); print ' <table> <tr> <td align = center><img src = "san3.png"></td> </tr> </table>'; */ header ("Content-type: image/png"); imagepng (LoadPNG ("./san3.png")); function LoadPNG ($imgname) { $im = @imagecreatefrompng ($imgname); if (!$im) { $im = imagecreate (150, 30); $bgc = imagecolorallocate ($im, 255, 255, 255); $tc = imagecolorallocate ($im, 0, 0, 0); imagefilledrectangle ($im, 0, 0, 150, 30, $bgc); //$text_color = imagecolorallocate ($im, 233, 14, 91); //imagestring ($im, 1, 5, 5, "A Simple Text String", $text_color); imagestring ($im, 1, 5, 5, "Error loading $imgname", $tc); } return $im; } exit; ?> <html> <head> </head> <body> <?php //$pic=ImageCreate(150,30); $pic = imagecreatefrompng ("san3.png"); //$col1=ImageColorAllocate($pic,200,200,200); $col2=ImageColorAllocate($pic,233,214,255); $text_color = imagecolorallocate ($pic, 233, 14, 91); imagestring ($pic, 1, 5, 5, "A Simple Text String", $text_color); //ImageFilledRectangle($pic,1,1,100,100,$col2); ImagePNG($pic,"pic.png"); ImageDestroy($pic); ?> <img src="pic.png" border=0> </body> </html>

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