andrew

#!/usr/bin/php
<?php

define('PASTE_BIN', 'http://woot.pastebin.com/index.php');

$opt = getopt('e:f:u:l:h');

if (isset($opt['h']))
{
        echo "Usage: {$argv[0]} [-f file] [-e expire] [-u name] [-l language]\n\n";
        echo "  -f file      Filename to paste; if not provided, reads from STDIN\n";
        echo "  -e expire    Valid options: day, month, forever\n";
        echo "  -u name      Username to paste as; if not provided uses whoami\n";
        echo "  -l language  For syntax highlighting; default is text\n\n";
        die();
}

$name = (isset($opt['u']) ? $opt['u'] : trim(`whoami`));
$expire = (isset($opt['e']) ? translateExpire($opt['e']) : 'd');
$language = isset($opt['l']) ? $opt['l'] : 'text';
$file = isset($opt['f']) ? $opt['f'] : NULL;

// read the file
$contents = $file
        ? file_get_contents($file)
        : stream_get_contents(STDIN);

// try to auto-detect format
if (!isset($opt['l'])
        && ($f = detectFormat($contents, $file)) !== NULL)
{
        $language = $f;
}

$post = array(
        'format' => $language,
        'poster' => $name,
        'code2' => $contents,
        'expiry' => $expire,
        'paste' => 'Send',
);

$ch = curl_init(PASTE_BIN);
curl_setopt($ch, CURLOPT_POST, TRUE);
curl_setopt($ch, CURLOPT_POSTFIELDS, $post);
curl_setopt($ch, CURLOPT_HEADER, 1);
curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);

$r = curl_exec($ch);
if (!preg_match('/Location:\s+(\S+)/', $r, $m))
{
        die("Error while submitting to pastebin.\n");
}

echo $m[1], "\n";

function translateExpire($value)
{
        switch ($value)
        {
                case 'day':
                case 'd':
                        return 'd';
                case 'month':
                case 'm':
                        return 'm';
                case 'forever':
                case 'f':
                        return 'f';
        }
        return 'd';
}

function detectFormat($string, $filename = NULL)
{
        // first, attempt to detect the type by
        // the file extension (if we're using a file)
        if ($filename
                && ($pos = strrpos($filename, '.')) !== FALSE)
        {
                $ext = substr($filename, $pos + 1);
                switch ($ext)
                {
                        case 'php':
                        case 'c':
                        case 'diff':
                        case 'html':
                                return $ext;
                        case 'py':
                                return 'python';
                        case 'patch':
                                return 'diff';
                        case 'h':
                                return 'c';
                }
        }

        // if it's a script (has the shebang), attempt
        // to determine type by the binary
        if (preg_match('/^#!(\S+)/', $string, $m))
        {
                $bin = basename($m[1]);
                switch ($bin)
                {
                        case 'php':
                        case 'bash':
                        case 'perl':
                        case 'python':
                                return $bin;
                }
        }

        // do some basic attempts at detecting the
        // type by its contents
        if (preg_match('/^\s*<\?php/', $string))
        {
                return 'php';
        }
        return NULL;
}

?>