strlfun.inc

   1 #if 0 /* comment in gmake; next line ignored by gcc */
   2 ifeq (0,gmake ignores from here)
   3 #endif
   4 /*-
   5  * Copyright (c) 2006, 2008, 2011
   6  *      mirabilos <m@mirbsd.org>
   7  *
   8  * Provided that these terms and disclaimer and all copyright notices
   9  * are retained or reproduced in an accompanying document, permission
  10  * is granted to deal in this work without restriction, including un-
  11  * limited rights to use, publicly perform, distribute, sell, modify,
  12  * merge, give away, or sublicence.
  13  *
  14  * This work is provided "AS IS" and WITHOUT WARRANTY of any kind, to
  15  * the utmost extent permitted by applicable law, neither express nor
  16  * implied; without malicious intent or gross negligence. In no event
  17  * may a licensor, author or contributor be held liable for indirect,
  18  * direct, other damage, loss, or other issues arising in any way out
  19  * of dealing in the work, even if advised of the possibility of such
  20  * damage or existence of a defect, except proven that it results out
  21  * of said person's immediate fault when using the work as intended.
  22  *-
  23  * The original implementations of strlcpy(3) and strlcat(3) are from
  24  * Todd C. Miller; the licence is reproduced below. However, this ap-
  25  * plies only to the strlcpy(3) portion of the code, as Thorsten Gla-
  26  * ser write the following strlcat(3) implementation according to the
  27  * spec. Both functions below have been optimised according to sugge-
  28  * stions from Bodo Eggert. mirabilos merged the code with strxfrm(3)
  29  * (Unicode-only systems) and the wide character variants wcslcat(3),
  30  * wcslcpy(3), and wcsxfrm(3).
  31  */
  32
  33 #include <sys/types.h>
  34 #ifndef OUTSIDE_OF_LIBKERN
  35 #include <libckern.h>
  36 #endif
  37
  38 #ifndef __RCSID
  39 #define __RCSID(x)              static const char __rcsid[] = x
  40 #endif
  41
  42 __RCSID("$MirOS: contrib/code/jupp/strlfun.inc,v 1.5 2016/03/06 13:47:13 tg Exp $");
  43
  44 #ifdef WIDEC
  45 #ifdef OUTSIDE_OF_LIBKERN
  46 #ifdef __WCHAR_TYPE__
  47 typedef __WCHAR_TYPE__ wchar_t;
  48 #else
  49 #include <wchar.h>
  50 #endif
  51 #endif
  52 /* wide character string functions */
  53 #define NUL                     L'\0'
  54 #define char_t                  wchar_t
  55 #define fn_len                  wcslen
  56 #define fn_cat                  wcslcat
  57 #define fn_cpy                  wcslcpy
  58 #else
  59 /* (multibyte) string functions */
  60 #define NUL                     '\0'
  61 #define char_t                  char
  62 #define fn_len                  strlen
  63 #define fn_cat                  strlcat
  64 #define fn_cpy                  strlcpy
  65 #endif
  66
  67 #ifdef L_strxfrm
  68 #define strlcpy                 strxfrm
  69 #define wcslcpy                 wcsxfrm
  70 #define L_strlcpy
  71 #endif
  72
  73 #ifdef OUTSIDE_OF_LIBKERN
  74 extern size_t fn_len(const char_t *);
  75 #endif
  76
  77 #ifndef __predict_true
  78 #define __predict_true(exp)     (exp)
  79 #define __predict_false(exp)    (exp)
  80 #endif
  81
  82 #ifdef L_strlcat
  83 /*
  84  * Appends src to string dst of size dlen (unlike strncat, dlen is the
  85  * full size of dst, not space left).  At most dlen-1 characters
  86  * will be copied.  Always NUL terminates (unless dlen <= strlen(dst)).
  87  * Returns strlen(src) + MIN(dlen, strlen(initial dst)), without the
  88  * trailing NUL byte counted.  If retval >= dlen, truncation occurred.
  89  */
  90 size_t
  91 fn_cat(char_t *dst, const char_t *src, size_t dlen)
  92 {
  93         size_t n = 0, slen;
  94
  95         slen = fn_len(src);
  96         while (__predict_true(n + 1 < dlen && dst[n] != NUL))
  97                 ++n;
  98         if (__predict_false(dlen == 0 || dst[n] != NUL))
  99                 return (dlen + slen);
 100         while (__predict_true((slen > 0) && (n < (dlen - 1)))) {
 101                 dst[n++] = *src++;
 102                 --slen;
 103         }
 104         dst[n] = NUL;
 105         return (n + slen);
 106 }
 107 #endif
 108
 109 #ifdef L_strlcpy
 110 /* $OpenBSD: strlcpy.c,v 1.11 2006/05/05 15:27:38 millert Exp $ */
 111
 112 /*-
 113  * Copyright (c) 1998 Todd C. Miller <Todd.Miller@courtesan.com>
 114  *
 115  * Permission to use, copy, modify, and distribute this software for any
 116  * purpose with or without fee is hereby granted, provided that the above
 117  * copyright notice and this permission notice appear in all copies.
 118  *
 119  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 120  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 121  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 122  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 123  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 124  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 125  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 126  */
 127
 128 /*
 129  * Copy src to string dst of size siz.  At most siz-1 characters
 130  * will be copied.  Always NUL terminates (unless siz == 0).
 131  * Returns strlen(src); if retval >= siz, truncation occurred.
 132  */
 133 size_t
 134 fn_cpy(char_t *dst, const char_t *src, size_t siz)
 135 {
 136         const char_t *s = src;
 137
 138         if (__predict_false(siz == 0))
 139                 goto traverse_src;
 140
 141         /* copy as many chars as will fit */
 142         while (--siz && (*dst++ = *s++))
 143                 ;
 144
 145         /* not enough room in dst */
 146         if (__predict_false(siz == 0)) {
 147                 /* safe to NUL-terminate dst since we copied <= siz-1 chars */
 148                 *dst = NUL;
 149  traverse_src:
 150                 /* traverse rest of src */
 151                 while (*s++)
 152                         ;
 153         }
 154
 155         /* count does not include NUL */
 156         return (s - src - 1);
 157 }
 158 #endif
 159
 160 #if 0 /* gcc ignored from here; gmake stops ignoring */
 161 endif
 162
 163 USE_WIDEC?=     1
 164
 165 LIB=            libstrlfun.a
 166 OBJS=           strlcpy.o strlcat.o
 167 ifeq (1,$(strip $(USE_WIDEC)))
 168 OBJS+=          wcslcpy.o wcslcat.o
 169 endif
 170 DEFS=           -DOUTSIDE_OF_LIBKERN
 171 DEFS_strlcpy.o= -DL_strlcpy
 172 DEFS_strlcat.o= -DL_strlcat
 173 DEFS_wcslcpy.o= -DL_strlcpy -DWIDEC
 174 DEFS_wcslcat.o= -DL_strlcat -DWIDEC
 175
 176 all: $(LIB)
 177
 178 $(LIB): $(OBJS)
 179         ar rc $(LIB) $(OBJS)
 180         -ranlib $(LIB)
 181
 182 $(OBJS): strlfun.c
 183         $(CC) $(CFLAGS) $(CPPFLAGS) $(DEFS) $(DEFS_$@) -c -o $@ strlfun.c
 184
 185 #endif /* EOF for gmake and gcc */