• root
• dwords
• code
• about
• donate

• avr
• crt
• rmpc-notify
• wordpress

• expand-comments
• fancy-archives
• fancy-categories
• shrinky-link

• source
• changelog
• download

viewing source for "shrinkylink.php"

source code

: <?php
: /*
: Plugin Name: ShrinkyLink
: Plugin URI: http://nymb.us/?p=54
: Description: A simple filter that changes the links in comments/posts to be a certain size (char length) or a certain word, and optionally, displays the domain of the site after the link.
: Author: Andrew Rader
: Version: 0.2
: Author URI: http://nymb.us
: 
: Copyright 2006 Andrew Rader
: 
: This file is part of Shrinky Link
: 
:     Shrinky Link is free software; you can redistribute it and/or modify
:     it under the terms of the GNU General Public License as published by
:     the Free Software Foundation; either version 2 of the License, or
:     (at your option) any later version.
: 
:     Shrinky Link 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 General Public License for more details.
: 
:     You should have received a copy of the GNU General Public License
:     along with Shrinky Link; if not, write to the Free Software
:     Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
: 
: */ 
: 
: add_filter('comment_text', array('shrinky','shrinky_comments'), 50);
: add_filter('the_content', array('shrinky','shrinky_posts'), 50);
: 
: add_action('activate_shrinkylink/shrinkylink.php', array('shrinky','shrinky_init'));
: add_action('admin_menu', array('shrinky','shrinky_setup'));
: 
: class shrinky {
: 
: 	function shrinky_comments( $comment ) {
: 		if( shrinky::get_comment_filter() ) {
: 			return shrinky::shrinkylink($comment);
: 		}
: 		else {
: 			return $comment;
: 		}
: 	}
: 
: 	function shrinky_posts( $post ) {
: 		if( shrinky::get_post_filter() ) {
: 			return shrinky::shrinkylink($post);
: 		}
: 		else {
: 			return $post;
: 		}
: 	}
: 
: 	function shrinkylink( $comment ) {
: 		if( shrinky::get_replace() ) {
: 			$name = shrinky::get_replace_text();
: 			if( shrinky::get_show_domain() ) {
: 				$comment = preg_replace( '/<a([^>]*)href=?([^:]*:\/\/)?([^ \/"\']*)([^>]*)>([^<]*)<\/a>/', '<a$1href=$2$3$4>'.$name.'</a> [$3]', $comment );
: 			}
: 			else {
: 				$comment = preg_replace( '/<a([^>]*)href=?([^:]*:\/\/)?([^ \/"\']*)([^>]*)>([^<]*)<\/a>/', '<a$1href=$2$3$4>'.$name.'</a>', $comment );
: 			}
: 		}
: 		else {
: 			$comment = preg_replace_callback( '/<a([^>]*)href=?([^:]*:\/\/)?([^ \/"\']*)([^>]*)>([^<]*)<\/a>/', array('shrinky','shrinky_trim'), $comment );
: 		}
: 		return $comment;
: 	}
: 
: 	function shrinky_trim( $comment ) {
: 		$text = $comment[5];
: 		if( shrinky::get_www_trim() ) {
: 			$text = preg_replace( '/([^ :]*)www\.([^ ]*)/', '$1$2', $text );
: 		}
: 		if( shrinky::get_scheme_trim() ) {
: 			$text = preg_replace( '/([^ :]*:\/\/)([^ ]*)/', '$2', $text );
: 		}
: 		if( shrinky::get_show_domain() ) {
: 			$domain = ' ['.$comment[3].']';
: 		}
: 		else {
: 			$domain = '';
: 		}
: 
: 		$len = strlen($text);
: 		$text = substr( $text, 0, shrinky::get_trim_length() );
: 
: 		if( $len > shrinky::get_trim_length() && shrinky::get_elipses() ) {
: 			$text .= "...";
: 		}
: 
: 		return '<a'.$comment[1].'href='.$comment[2].$comment[3].$comment[4].'>'.$text.'</a>'.$domain;
: 	}
: 
: 	function shrinky_init() {
: 		if( function_exists('add_option') ) {
: 			add_option( 'shrinky_comments', 'yes' );
: 			add_option( 'shrinky_posts', 'no' );
: 			add_option( 'shrinky_replace', 'yes' );
: 			add_option( 'shrinky_text', 'link' );
: 			add_option( 'shrinky_trim', 'no' );
: 			add_option( 'shrinky_size', '12' );
: 			add_option( 'shrinky_scheme', 'no' );
: 			add_option( 'shrinky_www', 'no' );
: 			add_option( 'shrinky_elipse', 'yes');
: 			add_option( 'shrinky_domain', 'yes' );
: 		}
: 	}
: 
: 	function shrinky_setup() {
: 		if( function_exists('add_options_page') ) {
: 			add_options_page(__('Shrinky Link'),__('Shrinky Link'),1,basename(__FILE__),array('shrinky','shrinky_ui'));
: 		}
: 	}
: 
: 	function shrinky_ui() {
: 		include_once('shrinky-ui.php');
: 	}
: 
: 	function enable_comment_filter() {
: 		if( function_exists('update_option') ) {
: 			update_option( 'shrinky_comments', 'yes' );
: 		}
: 	}
: 
: 	function disable_comment_filter() {
: 		if( function_exists('update_option') ) {
: 			update_option( 'shrinky_comments', 'no' );
: 		}
: 	}
: 
: 	function get_comment_filter() {
: 		if( function_exists('get_option') ) {
: 			$ret = get_option( 'shrinky_comments' );
: 		}
: 		return ($ret == 'yes');
: 	}
: 
: 	function enable_post_filter() {
: 		if( function_exists('update_option') ) {
: 			update_option( 'shrinky_posts', 'yes' );
: 		}
: 	}
: 
: 	function disable_post_filter() {
: 		if( function_exists('update_option') ) {
: 			update_option( 'shrinky_posts', 'no' );
: 		}
: 	}
: 
: 	function get_post_filter() {
: 		if( function_exists('get_option') ) {
: 			$ret = get_option('shrinky_posts');
: 		}
: 		return ($ret == 'yes');
: 	}
: 
: 	function enable_replace() {
: 		if( function_exists('update_option') ) {
: 			update_option( 'shrinky_replace', 'yes' );
: 		}
: 	}
: 
: 	function disable_replace() {
: 		if( function_exists('update_option') ) {
: 			update_option( 'shrinky_replace', 'no' );
: 		}
: 	}
: 
: 	function get_replace() {
: 		if( function_exists('get_option') ) {
: 			$ret = get_option('shrinky_replace');
: 		}
: 		return ($ret == 'yes');
: 	}
: 
: 	function set_replace_text($text) {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_text', $text);
: 		}
: 	}
: 
: 	function get_replace_text() {
: 		if( function_exists('get_option') ) {
: 			$ret = get_option('shrinky_text');
: 		}
: 		return $ret;
: 	}
: 
: 	function enable_trim() {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_trim', 'yes');
: 		}
: 	}
: 
: 	function disable_trim() {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_trim', 'no');
: 		}
: 	}
: 
: 	function get_trim() {
: 		if( function_exists('get_option') ) {
: 			$ret = get_option('shrinky_trim');
: 		}
: 		return ($ret == 'yes');
: 	}
: 
: 	function set_trim_length($length) {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_size',$length);
: 		}
: 	}
: 
: 	function get_trim_length() {
: 		if( function_exists('get_option') ) {
: 			$ret = get_option('shrinky_size');
: 		}
: 		return $ret;
: 	}
: 
: 	function enable_scheme_trim() {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_scheme','yes');
: 		}
: 	}
: 
: 	function disable_scheme_trim() {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_scheme','no');
: 		}
: 	}
: 
: 	function get_scheme_trim() {
: 		if( function_exists('get_option') ) {
: 			$ret = get_option('shrinky_scheme');
: 		}
: 		return ($ret == 'yes');
: 	}
: 
: 	function enable_www_trim() {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_www','yes');
: 		}
: 	}
: 
: 	function disable_www_trim() {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_www', 'no');
: 		}
: 	}
: 
: 	function get_www_trim() {
: 		if( function_exists('get_option') ) {
: 			$ret = get_option('shrinky_www');
: 		}
: 		return ($ret == 'yes');
: 	}
: 
: 	function enable_elipses() {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_elipse','yes');
: 		}
: 	}
: 
: 	function disable_elipses() {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_elipse','no');
: 		}
: 	}
: 
: 	function get_elipses() {
: 		if( function_exists('get_option') ) {
: 			$ret = get_option('shrinky_elipse');
: 		}
: 		return ($ret == 'yes');
: 	}
: 
: 	function enable_show_domain() {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_domain','yes');
: 		}
: 	}
: 
: 	function disable_show_domain() {
: 		if( function_exists('update_option') ) {
: 			update_option('shrinky_domain','no');
: 		}
: 	}
: 
: 	function get_show_domain() {
: 		if( function_exists('get_option') ) {
: 			$ret = get_option('shrinky_domain');
: 		}
: 		return ($ret == 'yes');
: 	}
: }
: ?>