1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
|
//string cvs_version = "$Id: html.pike,v 1.6 1998/04/28 21:35:14 neotron Exp $";
#define __replace(X) (X)
string input(string name, string|void val, int|void t)
{
name = replace (name, ({"&", "\""}), ({"&", """}));
if(!stringp(val))
val = sprintf ("%O", val);
val = replace (val, ({"&", "\""}), ({"&", """}));
if(!t)
return "<input type=hidden name=\"" + name + "\" value=\"" + val + "\">";
return "<input size=" + t + ",1 name=\"" + name + "\" value=\"" + val + "\">";
}
string pre(string f)
{
return "<pre>\n"+f+"</pre>\n";
}
string table(string|void t, int|void cellspacing, int|void cellpadding,
int|void border, int|void width)
{
string d="";
int ds, dp;
if(border)
{
d += " border="+border;
ds=2;
dp=3;
}
if(cellspacing)
ds=cellspacing;
d += " cellspacing="+ds;
if(cellpadding)
dp=cellpadding;
d += " cellpadding="+dp;
if(width)
d += " width="+width+"%";
return "<table"+d+">\n"+__replace(t)+"</table>\n\n";
}
string tr(string data, int|void rows)
{
if(rows)
return "<tr rowspan="+rows+">\n" + __replace(data) + "</tr><p>";
else
return "<tr>\n" + __replace(data) + "</tr><p>\n";
}
string td(string t, string|void align, int|void rows, int|void cols)
{
string q="";
if(align) q+=" align="+align;
if(rows) q+=" rowspan="+rows;
if(cols) q+=" colspan="+cols;
return "<td"+q+">\n" + __replace(t) +"</td>\n";
}
string bf(string|void s, int|void i)
{
return "<font size=+"+(i+1)+"><b>"+s+"</b></font>";
}
string th(string t, string|void align, int|void rows,
int|void cols)
{
string q="";
if(align) q+=" align="+align;
if(rows) q+=" rowspan="+rows;
if(cols) q+=" colspan="+cols;
return "<th"+q+">\n" + __replace(t) +"</th>\n";
}
string h1(string h)
{
return "<h1>"+h+"</h1>\n\n";
}
string h2(string h)
{
return "<h2>"+h+"</h2>\n\n";
}
string h3(string h)
{
return "<h3>"+h+"</h3>\n\n";
}
#if 0
inline string button(string text, string url)
{
return sprintf("<form method=get action=\"%s\"><input type=submit value"+
"=\"%s\"></form>", replace(url, " ", "%20"), text);
}
inline string link(string text, string url)
{
return sprintf("<a href=\"%s\">%s</a>", replace(url, " ", "%20"), text);
}
#endif
|
