Added a simpleerror function.
[wrw.git] / wrw / proto.py
1 import time
2
3 statusinfo = {
4     400: ("Bad Request", "Invalid HTTP request."),
5     401: ("Unauthorized", "Authentication must be provided for the requested resource."),
6     403: ("Forbidden", "You are not authorized to request the requested resource."),
7     404: ("Not Found", "The requested resource was not found."),
8     405: ("Method Not Allowed", "The request method is not recognized or permitted by the requested resource."),
9     500: ("Server Error", "An internal error occurred."),
10     501: ("Not Implemented", "The requested functionality has not been implemented."),
11     503: ("Service Unavailable", "Service is being denied at this time."),
12     }
13
14 def httpdate(ts):
15     return time.strftime("%a, %d %b %Y %H:%M:%S +0000", time.gmtime(ts))
16
17 def phttpdate(dstr):
18     tz = dstr[-6:]
19     dstr = dstr[:-6]
20     if tz[0] != " " or (tz[1] != "+" and tz[1] != "-") or not tz[2:].isdigit():
21         return None
22     tz = int(tz[1:])
23     tz = (((tz / 100) * 60) + (tz % 100)) * 60
24     return time.mktime(time.strptime(dstr, "%a, %d %b %Y %H:%M:%S")) - tz - time.altzone
25
26 def pmimehead(hstr):
27     def pws(p):
28         while p < len(hstr) and hstr[p].isspace():
29             p += 1
30         return p
31     def token(p, sep):
32         buf = ""
33         p = pws(p)
34         if p >= len(hstr):
35             return "", p
36         if hstr[p] == '"':
37             p += 1
38             while p < len(hstr):
39                 if hstr[p] == '\\':
40                     p += 1
41                     if p < len(hstr):
42                         buf += hstr[p]
43                         p += 1
44                     else:
45                         break
46                 elif hstr[p] == '"':
47                     p += 1
48                     break
49                 else:
50                     buf += hstr[p]
51                     p += 1
52             return buf, pws(p)
53         else:
54             while p < len(hstr):
55                 if hstr[p] in sep:
56                     break
57                 buf += hstr[p]
58                 p += 1
59             return buf.strip(), pws(p)
60     p = 0
61     val, p = token(p, ";")
62     pars = {}
63     while p < len(hstr):
64         if hstr[p] != ';':
65             break
66         p += 1
67         k, p = token(p, "=")
68         if k == "" or hstr[p:p + 1] != '=':
69             break
70         p += 1
71         v, p = token(p, ';')
72         pars[k.lower()] = v
73     return val, pars
74
75 def htmlq(html):
76     ret = ""
77     for c in html:
78         if c == "&":
79             ret += "&amp;"
80         elif c == "<":
81             ret += "&lt;"
82         elif c == ">":
83             ret += "&gt;"
84         else:
85             ret += c
86     return ret
87
88 def simpleerror(env, startreq, code, title, msg):
89     buf = """<?xml version="1.0" encoding="US-ASCII"?>
90 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
91 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en-US">
92 <head>
93 <title>%s</title>
94 </head>
95 <body>
96 <h1>%s</h1>
97 <p>%s</p>
98 </body>
99 </html>
100 """ % (title, title, htmlq(msg))
101     startreq("%i %s" % (code, title), [("Content-Type", "text/html"), ("Content-Length", str(len(buf)))])
102     return [buf]
103
104 def urlq(url):
105     ret = ""
106     for c in url:
107         if c == "&" or c == "=" or c == "#" or c == "?" or c == "/" or (ord(c) <= 32):
108             ret += "%%%02X" % ord(c)
109         else:
110             ret += c
111     return ret
112
113 class urlerror(ValueError):
114     pass
115
116 def parseurl(url):
117     p = url.find("://")
118     if p < 0:
119         raise urlerror("Protocol not found in absolute URL `%s'" % url)
120     proto = url[:p]
121     l = url.find("/", p + 3)
122     if l < 0:
123         raise urlerror("Local part not found in absolute URL `%s'" % url)
124     host = url[p + 3:l]
125     local = url[l:]
126     q = local.find("?")
127     if q < 0:
128         query = ""
129     else:
130         query = local[q + 1:]
131         local = local[:q]
132     return proto, host, local, query
133
134 def consurl(proto, host, local, query=""):
135     if len(local) < 1 and local[0] != '/':
136         raise urlerror("Local part of URL must begin with a slash")
137     ret = "%s://%s%s" % (proto, host, local)
138     if len(query) > 0:
139         ret += "?" + query
140     return ret
141
142 def appendurl(url, other):
143     if "://" in other:
144         return other
145     proto, host, local, query = parseurl(url)
146     if len(other) > 0 and other[0] == '/':
147         return consurl(proto, host, other)
148     else:
149         p = local.rfind('/')
150         return consurl(proto, host, local[:p + 1] + other)
151
152 def siteurl(req):
153     host = req.ihead.get("Host", None)
154     if host is None:
155         raise Exception("Could not reconstruct URL because no Host header was sent")
156     proto = "http"
157     if req.https:
158         proto = "https"
159     return "%s://%s/" % (proto, host)
160
161 def scripturl(req):
162     s = siteurl(req)
163     if req.uriname[0] != '/':
164         raise Exception("Malformed local part when reconstructing URL")
165     return siteurl(req) + req.uriname[1:]
166
167 def requrl(req):
168     s = siteurl(req)
169     if req.uri[0] != '/':
170         raise Exception("Malformed local part when reconstructing URL")
171     return siteurl(req) + req.uri[1:]
172
173 def parstring(pars={}, **augment):
174     buf = ""
175     for key in pars:
176         if key in augment:
177             val = augment[key]
178             del augment[key]
179         else:
180             val = pars[key]
181         if buf != "": buf += "&"
182         buf += urlq(key) + "=" + urlq(str(val))
183     for key in augment:
184         if buf != "": buf += "&"
185         buf += urlq(key) + "=" + urlq(str(augment[key]))
186     return buf
187
188 def parurl(url, pars={}, **augment):
189     qs = parstring(pars, **augment)
190     if qs != "":
191         return url + "?" + qs
192     else:
193         return url