source: buchla-68k/libsm/strncpy.c@ f7428b1

/*
   =============================================================================
        strncpy.c -- copy string of n bytes
        Version 1 -- 1987-06-12

        Copy s2 to s1, truncating or null-padding to always copy n bytes
        return s1
   =============================================================================
*/

int8_t *strncpy(int8_t *s1, int8_t *s2, int16_t n)
{
        register int8_t *os1 = s1;

        while (--n >= 0)
                if ((*s1++ = *s2++) == '\0')
                        while (--n >= 0)
                                *s1++ = '\0';

        return (os1);
}