1*5c51f124SMoriah Waterland /*
2*5c51f124SMoriah Waterland * CDDL HEADER START
3*5c51f124SMoriah Waterland *
4*5c51f124SMoriah Waterland * The contents of this file are subject to the terms of the
5*5c51f124SMoriah Waterland * Common Development and Distribution License (the "License").
6*5c51f124SMoriah Waterland * You may not use this file except in compliance with the License.
7*5c51f124SMoriah Waterland *
8*5c51f124SMoriah Waterland * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9*5c51f124SMoriah Waterland * or http://www.opensolaris.org/os/licensing.
10*5c51f124SMoriah Waterland * See the License for the specific language governing permissions
11*5c51f124SMoriah Waterland * and limitations under the License.
12*5c51f124SMoriah Waterland *
13*5c51f124SMoriah Waterland * When distributing Covered Code, include this CDDL HEADER in each
14*5c51f124SMoriah Waterland * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15*5c51f124SMoriah Waterland * If applicable, add the following below this CDDL HEADER, with the
16*5c51f124SMoriah Waterland * fields enclosed by brackets "[]" replaced with your own identifying
17*5c51f124SMoriah Waterland * information: Portions Copyright [yyyy] [name of copyright owner]
18*5c51f124SMoriah Waterland *
19*5c51f124SMoriah Waterland * CDDL HEADER END
20*5c51f124SMoriah Waterland */
21*5c51f124SMoriah Waterland
22*5c51f124SMoriah Waterland /*
23*5c51f124SMoriah Waterland * Copyright 1995 Sun Microsystems, Inc. All rights reserved.
24*5c51f124SMoriah Waterland * Use is subject to license terms.
25*5c51f124SMoriah Waterland */
26*5c51f124SMoriah Waterland
27*5c51f124SMoriah Waterland
28*5c51f124SMoriah Waterland
29*5c51f124SMoriah Waterland #include <stdio.h>
30*5c51f124SMoriah Waterland #include <errno.h>
31*5c51f124SMoriah Waterland #include <string.h>
32*5c51f124SMoriah Waterland #include <stdlib.h>
33*5c51f124SMoriah Waterland #include <unistd.h>
34*5c51f124SMoriah Waterland #include <locale.h>
35*5c51f124SMoriah Waterland #include <libintl.h>
36*5c51f124SMoriah Waterland #include <pkglocs.h>
37*5c51f124SMoriah Waterland #include <pkglib.h>
38*5c51f124SMoriah Waterland #include "libinst.h"
39*5c51f124SMoriah Waterland
40*5c51f124SMoriah Waterland #define ERR_INVALID_CAS "%d is an invalid class action script type."
41*5c51f124SMoriah Waterland #define ERR_NO_NONE "Cannot find the default archive install script."
42*5c51f124SMoriah Waterland #define ERR_NO_PATH "No paths for finding class action scripts."
43*5c51f124SMoriah Waterland
44*5c51f124SMoriah Waterland /* setlist.c */
45*5c51f124SMoriah Waterland extern struct cl_attr **cl_Classes;
46*5c51f124SMoriah Waterland extern int cl_NClasses;
47*5c51f124SMoriah Waterland extern char *cl_nam(int idx);
48*5c51f124SMoriah Waterland
49*5c51f124SMoriah Waterland static int pkg_has_arch;
50*5c51f124SMoriah Waterland
51*5c51f124SMoriah Waterland /* Return the install class action script associated with this class index */
52*5c51f124SMoriah Waterland char *
cl_iscript(int idx)53*5c51f124SMoriah Waterland cl_iscript(int idx)
54*5c51f124SMoriah Waterland {
55*5c51f124SMoriah Waterland if (cl_Classes && idx >= 0 && idx < cl_NClasses)
56*5c51f124SMoriah Waterland return (cl_Classes[idx]->inst_script);
57*5c51f124SMoriah Waterland return (NULL);
58*5c51f124SMoriah Waterland }
59*5c51f124SMoriah Waterland
60*5c51f124SMoriah Waterland /*
61*5c51f124SMoriah Waterland * This resets an input class action script pointer and the various
62*5c51f124SMoriah Waterland * codes that are associated with special treatment available to a class
63*5c51f124SMoriah Waterland * action script. It returns 1 if there was a script there in the first
64*5c51f124SMoriah Waterland * place and 0 if there wasn't.
65*5c51f124SMoriah Waterland */
66*5c51f124SMoriah Waterland int
cl_deliscript(int idx)67*5c51f124SMoriah Waterland cl_deliscript(int idx)
68*5c51f124SMoriah Waterland {
69*5c51f124SMoriah Waterland if (cl_Classes && idx >= 0 && idx < cl_NClasses)
70*5c51f124SMoriah Waterland if (cl_Classes[idx]->inst_script) {
71*5c51f124SMoriah Waterland free(cl_Classes[idx]->inst_script);
72*5c51f124SMoriah Waterland cl_Classes[idx]->inst_script = NULL;
73*5c51f124SMoriah Waterland cl_Classes[idx]->src_verify = DEFAULT;
74*5c51f124SMoriah Waterland cl_Classes[idx]->dst_verify = DEFAULT;
75*5c51f124SMoriah Waterland cl_Classes[idx]->relpath_2_CAS = DEFAULT;
76*5c51f124SMoriah Waterland
77*5c51f124SMoriah Waterland } else
78*5c51f124SMoriah Waterland return (0);
79*5c51f124SMoriah Waterland return (1);
80*5c51f124SMoriah Waterland }
81*5c51f124SMoriah Waterland
82*5c51f124SMoriah Waterland /* Return the remove class action script associated with this class index */
83*5c51f124SMoriah Waterland char *
cl_rscript(int idx)84*5c51f124SMoriah Waterland cl_rscript(int idx)
85*5c51f124SMoriah Waterland {
86*5c51f124SMoriah Waterland if (cl_Classes && idx >= 0 && idx < cl_NClasses)
87*5c51f124SMoriah Waterland return (cl_Classes[idx]->rem_script);
88*5c51f124SMoriah Waterland return (NULL);
89*5c51f124SMoriah Waterland }
90*5c51f124SMoriah Waterland
91*5c51f124SMoriah Waterland /*
92*5c51f124SMoriah Waterland * This scans the admin directories for the class acton scripts associated
93*5c51f124SMoriah Waterland * with the classes to be installed. It will look for install or remove
94*5c51f124SMoriah Waterland * scripts and place appropriate pointers into the cl_Classes list. There's
95*5c51f124SMoriah Waterland * no reason why it couldn't look for both except that I haven't seen a
96*5c51f124SMoriah Waterland * need for it yet.
97*5c51f124SMoriah Waterland */
98*5c51f124SMoriah Waterland void
find_CAS(int CAS_type,char * pkgbin,char * instdir)99*5c51f124SMoriah Waterland find_CAS(int CAS_type, char *pkgbin, char *instdir)
100*5c51f124SMoriah Waterland {
101*5c51f124SMoriah Waterland int i;
102*5c51f124SMoriah Waterland char path[PATH_MAX];
103*5c51f124SMoriah Waterland
104*5c51f124SMoriah Waterland if (instdir == NULL || pkgbin == NULL) {
105*5c51f124SMoriah Waterland progerr(gettext(ERR_NO_PATH));
106*5c51f124SMoriah Waterland quit(99);
107*5c51f124SMoriah Waterland }
108*5c51f124SMoriah Waterland
109*5c51f124SMoriah Waterland if (CAS_type == I_ONLY) {
110*5c51f124SMoriah Waterland for (i = 0; i < cl_NClasses; i++) {
111*5c51f124SMoriah Waterland /*
112*5c51f124SMoriah Waterland * Locate appropriate installation class action
113*5c51f124SMoriah Waterland * script, if any; look on media for script,
114*5c51f124SMoriah Waterland * since it might be on the system due to a
115*5c51f124SMoriah Waterland * previous installation.
116*5c51f124SMoriah Waterland */
117*5c51f124SMoriah Waterland (void) sprintf(path, "%s/install/i.%s", instdir,
118*5c51f124SMoriah Waterland cl_nam(i));
119*5c51f124SMoriah Waterland if (access(path, R_OK) == 0) {
120*5c51f124SMoriah Waterland (void) sprintf(path, "%s/i.%s", pkgbin,
121*5c51f124SMoriah Waterland cl_nam(i));
122*5c51f124SMoriah Waterland cl_Classes[i]->inst_script = qstrdup(path);
123*5c51f124SMoriah Waterland continue;
124*5c51f124SMoriah Waterland }
125*5c51f124SMoriah Waterland
126*5c51f124SMoriah Waterland (void) sprintf(path, "%s/i.%s", PKGSCR, cl_nam(i));
127*5c51f124SMoriah Waterland if (access(path, R_OK) == 0) {
128*5c51f124SMoriah Waterland cl_Classes[i]->inst_script = qstrdup(path);
129*5c51f124SMoriah Waterland continue;
130*5c51f124SMoriah Waterland }
131*5c51f124SMoriah Waterland
132*5c51f124SMoriah Waterland /*
133*5c51f124SMoriah Waterland * Provide CAS to uncompress and distribute a
134*5c51f124SMoriah Waterland * compressed cpio archive for those older packages
135*5c51f124SMoriah Waterland * that don't include their own. This is the first
136*5c51f124SMoriah Waterland * point at which we know, it's an old package
137*5c51f124SMoriah Waterland * without all the various pkginfo items set.
138*5c51f124SMoriah Waterland * The default script is provided for all classes
139*5c51f124SMoriah Waterland * in an old package which do not have their own
140*5c51f124SMoriah Waterland * class action script. These are the criteria used
141*5c51f124SMoriah Waterland * by the script that packs the archives.
142*5c51f124SMoriah Waterland */
143*5c51f124SMoriah Waterland (void) sprintf(path, "%s/%s", PKGSCR, DEF_NONE_SCR);
144*5c51f124SMoriah Waterland if (pkg_has_arch &&
145*5c51f124SMoriah Waterland cl_Classes[i]->inst_script == NULL) {
146*5c51f124SMoriah Waterland
147*5c51f124SMoriah Waterland cl_Classes[i]->src_verify = NOVERIFY;
148*5c51f124SMoriah Waterland cl_Classes[i]->dst_verify = QKVERIFY;
149*5c51f124SMoriah Waterland cl_Classes[i]->relpath_2_CAS = REL_2_CAS;
150*5c51f124SMoriah Waterland
151*5c51f124SMoriah Waterland if (access(path, R_OK) == 0) {
152*5c51f124SMoriah Waterland cl_Classes[i]->inst_script =
153*5c51f124SMoriah Waterland qstrdup(path);
154*5c51f124SMoriah Waterland continue;
155*5c51f124SMoriah Waterland } else {
156*5c51f124SMoriah Waterland progerr(gettext(ERR_NO_NONE));
157*5c51f124SMoriah Waterland quit(99);
158*5c51f124SMoriah Waterland }
159*5c51f124SMoriah Waterland
160*5c51f124SMoriah Waterland }
161*5c51f124SMoriah Waterland }
162*5c51f124SMoriah Waterland } else if (CAS_type == R_ONLY) {
163*5c51f124SMoriah Waterland for (i = 0; i < cl_NClasses; i++) {
164*5c51f124SMoriah Waterland (void) sprintf(path, "%s/install/r.%s", instdir,
165*5c51f124SMoriah Waterland cl_nam(i));
166*5c51f124SMoriah Waterland if (access(path, R_OK) == 0) {
167*5c51f124SMoriah Waterland (void) sprintf(path, "%s/r.%s", pkgbin,
168*5c51f124SMoriah Waterland cl_nam(i));
169*5c51f124SMoriah Waterland cl_Classes[i]->rem_script = qstrdup(path);
170*5c51f124SMoriah Waterland continue;
171*5c51f124SMoriah Waterland }
172*5c51f124SMoriah Waterland
173*5c51f124SMoriah Waterland (void) sprintf(path, "%s/r.%s", PKGSCR, cl_nam(i));
174*5c51f124SMoriah Waterland if (access(path, R_OK) == 0) {
175*5c51f124SMoriah Waterland cl_Classes[i]->rem_script = qstrdup(path);
176*5c51f124SMoriah Waterland continue;
177*5c51f124SMoriah Waterland }
178*5c51f124SMoriah Waterland }
179*5c51f124SMoriah Waterland } else {
180*5c51f124SMoriah Waterland progerr(gettext(ERR_INVALID_CAS), CAS_type);
181*5c51f124SMoriah Waterland quit(99);
182*5c51f124SMoriah Waterland }
183*5c51f124SMoriah Waterland }
184*5c51f124SMoriah Waterland
185*5c51f124SMoriah Waterland /*
186*5c51f124SMoriah Waterland * This function deals with the special case of an old WOS package
187*5c51f124SMoriah Waterland * with a compressed cpio'd file set but no class action script.
188*5c51f124SMoriah Waterland * We find out it doesn't have a CAS later in find_CAS() and deal
189*5c51f124SMoriah Waterland * with it then. The only reason for this variable is to let
190*5c51f124SMoriah Waterland * findscripts() know to get the default script if it can't find it in
191*5c51f124SMoriah Waterland * the usual places.
192*5c51f124SMoriah Waterland */
193*5c51f124SMoriah Waterland void
is_WOS_arch(void)194*5c51f124SMoriah Waterland is_WOS_arch(void)
195*5c51f124SMoriah Waterland {
196*5c51f124SMoriah Waterland pkg_has_arch++;
197*5c51f124SMoriah Waterland }
198