From 8dd98917acb6ee2078c6d4a9e176a016b2648695 Mon Sep 17 00:00:00 2001
From: Patrick McDermott <pj@pehjota.net>
Date: Sun, 01 Oct 2017 14:24:17 -0400
Subject: mq_html_list(): New function

---
(limited to 'src')

diff --git a/src/html.c b/src/html.c
index 8b93448..16882f6 100644
--- a/src/html.c
+++ b/src/html.c
@@ -186,6 +186,49 @@ TEXT_ELEMENT(p)
 #undef TEXT_ELEMENT
 
 gchar *
+mq_html_list(const gchar *type, ...)
+{
+	gsize    len;
+	va_list  ap;
+	gchar   *child;
+	gchar   *form;
+	gchar   *ptr;
+
+	/* TODO: Doesn't support specification of <ol> list types. */
+
+	/* Calculate length. */
+	len = strlen("<ul>\n");
+	va_start(ap, type);
+	while ((child = va_arg(ap, gchar *))) {
+		len += strlen("<li>\n");
+		len += strlen(child);
+		len += strlen("</li>\n");
+	}
+	va_end(ap);
+	len += strlen("</ul>\n");
+	++len;  /* NUL byte */
+
+	/* Build string. */
+	form = g_new(gchar, len);
+	if (type && type[0]) {
+		ptr = g_stpcpy(form, "<ol>\n");
+	} else {
+		ptr = g_stpcpy(form, "<ul>\n");
+	}
+	va_start(ap, type);
+	while ((child = va_arg(ap, gchar *))) {
+		ptr = g_stpcpy(ptr, "<li>\n");
+		ptr = g_stpcpy(ptr, child);
+		g_free(child);
+		ptr = g_stpcpy(ptr, "</li>\n");
+	}
+	va_end(ap);
+	ptr = g_stpcpy(ptr, "</ul>\n");  /* g_stpcpy() adds the NUL. */
+
+	return form;
+}
+
+gchar *
 mq_html_container(const gchar *element, ...)
 {
 	gsize    len;
diff --git a/src/html.h b/src/html.h
index 8c6c5e4..82ab94f 100644
--- a/src/html.h
+++ b/src/html.h
@@ -45,6 +45,9 @@ gchar *
 mq_html_container(const gchar *element, ...);
 
 gchar *
+mq_html_list(const gchar *type, ...);
+
+gchar *
 mq_html_notebook(gboolean vertical, const gchar *name, guint current_page, ...);
 
 gchar *
--
cgit v0.9.1