Convert uses of XKeycodeToKeysym (deprecated) to XkbKeycodeToKeysym
[oweals/cde.git] / cde / admin / IntegTools / post_install / configMan.src
1 XCOMM! /bin/ksh
2 XCOMM #######
3 XCOMM   Product: CDE
4 XCOMM   Fileset: CDE-MAN
5 XCOMM   customize
6 XCOMM   @(#) $XConsortium: configMan.src /main/4 1996/04/23 19:33:17 drk $
7 XCOMM #######
8 XCOMM 
9 XCOMM  (c) Copyright Hewlett-Packard Company, 1993
10 XCOMM 
11 XCOMM #######
12 #define STAR *
13  
14 XCOMM ############################################
15
16 RemoveManFiles()
17 {
18     while read -r SRC
19     do
20       if [ "$SRC" != "" ]
21       then
22         rm -f "$SRC"
23         dirname=${SRC%/STAR}
24         if [ -d "$dirname" ]
25         then
26           cd "$dirname" || exit
27           while [ "$dirname" != "$CDE_TOP" ]
28           do
29             cd ..
30             rmdir "${dirname##STAR/}" >/dev/null 2>/dev/null
31             dirname=${dirname%/STAR}
32           done
33         fi
34       fi
35     done <<-EOF
36 #include "CDE-MAN.list"
37         EOF
38 }
39
40 VerifyInstalledFiles()
41 {
42     echo "Status   mode    owner   group   filename"
43     echo "-----------------------------------------"
44 XCOMM     exists  correct correct correct  /usr/dt/foo1
45 XCOMM     MISSING  WRONG   WRONG   WRONG   /usr/dt/foo2
46 XCOMM         exists    the link is correct    /usr/dt/link
47
48     while read -r SRC
49     do
50 #include "verify.func"
51     done <<-EOF
52 #include "CDE-MAN.lst"
53         EOF
54 }
55
56 #include "option.func"
57
58 XCOMM ##########################################################################
59 XCOMM 
60 XCOMM                                   Main Body
61 XCOMM 
62 XCOMM ##########################################################################
63
64 retval=0
65 CDE_TOP=CDE_INSTALLATION_TOP
66
67   HandleOption "$*"
68
69   if [ "$OPERATION" = "deconfigure" ]
70   then
71
72     echo "de-Configuring for CDE-MAN..."
73
74     RemoveManFiles
75
76     VerifyInstalledFiles
77
78   elif [ "$OPERATION" = "verify" ]
79   then
80
81     VerifyInstalledFiles
82
83   fi
84
85   return $retval
86