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
32#include <limits.h>
33#include <string.h>
34#include <stdlib.h>
35#include <unistd.h>
36#include <errno.h>
37#include <locale.h>
38#include <libintl.h>
39#include <pkglib.h>
40#include <libadm.h>
41
42#define	ERR_MEMORY	"memory allocation failure, errno=%d"
43
44/*
45 * using factor of eight limits maximum
46 * memory fragmentation to 12.5%
47 */
48#define	MEMSIZ	PATH_MAX*8
49
50struct dup {
51	char	mem[MEMSIZ];
52	struct dup *next;
53};
54
55static struct dup *head, *tail, *new;
56
57static int	size, initialized;
58static void	pathinit();
59static void	growstore();
60
61/*
62 * These functions allocate space for all the path names required
63 * in the packaging code. They are all allocated here so as to reduce
64 * memory fragmentation.
65 */
66
67/* Initialize storage area. */
68static void
69pathinit()
70{
71	if (head == NULL)
72		size = (-1);
73	else {
74		/* free all memory used except initial structure */
75		tail = head->next;
76		while (tail) {
77			new = tail->next;
78			free(tail);
79			tail = new;
80		}
81		tail = head;
82		size = MEMSIZ;
83	}
84
85	initialized = 1;
86}
87
88/* Allocate additional space for storage area. */
89static void
90growstore()
91{
92	/* need more memory */
93	new = calloc(1, sizeof (struct dup));
94	if (new == NULL) {
95		progerr(gettext(ERR_MEMORY), errno);
96		quit(99);
97	}
98	if (head == NULL)
99		head = new;
100	else
101		tail->next = new;
102	tail = new;
103	size = MEMSIZ;
104}
105
106/* Allocate and return a pointer. If n == 0, initialize. */
107char *
108pathalloc(int n)
109{
110	char	*pt;
111
112	if (n <= 0) {
113		pathinit();
114		pt = NULL;
115	} else {
116		if (!initialized)
117			pathinit();
118
119		n++;	/* Account for terminating null. */
120
121		if (size < n)
122			growstore();
123
124		pt = &tail->mem[MEMSIZ-size];
125		size -= n;
126	}
127
128	return (pt);
129}
130
131/* Allocate and insert a pathname returning a pointer to the new string. */
132char *
133pathdup(char *s)
134{
135	char	*pt;
136	int	n;
137
138	if (s == NULL) {
139		pathinit();
140		pt = NULL;
141	} else {
142		if (!initialized)
143			pathinit();
144
145		n = strlen(s) + 1;	/* string + null terminator */
146
147		if (size < n)
148			growstore();
149
150		pt = &tail->mem[MEMSIZ-size];
151		size -= n;
152
153		(void) strcpy(pt, s);
154	}
155
156	return (pt);
157}
158