Added client work scripts
[clearscm.git] / clients / HP / bin / switch_licsrv
1 #!/bin/ksh
2 ################################################################################
3 #
4 # File:         switch_licsrv
5 # Description:  A script to switch the ClearCase License Server from one 
6 #               machine to another.
7 # Author:       Andrew DeFaria, California Language Labs
8 # Created:      Wed Jan 15 16:52:22 PST 1997
9 # Modified:     Wed Jan 15 16:52:22 PST 1997 (Andrew DeFaria) defaria@cup.hp.com
10 # Language:     Korn Shell
11 #
12 # (c) Copyright 1997, Hewlett-Packard Company, all rights reserved.
13 #
14 ################################################################################
15 me=$(basename $0)
16
17 function usage {
18   print "Usage: $me: <new ClearCase License Server>"
19   exit 1
20 } # usage
21
22 if [ $(id -u) -ne 0 ]; then
23   print -u2 "$me: Error: Must be root to execute this command!"
24   usage
25 fi
26
27 # Get parameters
28 if [ $# -ne 1 ]; then
29   usage;
30 else
31   new_license_server="$1"
32 fi
33
34 license_server_file=/usr/adm/atria/config/license_host
35
36 if [ -f $license_server_file ]; then
37   old_license_server=$(cat $license_server_file)
38   if [ "$old_license_server" = "$new_license_server" ]; then
39     print -u2 "$me: The license server is already $new_license_server"
40     print -u2 "$me: Nothing changed!"
41     exit
42   fi
43   cp $license_server_file $license_server_file.old
44   print $new_license_server > $license_server_file
45   print "$me: Switched license server from $old_license_server \c"
46   print "to $new_license_server."
47   print "$me: Saved old license server setting in $license_server_file.old"
48 fi