lib/fputsx.c

   1 /*
   2  * Copyright (c) 1990 - 1994, Julianne Frances Haugh
   3  * Copyright (c) 1996 - 1999, Marek Michałkiewicz
   4  * Copyright (c) 2005       , Tomasz Kłoczko
   5  * Copyright (c) 2008       , Nicolas François
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 3. The name of the copyright holders or contributors may not be used to
  17  *    endorse or promote products derived from this software without
  18  *    specific prior written permission.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  21  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  22  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
  23  * PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT
  24  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  25  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  26  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  27  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  28  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  29  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  30  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  31  */
  32
  33 #include <config.h>
  34
  35 #include <stdio.h>
  36 #include "defines.h"
  37 #include "prototypes.h"
  38
  39 #ident "$Id: fputsx.c 3021 2009-06-12 20:20:45Z nekral-guest $"
  40
  41
  42 /*@null@*/char *fgetsx (/*@returned@*/ /*@out@*/char *buf, int cnt, FILE * f)
  43 {
  44         char *cp = buf;
  45         char *ep;
  46
  47         while (cnt > 0) {
  48                 if (fgets (cp, cnt, f) != cp) {
  49                         if (cp == buf) {
  50                                 return 0;
  51                         } else {
  52                                 break;
  53                         }
  54                 }
  55                 ep = strrchr (cp, '\\');
  56                 if ((NULL != ep) && (*(ep + 1) == '\n')) {
  57                         cnt -= ep - cp;
  58                         if (cnt > 0) {
  59                                 cp = ep;
  60                                 *cp = '\0';
  61                         }
  62                 } else {
  63                         break;
  64                 }
  65         }
  66         return buf;
  67 }
  68
  69 int fputsx (const char *s, FILE * stream)
  70 {
  71         int i;
  72
  73         for (i = 0; '\0' != *s; i++, s++) {
  74                 if (putc (*s, stream) == EOF) {
  75                         return EOF;
  76                 }
  77
  78 #if 0                           /* The standard getgr*() can't handle that.  --marekm */
  79                 if (i > (BUFSIZ / 2)) {
  80                         if (putc ('\\', stream) == EOF ||
  81                             putc ('\n', stream) == EOF)
  82                                 return EOF;
  83
  84                         i = 0;
  85                 }
  86 #endif
  87         }
  88         return 0;
  89 }
  90