1 /* 2 * Copyright 2012 Guillem Jover <guillem@hadrons.org> 3 * 4 * Redistribution and use in source and binary forms, with or without 5 * modification, are permitted provided that the following conditions 6 * are met: 7 * 1. Redistributions of source code must retain the above copyright 8 * notice, this list of conditions and the following disclaimer. 9 * 2. Redistributions in binary form must reproduce the above copyright 10 * notice, this list of conditions and the following disclaimer in the 11 * documentation and/or other materials provided with the distribution. 12 * 3. The name of the author may not be used to endorse or promote products 13 * derived from this software without specific prior written permission. 14 * 15 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, 16 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY 17 * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL 18 * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 19 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 20 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; 21 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 22 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 23 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 24 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 25 */ 26 27 #include <sys/cdefs.h> 28 29 #include <stdlib.h> 30 #include <stdio.h> 31 #include <wchar.h> 32 33 #include "local-link.h" 34 35 struct filewbuf { 36 FILE *fp; 37 wchar_t *wbuf; 38 size_t len; 39 }; 40 41 #define FILEWBUF_INIT_LEN 128 42 #define FILEWBUF_POOL_ITEMS 32 43 44 static struct filewbuf fb_pool[FILEWBUF_POOL_ITEMS]; 45 static int fb_pool_cur; 46 47 wchar_t * 48 fgetwln(FILE *stream, size_t *lenp) 49 { 50 struct filewbuf *fb; 51 wint_t wc; 52 size_t wused = 0; 53 54 /* Try to diminish the possibility of several fgetwln() calls being 55 * used on different streams, by using a pool of buffers per file. */ 56 fb = &fb_pool[fb_pool_cur]; 57 if (fb->fp != stream && fb->fp != NULL) { 58 fb_pool_cur++; 59 fb_pool_cur %= FILEWBUF_POOL_ITEMS; 60 fb = &fb_pool[fb_pool_cur]; 61 } 62 fb->fp = stream; 63 64 while ((wc = fgetwc(stream)) != WEOF) { 65 if (!fb->len || wused >= fb->len) { 66 wchar_t *wp; 67 68 if (fb->len) 69 fb->len *= 2; 70 else 71 fb->len = FILEWBUF_INIT_LEN; 72 73 wp = reallocarray(fb->wbuf, fb->len, sizeof(wchar_t)); 74 if (wp == NULL) { 75 wused = 0; 76 break; 77 } 78 fb->wbuf = wp; 79 } 80 81 fb->wbuf[wused++] = wc; 82 83 if (wc == L'\n') 84 break; 85 } 86 87 *lenp = wused; 88 return wused ? fb->wbuf : NULL; 89 } 90 91 libbsd_link_warning(fgetwln, 92 "This function cannot be safely ported, use fgetwc(3) " 93 "instead, as it is supported by C99 and POSIX.1-2001.") 94