Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

executable file 47 lines (42 sloc) 0.723 kb
#!/bin/sh
if [ "$#" = 0 ]; then
echo "usage: $0 [-w wrapper] <C code...>" >&2
exit 1
fi
if [ "$1" = -w ]; then
wrapper="$2"
shift 2
fi
f=$(mktemp -d -t gccrun.XXXXXXXX) || exit 1
cat > "$f/command.c" << EOF
#define _GNU_SOURCE
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/mman.h>
#include <sys/ptrace.h>
#include <sys/syscall.h>
#include <fcntl.h>
#include <signal.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
int
main(int argc, char *argv[], char *envp[])
{
$1;
return 0;
}
EOF
shift
if ! gcc -o "$f/command" "$f/command.c" $@; then
exit 1
fi
if [ -n "$wrapper" ]; then
$wrapper "$f/command"
else
"$f/command"
fi
r=$?
rm -r "$f"
exit $r
Jump to Line
Something went wrong with that request. Please try again.