X-Git-Url: https://git.draconx.ca/gitweb/cdecl99.git/blobdiff_plain/0c61f9637a469ac7a28b5a329551b03e6ad14d62..HEAD:/src/output.c

diff --git a/src/output.c b/src/output.c
index 22fc2e9..634b79e 100644
--- a/src/output.c
+++ b/src/output.c
@@ -1,6 +1,6 @@
 /*
  *  Helper functions for outputting text.
- *  Copyright © 2011, 2021 Nick Bowler
+ *  Copyright © 2011, 2021, 2023-2024 Nick Bowler
  *
  *  This program is free software: you can redistribute it and/or modify
  *  it under the terms of the GNU General Public License as published by
@@ -17,54 +17,75 @@
  */
 #include <config.h>
 #include <stdio.h>
+#include <limits.h>
 #include <assert.h>
 
 #include "cdecl.h"
 #include "cdecl-internal.h"
 
-size_t cdecl__advance_(char **buf, size_t *n, size_t amount)
+#include "parse.h"
+#include "specstr.h"
+
+size_t cdecl__advance(struct output_state *dst, size_t amount)
 {
-	if (amount >= *n) {
-		*n   = 0;
-		*buf = 0;
-	} else {
-		*buf += amount;
-		*n   -= amount;
-	}
+	size_t x = MIN(amount, dst->dstlen);
+
+	dst->dst    += x;
+	dst->dstlen -= x;
+	dst->accum  += amount;
 
 	return amount;
 }
 
-size_t cdecl__advance(char **buf, size_t *n, size_t amount)
+size_t cdecl__strlcpy(char *dst, const char *src, size_t dstlen)
 {
-	size_t ret, rc;
+	size_t srclen = strlen(src);
+
+	if (dstlen > 0) {
+		memcpy(dst, src, MIN(dstlen, srclen+1));
+		if (dstlen <= srclen)
+			dst[dstlen-1] = 0;
+	}
 
-	if (!amount)
-		return 0;
+	return srclen;
+}
 
-	ret = cdecl__advance_(buf, n, amount);
-	rc = snprintf(*buf, *n, " ");
-	return ret + cdecl__advance_(buf, n, rc);
+size_t cdecl__emit(struct output_state *dst, const char *src)
+{
+	size_t rc = cdecl__strlcpy(dst->dst, src, dst->dstlen);
+	return cdecl__advance(dst, rc);
 }
 
-static const char *explain_spec_simple(struct cdecl_declspec *s)
+enum {
+	/*
+	 * upper bound on number of decimal digits required to convert
+	 * cdecl_uintmax.
+	 */
+	MAX_UINT_DIGITS = (CHAR_BIT * sizeof (cdecl_uintmax) + 2)/3
+};
+
+size_t cdecl__emit_uint(struct output_state *dst, cdecl_uintmax val)
 {
-	switch (s->type) {
-#	include "namespecs.h"
+	char buf[MAX_UINT_DIGITS + 1], *p = &buf[sizeof buf];
+
+	*(--p) = 0;
+	while (val > 0) {
+		*(--p) = '0' + val % 10;
+		val /= 10;
 	}
 
-	assert(0);
+	return cdecl__emit(dst, p);
 }
 
-static size_t explain_spec(char *buf, size_t n, struct cdecl_declspec *s)
+static void explain_spec(struct output_state *dst, struct cdecl_declspec *s)
 {
-	const char *keyword = explain_spec_simple(s);
+	size_t rc;
 
-	if (keyword[0] && s->ident)
-		return snprintf(buf, n, "%s %s", keyword, s->ident);
-	else if (s->ident)
-		return snprintf(buf, n, "%s", s->ident);
-	return snprintf(buf, n, "%s", keyword);
+	rc = cdecl__emit(dst, spec_string(s->type));
+	if (s->ident) {
+		cdecl__emit(dst, " " + !rc);
+		cdecl__emit(dst, s->ident);
+	}
 }
 
 /*
@@ -72,33 +93,21 @@ static size_t explain_spec(char *buf, size_t n, struct cdecl_declspec *s)
  * listed in mask, which is the bitwise OR of the desired specifier kinds, are
  * printed.
  */
-size_t cdecl__explain_specs(char *buf, size_t n, struct cdecl_declspec *s,
-                                                 unsigned mask)
+const char *cdecl__emit_specs(struct output_state *dst,
+                              struct cdecl_declspec *s,
+                              unsigned mask)
 {
-	size_t ret = 0, rc = 0;
-
-	for (struct cdecl_declspec *c = s; c; c = c->next) {
-		switch (cdecl_spec_kind(c) & mask) {
-		case CDECL_SPEC_FUNC:
-		case CDECL_SPEC_STOR:
-		case CDECL_SPEC_QUAL:
-		case CDECL_SPEC_TYPE:
-			ret += cdecl__advance(&buf, &n, rc);
-			rc = explain_spec(buf, n, c);
-		}
-	}
+	const char *sep = " ";
+	int empty = 1;
 
-	return ret + rc;
-}
+	for (; s; s = s->next) {
+		if (!(s->type & mask))
+			continue;
 
-/* Renders the storage-class and function specifiers in canonical form. */
-size_t cdecl__explain_pre_specs(char *buf, size_t n, struct cdecl_declspec *s)
-{
-	return cdecl__explain_specs(buf, n, s, CDECL_SPEC_FUNC|CDECL_SPEC_STOR);
-}
+		cdecl__emit(dst, sep + empty);
+		explain_spec(dst, s);
+		empty = 0;
+	}
 
-/* Renders the type qualifiers and type specifiers in canonical form. */
-size_t cdecl__explain_post_specs(char *buf, size_t n, struct cdecl_declspec *s)
-{
-	return cdecl__explain_specs(buf, n, s, CDECL_SPEC_QUAL|CDECL_SPEC_TYPE);
+	return sep + empty;
 }