mirror of
https://codeberg.org/libreboot/lbmk.git
synced 2026-07-11 14:02:52 +02:00
config/git: import suckless sbase
i currently use the output of sha512sum in several places of xbmk, which is a bit unreliable in case output changes. other cases where i use util outputs in variables are probably reliable, because i'm using mostly posix utilities in those. to mitigate this, i now import suckless sbase, which has a reasonable sha512sum implementation. *every* binary it builds is being placed in build.list, because i'll probably start using more of them. for example, i may start modifying the "date" implementation, adding the GNU-specific options that i need as mentioned on init.sh i'm importing it in util/ because the sha512sum util is needed for verifying project sources, so if sbase itself is a "project source", that means we can into a chicken and egg bootstrapping problem. this is sbase at revision: 055cc1ae1b3a13c3d8f25af0a4a3316590efcd48 Signed-off-by: Leah Rowe <leah@libreboot.org>
This commit is contained in:
Leah Rowe
@@ -0,0 +1,188 @@
|
||||
/* See LICENSE file for copyright and license details. */
|
||||
#include <ctype.h>
|
||||
#include <errno.h>
|
||||
#include <limits.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
|
||||
#include "utf.h"
|
||||
#include "util.h"
|
||||
|
||||
static void
|
||||
usage(void)
|
||||
{
|
||||
eprintf("usage: %s format [arg ...]\n", argv0);
|
||||
}
|
||||
|
||||
int
|
||||
main(int argc, char *argv[])
|
||||
{
|
||||
Rune *rarg;
|
||||
size_t i, j, argi, lastargi, formatlen, blen;
|
||||
long long num;
|
||||
double dou;
|
||||
int cooldown = 0, width, precision, ret = 0;
|
||||
char *format, *tmp, *arg, *fmt, flag;
|
||||
|
||||
argv0 = argv[0];
|
||||
if (argc < 2)
|
||||
usage();
|
||||
|
||||
format = argv[1];
|
||||
if ((tmp = strstr(format, "\\c"))) {
|
||||
*tmp = 0;
|
||||
cooldown = 1;
|
||||
}
|
||||
formatlen = unescape(format);
|
||||
if (formatlen == 0)
|
||||
return 0;
|
||||
lastargi = 0;
|
||||
for (i = 0, argi = 2; !cooldown || i < formatlen; i++, i = cooldown ? i : (i % formatlen)) {
|
||||
if (i == 0) {
|
||||
if (lastargi == argi)
|
||||
break;
|
||||
lastargi = argi;
|
||||
}
|
||||
if (format[i] != '%') {
|
||||
putchar(format[i]);
|
||||
continue;
|
||||
}
|
||||
|
||||
/* flag */
|
||||
for (flag = '\0', i++; strchr("#-+ 0", format[i]); i++) {
|
||||
flag = format[i];
|
||||
}
|
||||
|
||||
/* field width */
|
||||
width = -1;
|
||||
if (format[i] == '*') {
|
||||
if (argi < argc)
|
||||
width = estrtonum(argv[argi++], 0, INT_MAX);
|
||||
else
|
||||
cooldown = 1;
|
||||
i++;
|
||||
} else {
|
||||
j = i;
|
||||
for (; strchr("+-0123456789", format[i]); i++);
|
||||
if (j != i) {
|
||||
tmp = estrndup(format + j, i - j);
|
||||
width = estrtonum(tmp, 0, INT_MAX);
|
||||
free(tmp);
|
||||
} else {
|
||||
width = 0;
|
||||
}
|
||||
}
|
||||
|
||||
/* field precision */
|
||||
precision = -1;
|
||||
if (format[i] == '.') {
|
||||
if (format[++i] == '*') {
|
||||
if (argi < argc)
|
||||
precision = estrtonum(argv[argi++], 0, INT_MAX);
|
||||
else
|
||||
cooldown = 1;
|
||||
i++;
|
||||
} else {
|
||||
j = i;
|
||||
for (; strchr("+-0123456789", format[i]); i++);
|
||||
if (j != i) {
|
||||
tmp = estrndup(format + j, i - j);
|
||||
precision = estrtonum(tmp, 0, INT_MAX);
|
||||
free(tmp);
|
||||
} else {
|
||||
precision = 0;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if (format[i] != '%') {
|
||||
if (argi < argc)
|
||||
arg = argv[argi++];
|
||||
else {
|
||||
arg = "";
|
||||
cooldown = 1;
|
||||
}
|
||||
} else {
|
||||
putchar('%');
|
||||
continue;
|
||||
}
|
||||
|
||||
switch (format[i]) {
|
||||
case 'b':
|
||||
if ((tmp = strstr(arg, "\\c"))) {
|
||||
*tmp = 0;
|
||||
blen = unescape(arg);
|
||||
fwrite(arg, sizeof(*arg), blen, stdout);
|
||||
return 0;
|
||||
}
|
||||
blen = unescape(arg);
|
||||
fwrite(arg, sizeof(*arg), blen, stdout);
|
||||
break;
|
||||
case 'c':
|
||||
unescape(arg);
|
||||
rarg = ereallocarray(NULL, utflen(arg) + 1, sizeof(*rarg));
|
||||
utftorunestr(arg, rarg);
|
||||
efputrune(rarg, stdout, "<stdout>");
|
||||
free(rarg);
|
||||
break;
|
||||
case 's':
|
||||
fmt = estrdup(flag ? "%#*.*s" : "%*.*s");
|
||||
if (flag)
|
||||
fmt[1] = flag;
|
||||
printf(fmt, width, precision, arg);
|
||||
free(fmt);
|
||||
break;
|
||||
case 'd': case 'i': case 'o': case 'u': case 'x': case 'X':
|
||||
for (j = 0; isspace(arg[j]); j++);
|
||||
if (arg[j] == '\'' || arg[j] == '\"') {
|
||||
arg += j + 1;
|
||||
unescape(arg);
|
||||
rarg = ereallocarray(NULL, utflen(arg) + 1, sizeof(*rarg));
|
||||
utftorunestr(arg, rarg);
|
||||
num = rarg[0];
|
||||
} else if (arg[0]) {
|
||||
errno = 0;
|
||||
if (format[i] == 'd' || format[i] == 'i')
|
||||
num = strtol(arg, &tmp, 0);
|
||||
else
|
||||
num = strtoul(arg, &tmp, 0);
|
||||
|
||||
if (tmp == arg || *tmp != '\0') {
|
||||
ret = 1;
|
||||
weprintf("%%%c %s: conversion error\n",
|
||||
format[i], arg);
|
||||
}
|
||||
if (errno == ERANGE) {
|
||||
ret = 1;
|
||||
weprintf("%%%c %s: out of range\n",
|
||||
format[i], arg);
|
||||
}
|
||||
} else {
|
||||
num = 0;
|
||||
}
|
||||
fmt = estrdup(flag ? "%#*.*ll#" : "%*.*ll#");
|
||||
if (flag)
|
||||
fmt[1] = flag;
|
||||
fmt[flag ? 7 : 6] = format[i];
|
||||
printf(fmt, width, precision, num);
|
||||
free(fmt);
|
||||
break;
|
||||
case 'a': case 'A': case 'e': case 'E': case 'f': case 'F': case 'g': case 'G':
|
||||
fmt = estrdup(flag ? "%#*.*#" : "%*.*#");
|
||||
if (flag)
|
||||
fmt[1] = flag;
|
||||
fmt[flag ? 5 : 4] = format[i];
|
||||
dou = (strlen(arg) > 0) ? estrtod(arg) : 0;
|
||||
printf(fmt, width, precision, dou);
|
||||
free(fmt);
|
||||
break;
|
||||
default:
|
||||
eprintf("Invalid format specifier '%c'.\n", format[i]);
|
||||
}
|
||||
if (argi >= argc)
|
||||
cooldown = 1;
|
||||
}
|
||||
|
||||
return fshut(stdout, "<stdout>") | ret;
|
||||
}
|
||||
Reference in New Issue
Block a user