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