tests/kdc/leaks-kill.sh

   1 #!/bin/sh
   2
   3 checkonly=no
   4
   5 if [ "X$1" = "X--check" ] ; then
   6     checkonly=yes
   7
   8     pid=$2
   9     name=$3
  10 else
  11     name=$1
  12     pid=$2
  13 fi
  14
  15
  16 ec=0
  17
  18 rm -f leaks-log > /dev/null
  19
  20 if [ "$(uname -s)" = "Darwin" ]; then
  21     echo "leaks check on $name ($pid)"
  22     leaks -exclude __CFInitialize $pid > leaks-log 2>&1 || \
  23         { echo "leaks failed: $?"; cat leaks-log; exit 1; }
  24
  25     perl -e 'my $excluded = 0; my $num = -1; while (<>) {
  26 if (/Process \d+: (\d+) leaks? for \d+ total leaked bytes?/) { $num = $1;}
  27 if (/Process \d+: (\d+) leaks? malloced for \d+ total leaked byte?/) { $num = $1;}
  28 if (/(\d+) leaks? excluded/) { $excluded = $1;}
  29 }
  30 exit 1 if ($num != 0 && $num != $excluded);
  31 exit 0;' leaks-log || \
  32         { echo "Memory leak in $name" ; echo ""; cat leaks-log; ec=1; }
  33
  34     if grep -e '1 leak for' leaks-log > /dev/null && grep -e "Leak.*environ.*__CF_USER_TEXT_ENCODING" leaks-log > /dev/null ; then
  35         echo "just running into rdar://problem/8764394"
  36         ec=0
  37     fi
  38
  39     [ "$ec" != "0" ] && { echo ""; cat leaks-log ; }
  40
  41     #[ "$ec" != "0" ] && { malloc_history $pid -all_by_size > l; }
  42     #[ "$ec" != "0" ] && { env PS1=": leaks-debugger !!!! ; " bash ; }
  43
  44     [ "$ec" = "0" ] && rm leaks-log
  45
  46 fi
  47
  48 if [ "$checkonly" = no ] ; then
  49     kill $pid
  50     sleep 3
  51     kill -9 $pid 2> /dev/null
  52     sleep 3
  53 fi
  54
  55 exit $ec