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_url_arg(char *txt)
132{
133	char *t = txt;
134	while(t && *t){
135		int c = *t;
136		if (c=='"' || c=='#' || c=='%' || c=='&' || c=='\'' || c=='+' || c=='?') {
137			write(htmlfd, txt, t - txt);
138			write(htmlfd, fmt("%%%2x", c), 3);
139			txt = t+1;
140		}
141		t++;
142	}
143	if (t!=txt)
144		html(txt);
145}
146
147void html_hidden(char *name, char *value)
148{
149	html("<input type='hidden' name='");
150	html_attr(name);
151	html("' value='");
152	html_attr(value);
153	html("'/>");
154}
155
156void html_option(char *value, char *text, char *selected_value)
157{
158	html("<option value='");
159	html_attr(value);
160	html("'");
161	if (selected_value && !strcmp(selected_value, value))
162		html(" selected='selected'");
163	html(">");
164	html_txt(text);
165	html("</option>\n");
166}
167
168void html_link_open(char *url, char *title, char *class)
169{
170	html("<a href='");
171	html_attr(url);
172	if (title) {
173		html("' title='");
174		html_attr(title);
175	}
176	if (class) {
177		html("' class='");
178		html_attr(class);
179	}
180	html("'>");
181}
182
183void html_link_close(void)
184{
185	html("</a>");
186}
187
188void html_fileperm(unsigned short mode)
189{
190	htmlf("%c%c%c", (mode & 4 ? 'r' : '-'),
191	      (mode & 2 ? 'w' : '-'), (mode & 1 ? 'x' : '-'));
192}
193
194int html_include(const char *filename)
195{
196	FILE *f;
197	char buf[4096];
198	size_t len;
199
200	if (!(f = fopen(filename, "r"))) {
201		fprintf(stderr, "[cgit] Failed to include file %s: %s (%d).\n",
202			filename, strerror(errno), errno);
203		return -1;
204	}
205	while((len = fread(buf, 1, 4096, f)) > 0)
206		write(htmlfd, buf, len);
207	fclose(f);
208	return 0;
209}
210
211int hextoint(char c)
212{
213	if (c >= 'a' && c <= 'f')
214		return 10 + c - 'a';
215	else if (c >= 'A' && c <= 'F')
216		return 10 + c - 'A';
217	else if (c >= '0' && c <= '9')
218		return c - '0';
219	else
220		return -1;
221}
222
223char *convert_query_hexchar(char *txt)
224{
225	int d1, d2;
226	if (strlen(txt) < 3) {
227		*txt = '\0';
228		return txt-1;
229	}
230	d1 = hextoint(*(txt+1));
231	d2 = hextoint(*(txt+2));
232	if (d1<0 || d2<0) {
233		strcpy(txt, txt+3);
234		return txt-1;
235	} else {
236		*txt = d1 * 16 + d2;
237		strcpy(txt+1, txt+3);
238		return txt;
239	}
240}
241
242int http_parse_querystring(char *txt, void (*fn)(const char *name, const char *value))
243{
244	char *t, *value = NULL, c;
245
246	if (!txt)
247		return 0;
248
249	t = txt = strdup(txt);
250	if (t == NULL) {
251		printf("Out of memory\n");
252		exit(1);
253	}
254	while((c=*t) != '\0') {
255		if (c=='=') {
256			*t = '\0';
257			value = t+1;
258		} else if (c=='+') {
259			*t = ' ';
260		} else if (c=='%') {
261			t = convert_query_hexchar(t);
262		} else if (c=='&') {
263			*t = '\0';
264			(*fn)(txt, value);
265			txt = t+1;
266			value = NULL;
267		}
268		t++;
269	}
270	if (t!=txt)
271		(*fn)(txt, value);
272	return 0;
273}