Added client work scripts

[clearscm.git] / clients / HP / bin / rootmail

diff --git a/clients/HP/bin/rootmail b/clients/HP/bin/rootmail
new file mode 100644 (file)
index 0000000..2681dab
--- /dev/null
+++ b/clients/HP/bin/rootmail
@@ -0,0 +1,49 @@
+#!/bin/ksh
+################################################################################
+#
+# File:         rootmail
+# RCS:          $Header: rootmail,v 1.1 97/04/21 14:27:10 defaria Exp $
+# Description:  Lists who receives root mail for a particular machine
+# Author:       Andrew DeFaria, California Language Labs
+# Created:      Mon Nov 13 16:14:30 1995
+# Modified:     Mon Nov 13 16:16:56 1995 (Andrew DeFaria) defaria@spock
+# Language:     Korn Shell
+#
+# (c) Copyright 2001, Andrew@DeFaria.com, all rights reserved
+#
+################################################################################
+if [ -x /app/appserver ]; then
+  . /app/appserver
+fi
+
+me=$(basename $0)
+
+function usage {
+  print -u2 "Usage: $me: hostname"
+  exit 1
+} # usage
+
+# Get parameters
+if [ $# -eq 0 ]; then
+  host=
+elif [ $# -eq 1 ]; then
+  host="/nfs/$1"
+else
+  usage
+fi
+
+path=usr/lib
+if [ "_$host" = "_" ]; then
+  if [ "$OS" = "10" ]; then
+    path=etc/mail
+  fi
+fi
+
+alias_file=$host/$path/aliases.local
+
+if [ ! -f $alias_file ]; then
+  print -u2 "$me: Unable to find local alias file: $alias_file" 
+  exit 1
+fi
+
+grep "^root" $alias_file