1*3625efb1SRichard Lowe /*
2*3625efb1SRichard Lowe * CDDL HEADER START
3*3625efb1SRichard Lowe *
4*3625efb1SRichard Lowe * The contents of this file are subject to the terms of the
5*3625efb1SRichard Lowe * Common Development and Distribution License (the "License").
6*3625efb1SRichard Lowe * You may not use this file except in compliance with the License.
7*3625efb1SRichard Lowe *
8*3625efb1SRichard Lowe * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9*3625efb1SRichard Lowe * or http://www.opensolaris.org/os/licensing.
10*3625efb1SRichard Lowe * See the License for the specific language governing permissions
11*3625efb1SRichard Lowe * and limitations under the License.
12*3625efb1SRichard Lowe *
13*3625efb1SRichard Lowe * When distributing Covered Code, include this CDDL HEADER in each
14*3625efb1SRichard Lowe * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15*3625efb1SRichard Lowe * If applicable, add the following below this CDDL HEADER, with the
16*3625efb1SRichard Lowe * fields enclosed by brackets "[]" replaced with your own identifying
17*3625efb1SRichard Lowe * information: Portions Copyright [yyyy] [name of copyright owner]
18*3625efb1SRichard Lowe *
19*3625efb1SRichard Lowe * CDDL HEADER END
20*3625efb1SRichard Lowe */
21*3625efb1SRichard Lowe /*
22*3625efb1SRichard Lowe * Copyright 1998 Sun Microsystems, Inc. All rights reserved.
23*3625efb1SRichard Lowe * Use is subject to license terms.
24*3625efb1SRichard Lowe */
25*3625efb1SRichard Lowe
26*3625efb1SRichard Lowe #pragma init(ld_support_init)
27*3625efb1SRichard Lowe
28*3625efb1SRichard Lowe #include <stdio.h>
29*3625efb1SRichard Lowe #include <unistd.h>
30*3625efb1SRichard Lowe #include <stdlib.h>
31*3625efb1SRichard Lowe #include <string.h>
32*3625efb1SRichard Lowe #include <libelf.h>
33*3625efb1SRichard Lowe #include <sys/param.h>
34*3625efb1SRichard Lowe #include <link.h>
35*3625efb1SRichard Lowe
36*3625efb1SRichard Lowe #define SUNPRO_DEPENDENCIES "SUNPRO_DEPENDENCIES"
37*3625efb1SRichard Lowe
38*3625efb1SRichard Lowe /*
39*3625efb1SRichard Lowe * Linked list of strings - used to keep lists of names
40*3625efb1SRichard Lowe * of directories or files.
41*3625efb1SRichard Lowe */
42*3625efb1SRichard Lowe
43*3625efb1SRichard Lowe struct Stritem {
44*3625efb1SRichard Lowe char * str;
45*3625efb1SRichard Lowe void * next;
46*3625efb1SRichard Lowe };
47*3625efb1SRichard Lowe
48*3625efb1SRichard Lowe typedef struct Stritem Stritem;
49*3625efb1SRichard Lowe
50*3625efb1SRichard Lowe static char * depend_file = NULL;
51*3625efb1SRichard Lowe static Stritem * list = NULL;
52*3625efb1SRichard Lowe
53*3625efb1SRichard Lowe
mk_state_init()54*3625efb1SRichard Lowe void mk_state_init()
55*3625efb1SRichard Lowe {
56*3625efb1SRichard Lowe depend_file = getenv(SUNPRO_DEPENDENCIES);
57*3625efb1SRichard Lowe } /* mk_state_init() */
58*3625efb1SRichard Lowe
59*3625efb1SRichard Lowe
60*3625efb1SRichard Lowe
61*3625efb1SRichard Lowe static void
prepend_str(Stritem ** list,const char * str)62*3625efb1SRichard Lowe prepend_str(Stritem **list, const char * str)
63*3625efb1SRichard Lowe {
64*3625efb1SRichard Lowe Stritem * new;
65*3625efb1SRichard Lowe char * newstr;
66*3625efb1SRichard Lowe
67*3625efb1SRichard Lowe if (!(new = calloc(1, sizeof (Stritem)))) {
68*3625efb1SRichard Lowe perror("libmakestate.so");
69*3625efb1SRichard Lowe return;
70*3625efb1SRichard Lowe } /* if */
71*3625efb1SRichard Lowe
72*3625efb1SRichard Lowe if (!(newstr = malloc(strlen(str) + 1))) {
73*3625efb1SRichard Lowe perror("libmakestate.so");
74*3625efb1SRichard Lowe return;
75*3625efb1SRichard Lowe } /* if */
76*3625efb1SRichard Lowe
77*3625efb1SRichard Lowe new->str = strcpy(newstr, str);
78*3625efb1SRichard Lowe new->next = *list;
79*3625efb1SRichard Lowe *list = new;
80*3625efb1SRichard Lowe
81*3625efb1SRichard Lowe } /* prepend_str() */
82*3625efb1SRichard Lowe
83*3625efb1SRichard Lowe
84*3625efb1SRichard Lowe void
mk_state_collect_dep(const char * file)85*3625efb1SRichard Lowe mk_state_collect_dep(const char * file)
86*3625efb1SRichard Lowe {
87*3625efb1SRichard Lowe /*
88*3625efb1SRichard Lowe * SUNPRO_DEPENDENCIES wasn't set, we don't collect .make.state
89*3625efb1SRichard Lowe * information.
90*3625efb1SRichard Lowe */
91*3625efb1SRichard Lowe if (!depend_file)
92*3625efb1SRichard Lowe return;
93*3625efb1SRichard Lowe
94*3625efb1SRichard Lowe prepend_str(&list, file);
95*3625efb1SRichard Lowe
96*3625efb1SRichard Lowe } /* mk_state_collect_dep() */
97*3625efb1SRichard Lowe
98*3625efb1SRichard Lowe
99*3625efb1SRichard Lowe void
mk_state_update_exit()100*3625efb1SRichard Lowe mk_state_update_exit()
101*3625efb1SRichard Lowe {
102*3625efb1SRichard Lowe Stritem * cur;
103*3625efb1SRichard Lowe char lockfile[MAXPATHLEN], * err, * space, * target;
104*3625efb1SRichard Lowe FILE * ofp;
105*3625efb1SRichard Lowe extern char * file_lock(char *, char *, int);
106*3625efb1SRichard Lowe
107*3625efb1SRichard Lowe if (!depend_file)
108*3625efb1SRichard Lowe return;
109*3625efb1SRichard Lowe
110*3625efb1SRichard Lowe if ((space = strchr(depend_file, ' ')) == NULL)
111*3625efb1SRichard Lowe return;
112*3625efb1SRichard Lowe *space = '\0';
113*3625efb1SRichard Lowe target = &space[1];
114*3625efb1SRichard Lowe
115*3625efb1SRichard Lowe (void) sprintf(lockfile, "%s.lock", depend_file);
116*3625efb1SRichard Lowe if ((err = file_lock(depend_file, lockfile, 0))) {
117*3625efb1SRichard Lowe (void) fprintf(stderr, "%s\n", err);
118*3625efb1SRichard Lowe return;
119*3625efb1SRichard Lowe } /* if */
120*3625efb1SRichard Lowe
121*3625efb1SRichard Lowe if (!(ofp = fopen(depend_file, "a")))
122*3625efb1SRichard Lowe return;
123*3625efb1SRichard Lowe
124*3625efb1SRichard Lowe if (list)
125*3625efb1SRichard Lowe (void) fprintf(ofp, "%s: ", target);
126*3625efb1SRichard Lowe
127*3625efb1SRichard Lowe for (cur = list; cur; cur = cur->next)
128*3625efb1SRichard Lowe (void) fprintf(ofp, " %s", cur->str);
129*3625efb1SRichard Lowe
130*3625efb1SRichard Lowe (void) fputc('\n', ofp);
131*3625efb1SRichard Lowe
132*3625efb1SRichard Lowe (void) fclose(ofp);
133*3625efb1SRichard Lowe (void) unlink(lockfile);
134*3625efb1SRichard Lowe *space = ' ';
135*3625efb1SRichard Lowe
136*3625efb1SRichard Lowe } /* mk_state_update_exit() */
137*3625efb1SRichard Lowe
138*3625efb1SRichard Lowe static void
139*3625efb1SRichard Lowe /* LINTED static unused */
ld_support_init()140*3625efb1SRichard Lowe ld_support_init()
141*3625efb1SRichard Lowe {
142*3625efb1SRichard Lowe mk_state_init();
143*3625efb1SRichard Lowe
144*3625efb1SRichard Lowe } /* ld_support_init() */
145*3625efb1SRichard Lowe
146*3625efb1SRichard Lowe /* ARGSUSED */
147*3625efb1SRichard Lowe void
ld_file(const char * file,const Elf_Kind ekind,int flags,Elf * elf)148*3625efb1SRichard Lowe ld_file(const char * file, const Elf_Kind ekind, int flags, Elf *elf)
149*3625efb1SRichard Lowe {
150*3625efb1SRichard Lowe if(! ((flags & LD_SUP_DERIVED) && !(flags & LD_SUP_EXTRACTED)))
151*3625efb1SRichard Lowe return;
152*3625efb1SRichard Lowe
153*3625efb1SRichard Lowe mk_state_collect_dep(file);
154*3625efb1SRichard Lowe
155*3625efb1SRichard Lowe } /* ld_file */
156*3625efb1SRichard Lowe
157*3625efb1SRichard Lowe void
ld_atexit(int exit_code)158*3625efb1SRichard Lowe ld_atexit(int exit_code)
159*3625efb1SRichard Lowe {
160*3625efb1SRichard Lowe if (exit_code)
161*3625efb1SRichard Lowe return;
162*3625efb1SRichard Lowe
163*3625efb1SRichard Lowe mk_state_update_exit();
164*3625efb1SRichard Lowe
165*3625efb1SRichard Lowe } /* ld_atexit() */
166*3625efb1SRichard Lowe
167*3625efb1SRichard Lowe /*
168*3625efb1SRichard Lowe * Supporting 64-bit objects
169*3625efb1SRichard Lowe */
170*3625efb1SRichard Lowe void
ld_file64(const char * file,const Elf_Kind ekind,int flags,Elf * elf)171*3625efb1SRichard Lowe ld_file64(const char * file, const Elf_Kind ekind, int flags, Elf *elf)
172*3625efb1SRichard Lowe {
173*3625efb1SRichard Lowe if(! ((flags & LD_SUP_DERIVED) && !(flags & LD_SUP_EXTRACTED)))
174*3625efb1SRichard Lowe return;
175*3625efb1SRichard Lowe
176*3625efb1SRichard Lowe mk_state_collect_dep(file);
177*3625efb1SRichard Lowe
178*3625efb1SRichard Lowe } /* ld_file64 */
179*3625efb1SRichard Lowe
180*3625efb1SRichard Lowe void
ld_atexit64(int exit_code)181*3625efb1SRichard Lowe ld_atexit64(int exit_code)
182*3625efb1SRichard Lowe {
183*3625efb1SRichard Lowe if (exit_code)
184*3625efb1SRichard Lowe return;
185*3625efb1SRichard Lowe
186*3625efb1SRichard Lowe mk_state_update_exit();
187*3625efb1SRichard Lowe
188*3625efb1SRichard Lowe } /* ld_atexit64() */
189