Huge overhall; fix code; remove external deps

1 files changed, 0 insertions, 273 deletions

diff --git a/main.c b/main.c
deleted file mode 100644
index 67a4815..0000000
--- a/main.c
+++ /dev/null
@@ -1,273 +0,0 @@
-/* References: https://datatracker.ietf.org/doc/html/rfc4226#section-5 */
-
-#include <err.h>
-#include <getopt.h>
-#include <stdbool.h>
-#include <stdint.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <strings.h>
-#include <time.h>
-
-#include <openssl/hmac.h>
-#include <uriparser/Uri.h>
-#include <uriparser/UriBase.h>
-
-#include "b32.h"
-
-#define STREQ(x, y) (strcmp(x, y) == 0)
-#define WARNX_AND_RET(...) \
-	do { \
-		rv = EXIT_FAILURE; \
-		warnx(__VA_ARGS__); \
-		return false; \
-	} while (false)
-
-#define TOTP_DEFAULT (struct totp_config){ .len = 6, .p = 30 }
-
-typedef unsigned char uchar;
-
-struct totp_config {
-	const char *enc_sec;
-	long        len, p;
-};
-
-extern char *__progname;
-
-static int rv;
-
-static const char *bad_scheme  = "Invalid scheme ‘%.*s’; expected ‘otpauth’";
-static const char *bad_param   = "Invalid ‘%s’ parameter provided";
-static const char *empty_param = "Empty ‘%s’ parameter provided";
-static const char *usage_s     = "Usage: %s [-d digits] [-p period] [-u] [secret ...]\n";
-
-static void     usage(void);
-static void     totp_print(struct totp_config, char *, bool);
-static bool     strtol_safe(long *, const char *);
-static bool     totp(struct totp_config, uint32_t *);
-static uint32_t pow32(uint32_t, uint32_t);
-static bool     uri_parse(struct totp_config *, const char *);
-static bool     big_endian(void);
-
-void
-usage(void)
-{
-	fprintf(stderr, usage_s, __progname);
-	exit(EXIT_FAILURE);
-}
-
-int
-main(int argc, char *argv[])
-{
-	int opt;
-	bool uflag = false;
-	long n;
-	char *buf;
-	size_t bufsiz;
-	ssize_t nr;
-	struct totp_config conf = TOTP_DEFAULT;
-	struct option longopts[] = {
-		{"digits", required_argument, 0, 'd'},
-		{"period", required_argument, 0, 'p'},
-		{"uri",    no_argument,       0, 'u'},
-		{ NULL,    0,                 0,  0 },
-	};
-
-	while ((opt = getopt_long(argc, argv, "d:p:u", longopts, NULL)) != -1) {
-		switch (opt) {
-		case 'd':
-		case 'p':
-			if (!strtol_safe(&n, optarg))
-				errx(EXIT_FAILURE, bad_param,
-				     opt == 'd' ? "digits" : "period");
-			if (opt == 'd')
-				conf.len = n;
-			else
-				conf.p = n;
-			break;
-		case 'u':
-			uflag = true;
-			break;
-		default:
-			usage();
-		}
-	}
-
-	argc -= optind;
-	argv += optind;
-
-	if (argc == 0) {
-		buf = NULL;
-		bufsiz = 0;
-
-		while ((nr = getline(&buf, &bufsiz, stdin)) > 0) {
-			if (buf[--nr] == '\n')
-				buf[nr] = '\0';
-			totp_print(conf, buf, uflag);
-		}
-		free(buf);
-	} else for (int i = 0; i < argc; i++)
-		totp_print(conf, argv[i], uflag);
-
-	return rv;
-}
-
-void
-totp_print(struct totp_config conf, char *buf, bool uflag)
-{
-	uint32_t code;
-	
-	if (uflag) {
-		conf = TOTP_DEFAULT;
-		if (!uri_parse(&conf, buf))
-			return;
-	} else
-		conf.enc_sec = buf;
-	if (totp(conf, &code))
-		printf("%0*d\n", (int)conf.len, code);
-	if (uflag)
-		free((void *)conf.enc_sec);
-}
-
-bool
-uri_parse(struct totp_config *conf, const char *uri_raw)
-{
-	bool reject;
-	size_t len;
-	UriUriA uri;
-	UriQueryListA *qs;
-	const char *epos;
-
-	if (uriParseSingleUriA(&uri, uri_raw, &epos) != URI_SUCCESS) {
-		len = (size_t)(epos - uri_raw) + 24 + strlen(__progname);
-		WARNX_AND_RET("Failed to parse URI ‘%s’\n"
-		              "%*c Error detected here",
-		              uri_raw, (int)len, '^');
-	}
-
-	len = (size_t)(uri.scheme.afterLast - uri.scheme.first);
-	reject = len != strlen("otpauth");
-	reject = reject || strncasecmp(uri.scheme.first, "otpauth", len) != 0;
-
-	if (reject)
-		WARNX_AND_RET(bad_scheme, (int)len, uri.scheme.first);
-	if (uriDissectQueryMallocA(&qs, NULL, uri.query.first,
-	                           uri.query.afterLast) != URI_SUCCESS)
-		WARNX_AND_RET("Failed to parse query string");
-
-	for (UriQueryListA *p = qs; p != NULL; p = p->next) {
-		if (STREQ(p->key, "secret")) {
-			if (p->value == NULL)
-				WARNX_AND_RET("Secret key has no value");
-			if ((conf->enc_sec = strdup(p->value)) == NULL)
-				err(EXIT_FAILURE, "strdup");
-		} else if (STREQ(p->key, "digits")) {
-			if (p->value == NULL)
-				WARNX_AND_RET(empty_param, "digits");
-			if (!strtol_safe(&conf->len, p->value))
-				WARNX_AND_RET(bad_param, "digits");
-		} else if (STREQ(p->key, "period")) {
-			if (p->value == NULL)
-				WARNX_AND_RET(empty_param, "period");
-			if (!strtol_safe(&conf->p, p->value))
-				WARNX_AND_RET(bad_param, "period");
-		}
-	}
-
-	uriFreeQueryListA(qs);
-	uriFreeUriMembersA(&uri);
-
-	return true;
-}
-
-bool
-totp(struct totp_config conf, uint32_t *code)
-{
-	int off;
-	bool clean;
-	uint8_t *key;
-	char *enc_sec;
-	uchar *mac;
-	time_t epoch;
-	uint8_t buf[sizeof(time_t)];
-	uint32_t binc;
-	size_t keylen, enc_sec_len, old;
-	
-	/* conf.enc_sec needs to be ‘=’ padded to a multiple of 8 */
-	old = enc_sec_len = strlen(conf.enc_sec);
-	if (enc_sec_len % 8 == 0) {
-		enc_sec = (char *)conf.enc_sec;
-		clean = false;
-	} else {
-		enc_sec_len += 8 - enc_sec_len % 8;
-		if ((enc_sec = malloc(enc_sec_len)) == NULL)
-			err(EXIT_FAILURE, "malloc");
-		memcpy(enc_sec, conf.enc_sec, old);
-		memset(enc_sec + old, '=', enc_sec_len - old);
-		clean = true;
-	}
-
-	keylen = (size_t)((double)old / 1.6);
-	if ((key = calloc(keylen + 1, sizeof(char))) == NULL)
-		err(EXIT_FAILURE, "calloc");
-	b32toa(key, enc_sec, enc_sec_len);
-
-	if (time(&epoch) == (time_t)-1) {
-		warn("time");
-		return false;
-	}
-
-	epoch /= conf.p;
-
-	if (big_endian())
-		memcpy(buf, &epoch, sizeof(time_t));
-	else for (size_t i = sizeof(buf); i --> 0;)
-		buf[sizeof(buf)-1-i] = (uint8_t)((epoch >> 8 * i) & 0xFF);
-
-	mac = HMAC(EVP_sha1(), key, (int)keylen, buf, sizeof(buf), NULL, NULL);
-	if (mac == NULL)
-		WARNX_AND_RET("Failed to compute HMAC SHA-1 hash");
-
-        /* SHA1 hashes are 20 bytes long */
-	off = mac[19] & 0x0F;
-	binc = (mac[off + 0] & 0x7F) << 24
-             | (mac[off + 1] & 0xFF) << 16
-             | (mac[off + 2] & 0xFF) <<  8
-             | (mac[off + 3] & 0xFF) <<  0;
-	*code = binc % pow32(10, (uint32_t)conf.len);
-
-	if (clean)
-		free(enc_sec);
-	free(key);
-	return true;
-}
-
-bool
-strtol_safe(long *n, const char *s)
-{
-	char *e;
-	*n = strtol(s, &e, 10);
-	return *n > 0 && *s != '\0' && *e == '\0';
-}
-
-/* This could overflow if you did some autistic shit */
-uint32_t
-pow32(uint32_t x, uint32_t y)
-{
-	uint32_t n = x;
-	if (y == 0)
-		return 1;
-	while (--y != 0)
-		x *= n;
-	return x;
-}
-
-bool
-big_endian(void)
-{
-	unsigned n = 0x01020304;
-	uchar *ptr = (uchar *)&n;
-
-	return *ptr == 1;
-}