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 2008 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 /* Copyright (c) 1988 AT&T */
28 /* All Rights Reserved */
29
30 #pragma ident "%Z%%M% %I% %E% SMI"
31
32 /*
33 * Read no more than <count> characters into <buf> from stream <fp>,
34 * stopping at any characters listed in <stopstr>.
35 *
36 * NOTE: This function will not work for multi-byte characters.
37 */
38
39 #include <sys/types.h>
40 #include <libgen.h>
41 #include <stdio.h>
42 #include <stdlib.h>
43 #include <string.h>
44 #include <thread.h>
45 #include <pthread.h>
46
47 #define CHARS 256
48
49 #ifdef _REENTRANT
50 #define getc(f) getc_unlocked(f)
51 #else /* _REENTRANT */
52 static char *stop = NULL;
53 #endif /* _REENTRANT */
54
55 #ifdef _REENTRANT
56 static char *
_get_stop(thread_key_t * keyp)57 _get_stop(thread_key_t *keyp)
58 {
59 char *str;
60
61 if (thr_keycreate_once(keyp, free) != 0)
62 return (NULL);
63 str = pthread_getspecific(*keyp);
64 if (str == NULL) {
65 str = calloc(CHARS, sizeof (char));
66 if (thr_setspecific(*keyp, str) != 0) {
67 if (str)
68 (void) free(str);
69 str = NULL;
70 }
71 }
72 return (str);
73 }
74 #endif /* _REENTRANT */
75
76 char *
bgets(char * buf,size_t count,FILE * fp,char * stopstr)77 bgets(char *buf, size_t count, FILE *fp, char *stopstr)
78 {
79 char *cp;
80 int c;
81 size_t i;
82 #ifdef _REENTRANT
83 static thread_key_t key = THR_ONCE_KEY;
84 char *stop = _get_stop(&key);
85 #else /* _REENTRANT */
86 if (!stop)
87 stop = (char *)calloc(CHARS, sizeof (char));
88 else
89 #endif /* _REENTRANT */
90 if (stopstr) /* reset stopstr array */
91 (void) memset(stop, 0, CHARS);
92 if (stopstr)
93 for (cp = stopstr; *cp; cp++)
94 stop[(unsigned char)*cp] = 1;
95 i = 0;
96 flockfile(fp);
97 cp = buf;
98 for (;;) {
99 if (i++ == count) {
100 *cp = '\0';
101 break;
102 }
103 if ((c = getc(fp)) == EOF) {
104 *cp = '\0';
105 if (cp == buf)
106 cp = (char *)0;
107 break;
108 }
109 *cp++ = (char)c;
110 if (stop[c]) {
111 *cp = '\0';
112 break;
113 }
114 }
115 funlockfile(fp);
116 return (cp);
117 }
118