compiler/clib/stccpy.c

   1 /*
   2     Copyright © 2003-2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     SAS/C function stccpy().
   6 */
   7
   8 /*****************************************************************************
   9
  10     NAME */
  11 #include <string.h>
  12
  13         size_t stccpy (
  14
  15 /*  SYNOPSIS */
  16         char       * dest,
  17         const char * src,
  18         size_t       n)
  19
  20 /*  FUNCTION
  21         Copy a string. Works like an assignment "dest=src;". At most
  22         n characters are copied.
  23
  24     INPUTS
  25         dest - The string is copied into this variable. Make sure it is
  26                 large enough.
  27         src - This is the new contents of dest.
  28         n - How many characters to copy at most. If the string src is
  29                 smaller than that, only strlen(str)+1 bytes are copied.
  30
  31     RESULT
  32         The number of copied characters.
  33
  34     NOTES
  35         No check is made that dest is large enough for src.
  36         SAS/C specific.
  37
  38     EXAMPLE
  39
  40     BUGS
  41
  42     SEE ALSO
  43         strncpy()
  44
  45     INTERNALS
  46
  47 ******************************************************************************/
  48 {
  49     char * ptr = dest;
  50
  51     while (n>1 && *src)
  52     {
  53         *ptr = *src;
  54         ptr ++;
  55         src ++;
  56         n--;
  57     }
  58
  59     *ptr++ = '\0';
  60
  61     return (ptr-dest);
  62 } /* stccpy */