PICOs
#include <windows.h>
#include "beacon.h"
void go ( char * args, int args_len )
{
datap parser;
BeaconDataParse ( &parser, args, args_len );
int msg_len;
char * msg = BeaconDataExtract ( &parser, &msg_len );
BeaconPrintf ( CALLBACK_OUTPUT, "You said: %s (%d)\n", msg, msg_len );
}import crystalpalace.spec.*;
import java.util.HashMap;
sub demo
{
local ( '$handle $coff $spec $cap $pico $args' );
$handle = openf ( "demo.x64.o" );
$coff = readb ( $handle, -1 );
closef ( $handle );
$spec = [ LinkSpec Parse: "demo.spec" ];
$cap = [ Capability Parse: cast ( $coff, 'b' ) ];
$pico = [ $spec run: $cap, [ new HashMap ] ];
binline_execute ( $1, $pico, $null );
}
register_command ( "demo", "Demo command", "This is just a demo command", &demo );Last updated