FreeCalypso > hg > freecalypso-tools
view target-utils/libc/strncpy.c @ 419:67d683a87b1d
rvinterf client refactoring: libinterf created
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 27 Oct 2018 23:35:10 +0000 |
parents | 7fb62fc724dc |
children |
line wrap: on
line source
/* * Copy s2 to s1, truncating or null-padding to always copy n bytes * return s1 */ char * strncpy(s1, s2, n) register char *s1, *s2; { register i; register char *os1; os1 = s1; for (i = 0; i < n; i++) if ((*s1++ = *s2++) == '\0') { while (++i < n) *s1++ = '\0'; return(os1); } return(os1); }