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