<?php

/*

Plugin Name: Twitter Tools

Plugin URI: http://alexking.org/projects/wordpress

Description: A complete integration between your WordPress blog and <a href="http://twitter.com">Twitter</a>. Bring your tweets into your blog and pass your blog posts to Twitter. Show your tweets in your sidebar, and post tweets from your WordPress admin.

Version: 2.0

Author: Alex King

Author URI: http://alexking.org

*/

// Copyright (c) 2007-2009 Crowd Favorite, Ltd., Alex King. All rights reserved.

//

// Released under the GPL license

// http://www.opensource.org/licenses/gpl-license.php

//

// This is an add-on for WordPress

// http://wordpress.org/

//

// Thanks to John Ford ( http://www.aldenta.com ) for his contributions.

// Thanks to Dougal Campbell ( http://dougal.gunters.org ) for his contributions.

// Thanks to Silas Sewell ( http://silas.sewell.ch ) for his contributions.

// Thanks to Greg Grubbs for his contributions.

//

// **********************************************************************

// This program 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. 

// **********************************************************************

load_plugin_textdomain('twitter-tools');

if (!defined('PLUGINDIR')) {

	define('PLUGINDIR','wp-content/plugins');

}

if (is_file(trailingslashit(ABSPATH.PLUGINDIR).'twitter-tools.php')) {

	define('AKTT_FILE', trailingslashit(ABSPATH.PLUGINDIR).'twitter-tools.php');

}

else if (is_file(trailingslashit(ABSPATH.PLUGINDIR).'twitter-tools/twitter-tools.php')) {

	define('AKTT_FILE', trailingslashit(ABSPATH.PLUGINDIR).'twitter-tools/twitter-tools.php');

}

if (!function_exists('wp_prototype_before_jquery')) {

	function wp_prototype_before_jquery( $js_array ) {

		if ( false === $jquery = array_search( 'jquery', $js_array ) )

			return $js_array;

		if ( false === $prototype = array_search( 'prototype', $js_array ) )

			return $js_array;

		if ( $prototype < $jquery )

			return $js_array;

		unset($js_array[$prototype]);

		array_splice( $js_array, $jquery, 0, 'prototype' );

		return $js_array;

	}

	add_filter( 'print_scripts_array', 'wp_prototype_before_jquery' );

}

define('AKTT_API_POST_STATUS', 'http://twitter.com/statuses/update.json');

define('AKTT_API_USER_TIMELINE', 'http://twitter.com/statuses/user_timeline.json');

define('AKTT_API_STATUS_SHOW', 'http://twitter.com/statuses/show/###ID###.json');

define('AKTT_PROFILE_URL', 'http://twitter.com/###USERNAME###');

define('AKTT_STATUS_URL', 'http://twitter.com/###USERNAME###/statuses/###STATUS###');

define('AKTT_HASHTAG_URL', 'http://search.twitter.com/search?q=###HASHTAG###');

