1/* html.c: helper functions for html output
  2 *
  3 * Copyright (C) 2006 Lars Hjemli
  4 *
  5 * Licensed under GNU General Public License v2
  6 *   (see COPYING for full license text)
  7 */
  8
  9#include <unistd.h>
 10#include <stdio.h>
 11#include <stdlib.h>
 12#include <stdarg.h>
 13#include <string.h>
 14#include <errno.h>
 15
 16int htmlfd = STDOUT_FILENO;
 17
 18char *fmt(const char *format, ...)
 19{
 20	static char buf[8][1024];
 21	static int bufidx;
 22	int len;
 23	va_list args;
 24
 25	bufidx++;
 26	bufidx &= 7;
 27
 28	va_start(args, format);
 29	len = vsnprintf(buf[bufidx], sizeof(buf[bufidx]), format, args);
 30	va_end(args);
 31	if (len>sizeof(buf[bufidx])) {
 32		fprintf(stderr, "[html.c] string truncated: %s\n", format);
 33		exit(1);
 34	}
 35	return buf[bufidx];
 36}
 37
 38void html_raw(const char *data, size_t size)
 39{
 40	write(htmlfd, data, size);
 41}
 42
 43void html(const char *txt)
 44{
 45	write(htmlfd, txt, strlen(txt));
 46}
 47
 48void htmlf(const char *format, ...)
 49{
 50	static char buf[65536];
 51	va_list args;
 52
 53	va_start(args, format);
 54	vsnprintf(buf, sizeof(buf), format, args);
 55	va_end(args);
 56	html(buf);
 57}
 58
 59void html_status(int code, const char *msg, int more_headers)
 60{
 61	htmlf("Status: %d %s\n", code, msg);
 62	if (!more_headers)
 63		html("\n");
 64}
 65
 66void html_txt(char *txt)
 67{
 68	char *t = txt;
 69	while(t && *t){
 70		int c = *t;
 71		if (c=='<' || c=='>' || c=='&') {
 72			write(htmlfd, txt, t - txt);
 73			if (c=='>')
 74				html("&gt;");
 75			else if (c=='<')
 76				html("&lt;");
 77			else if (c=='&')
 78				html("&amp;");
 79			txt = t+1;
 80		}
 81		t++;
 82	}
 83	if (t!=txt)
 84		html(txt);
 85}
 86
 87void html_ntxt(int len, char *txt)
 88{
 89	char *t = txt;
 90	while(t && *t && len--){
 91		int c = *t;
 92		if (c=='<' || c=='>' || c=='&') {
 93			write(htmlfd, txt, t - txt);
 94			if (c=='>')
 95				html("&gt;");
 96			else if (c=='<')
 97				html("&lt;");
 98			else if (c=='&')
 99				html("&amp;");
100			txt = t+1;
101		}
102		t++;
103	}
104	if (t!=txt)
105		write(htmlfd, txt, t - txt);
106	if (len<0)
107		html("...");
108}
109
110void html_attr(char *txt)
111{
112	char *t = txt;
113	while(t && *t){
114		int c = *t;
115		if (c=='<' || c=='>' || c=='\'') {
116			write(htmlfd, txt, t - txt);
117			if (c=='>')
118				html("&gt;");
119			else if (c=='<')
120				html("&lt;");
121			else if (c=='\'')
122				html("&quote;");
123			txt = t+1;
124		}
125		t++;
126	}
127	if (t!=txt)
128		html(txt);
129}
130
131void html_hidden(char *name, char *value)
132{
133	html("<input type='hidden' name='");
134	html_attr(name);
135	html("' value='");
136	html_attr(value);
137	html("'/>");
138}
139
140void html_option(char *value, char *text, char *selected_value)
141{
142	html("<option value='");
143	html_attr(value);
144	html("'");
145	if (selected_value && !strcmp(selected_value, value))
146		html(" selected='selected'");
147	html(">");
148	html_txt(text);
149	html("</option>\n");
150}
151
152void html_link_open(char *url, char *title, char *class)
153{
154	html("<a href='");
155	html_attr(url);
156	if (title) {
157		html("' title='");
158		html_attr(title);
159	}
160	if (class) {
161		html("' class='");
162		html_attr(class);
163	}
164	html("'>");
165}
166
167void html_link_close(void)
168{
169	html("</a>");
170}
171
172void html_fileperm(unsigned short mode)
173{
174	htmlf("%c%c%c", (mode & 4 ? 'r' : '-'),
175	      (mode & 2 ? 'w' : '-'), (mode & 1 ? 'x' : '-'));
176}
177
178int html_include(const char *filename)
179{
180	FILE *f;
181	char buf[4096];
182	size_t len;
183
184	if (!(f = fopen(filename, "r"))) {
185		fprintf(stderr, "[cgit] Failed to include file %s: %s (%d).\n",
186			filename, strerror(errno), errno);
187		return -1;
188	}
189	while((len = fread(buf, 1, 4096, f)) > 0)
190		write(htmlfd, buf, len);
191	fclose(f);
192	return 0;
193}
194
195int hextoint(char c)
196{
197	if (c >= 'a' && c <= 'f')
198		return 10 + c - 'a';
199	else if (c >= 'A' && c <= 'F')
200		return 10 + c - 'A';
201	else if (c >= '0' && c <= '9')
202		return c - '0';
203	else
204		return -1;
205}
206
207char *convert_query_hexchar(char *txt)
208{
209	int d1, d2;
210	if (strlen(txt) < 3) {
211		*txt = '\0';
212		return txt-1;
213	}
214	d1 = hextoint(*(txt+1));
215	d2 = hextoint(*(txt+2));
216	if (d1<0 || d2<0) {
217		strcpy(txt, txt+3);
218		return txt-1;
219	} else {
220		*txt = d1 * 16 + d2;
221		strcpy(txt+1, txt+3);
222		return txt;
223	}
224}
225
226int http_parse_querystring(char *txt, void (*fn)(const char *name, const char *value))
227{
228	char *t, *value = NULL, c;
229
230	if (!txt)
231		return 0;
232
233	t = txt = strdup(txt);
234	if (t == NULL) {
235		printf("Out of memory\n");
236		exit(1);
237	}
238	while((c=*t) != '\0') {
239		if (c=='=') {
240			*t = '\0';
241			value = t+1;
242		} else if (c=='+') {
243			*t = ' ';
244		} else if (c=='%') {
245			t = convert_query_hexchar(t);
246		} else if (c=='&') {
247			*t = '\0';
248			(*fn)(txt, value);
249			txt = t+1;
250			value = NULL;
251		}
252		t++;
253	}
254	if (t!=txt)
255		(*fn)(txt, value);
256	return 0;
257}