X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=plc.d%2Ffunctions;h=b407217a66f17d6ea2bcbf9f97bc25df1c86e585;hb=c9eb7474b9052dc999d6ed550ae5dc506e8532be;hp=76869d48ef6e2f3f611c937c50eb45439b083f70;hpb=04c1c045720d5330205f06fd6b100b2b6c9fe84b;p=myplc.git

diff --git a/plc.d/functions b/plc.d/functions
index 76869d4..b407217 100644
--- a/plc.d/functions
+++ b/plc.d/functions
@@ -5,7 +5,7 @@
 # Mark Huang <mlhuang@cs.princeton.edu>
 # Copyright (C) 2006 The Trustees of Princeton University
 #
-# $Id: functions,v 1.1 2006/04/06 21:51:59 mlhuang Exp $
+# $Id: functions,v 1.6 2006/07/10 21:05:37 mlhuang Exp $
 #
 
 export PATH=/sbin:/bin:/usr/bin:/usr/sbin
@@ -13,9 +13,6 @@ export PATH=/sbin:/bin:/usr/bin:/usr/sbin
 # Source function library
 . /etc/init.d/functions
 
-# Source configuration
-. /etc/planetlab/plc_config
-
 # Total number of errors
 ERRORS=0
 
@@ -75,13 +72,6 @@ gethostbyname ()
     perl -MSocket -e '($a,$b,$c,$d,@addrs) = gethostbyname($ARGV[0]); print inet_ntoa($addrs[0]) . "\n";' $1 2>/dev/null
 }
 
-# Print the CNAME of an SSL certificate
-ssl_cname ()
-{
-    openssl x509 -noout -in $1 -subject | \
-	sed -n -e 's@.*/CN=\([^/]*\).*@\1@p'
-}
-
 # Forcefully make a symlink
 symlink ()
 {
@@ -90,6 +80,30 @@ symlink ()
     ln -s $1 $2
 }
 
+# Argument(s) or stdin to lowercase stdout
+lower ()
+{
+    if [ ${#*} -ge 1 ] ; then
+	tr A-Z a-z <<EOF
+$*
+EOF
+    else
+	tr A-Z a-z
+    fi
+}
+
+# Argument(s) or stdin to uppercase stdout
+upper ()
+{
+    if [ ${#*} -ge 1 ] ; then
+	tr a-z A-Z <<EOF
+$*
+EOF
+    else
+	tr a-z A-Z
+    fi
+}
+
 # Make copies of stdout and stderr. The plc initscript redirects
 # stdout and stderr to a logfile if -v is not specified.
 [ ! -e /dev/fd/3 ] && exec 3>&1