Welcome to the chicken scheme pasting service

async-io's test killer added by mario-goulart on Mon Sep 4 09:22:30 2017

#! /bin/sh

pid=`ps aux | grep '[s]almonella-run-publish/chicken/bin/csi -script run.scm' | grep -v dev/null | awk '{print $2}'`

if [ -n "$pid" ]; then
    if readlink /proc/$pid/cwd | grep async-io/tests; then
        test_start=`stat -c "%Y" /proc/$pid`
        now=`date +%s`
        if [ `expr $now - $test_start` -gt 300 ]; then
            kill $pid >/dev/null 2>&1
        fi
    fi
fi

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Type in the text below:
                   _    
  ___   ___  _ __ | | __
 / _ \ / _ \| '_ \| |/ /
| (_) | (_) | |_) |   < 
 \___/ \___/| .__/|_|\_\
            |_|         
Visually impaired? Let me spell it for you (wav file) download WAV