#!perl -nlw
s/^\d+ +//;#pid
if(/^read\(\d+, ".*, \d+\)\s+= \d+$/){
    $_="read(....)";
}
if(/^write\(\d+, ".*, \d+\)\s+= \d+$/){
    $_="write(....)";
}
if(/^write\(\d+, ".*, \d+ <unfinished \.\.\.>$/){
    $_="write(.... unfinished)";
}
if(/^(<\.\.\. read resumed>)/){
    $_=$1;
}
s,"(/var/tmp/kenta/hdd/ghc/afs/sipb.mit.edu/project/ghc/arch/amd64_ubuntu1404/install/8.0.1-lts-7.15/lib-separated)/.*?","$1/....",g;
s,"(/tmp)/.*?","$1/....",g;
if(/^execve\((".*?")/){
    $_=qq!execve($1,....)!;
}
if(m!^futex\(0x.*?, FUTEX_WAIT_BITSET_PRIVATE\|FUTEX_CLOCK_REALTIME, 1, NULL, \S+\) = -1 EAGAIN \(Resource temporarily unavailable\)$!){
    $_="futex(....)";
}
if(m!^(open|stat|lstat|rename|chmod|chown|mkdir)\("[^/]!){
    $_="$1(...)";
    # cant do anything with relative paths
}
s/si_stime=\d+/si_stime=..../g;
s/0x[0-9a-f]{3,}/0x..../g;
s/\d{3,}/..../g;
print;
