<?php
/*
Plugin Name: MyspaceAutoBulletin 
Plugin URI: http://possum.kicks-ass.org/
Description: Automatically posts a bulletin containing all or a portion of the post under the specified account when a post is submitted. AutoBulletin code is written in perl.
Version: 0.1
Author: Possum
Author URI: http://possum.kicks-ass.org/
*/

/*  Copyright 2006  Possum  (email : possum@possumism.net)

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

    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.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/

class AutoBulletin {

    function get_email() {
        //For now this is hardcoded
        return 'youremail@yoursite.com';
    }
    function get_passwd() {
    	//Again, hardcoded
	return 'yourmyspacepassword';
    }
    function get_bulletin_path() {
    	//Hardcoding is for t3h sucks :(
		// Change this to the path to AutoBulletin.pl
	return '/home/your_username/public_html/wp-content/plugins/MyspaceAutoBulletin/AutoBulletin.pl';
	//return './AutoBulletin.pl';
    }
    function get_cwd() {
    	return getcwd();
    }

    function bulletin($Post_ID) {
    	//Needed for database interaction
        global $wpdb;

	//Initialize variables
        $email = AutoBulletin::get_email();
        $passwd = AutoBulletin::get_passwd();
        $AutoBulletin_path = AutoBulletin::get_bulletin_path();
	//$mab_cwd = AutoBulletin::get_cwd();
	$mab_cwd = dirname($_SERVER['SCRIPT_FILENAME']);
	$tmpfile = "../wp-content/plugins/autobul.tmp";

	//Access database
	$post_subject = $wpdb->get_var("SELECT post_title FROM wp_posts WHERE ID=$Post_ID");
        $post_content = $wpdb->get_var("SELECT post_content FROM wp_posts WHERE ID=$Post_ID");

	//Write to shared $tmpfile
	//EVENTUALLY UI will allow custom html before/around subject and message.
	$tempf = fopen($tmpfile,'w');
	fwrite($tempf,"MABPostID: $Post_ID\nMABEmail: $email\nMABPassword: $passwd\nMABSubject: $post_subject\nMABText:\n $post_content\n");
	fclose($tempf);

	//Execute perl script
	$success = passthru("perl \"$AutoBulletin_path\" ../wp-content/plugins/autobul.tmp");
	//$file = '/home/yubimusubi/php.out';
	//$success = passthru("echo \"$email\" \"$passwd\" \"$AutoBulletin_path\" \"$post_content\" > $file");
	return $success;
    }
}

//First things first, we need the directory this file
//exists in for tmpfile creation.
$mab_cwd = getcwd();

add_action('publish_post', array('AutoBulletin', 'bulletin'));

//add_filter('the_content', 'mab_globalize');
?>