reactos/sdk/tools/mkisofs/schilytools/libschily/stdio/fgetline.c

   1 /* @(#)fgetline.c       1.13 14/03/27 Copyright 1986, 1996-2014 J. Schilling */
   2 /*
   3  *      Copyright (c) 1986, 1996-2014 J. Schilling
   4  *
   5  *      This is an interface that exists in the public since 1982.
   6  *      The POSIX.1-2008 standard did ignore POSIX rules not to
   7  *      redefine existing public interfaces and redefined the interfaces
   8  *      forcing us to add a js_*() prefix to the original functions.
   9  */
  10 /*
  11  * The contents of this file are subject to the terms of the
  12  * Common Development and Distribution License, Version 1.0 only
  13  * (the "License").  You may not use this file except in compliance
  14  * with the License.
  15  *
  16  * See the file CDDL.Schily.txt in this distribution for details.
  17  * A copy of the CDDL is also available via the Internet at
  18  * http://www.opensource.org/licenses/cddl1.txt
  19  *
  20  * When distributing Covered Code, include this CDDL HEADER in each
  21  * file and include the License file CDDL.Schily.txt from this distribution.
  22  */
  23
  24 #define fgetline        __no__fgetline__
  25 #define getline         __no__getline__
  26
  27 #include "schilyio.h"
  28
  29 #ifndef NO_GETLINE_COMPAT       /* Define to disable backward compatibility */
  30 #undef  fgetline
  31 #undef  getline
  32 #ifdef  HAVE_PRAGMA_WEAK
  33 #pragma weak fgetline = js_fgetline
  34 #pragma weak getline =  js_getline
  35 #else
  36
  37 EXPORT  int     fgetline        __PR((FILE *, char *, int));
  38 EXPORT  int     getline         __PR((char *, int));
  39
  40 EXPORT int
  41 fgetline(f, buf, len)
  42         FILE    *f;
  43         char    *buf;
  44         int     len;
  45 {
  46         return (js_fgetline(f, buf, len));
  47 }
  48
  49 EXPORT int
  50 getline(buf, len)
  51         char    *buf;
  52         int     len;
  53 {
  54         return (js_fgetline(stdin, buf, len));
  55 }
  56 #endif
  57 #endif
  58
  59 /*
  60  * XXX should we check if HAVE_USG_STDIO is defined and
  61  * XXX use something line memccpy to speed things up ???
  62  * XXX On Solaris 64 bits, we may use #define FAST_GETC_PUTC
  63  * XXX and getc_unlocked()
  64  */
  65 #if !defined(getc) && defined(USE_FGETS_FOR_FGETLINE)
  66 #include <schily/string.h>
  67
  68 EXPORT int
  69 js_fgetline(f, buf, len)
  70         register        FILE    *f;
  71                         char    *buf;
  72         register        int     len;
  73 {
  74         char    *bp = fgets(buf, len, f);
  75
  76         if (bp) {
  77                 len = strlen(bp);
  78
  79                 if (len > 0) {
  80                         if (bp[len-1] == '\n')
  81                                 bp[--len] = '\0';
  82                 }
  83                 return (len);
  84         }
  85         buf[0] = '\0';
  86         return (-1);
  87 }
  88
  89 #else
  90 EXPORT int
  91 js_fgetline(f, buf, len)
  92         register        FILE    *f;
  93                         char    *buf;
  94         register        int     len;
  95 {
  96         register int    c       = '\0';
  97         register char   *bp     = buf;
  98         register int    nl      = '\n';
  99
 100         down2(f, _IOREAD, _IORW);
 101
 102         for (;;) {
 103                 if ((c = getc(f)) < 0)
 104                         break;
 105                 if (c == nl)
 106                         break;
 107                 if (--len > 0) {
 108                         *bp++ = (char)c;
 109                 } else {
 110 #ifdef  __never__
 111                         /*
 112                          * Read up to end of line
 113                          */
 114                         while ((c = getc(f)) >= 0 && c != nl)
 115                                 /* LINTED */
 116                                 ;
 117 #endif
 118                         break;
 119                 }
 120         }
 121         *bp = '\0';
 122         /*
 123          * If buffer is empty and we hit EOF, return EOF
 124          */
 125         if (c < 0 && bp == buf)
 126                 return (c);
 127
 128         return (bp - buf);
 129 }
 130 #endif
 131
 132 EXPORT int
 133 js_getline(buf, len)
 134         char    *buf;
 135         int     len;
 136 {
 137         return (js_fgetline(stdin, buf, len));
 138 }