(.+?)<\/title>/','',$content); $content = preg_replace('/<category>(.+?)<\/category>/','',$content); if ($use_htmltrans) { // converts lone & characters into & (a.k.a. &) $content = preg_replace('/&[^#](?![a-z]*;)/ie', '"&".substr("\0",1)', $content); // converts HTML-entities to their display values in order to convert them again later $content = preg_replace('/['.chr(127).'-'.chr(255).']/e', '"&#".ord(\'\0\').";"', $content ); $content = strtr($content, $wp_htmltrans); // now converting: Windows CP1252 => Unicode (valid HTML) // (if you've ever pasted text from MSWord, you'll understand) $content = strtr($content, $wp_htmltranswinuni); } // you can delete these 2 lines if you don't like <br /> and <hr /> $content = str_replace("<br>","<br />",$content); $content = str_replace("<hr>","<hr />",$content); return $content; } function convert_bbcode($content) { global $wp_bbcode, $use_bbcode; if ($use_bbcode) { $content = preg_replace($wp_bbcode["in"], $wp_bbcode["out"], $content); } $content = convert_bbcode_email($content); return $content; } function convert_bbcode_email($content) { global $use_bbcode; $bbcode_email["in"] = array( '#\[email](.+?)\[/email]#eis', '#\[email=(.+?)](.+?)\[/email]#eis' ); $bbcode_email["out"] = array( "'<a href=\"mailto:'.antispambot('\\1').'\">'.antispambot('\\1').'</a>'", // E-mail "'<a href=\"mailto:'.antispambot('\\1').'\">\\2</a>'" ); $content = preg_replace($bbcode_email["in"], $bbcode_email["out"], $content); return $content; } function convert_gmcode($content) { global $wp_gmcode, $use_gmcode; if ($use_gmcode) { $content = preg_replace($wp_gmcode["in"], $wp_gmcode["out"], $content); } return $content; } function convert_smilies($text) { global $smilies_directory, $use_smilies; global $wp_smiliessearch, $wp_smiliesreplace; $output = ''; if ($use_smilies) { // HTML loop taken from texturize function, could possible be consolidated $textarr = preg_split("/(<.*>)/U", $text, -1, PREG_SPLIT_DELIM_CAPTURE); // capture the tags as well as in between $stop = count($textarr);// loop stuff for ($i = 0; $i < $stop; $i++) { $content = $textarr[$i]; if ((strlen($content) > 0) && ('<' != $content{0})) { // If it's not a tag $content = str_replace($wp_smiliessearch, $wp_smiliesreplace, $content); } $output .= $content; } } else { // return default text. $output = $text; } return $output; } function antispambot($emailaddy, $mailto=0) { $emailNOSPAMaddy = ''; srand ((float) microtime() * 1000000); for ($i = 0; $i < strlen($emailaddy); $i = $i + 1) { $j = floor(rand(0, 1+$mailto)); if ($j==0) { $emailNOSPAMaddy .= '&#'.ord(substr($emailaddy,$i,1)).';'; } elseif ($j==1) { $emailNOSPAMaddy .= substr($emailaddy,$i,1); } elseif ($j==2) { $emailNOSPAMaddy .= '%'.zeroise(dechex(ord(substr($emailaddy, $i, 1))), 2); } } $emailNOSPAMaddy = str_replace('@','@',$emailNOSPAMaddy); return $emailNOSPAMaddy; } function make_clickable($text) { // original function: phpBB, extended here for AIM & ICQ $ret = " " . $text; $ret = preg_replace("#([\n ])([a-z]+?)://([^, <>{}\n\r]+)#i", "\\1<a href=\"\\2://\\3\" target=\"_blank\">\\2://\\3</a>", $ret); $ret = preg_replace("#([\n ])aim:([^,< \n\r]+)#i", "\\1<a href=\"aim:goim?screenname=\\2\\3&message=Hello\">\\2\\3</a>", $ret); $ret = preg_replace("#([\n ])icq:([^,< \n\r]+)#i", "\\1<a href=\"http://wwp.icq.com/scripts/search.dll?to=\\2\\3\">\\2\\3</a>", $ret); $ret = preg_replace("#([\n ])www\.([a-z0-9\-]+)\.([a-z0-9\-.\~]+)((?:/[^,< \n\r]*)?)#i", "\\1<a href=\"http://www.\\2.\\3\\4\" target=\"_blank\">www.\\2.\\3\\4</a>", $ret); $ret = preg_replace("#([\n ])([a-z0-9\-_.]+?)@([^,< \n\r]+)#i", "\\1<a href=\"mailto:\\2@\\3\">\\2@\\3</a>", $ret); $ret = substr($ret, 1); return $ret; } function is_email($user_email) { $chars = "/^([a-z0-9_]|\\-|\\.)+@(([a-z0-9_]|\\-)+\\.)+[a-z]{2,4}\$/i"; if(strstr($user_email, '@') && strstr($user_email, '.')) { if (preg_match($chars, $user_email)) { return true; } else { return false; } } else { return false; } } function strip_all_but_one_link($text, $mylink) { $match_link = '#(<a.+?href.+?'.'>)(.+?)(</a>)#'; preg_match_all($match_link, $text, $matches); $count = count($matches[0]); for ($i=0; $i<$count; $i++) { if (!strstr($matches[0][$i], $mylink)) { $text = str_replace($matches[0][$i], $matches[2][$i], $text); } } return $text; } /***** // Formatting functions *****/ function get_lastpostdate() { global $tableposts, $cache_lastpostdate, $use_cache, $time_difference, $pagenow, $wpdb; if ((!isset($cache_lastpostdate)) OR (!$use_cache)) { $now = date("Y-m-d H:i:s",(time() + ($time_difference * 3600))); $lastpostdate = $wpdb->get_var("SELECT post_date FROM $tableposts WHERE post_date <= '$now' AND post_status = 'publish' ORDER BY post_date DESC LIMIT 1"); $cache_lastpostdate = $lastpostdate; } else { $lastpostdate = $cache_lastpostdate; } return $lastpostdate; } function user_pass_ok($user_login,$user_pass) { global $cache_userdata,$use_cache; if ((empty($cache_userdata[$user_login])) OR (!$use_cache)) { $userdata = get_userdatabylogin($user_login); } else { $userdata = $cache_userdata[$user_login]; } return ($user_pass == $userdata->user_pass); } function get_currentuserinfo() { // a bit like get_userdata(), on steroids global $HTTP_COOKIE_VARS, $user_login, $userdata, $user_level, $user_ID, $user_nickname, $user_email, $user_url, $user_pass_md5, $cookiehash; // *** retrieving user's data from cookies and db - no spoofing $user_login = $HTTP_COOKIE_VARS['wordpressuser_'.$cookiehash]; $userdata = get_userdatabylogin($user_login); $user_level = $userdata->user_level; $user_ID = $userdata->ID; $user_nickname = $userdata->user_nickname; $user_email = $userdata->user_email; $user_url = $userdata->user_url; $user_pass_md5 = md5($userdata->user_pass); } function get_userdata($userid) { global $wpdb, $cache_userdata, $use_cache, $tableusers; if ((empty($cache_userdata[$userid])) || (!$use_cache)) { $user = $wpdb->get_row("SELECT * FROM $tableusers WHERE ID = $userid"); $user->user_nickname = stripslashes($user->user_nickname); $user->user_firstname = stripslashes($user->user_firstname); $user->user_lastname = stripslashes($user->user_lastname); $user->user_firstname = stripslashes($user->user_firstname); $user->user_lastname = stripslashes($user->user_lastname); $user->user_description = stripslashes($user->user_description); $cache_userdata[$userid] = $user; } else { $user = $cache_userdata[$userid]; } return $user; } function get_userdata2($userid) { // for team-listing global $tableusers, $post; $user_data['ID'] = $userid; $user_data['user_login'] = $post->user_login; $user_data['user_firstname'] = $post->user_firstname; $user_data['user_lastname'] = $post->user_lastname; $user_data['user_nickname'] = $post->user_nickname; $user_data['user_level'] = $post->user_level; $user_data['user_email'] = $post->user_email; $user_data['user_url'] = $post->user_url; return $user_data; } function get_userdatabylogin($user_login) { global $tableusers, $cache_userdata, $use_cache, $wpdb; if ((empty($cache_userdata["$user_login"])) OR (!$use_cache)) { $user = $wpdb->get_row("SELECT * FROM $tableusers WHERE user_login = '$user_login'"); $cache_userdata["$user_login"] = $user; } else { $user = $cache_userdata["$user_login"]; } return $user; } function get_userid($user_login) { global $tableusers, $cache_userdata, $use_cache, $wpdb; if ((empty($cache_userdata["$user_login"])) OR (!$use_cache)) { $user_id = $wpdb->get_var("SELECT ID FROM $tableusers WHERE user_login = '$user_login'"); $cache_userdata["$user_login"] = $user_id; } else { $user_id = $cache_userdata["$user_login"]; } return $user_id; } function get_usernumposts($userid) { global $tableposts, $tablecomments, $wpdb; return $wpdb->get_var("SELECT COUNT(*) FROM $tableposts WHERE post_author = $userid"); } // examine a url (supposedly from this blog) and try to // determine the post ID it represents. function url_to_postid($url = '') { global $wpdb, $tableposts, $siteurl; // Take a link like 'http://example.com/blog/something' // and extract just the '/something': $uri = preg_replace("#$siteurl#i", '', $url); // on failure, preg_replace just returns the subject string // so if $uri and $siteurl are the same, they didn't match: if ($uri == $siteurl) return 0; // First, check to see if there is a 'p=N' to match against: preg_match('#[?&]p=(\d+)#', $uri, $values); $p = intval($values[1]); if ($p) return $p; // Match $uri against our permalink structure $permalink_structure = get_settings('permalink_structure'); // Matt's tokenizer code $rewritecode = array( '%year%', '%monthnum%', '%day%', '%postname%', '%post_id%' ); $rewritereplace = array( '([0-9]{4})?', '([0-9]{1,2})?', '([0-9]{1,2})?', '([0-9a-z-]+)?', '([0-9]+)?' ); // Turn the structure into a regular expression $matchre = str_replace('/', '/?', $permalink_structure); $matchre = str_replace($rewritecode, $rewritereplace, $matchre); // Extract the key values from the uri: preg_match("#$matchre#",$uri,$values); // Extract the token names from the structure: preg_match_all("#%(.+?)%#", $permalink_structure, $tokens); for($i = 0; $i < count($tokens[1]); $i++) { $name = $tokens[1][$i]; $value = $values[$i+1]; // Create a variable named $year, $monthnum, $day, $postname, or $post_id: $$name = $value; } // If using %post_id%, we're done: if (intval($post_id)) return intval($post_id); // Otherwise, build a WHERE clause, making the values safe along the way: if ($year) $where .= " AND YEAR(post_date) = " . intval($year); if ($monthnum) $where .= " AND MONTH(post_date) = " . intval($monthnum); if ($day) $where .= " AND DAYOFMONTH(post_date) = " . intval($day); if ($postname) $where .= " AND post_name = '" . $wpdb->escape($postname) . "' "; // Run the query to get the post ID: $id = intval($wpdb->get_var("SELECT ID FROM $tableposts WHERE 1 = 1 " . $where)); return $id; } /* Options functions */ function get_settings($setting) { global $wpdb, $cache_settings, $use_cache, $REQUEST_URI; if (strstr($REQUEST_URI, 'install.php')) return false; if ((empty($cache_settings)) OR (!$use_cache)) { $settings = get_alloptions(); $cache_settings = $settings; } else { $settings = $cache_settings; } if (!isset($settings->$setting)) { return false; } else { return $settings->$setting; } } function get_alloptions() { global $tableoptions, $wpdb; $options = $wpdb->get_results("SELECT option_name, option_value FROM $tableoptions"); if ($options) { foreach ($options as $option) { $all_options->{$option->option_name} = $option->option_value; } } return $all_options; } function update_option($option_name, $newvalue) { global $wpdb, $tableoptions; // No validation at the moment $wpdb->query("UPDATE $tableoptions SET option_value = '$newvalue' WHERE option_name = '$option_name'"); } function add_option() { // Adds an option if it doesn't already exist global $wpdb, $tableoptions; // TODO } function get_postdata($postid) { global $post, $tableusers, $tablecategories, $tableposts, $tablecomments, $wpdb; $post = $wpdb->get_row("SELECT * FROM $tableposts WHERE ID = $postid"); $postdata = array ( 'ID' => $post->ID, 'Author_ID' => $post->post_author, 'Date' => $post->post_date, 'Content' => $post->post_content, 'Excerpt' => $post->post_excerpt, 'Title' => $post->post_title, 'Category' => $post->post_category, 'Lat' => $post->post_lat, 'Lon' => $post->post_lon, 'post_status' => $post->post_status, 'comment_status' => $post->comment_status, 'ping_status' => $post->ping_status, 'post_password' => $post->post_password, 'to_ping' => $post->to_ping, 'pinged' => $post->pinged ); return $postdata; } function get_postdata2($postid=0) { // less flexible, but saves DB queries global $post; $postdata = array ( 'ID' => $post->ID, 'Author_ID' => $post->post_author, 'Date' => $post->post_date, 'Content' => $post->post_content, 'Excerpt' => $post->post_excerpt, 'Title' => $post->post_title, 'Category' => $post->post_category, 'Lat' => $post->post_lat, 'Lon' => $post->post_lon, 'post_status' => $post->post_status, 'comment_status' => $post->comment_status, 'ping_status' => $post->ping_status, 'post_password' => $post->post_password ); return $postdata; } function get_commentdata($comment_ID,$no_cache=0,$include_unapproved=false) { // less flexible, but saves DB queries global $postc,$id,$commentdata,$tablecomments, $wpdb; if ($no_cache) { $query = "SELECT * FROM $tablecomments WHERE comment_ID = $comment_ID"; if (false == $include_unapproved) { $query .= " AND comment_approved = '1'"; } $myrow = $wpdb->get_row($query, ARRAY_A); } else { $myrow['comment_ID']=$postc->comment_ID; $myrow['comment_post_ID']=$postc->comment_post_ID; $myrow['comment_author']=$postc->comment_author; $myrow['comment_author_email']=$postc->comment_author_email; $myrow['comment_author_url']=$postc->comment_author_url; $myrow['comment_author_IP']=$postc->comment_author_IP; $myrow['comment_date']=$postc->comment_date; $myrow['comment_content']=$postc->comment_content; $myrow['comment_karma']=$postc->comment_karma; if (strstr($myrow['comment_content'], '<trackback />')) { $myrow['comment_type'] = 'trackback'; } elseif (strstr($myrow['comment_content'], '<pingback />')) { $myrow['comment_type'] = 'pingback'; } else { $myrow['comment_type'] = 'comment'; } } return $myrow; } function get_catname($cat_ID) { global $tablecategories,$cache_catnames,$use_cache, $wpdb; if ((!$cache_catnames) || (!$use_cache)) { $results = $wpdb->get_results("SELECT * FROM $tablecategories") or die('Oops, couldn\'t query the db for categories.'); foreach ($results as $post) { $cache_catnames[$post->cat_ID] = $post->cat_name; } } $cat_name = $cache_catnames[$cat_ID]; return $cat_name; } function profile($user_login) { global $user_data; echo "<a href='profile.php?user=".$user_data->user_login."' onclick=\"javascript:window.open('profile.php?user=".$user_data->user_login."','Profile','toolbar=0,status=1,location=0,directories=0,menuBar=1,scrollbars=1,resizable=0,width=480,height=320,left=100,top=100'); return false;\">$user_login</a>"; } function dropdown_categories($default = 0) { global $post, $tablecategories, $tablepost2cat, $mode, $wpdb; $categories = $wpdb->get_results("SELECT * FROM $tablecategories ORDER BY cat_name"); if ($post->ID) { $postcategories = $wpdb->get_col(" SELECT category_id FROM $tablecategories, $tablepost2cat WHERE $tablepost2cat.category_id = cat_ID AND $tablepost2cat.post_id = $post->ID "); } else { $postcategories[] = $default; } foreach($categories as $category) { ++$i; $category->cat_name = stripslashes($category->cat_name); echo "\n<label for='category-$i' class='selectit'><input value='$category->cat_ID' type='checkbox' name='post_category[]' id='category-$i'"; if ($postcategories && in_array($category->cat_ID, $postcategories)) echo ' checked="checked"'; echo " /> $category->cat_name</label> "; } } function touch_time($edit = 1) { global $month, $postdata, $time_difference; // echo $postdata['Date']; if ('draft' == $postdata['post_status']) { $checked = 'checked="checked" '; $edit = false; } else { $checked = ' '; } echo '<p><input type="checkbox" class="checkbox" name="edit_date" value="1" id="timestamp" '.$checked.'/> <label for="timestamp">Edit timestamp</label> <a href="http://wordpress.org/docs/reference/post/#edit_timestamp" title="Help on changing the timestamp">?</a><br />'; $time_adj = time() + ($time_difference * 3600); $jj = ($edit) ? mysql2date('d', $postdata['Date']) : date('d', $time_adj); $mm = ($edit) ? mysql2date('m', $postdata['Date']) : date('m', $time_adj); $aa = ($edit) ? mysql2date('Y', $postdata['Date']) : date('Y', $time_adj); $hh = ($edit) ? mysql2date('H', $postdata['Date']) : date('H', $time_adj); $mn = ($edit) ? mysql2date('i', $postdata['Date']) : date('i', $time_adj); $ss = ($edit) ? mysql2date('s', $postdata['Date']) : date('s', $time_adj); echo '<input type="text" name="jj" value="'.$jj.'" size="2" maxlength="2" />'."\n"; echo "<select name=\"mm\">\n"; for ($i=1; $i < 13; $i=$i+1) { echo "\t\t\t<option value=\"$i\""; if ($i == $mm) echo " selected='selected'"; if ($i < 10) { $ii = "0".$i; } else { $ii = "$i"; } echo ">".$month["$ii"]."</option>\n"; } ?> </select> <input type="text" name="aa" value="<?php echo $aa ?>" size="4" maxlength="5" /> @ <input type="text" name="hh" value="<?php echo $hh ?>" size="2" maxlength="2" /> : <input type="text" name="mn" value="<?php echo $mn ?>" size="2" maxlength="2" /> : <input type="text" name="ss" value="<?php echo $ss ?>" size="2" maxlength="2" /> </p> <?php } function gzip_compression() { global $gzip_compressed; if (!$gzip_compressed) { $phpver = phpversion(); //start gzip compression if($phpver >= "4.0.4pl1") { if(extension_loaded("zlib")) { ob_start("ob_gzhandler"); } } else if($phpver > "4.0") { if(strstr($HTTP_SERVER_VARS['HTTP_ACCEPT_ENCODING'], 'gzip')) { if(extension_loaded("zlib")) { $do_gzip_compress = TRUE; ob_start(); ob_implicit_flush(0); header("Content-Encoding: gzip"); } } } //end gzip compression - that piece of script courtesy of the phpBB dev team $gzip_compressed=1; } } function alert_error($msg) { // displays a warning box with an error message (original by KYank) global $$HTTP_SERVER_VARS; ?> <html> <head> <script language="JavaScript">  </script> </head> <body>  <?php echo $msg; ?><br /> <a href="<?php echo $HTTP_SERVER_VARS["HTTP_REFERER"]; ?>">go back</a> </body> </html> <?php exit; } function alert_confirm($msg) { // asks a question - if the user clicks Cancel then it brings them back one page ?> <script language="JavaScript">  </script> <?php } function redirect_js($url,$title="...") { ?> <script language="JavaScript">  </script> <p>Redirecting you : <b><?php echo $title; ?></b><br /> <br /> If nothing happens, click <a href="<?php echo $url; ?>">here</a>.</p> <?php exit(); } // functions to count the page generation time (from phpBB2) // ( or just any time between timer_start() and timer_stop() ) function timer_start() { global $timestart; $mtime = microtime(); $mtime = explode(" ",$mtime); $mtime = $mtime[1] + $mtime[0]; $timestart = $mtime; return true; } function timer_stop($display=0,$precision=3) { //if called like timer_stop(1), will echo $timetotal global $timestart,$timeend; $mtime = microtime(); $mtime = explode(" ",$mtime); $mtime = $mtime[1] + $mtime[0]; $timeend = $mtime; $timetotal = $timeend-$timestart; if ($display) echo number_format($timetotal,$precision); return $timetotal; } // pings Weblogs.com function pingWeblogs($blog_ID = 1) { // original function by Dries Buytaert for Drupal global $use_weblogsping, $blogname,$siteurl,$blogfilename; if ((!(($blogname=="my weblog") && ($siteurl=="http://example.com") && ($blogfilename=="wp.php"))) && (!preg_match("/localhost\//",$siteurl)) && ($use_weblogsping)) { $client = new xmlrpc_client("/RPC2", "rpc.weblogs.com", 80); $message = new xmlrpcmsg("weblogUpdates.ping", array(new xmlrpcval($blogname), new xmlrpcval($siteurl."/".$blogfilename))); $result = $client->send($message); if (!$result || $result->faultCode()) { return false; } return true; } else { return false; } } // pings Weblogs.com/rssUpdates function pingWeblogsRss($blog_ID = 1, $rss_url) { global $use_weblogsrssping, $blogname, $rss_url; if ($blogname != 'my weblog' && $rss_url != 'http://example.com/b2rdf.php' && $use_weblogsrssping) { $client = new xmlrpc_client('/RPC2', 'rssrpc.weblogs.com', 80); $message = new xmlrpcmsg('rssUpdate', array(new xmlrpcval($blogname), new xmlrpcval($rss_url))); $result = $client->send($message); if (!$result || $result->faultCode()) { return false; } return true; } else { return false; } } // pings Caf�Log.com function pingCafelog($cafelogID,$title='',$p='') { global $use_cafelogping, $blogname, $siteurl, $blogfilename; if ((!(($blogname=="my weblog") && ($siteurl=="http://example.com") && ($blogfilename=="wp.php"))) && (!preg_match("/localhost\//",$siteurl)) && ($use_cafelogping) && ($cafelogID != '')) { $client = new xmlrpc_client("/xmlrpc.php", "cafelog.tidakada.com", 80); $message = new xmlrpcmsg("b2.ping", array(new xmlrpcval($cafelogID), new xmlrpcval($title), new xmlrpcval($p))); $result = $client->send($message); if (!$result || $result->faultCode()) { return false; } return true; } else { return false; } } // pings Blo.gs function pingBlogs($blog_ID="1") { global $use_blodotgsping, $blodotgsping_url, $use_rss, $blogname, $siteurl, $blogfilename; if ((!(($blogname=='my weblog') && ($siteurl=='http://example.com') && ($blogfilename=='wp.php'))) && (!preg_match('/localhost\//',$siteurl)) && ($use_blodotgsping)) { $url = ($blodotgsping_url == 'http://example.com') ? $siteurl.'/'.$blogfilename : $blodotgsping_url; $client = new xmlrpc_client('/', 'ping.blo.gs', 80); if ($use_rss) { $message = new xmlrpcmsg('weblogUpdates.extendedPing', array(new xmlrpcval($blogname), new xmlrpcval($url), new xmlrpcval($url), new xmlrpcval($siteurl.'/b2rss.xml'))); } else { $message = new xmlrpcmsg('weblogUpdates.ping', array(new xmlrpcval($blogname), new xmlrpcval($url))); } $result = $client->send($message); if (!$result || $result->faultCode()) { return false; } return true; } else { return false; } } // Send a Trackback function trackback($trackback_url, $title, $excerpt, $ID) { global $blogname, $wpdb, $tableposts; $title = urlencode(stripslashes($title)); $excerpt = urlencode(stripslashes($excerpt)); $blog_name = urlencode(stripslashes($blogname)); $tb_url = $trackback_url; $url = urlencode(get_permalink($ID)); $query_string = "title=$title&url=$url&blog_name=$blog_name&excerpt=$excerpt"; $trackback_url = parse_url($trackback_url); $http_request = 'POST '.$trackback_url['path']." HTTP/1.0\r\n"; $http_request .= 'Host: '.$trackback_url['host']."\r\n"; $http_request .= 'Content-Type: application/x-www-form-urlencoded'."\r\n"; $http_request .= 'Content-Length: '.strlen($query_string)."\r\n"; $http_request .= "\r\n"; $http_request .= $query_string; $fs = @fsockopen($trackback_url['host'], 80); @fputs($fs, $http_request); /* $debug_file = 'trackback.log'; $fp = fopen($debug_file, 'a'); fwrite($fp, "\n*****\nRequest:\n\n$http_request\n\nResponse:\n\n"); while(!@feof($fs)) { fwrite($fp, @fgets($fs, 4096)); } fwrite($fp, "\n\n"); fclose($fp); */ @fclose($fs); $wpdb->query("UPDATE $tableposts SET pinged = CONCAT(pinged, '\n', '$tb_url') WHERE ID = $ID"); $wpdb->query("UPDATE $tableposts SET to_ping = REPLACE(to_ping, '$tb_url', '') WHERE ID = $ID"); return $result; } // trackback - reply function trackback_response($error = 0, $error_message = '') { if ($error) { echo '<?xml version="1.0" encoding="iso-8859-1"?'.">\n"; echo "<response>\n"; echo "<error>1</error>\n"; echo "<message>$error_message</message>\n"; echo "</response>"; } else { echo '<?xml version="1.0" encoding="iso-8859-1"?'.">\n"; echo "<response>\n"; echo "<error>0</error>\n"; echo "</response>"; } die(); } function make_url_footnote($content) { global $siteurl; preg_match_all('/<a(.+?)href=\"(.+?)\"(.*?)>(.+?)<\/a>/', $content, $matches); $j = 0; for ($i=0; $i<count($matches[0]); $i++) { $links_summary = (!$j) ? "\n" : $links_summary; $j++; $link_match = $matches[0][$i]; $link_number = '['.($i+1).']'; $link_url = $matches[2][$i]; $link_text = $matches[4][$i]; $content = str_replace($link_match, $link_text.' '.$link_number, $content); $link_url = (strtolower(substr($link_url,0,7)) != 'http://') ? $siteurl.$link_url : $link_url; $links_summary .= "\n".$link_number.' '.$link_url; } $content = strip_tags($content); $content .= $links_summary; return $content; } function xmlrpc_getposttitle($content) { global $post_default_title; if (preg_match('/<title>(.+?)<\/title>/is', $content, $matchtitle)) { $post_title = $matchtitle[0]; $post_title = preg_replace('/<title>/si', '', $post_title); $post_title = preg_replace('/<\/title>/si', '', $post_title); } else { $post_title = $post_default_title; } return $post_title; } function xmlrpc_getpostcategory($content) { global $post_default_category; if (preg_match('/<category>(.+?)<\/category>/is', $content, $matchcat)) { $post_category = $matchcat[0]; $post_category = preg_replace('/<category>/si', '', $post_category); $post_category = preg_replace('/<\/category>/si', '', $post_category); } else { $post_category = $post_default_category; } return $post_category; } function xmlrpc_removepostdata($content) { $content = preg_replace('/<title>(.+?)<\/title>/si', '', $content); $content = preg_replace('/<category>(.+?)<\/category>/si', '', $content); $content = trim($content); return $content; } function debug_fopen($filename, $mode) { global $debug; if ($debug == 1) { $fp = fopen($filename, $mode); return $fp; } else { return false; } } function debug_fwrite($fp, $string) { global $debug; if ($debug == 1) { fwrite($fp, $string); } } function debug_fclose($fp) { global $debug; if ($debug == 1) { fclose($fp); } } function pingback($content, $post_ID) { // original code by Mort (http://mort.mine.nu:8080) global $siteurl, $blogfilename, $wp_version; $log = debug_fopen('./pingback.log', 'a'); $post_links = array(); debug_fwrite($log, 'BEGIN '.time()."\n"); // Variables $ltrs = '\w'; $gunk = '/#~:.?+=&%@!\-'; $punc = '.:?\-'; $any = $ltrs.$gunk.$punc; $pingback_str_dquote = 'rel="pingback"'; $pingback_str_squote = 'rel=\'pingback\''; $x_pingback_str = 'x-pingback: '; $pingback_href_original_pos = 27; // Step 1 // Parsing the post, external links (if any) are stored in the $post_links array // This regexp comes straight from phpfreaks.com // http://www.phpfreaks.com/quickcode/Extract_All_URLs_on_a_Page/15.php preg_match_all("{\b http : [$any] +? (?= [$punc] * [^$any] | $)}x", $content, $post_links_temp); // Debug debug_fwrite($log, 'Post contents:'); debug_fwrite($log, $content."\n"); // Step 2. // Walking thru the links array // first we get rid of links pointing to sites, not to specific files // Example: // http://dummy-weblog.org // http://dummy-weblog.org/ // http://dummy-weblog.org/post.php // We don't wanna ping first and second types, even if they have a valid <link/> foreach($post_links_temp[0] as $link_test){ $test = parse_url($link_test); if (isset($test['query'])) { $post_links[] = $link_test; } elseif(($test['path'] != '/') && ($test['path'] != '')) { $post_links[] = $link_test; } } foreach ($post_links as $pagelinkedto){ debug_fwrite($log, 'Processing -- '.$pagelinkedto."\n\n"); $bits = parse_url($pagelinkedto); if (!isset($bits['host'])) { debug_fwrite($log, 'Couldn\'t find a hostname for '.$pagelinkedto."\n\n"); continue; } $host = $bits['host']; $path = isset($bits['path']) ? $bits['path'] : ''; if (isset($bits['query'])) { $path .= '?'.$bits['query']; } if (!$path) { $path = '/'; } $port = isset($bits['port']) ? $bits['port'] : 80; // Try to connect to the server at $host $fp = fsockopen($host, $port, $errno, $errstr, 30); if (!$fp) { debug_fwrite($log, 'Couldn\'t open a connection to '.$host."\n\n"); continue; } // Send the GET request $request = "GET $path HTTP/1.1\r\nHost: $host\r\nUser-Agent: WordPress/$wp_version PHP/" . phpversion() . "\r\n\r\n"; ob_end_flush(); fputs($fp, $request); // Start receiving headers and content $contents = ''; $headers = ''; $gettingHeaders = true; $found_pingback_server = 0; while (!feof($fp)) { $line = fgets($fp, 4096); if (trim($line) == '') { $gettingHeaders = false; } if (!$gettingHeaders) { $contents .= trim($line)."\n"; $pingback_link_offset_dquote = strpos($contents, $pingback_str_dquote); $pingback_link_offset_squote = strpos($contents, $pingback_str_squote); } else { $headers .= trim($line)."\n"; $x_pingback_header_offset = strpos(strtolower($headers), $x_pingback_str); } if ($x_pingback_header_offset) { preg_match('#x-pingback: (.+)#is', $headers, $matches); $pingback_server_url = trim($matches[1]); debug_fwrite($log, "Pingback server found from X-Pingback header @ $pingback_server_url\n"); $found_pingback_server = 1; break; } if ($pingback_link_offset_dquote || $pingback_link_offset_squote) { $quote = ($pingback_link_offset_dquote) ? '"' : '\''; $pingback_link_offset = ($quote=='"') ? $pingback_link_offset_dquote : $pingback_link_offset_squote; $pingback_href_pos = @strpos($contents, 'href=', $pingback_link_offset); $pingback_href_start = $pingback_href_pos+6; $pingback_href_end = @strpos($contents, $quote, $pingback_href_start); $pingback_server_url_len = $pingback_href_end-$pingback_href_start; $pingback_server_url = substr($contents, $pingback_href_start, $pingback_server_url_len); debug_fwrite($log, "Pingback server found from Pingback <link /> tag @ $pingback_server_url\n"); $found_pingback_server = 1; break; } } if (!$found_pingback_server) { debug_fwrite($log, "Pingback server not found\n\n*************************\n\n"); @fclose($fp); } else { debug_fwrite($log,"\n\nPingback server data\n"); // Assuming there's a "http://" bit, let's get rid of it $host_clear = substr($pingback_server_url, 7); // the trailing slash marks the end of the server name $host_end = strpos($host_clear, '/'); // Another clear cut $host_len = $host_end-$host_start; $host = substr($host_clear, 0, $host_len); debug_fwrite($log, 'host: '.$host."\n"); // If we got the server name right, the rest of the string is the server path $path = substr($host_clear,$host_end); debug_fwrite($log, 'path: '.$path."\n\n"); // Now, the RPC call $method = 'pingback.ping'; debug_fwrite($log, 'Page Linked To: '.$pagelinkedto."\n"); debug_fwrite($log, 'Page Linked From: '); $pagelinkedfrom = get_permalink($post_ID); debug_fwrite($log, $pagelinkedfrom."\n"); $client = new xmlrpc_client($path, $host, 80); $message = new xmlrpcmsg($method, array(new xmlrpcval($pagelinkedfrom), new xmlrpcval($pagelinkedto))); $result = $client->send($message); if ($result){ if (!$result->value()){ debug_fwrite($log, $result->faultCode().' -- '.$result->faultString()); } else { $value = xmlrpc_decode($result->value()); if (is_array($value)) { $value_arr = ''; foreach($value as $blah) { $value_arr .= $blah.' |||| '; } debug_fwrite($log, $value_arr); } else { debug_fwrite($log, $value); } } } @fclose($fp); } } debug_fwrite($log, "\nEND: ".time()."\n****************************\n\r"); debug_fclose($log); } /** ** sanitise HTML attributes, remove frame/applet/*script/mouseovers,etc. tags ** so that this kind of thing cannot be done: ** This is how we can do <b onmouseover="alert('badbadbad')">bad stuff</b>! **/ function sanitise_html_attributes($text) { $text = preg_replace('#(([\s"\'])on[a-z]{1,}|style|class|id)="(.*?)"#i', '$1', $text); $text = preg_replace('#(([\s"\'])on[a-z]{1,}|style|class|id)=\'(.*?)\'#i', '$1', $text); $text = preg_replace('#(([\s"\'])on[a-z]{1,}|style|class|id)[ \t]*=[ \t]*([^ \t\>]*?)#i', '$1', $text); $text = preg_replace('#([a-z]{1,})="(( |\t)*?)(javascript|vbscript|about):(.*?)"#i', '$1=""', $text); $text = preg_replace('#([a-z]{1,})=\'(( |\t)*?)(javascript|vbscript|about):(.*?)\'#i', '$1=""', $text); $text = preg_replace('#\<(\/{0,1})([a-z]{0,2})(frame|applet)(.*?)\>#i', '', $text); return $text; } /* balanceTags Balances Tags of string using a modified stack. @param text Text to be balanced @return Returns balanced text @author Leonard Lin (leonard@acm.org) @version v1.1 @date November 4, 2001 @license GPL v2.0 @notes @changelog 1.2 ***TODO*** Make better - change loop condition to $text 1.1 Fixed handling of append/stack pop order of end text Added Cleaning Hooks 1.0 First Version */ function balanceTags($text, $is_comment = 0) { global $use_balanceTags; if ($is_comment) { $text = sanitise_html_attributes($text); } if ($use_balanceTags == 0) { return $text; } $tagstack = array(); $stacksize = 0; $tagqueue = ''; $newtext = ''; # b2 bug fix for comments - in case you REALLY meant to type '< !--' $text = str_replace('< !--', '< !--', $text); # b2 bug fix for LOVE <3 (and other situations with '<' before a number) $text = preg_replace('#<([0-9]{1})#', '<$1', $text); while (preg_match("/<(\/?\w*)\s*([^>]*)>/",$text,$regex)) { $newtext = $newtext . $tagqueue; $i = strpos($text,$regex[0]); $l = strlen($tagqueue) + strlen($regex[0]); // clear the shifter $tagqueue = ''; // Pop or Push if ($regex[1][0] == "/") { // End Tag $tag = strtolower(substr($regex[1],1)); // if too many closing tags if($stacksize <= 0) { $tag = ''; //or close to be safe $tag = '/' . $tag; } // if stacktop value = tag close value then pop else if ($tagstack[$stacksize - 1] == $tag) { // found closing tag $tag = '</' . $tag . '>'; // Close Tag // Pop array_pop ($tagstack); $stacksize--; } else { // closing tag not at top, search for it for ($j=$stacksize-1;$j>=0;$j--) { if ($tagstack[$j] == $tag) { // add tag to tagqueue for ($k=$stacksize-1;$k>=$j;$k--){ $tagqueue .= '</' . array_pop ($tagstack) . '>'; $stacksize--; } break; } } $tag = ''; } } else { // Begin Tag $tag = strtolower($regex[1]); // Tag Cleaning // Push if not img or br or hr if($tag != 'br' && $tag != 'img' && $tag != 'hr') { $stacksize = array_push ($tagstack, $tag); } // Attributes // $attributes = $regex[2]; $attributes = $regex[2]; if($attributes) { $attributes = ' '.$attributes; } $tag = '<'.$tag.$attributes.'>'; } $newtext .= substr($text,0,$i) . $tag; $text = substr($text,$i+$l); } // Clear Tag Queue $newtext = $newtext . $tagqueue; // Add Remaining text $newtext .= $text; // Empty Stack while($x = array_pop($tagstack)) { $newtext = $newtext . '</' . $x . '>'; // Add remaining tags to close } # b2 fix for the bug with HTML comments $newtext = str_replace("< !--","/', $post->post_content)) { if ($page > 1) $more = 1; $multipage = 1; $content = stripslashes($post->post_content); $content = str_replace("\n\n", '', $content); $content = str_replace("\n", '', $content); $content = str_replace("\n", '', $content); $pages = explode('', $content); $numpages = count($pages); } else { $pages[0] = stripslashes($post->post_content); $multipage = 0; } return true; } function is_new_day() { global $day, $previousday; if ($day != $previousday) { return(1); } else { return(0); } } function apply_filters($tag, $string) { global $wp_filter; if (isset($wp_filter['all'])) { $wp_filter['all'] = (is_string($wp_filter['all'])) ? array($wp_filter['all']) : $wp_filter['all']; if (isset($wp_filter[$tag])) $wp_filter[$tag] = array_merge($wp_filter['all'], $wp_filter[$tag]); else $wp_filter[$tag] = array_merge($wp_filter['all'], array()); $wp_filter[$tag] = array_unique($wp_filter[$tag]); } if (isset($wp_filter[$tag])) { $wp_filter[$tag] = (is_string($wp_filter[$tag])) ? array($wp_filter[$tag]) : $wp_filter[$tag]; $functions = $wp_filter[$tag]; foreach($functions as $function) { //error_log("apply_filters #1 applying filter $function"); $string = $function($string); } } return $string; } function add_filter($tag, $function_to_add) { global $wp_filter; if (isset($wp_filter[$tag])) { $functions = $wp_filter[$tag]; if (is_array($functions)) { foreach($functions as $function) { $new_functions[] = $function; } } elseif (is_string($functions)) { $new_functions[] = $functions; } /* this is commented out because it just makes PHP die silently for no apparent reason if (is_array($function_to_add)) { foreach($function_to_add as $function) { if (!in_array($function, $wp_filter[$tag])) { $new_functions[] = $function; } } } else */if (is_string($function_to_add)) { if (!@in_array($function_to_add, $wp_filter[$tag])) { $new_functions[] = $function_to_add; } } $wp_filter[$tag] = $new_functions; } else { $wp_filter[$tag] = array($function_to_add); } return true; } /* Highlighting code c/o Ryan Boren */ function get_search_query_terms($engine = 'google') { global $s, $s_array; $referer = urldecode($_SERVER[HTTP_REFERER]); $query_array = array(); switch ($engine) { case 'google': // Google query parsing code adapted from Dean Allen's // Google Hilite 0.3. http://textism.com $query_terms = preg_replace('/^.*q=([^&]+)&?.*$/i','$1', $referer); $query_terms = preg_replace('/\'|"/', '', $query_terms); $query_array = preg_split ("/[\s,\+\.]+/", $query_terms); break; case 'lycos': $query_terms = preg_replace('/^.*query=([^&]+)&?.*$/i','$1', $referer); $query_terms = preg_replace('/\'|"/', '', $query_terms); $query_array = preg_split ("/[\s,\+\.]+/", $query_terms); break; case 'yahoo': $query_terms = preg_replace('/^.*p=([^&]+)&?.*$/i','$1', $referer); $query_terms = preg_replace('/\'|"/', '', $query_terms); $query_array = preg_split ("/[\s,\+\.]+/", $query_terms); break; case 'wordpress': // Check the search form vars if the search terms // aren't in the referer. if ( ! preg_match('/^.*s=/i', $referer)) { if (isset($s_array)) { $query_array = $s_array; } else if (isset($s)) { $query_array = array($s); } break; } $query_terms = preg_replace('/^.*s=([^&]+)&?.*$/i','$1', $referer); $query_terms = preg_replace('/\'|"/', '', $query_terms); $query_array = preg_split ("/[\s,\+\.]+/", $query_terms); break; } return $query_array; } function is_referer_search_engine($engine = 'google') { global $siteurl; $referer = urldecode($_SERVER[HTTP_REFERER]); //echo "referer is: $referer<br />"; if ( ! $engine ) { return 0; } switch ($engine) { case 'google': if (preg_match('/^http:\/\/w?w?w?\.?google.*/i', $referer)) { return 1; } break; case 'lycos': if (preg_match('/^http:\/\/search\.lycos.*/i', $referer)) { return 1; } break; case 'yahoo': if (preg_match('/^http:\/\/search\.yahoo.*/i', $referer)) { return 1; } break; case 'wordpress': if (preg_match("#^$siteurl#i", $referer)) { return 1; } break; } return 0; } function hilite($text) { $search_engines = array('wordpress', 'google', 'lycos', 'yahoo'); foreach ($search_engines as $engine) { if ( is_referer_search_engine($engine) && !empty($term) && $term != ' ') { $query_terms = get_search_query_terms($engine); foreach ($query_terms as $term) { if (!preg_match('/<.+>/',$text)) { $text = preg_replace('/(\b'.$term.'\b)/i','<span class="hilite">$1</span>',$text); } else { $text = preg_replace('/(?<=>)([^<]+)?(\b'.$term.'\b)/i','$1<span class="hilite">$2</span>',$text); } } break; } } return $text; } // Check for hacks file if the option is enabled if (get_settings('hack_file')) { if (file_exists(ABSPATH . '/my-hacks.php')) require(ABSPATH . '/my-hacks.php'); } ?>

)/Us", $text, -1, PREG_SPLIT_DELIM_CAPTURE); // capture the tags as well as in between $stop = count($textarr); $next = true; // loop stuff for ($i = 0; $i < $stop; $i++) { $curl = $textarr[$i]; if (!strstr($_SERVER['HTTP_USER_AGENT'], 'Gecko')) { $curl = str_replace('', '“', $curl); $curl = str_replace('', '”', $curl); } if (isset($curl{0}) && '<' != $curl{0} && $next) { // If it's not a tag $curl = str_replace('---', '—', $curl); $curl = str_replace('--', '–', $curl); $curl = str_replace("...", '…', $curl); $curl = str_replace('``', '“', $curl); // This is a hack, look at this more later. It works pretty well though. $cockney = array("'tain't","'twere","'twas","'tis","'twill","'til","'bout","'nuff","'round"); $cockneyreplace = array("’tain’t","’twere","’twas","’tis","’twill","’til","’bout","’nuff","’round"); $curl = str_replace($cockney, $cockneyreplace, $curl); $curl = preg_replace("/'s/", "’s", $curl); $curl = preg_replace("/'(\d\d(?:’|')?s)/", "’$1", $curl); $curl = preg_replace('/(\s|\A|")\'/', '$1‘', $curl); $curl = preg_replace("/(\d+)\"/", "$1″", $curl); $curl = preg_replace("/(\d+)'/", "$1′", $curl); $curl = preg_replace("/(\S)'([^'\s])/", "$1’$2", $curl); $curl = preg_replace('/"([\s.,!?;:&\']|\Z)/', '”$1', $curl); $curl = preg_replace('/(\s|\A)"/', '$1“', $curl); $curl = preg_replace("/'([\s.]|\Z)/", '’$1', $curl); $curl = preg_replace("/$tm$/i", '™', $curl); $curl = preg_replace("/$c$/i", '©', $curl); $curl = preg_replace("/$r$/i", '®', $curl); $curl = preg_replace('/&([^#])(?![a-z]{1,8};)/', '&$1', $curl); $curl = str_replace("''", '”', $curl); $curl = preg_replace('/(d+)x(\d+)/', "$1×$2", $curl); } elseif (strstr($curl, '\s*
|', "\n\n", $pee); $pee = preg_replace('!(<(?:table|ul|ol|li|pre|form|blockquote|h[1-6])[^>]*>)!', "\n$1", $pee); // Space things out a little $pee = preg_replace('!()!', "$1\n", $pee); // Space things out a little $pee = preg_replace("/(\r\n|\r)/", "\n", $pee); // cross-platform newlines $pee = preg_replace("/\n\n+/", "\n\n", $pee); // take care of duplicates $pee = preg_replace('/\n?(.+?)(?:\n\s*\n|\z)/s', "\t

\n", $pee); // make paragraphs, including one at the end $pee = preg_replace('|

\s*?

|', '', $pee); // under certain strange conditions it could create a P of entirely whitespace $pee = preg_replace("|

(|", "$1", $pee); // problem with nested lists $pee = preg_replace('|

]*)>|i', "

", $pee); $pee = str_replace('

', '

', $pee); $pee = preg_replace('!

\s*(]*>)!', "$1", $pee); $pee = preg_replace('!(]*>)\s*