1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21
22 /*
23 * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
28 /* All Rights Reserved */
29
30
31 #include <stdio.h>
32 #include <string.h>
33 #include <stdlib.h>
34 #include <unistd.h>
35 #include <valtools.h>
36 #include <locale.h>
37 #include <libintl.h>
38 #include <pkginfo.h>
39 #include "install.h"
40 #include <pkglib.h>
41 #include "libadm.h"
42 #include "libinst.h"
43 #include "pkginstall.h"
44 #include "messages.h"
45
46 extern struct admin adm;
47 extern char *pkgarch, *pkgvers, *msgtext, *pkgabrv;
48 extern int maxinst;
49
50 static char newinst[PKGSIZ];
51 static char *nextinst(void);
52 static char *prompt(struct pkginfo *info, int npkgs);
53 static int same_pkg; /* same PKG, ARCH and VERSION */
54
55 /*
56 * This returns the correct package instance based on how many packages are
57 * already installed. If there are none (npkgs == 0), it just returns the
58 * package abbreviation. Otherwise, it interacts with the user (or reads the
59 * admin file) to determine if we should overwrite an instance which is
60 * already installed, or possibly install a new instance of this package
61 */
62 char *
getinst(int * updatingExisting,struct pkginfo * info,int npkgs,boolean_t a_preinstallCheck)63 getinst(int *updatingExisting, struct pkginfo *info, int npkgs,
64 boolean_t a_preinstallCheck)
65 {
66 char *inst;
67 char *sameinst;
68 int i;
69 int nsamearch;
70 int samearch;
71
72 /* entry debugging info */
73
74 same_pkg = 0;
75
76 /*
77 * If this is the first instance of the package, it's called the by
78 * the package abbreviation.
79 */
80
81 if (npkgs == 0) {
82 return (pkgabrv);
83 }
84
85 /*
86 * this package is already installed; determine how to handle the
87 * new instance of the package to install
88 */
89
90 if (ADM(instance, "newonly") || ADM(instance, "quit")) {
91 /*
92 * new instance is required, or quit if not new
93 */
94
95 msgtext = MSG_NEWONLY;
96 if (a_preinstallCheck == B_FALSE) {
97 ptext(stderr, msgtext, pkgabrv);
98 } else {
99 (void) fprintf(stdout, "install-new-only=true\n");
100 (void) fprintf(stdout, "ckinstance=4\n");
101 }
102 quit(4);
103 }
104
105 /*
106 * package already installed and new instance not required
107 * see if updating the same instance of the package
108 */
109
110 samearch = nsamearch = 0;
111 sameinst = NULL;
112 for (i = 0; i < npkgs; i++) {
113 if (strcmp(info[i].arch, pkgarch) == NULL) {
114 samearch = i;
115 nsamearch++;
116 if (strcmp(info[i].version, pkgvers) == NULL) {
117 sameinst = info[i].pkginst;
118 }
119 }
120 }
121
122 if (sameinst) {
123 /* same instance of package */
124 if (a_preinstallCheck == B_FALSE) {
125 ptext(stderr, MSG_SAME);
126 } else {
127 (void) fprintf(stdout, "install-same-instance=true\n");
128 (void) fprintf(stdout, "ckinstance=0\n");
129 }
130
131 inst = sameinst;
132 same_pkg++;
133 (*updatingExisting)++;
134 return (inst);
135 }
136
137 if (ADM(instance, "overwrite")) {
138 /* not the same instance of the package */
139 if (npkgs == 1) {
140 samearch = 0; /* use only package we know about */
141 } else if (nsamearch != 1) {
142 /*
143 * more than one instance of the same ARCH is already
144 * installed on this machine
145 */
146 msgtext = MSG_OVERWRITE;
147 if (a_preinstallCheck == B_FALSE) {
148 ptext(stderr, msgtext);
149 } else {
150 (void) fprintf(stdout,
151 "install-ovewrite=true\n");
152 (void) fprintf(stdout, "ckinstance=4\n");
153 }
154 quit(4);
155 }
156
157 inst = info[samearch].pkginst;
158
159 (*updatingExisting)++;
160 return (inst);
161 }
162
163 if (ADM(instance, "unique")) {
164 if (maxinst <= npkgs) {
165 /* too many instances */
166 msgtext = MSG_UNIQ1;
167 if (a_preinstallCheck == B_FALSE) {
168 ptext(stderr, msgtext, pkgabrv);
169 } else {
170 (void) fprintf(stdout,
171 "install-too-many-instances=true\n");
172 (void) fprintf(stdout, "ckinstance=4\n");
173 }
174 quit(4);
175 }
176 inst = nextinst();
177 return (inst);
178 }
179
180 if (a_preinstallCheck == B_FALSE) {
181 if (echoGetFlag() == B_FALSE) {
182 msgtext = MSG_NOINTERACT;
183 ptext(stderr, msgtext);
184 quit(5);
185 }
186 } else {
187 (void) fprintf(stdout, "install-new-instance=true\n");
188 (void) fprintf(stdout, "ckinstance=1\n");
189 }
190
191 inst = prompt(info, npkgs);
192 if (strcmp(inst, "new") == NULL) {
193 inst = nextinst();
194 return (inst);
195 }
196
197 (*updatingExisting)++;
198
199 return (inst);
200 }
201
202 /*
203 * This informs the caller whether the package in question is the same
204 * version and architecture as an installed package of the same name.
205 */
206
207 int
is_samepkg(void)208 is_samepkg(void) {
209 return (same_pkg);
210 }
211
212 static char *
nextinst(void)213 nextinst(void)
214 {
215 struct pkginfo info;
216 int n;
217
218 n = 2; /* requirements say start at 2 */
219
220 info.pkginst = NULL;
221 (void) strcpy(newinst, pkgabrv);
222 while (pkginfo(&info, newinst, NULL, NULL) == 0) {
223 (void) snprintf(newinst, sizeof (newinst),
224 "%s.%d", pkgabrv, n++);
225 }
226 return (newinst);
227 }
228
229 static char *
prompt(struct pkginfo * info,int npkgs)230 prompt(struct pkginfo *info, int npkgs)
231 {
232 CKMENU *menup;
233 char *inst;
234 char ans[MAX_INPUT];
235 char header[256];
236 char temp[256];
237 int i;
238 int n;
239
240 if (maxinst > npkgs) {
241 /*
242 * the user may choose to install a completely new
243 * instance of this package
244 */
245 n = ckyorn(ans, NULL, NULL, MSG_GETINST_HELP1,
246 MSG_GETINST_PROMPT1);
247 if (n != 0) {
248 quit(n);
249 }
250 if (strchr("yY", *ans) != NULL) {
251 return ("new");
252 }
253 }
254
255 (void) snprintf(header, sizeof (header), MSG_GETINST_HEADER, pkgabrv);
256 menup = allocmenu(header, CKALPHA);
257
258 for (i = 0; i < npkgs; i++) {
259 (void) snprintf(temp, sizeof (temp),
260 "%s %s\n(%s) %s", info[i].pkginst,
261 info[i].name, info[i].arch, info[i].version);
262 if (setitem(menup, temp)) {
263 progerr("no memory");
264 quit(99);
265 }
266 }
267
268 if (npkgs == 1) {
269 printmenu(menup);
270 if (n = ckyorn(ans, NULL, NULL, NULL, MSG_GETINST_PROMPT0))
271 quit(n);
272 if (strchr("yY", *ans) == NULL)
273 quit(3);
274 (void) strcpy(newinst, info[0].pkginst);
275 } else {
276 if (n = ckitem(menup, &inst, 1, NULL, NULL, MSG_GETINST_HELP2,
277 MSG_GETINST_PROMPT2))
278 quit(n);
279 (void) strcpy(newinst, inst);
280 }
281 (void) setitem(menup, 0); /* clear resource usage */
282 free(menup); /* clear resource usage */
283
284 return (newinst);
285 }
286