diff options
Diffstat (limited to 'src/skaembutils/s6-uniquename.c')
-rw-r--r-- | src/skaembutils/s6-uniquename.c | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/src/skaembutils/s6-uniquename.c b/src/skaembutils/s6-uniquename.c deleted file mode 100644 index 479c50d..0000000 --- a/src/skaembutils/s6-uniquename.c +++ /dev/null @@ -1,40 +0,0 @@ -/* ISC license. */ - -#include <skalibs/allreadwrite.h> -#include <skalibs/sgetopt.h> -#include <skalibs/types.h> -#include <skalibs/strerr.h> -#include <skalibs/stralloc.h> -#include <skalibs/skamisc.h> -#include <skalibs/random.h> - -#define USAGE "s6-uniquename [ -n randomlen ] prefix" -#define usage() strerr_dieusage(100, USAGE) - -int main (int argc, char const *const *argv) -{ - stralloc sa = STRALLOC_ZERO ; - unsigned int n = 8 ; - PROG = "s6-uniquename" ; - { - subgetopt l = SUBGETOPT_ZERO ; - for (;;) - { - int opt = subgetopt_r(argc, argv, "n:", &l) ; - if (opt == -1) break ; - switch (opt) - { - case 'n' : if (!uint0_scan(l.arg, &n)) usage() ; break ; - default : usage() ; - } - } - argc -= l.ind ; argv += l.ind ; - } - if (argc < 1) usage() ; - if (!stralloc_cats(&sa, argv[0])) strerr_diefu1sys(111, "stralloc_cats") ; - if (!(n ? random_sauniquename_early(&sa, n) : sauniquename(&sa))) - strerr_diefu1sys(111, "make unique name") ; - if (!stralloc_catb(&sa, "\n", 1)) strerr_diefu1sys(111, "stralloc_cats") ; - if (allwrite(1, sa.s, sa.len) < sa.len) strerr_diefu1sys(111, "write to stdout") ; - return 0 ; -} |