1 /* ISC license. */
2 
3 #include <skalibs/stralloc.h>
4 #include <skalibs/skamisc.h>
5 #include <skalibs/random.h>
6 
random_sauniquename(stralloc * sa,size_t n)7 int random_sauniquename (stralloc *sa, size_t n)
8 {
9   size_t base = sa->len ;
10   int wasnull = !sa->s ;
11   if (!sauniquename(sa)) return 0 ;
12   if (!stralloc_readyplus(sa, n+1)) goto err ;
13   stralloc_catb(sa, ":", 1) ;
14   random_name(sa->s + sa->len, n) ;
15   sa->len += n ;
16   return 1 ;
17 
18 err:
19   if (wasnull) stralloc_free(sa) ; else sa->len = base ;
20   return 0 ;
21 }
22