Remove files not in upstream.
[util-vserver.git] / scripts / vkill.subst
diff --git a/scripts/vkill.subst b/scripts/vkill.subst
deleted file mode 100755 (executable)
index 78c129a..0000000
+++ /dev/null
@@ -1,60 +0,0 @@
-#!/usr/bin/perl -w
-
-# Copyright (C) 2003 Enrico Scholz <enrico.scholz@informatik.tu-chemnitz.de>
-# based on vkill by Philip Snyder
-#
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2, or (at your option)
-# any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-
-# kill wrapper for vserver. 
-# Philip Snyder <psnyder@vizional.com>
-# 2002/02/06 19:00 PST
-
-
-$PROC = $ARGV[0];
-
-# Grab the output from a context query against this process id
-open(PH, "@SBINDIR@/chcontext --silent --ctx 1 cat /proc/$PROC/status 2>&1 |");
-
-# Loop through the output
-while (<PH>) {
-
-  # Searching for a line that looks like this:
-  # s_context: #
-  if (/^s_context: ([0-9]+)/) {
-
-    print "Process id $PROC was found in security context $1.\n";
-
-    # Make sure the process is in a vserver context
-    if ($1 > 0) {
-
-      # Since we have the context and the process id, we can kill it
-      print " + Killing... ";
-      `@SBINDIR@/chcontext --ctx $1 kill $PROC`;
-      print "[done]\n";
-
-    } else {
-
-      # Not in vserver context, so its a process on the actual server
-      print " + Killing... ";
-      `kill $PROC`;
-      print "[done]\n";
-
-    }
-    exit;
-  }
-}
-
-print "Process id $PROC not found.\n";
-exit