function aktt_install() {

	global $wpdb;

	$aktt_install = new twitter_tools;

	$wpdb->aktt = $wpdb->prefix.'ak_twitter';

	$charset_collate = '';

	if ( version_compare(mysql_get_server_info(), '4.1.0', '>=') ) {

		if (!empty($wpdb->charset)) {

			$charset_collate .= " DEFAULT CHARACTER SET $wpdb->charset";

		}

		if (!empty($wpdb->collate)) {

			$charset_collate .= " COLLATE $wpdb->collate";

		}

	}

	$result = $wpdb->query("

		CREATE TABLE `$wpdb->aktt` (

		`id` INT( 11 ) NOT NULL AUTO_INCREMENT PRIMARY KEY ,

		`tw_id` VARCHAR( 255 ) NOT NULL ,

		`tw_text` VARCHAR( 255 ) NOT NULL ,

		`tw_reply_username` VARCHAR( 255 ) DEFAULT NULL ,

		`tw_reply_tweet` VARCHAR( 255 ) DEFAULT NULL ,

		`tw_created_at` DATETIME NOT NULL ,

		`modified` DATETIME NOT NULL ,

		INDEX ( `tw_id` )

		) $charset_collate

	");

	foreach ($aktt_install->options as $option) {

		add_option('aktt_'.$option, $aktt_install->$option);

	}

	add_option('aktt_update_hash', '');

}

register_activation_hook(AKTT_FILE, 'aktt_install');

class twitter_tools {

	function twitter_tools() {

		$this->options = array(

			'twitter_username'

			, 'twitter_password'

			, 'create_blog_posts'

			, 'create_digest'

			, 'create_digest_weekly'

			, 'digest_daily_time'

			, 'digest_weekly_time'

			, 'digest_weekly_day'

			, 'digest_title'

			, 'digest_title_weekly'

			, 'blog_post_author'

			, 'blog_post_category'

			, 'blog_post_tags'

			, 'notify_twitter'

			, 'sidebar_tweet_count'

			, 'tweet_from_sidebar'

			, 'give_tt_credit'

			, 'exclude_reply_tweets'

			, 'tweet_prefix'

			, 'last_tweet_download'

			, 'doing_tweet_download'

			, 'doing_digest_post'

			, 'install_date'

			, 'js_lib'

			, 'digest_tweet_order'

			, 'notify_twitter_default'

		);

		$this->twitter_username = '';

		$this->twitter_password = '';

		$this->create_blog_posts = '0';

		$this->create_digest = '0';

		$this->create_digest_weekly = '0';

		$this->digest_daily_time = null;

		$this->digest_weekly_time = null;

		$this->digest_weekly_day = null;

		$this->digest_title = __("Twitter Updates for %s", 'twitter-tools');

		$this->digest_title_weekly = __("Twitter Weekly Updates for %s", 'twitter-tools');

		$this->blog_post_author = '1';

		$this->blog_post_category = '1';

		$this->blog_post_tags = '';

		$this->notify_twitter = '0';

		$this->notify_twitter_default = '0';

		$this->sidebar_tweet_count = '3';

		$this->tweet_from_sidebar = '1';

		$this->give_tt_credit = '1';

		$this->exclude_reply_tweets = '0';

		$this->install_date = '';

		$this->js_lib = 'jquery';

		$this->digest_tweet_order = 'ASC';

		$this->tweet_prefix = 'New blog post';

		// not included in options

		$this->update_hash = '';

		$this->tweet_format = $this->tweet_prefix.': %s %s';

		$this->last_digest_post = '';

		$this->last_tweet_download = '';

		$this->doing_tweet_download = '0';

		$this->doing_digest_post = '0';

		$this->version = '1.6';

	}

	function upgrade() {

		global $wpdb;

		$wpdb->aktt = $wpdb->prefix.'ak_twitter';

		$col_data = $wpdb->get_results("

			SHOW COLUMNS FROM $wpdb->aktt

		");

		$cols = array();

		foreach ($col_data as $col) {

			$cols[] = $col->Field;

		}

		// 1.2 schema upgrade

		if (!in_array('tw_reply_username', $cols)) {

			$wpdb->query("

				ALTER TABLE `$wpdb->aktt`

				ADD `tw_reply_username` VARCHAR( 255 ) DEFAULT NULL

				AFTER `tw_text`

			");

		}

		if (!in_array('tw_reply_tweet', $cols)) {

			$wpdb->query("

				ALTER TABLE `$wpdb->aktt`

				ADD `tw_reply_tweet` VARCHAR( 255 ) DEFAULT NULL

				AFTER `tw_reply_username`

			");

		}

		$this->upgrade_default_tweet_prefix();

	}

	function upgrade_default_tweet_prefix() {

		$prefix = get_option('aktt_tweet_prefix');

		if (empty($prefix)) {

			$aktt_defaults = new twitter_tools;

			update_option('aktt_tweet_prefix', $aktt_defaults->tweet_prefix);

		}

	}

	function get_settings() {

		foreach ($this->options as $option) {

			$value = get_option('aktt_'.$option);

			if ($option != 'tweet_prefix' || !empty($value)) {

				$this->$option = $value;

			}

		}

		$this->tweet_format = $this->tweet_prefix.': %s %s';

	}

	// puts post fields into object propps

	function populate_settings() {

		foreach ($this->options as $option) {

			$value = stripslashes($_POST['aktt_'.$option]);

			if (isset($_POST['aktt_'.$option]) && ($option != 'tweet_prefix' || !empty($value))) {

				$this->$option = $value;

			}

		}

	}

	// puts object props into wp option storage

	function update_settings() {

		if (current_user_can('manage_options')) {

			$this->sidebar_tweet_count = intval($this->sidebar_tweet_count);

			if ($this->sidebar_tweet_count == 0) {

				$this->sidebar_tweet_count = '3';

			}

			foreach ($this->options as $option) {

				update_option('aktt_'.$option, $this->$option);

			}

			if (empty($this->install_date)) {

				update_option('aktt_install_date', current_time('mysql'));

			}

			$this->initiate_digests();

			$this->upgrade();

			$this->upgrade_default_tweet_prefix();

		}

	}

	// figure out when the next weekly and daily digests will be

	function initiate_digests() {

		$next = ($this->create_digest) ? $this->calculate_next_daily_digest() : null;

		$this->next_daily_digest = $next;

		update_option('aktt_next_daily_digest', $next);

		$next = ($this->create_digest_weekly) ? $this->calculate_next_weekly_digest() : null;

		$this->next_weekly_digest = $next;

		update_option('aktt_next_weekly_digest', $next);

	}

	function calculate_next_daily_digest() {

		$optionDate = strtotime($this->digest_daily_time);

		$hour_offset = date("G", $optionDate);

		$minute_offset = date("i", $optionDate);

		$next = mktime($hour_offset, $minute_offset, 0);

		// may have to move to next day

		$now = time();

		while($next < $now) {

			$next += 60 * 60 * 24;

		}

		return $next;

	}

	function calculate_next_weekly_digest() {

		$optionDate = strtotime($this->digest_weekly_time);

		$hour_offset = date("G", $optionDate);

		$minute_offset = date("i", $optionDate);

		$current_day_of_month = date("j");

		$current_day_of_week = date("w");

		$current_month = date("n");

		// if this week's day is less than today, go for next week

		$nextDay = $current_day_of_month - $current_day_of_week + $this->digest_weekly_day;

		$next = mktime($hour_offset, $minute_offset, 0, $current_month, $nextDay);

		if ($this->digest_weekly_day <= $current_day_of_week) {

			$next = strtotime('+1 week', $next);

		}

		return $next;

	}

	function ping_digests() {

		// still busy

		if (get_option('aktt_doing_digest_post') == '1') {

			return;

		}

		// check all the digest schedules

		if ($this->create_digest == 1) {

			$this->ping_digest('aktt_next_daily_digest', 'aktt_last_digest_post', $this->digest_title, 60 * 60 * 24 * 1);

		}

		if ($this->create_digest_weekly == 1) {

			$this->ping_digest('aktt_next_weekly_digest', 'aktt_last_digest_post_weekly', $this->digest_title_weekly, 60 * 60 * 24 * 7);

		}

		return;

	}

	function ping_digest($nextDateField, $lastDateField, $title, $defaultDuration) {

		$next = get_option($nextDateField);

		if ($next) {		

			$next = $this->validateDate($next);

			$rightNow = time();

			if ($rightNow >= $next) {

				$start = get_option($lastDateField);

				$start = $this->validateDate($start, $rightNow - $defaultDuration);

				if ($this->do_digest_post($start, $next, $title)) {

					update_option($lastDateField, $rightNow);

					update_option($nextDateField, $next + $defaultDuration);

				} else {

					update_option($lastDateField, null);

				}

			}

		}

	}

	function validateDate($in, $default = 0) {

		if (!is_numeric($in)) {

			// try to convert what they gave us into a date

			$out = strtotime($in);

			// if that doesn't work, return the default

			if (!is_numeric($out)) {

				return $default;

			}

			return $out;	

		}

		return $in;

	}

	function do_digest_post($start, $end, $title) {

		if (!$start || !$end) return false;

		// flag us as busy

		update_option('aktt_doing_digest_post', '1');

		remove_action('publish_post', 'aktt_notify_twitter', 99);

		remove_action('publish_post', 'aktt_store_post_options', 1, 2);

		remove_action('save_post', 'aktt_store_post_options', 1, 2);

		// see if there's any tweets in the time range

		global $wpdb;

		$startGMT = gmdate("Y-m-d H:i:s", $start);

		$endGMT = gmdate("Y-m-d H:i:s", $end);

		// build sql

		$conditions = array();

		$conditions[] = "tw_created_at >= '{$startGMT}'";

		$conditions[] = "tw_created_at <= '{$endGMT}'";

		$conditions[] = "tw_text NOT LIKE '$this->tweet_prefix%'";

		if ($this->exclude_reply_tweets) {

			$conditions[] = "tw_text NOT LIKE '@%'";

		}

		$where = implode(' AND ', $conditions);

		$sql = "

			SELECT * FROM {$wpdb->aktt}

			WHERE {$where}

			GROUP BY tw_id

			ORDER BY tw_created_at {$this->digest_tweet_order}

		";

		$tweets = $wpdb->get_results($sql);

		if (count($tweets) > 0) {

			$tweets_to_post = array();

			foreach ($tweets as $data) {

				$tweet = new aktt_tweet;

				$tweet->tw_text = $data->tw_text;

				$tweet->tw_reply_tweet = $data->tw_reply_tweet;

				if (!$tweet->tweet_is_post_notification() || ($tweet->tweet_is_reply() && $this->exclude_reply_tweets)) {

					$tweets_to_post[] = $data;

				}

			}

			$tweets_to_post = apply_filters('aktt_tweets_to_digest_post', $tweets_to_post); // here's your chance to alter the tweet list that will be posted as the digest

			if (count($tweets_to_post) > 0) {

				$content = '<ul class="aktt_tweet_digest">'."\n";

				foreach ($tweets_to_post as $tweet) {

					$content .= '	<li>'.aktt_tweet_display($tweet, 'absolute').'</li>'."\n";

				}

				$content .= '</ul>'."\n";

				if ($this->give_tt_credit == '1') {

					$content .= '<p class="aktt_credit">'.__('Powered by <a href="http://alexking.org/projects/wordpress">Twitter Tools</a>', 'twitter-tools').'</p>';

				}

				$post_data = array(

					'post_content' => $wpdb->escape($content),

					'post_title' => $wpdb->escape(sprintf($title, date('Y-m-d'))),

					'post_date' => date('Y-m-d H:i:s', $end),

					'post_category' => array($this->blog_post_category),

					'post_status' => 'publish',

					'post_author' => $wpdb->escape($this->blog_post_author)

				);

				$post_data = apply_filters('aktt_digest_post_data', $post_data); // last chance to alter the digest content

				$post_id = wp_insert_post($post_data);

				add_post_meta($post_id, 'aktt_tweeted', '1', true);

				wp_set_post_tags($post_id, $this->blog_post_tags);

			}

		}

		add_action('publish_post', 'aktt_notify_twitter', 99);

		add_action('publish_post', 'aktt_store_post_options', 1, 2);