[rickroll]
mode=files
directory=/var/lib/asterisk/custom-moh/rickroll

exten => 6302061300,1,Answer
exten => 6302061300,n,AGI(rickroll)
exten => 6302061300,n,Ringing
exten => 6302061300,n,Wait(4)
exten => 6302061300,n,MusicOnHold(rickroll)
exten => 6302061300,n,Hangup

CREATE TABLE rickroll (
  rickrollid bigint(20) NOT NULL auto_increment,
  phonenum varchar(10) NOT NULL default '',
  dialtime int(11) default NULL,
  calls tinyint(4) default NULL,
  PRIMARY KEY (rickrollid),
  UNIQUE KEY (phonenum),
  KEY (dialtime)
);

#!/usr/bin/php -q
<?

$stdin = fopen('php://stdin', 'r');
$stdout = fopen('php://stdout', 'w');

while (!feof($stdin)) {
    $temp = fgets($stdin);
    $temp = str_replace("\n", "", $temp);
    $s = explode(":", $temp);
    $agivar[ $s[0] ] = trim($s[1]);
    if (($temp == "") || ($temp == "\n")) {
       break;
       }
    }

$mysql=mysql_connect("localhost","RICKROLLUSER","RICKROLLPASS","rickroll");
mysql_select_db("rickroll");

$callerid = $agivar[agi_callerid];
$newd = time() + 300;

$q = "INSERT INTO rickroll (phonenum, dialtime, calls) VALUES ('$callerid','$newd',0)";
$qid = mysql_query($q, $mysql);

mysql_close($mysql);

exit;

[rickroll]
secret = MANAGER_PASSWORD_HERE
deny=0.0.0.0/0.0.0.0
permit=127.0.0.0/255.255.255.0
read = system,call,log,verbose,command,agent,user
write = system,call,log,verbose,command,agent,user

#!/usr/bin/php -q
<?php

// Set some variables
$callerid = "";  // Holds the caller ID we'll use to rickroll the person back
$time = time();  // Current time - in epoch (seconds since 1970)
$del = array();  // Array of entries to delete/update after we call

// Connect to the database
$mysql=mysql_connect("localhost","RICKROLLUSER","RICKROLLPASS","rickroll");
mysql_select_db("rickroll");

// Open a socket to the manager interface of Asterisk.
$ast_man = fsockopen("127.0.0.1","5038", $errno, $errstr, 30);

// Read in the version string
$in = fread($ast_man, 4096);

// Login with the manager credentials we used in manager.conf
fwrite($ast_man, "Action: login\r\n");
fwrite($ast_man, "Username: rickroll\r\n");
fwrite($ast_man, "Secret: MANAGER_PASSWORD_HERE\r\n");
fwrite($ast_man, "Events: off\r\n\r\n");

// Get the response
$resp = get_response($ast_man);

// If we get a login error - die.
if ($resp['response'] != "Success") {
    exit;
}

// Get the list of people that need a return call from Rick Astley
$q = "SELECT rickrollid, phonenum, dialtime, calls FROM rickroll WHERE dialtime < $time";
$qid = mysql_query($q, $mysql);

while ($r = mysql_fetch_assoc($qid)) {
    // Set the variables from the array -- this is for pure laziness:
    $rickrollid = $r['rickrollid'];
    $phonenum = $r['phonenum'];
    $calls = $r['calls'];
    $dialtime = $r['dialtime'];

    if ($calls == 0) {
        // Never been called back yet -- set the caller ID to the rickroll #
        $callerid = "6302061300";
    } else {
        // They got one callback already.  This is the second (last) one -- so
        // we'll randomize the last 4 digits of their phone # and use that as our
        // caller ID.
        $callerid = substr($phonenum, 0, 6) . rand(0,9) . rand(0,9) . rand(0,9) . rand(0,9);
    }

    // Set the array of asterisk manager parameters to initiate the call:
    $evil = array('Action' => 'Originate',
              'Channel' => "LOCAL/$phonenum@rickroll",
              'Context' => 'rickroll',
              'Exten' => '1000',
              'Priority' => '1',
              'Callerid' => $callerid,
              'Timeout' => '30000');

    // We're not going to call ourselves back.
    if ($phonenum != '6302061300') {
        send_command($ast_man, $evil);
    }

    // Add this phone number to the array - so we can update/delete the records
    $del[] = array('phonenum' => $phonenum, 'calls' => $calls, 'rickrollid' => $rickrollid);
    }

// Process the array of delete/updates
foreach($del as $r) {
    if ($r['calls'] == 0) {
        // This was their first call -- the next one will be done in a random amount of time.

        // The next call will be in some random amount of time 15 minutes from now.
        // I did 3 rand's of 0-300 to increase the odds of it not calling right back.
        $newd = time() + rand(0,300) + rand(0,300) + rand(0,300);

        // Update their entry in the database with the new call time.
        $q = "UPDATE rickroll SET dialtime = $newd, calls = 1 WHERE rickrollid = " . $r['rickrollid'];
        $qid = mysql_query($q, $mysql);
    } else {
        // Second call - just delete them from the table.
        $q = "DELETE FROM rickroll WHERE rickrollid = " . $r['rickrollid'];
        $qid = mysql_query($q, $mysql);
    }
}

fclose($ast_man); 

mysql_close($mysql);

exit;

function send_command($fp, $cmdarray) {
    $_t = "";

    foreach($cmdarray as $k => $v) {
      $_t .= "$k: $v\r\n";
    }

    $_t .= "\r\n";

    fwrite($fp, $_t);
}

function get_response($fp) {

    $ret = "";

    while(1) {
        $pkt = fread($fp, 1);
        $ret .= $pkt;

        if (substr($ret, -4) == "\r\n\r\n") break;
    }

    $a = explode("\r\n", $ret);

    foreach($a as $k => $v) {
        if (strlen($v) < 5) {
            unset($a[$k]);
        } else {
            list($param, $value) = explode(": ", $v, 2);
            $p = strtolower($param);
            $r[$p] = trim($value);
        }
    }

    return $r;
}

*/2 * * * *    /usr/local/bin/cron_rickroll.php  >> /tmp/rickroll.log 2>&1

[rickroll]

;  The extension we connect the called party to -- rickroll!
exten => 1000,1,Answer
exten => 1000,n,MusicOnHold(rickroll)
exten => 1000,n,Hangup

;  The outbound calling of our rickroll victims - standard outdial
exten => _NXXNXXXXXX,1,Dial(SIP/1${EXTEN}@primary-sip-out)
exten => _NXXNXXXXXX,n,Dial(SIP/1${EXTEN}@secondary-sip-out)
exten => _NXXNXXXXXX,n,HangUp