Merge branch 'master' into python2
[wrw.git] / wrw / util.py
1 import inspect, math
2 import req, dispatch, session, form, resp, proto
3
4 def wsgiwrap(callable):
5     def wrapper(env, startreq):
6         return dispatch.handleenv(env, startreq, callable)
7     wrapper.__wrapped__ = callable
8     return wrapper
9
10 def formparams(callable):
11     spec = inspect.getargspec(callable)
12     def wrapper(req):
13         try:
14             data = form.formdata(req)
15         except IOError:
16             raise resp.httperror(400, "Invalid request", "Form data was incomplete")
17         args = dict(data.items())
18         args["req"] = req
19         if not spec.keywords:
20             for arg in list(args):
21                 if arg not in spec.args:
22                     del args[arg]
23         for i in xrange(len(spec.args) - (len(spec.defaults) if spec.defaults else 0)):
24             if spec.args[i] not in args:
25                 raise resp.httperror(400, "Missing parameter", ("The query parameter `", resp.h.code(spec.args[i]), "' is required but not supplied."))
26         return callable(**args)
27     wrapper.__wrapped__ = callable
28     return wrapper
29
30 class funplex(object):
31     def __init__(self, *funs, **nfuns):
32         self.dir = {}
33         self.dir.update(((self.unwrap(fun).__name__, fun) for fun in funs))
34         self.dir.update(nfuns)
35
36     @staticmethod
37     def unwrap(fun):
38         while hasattr(fun, "__wrapped__"):
39             fun = fun.__wrapped__
40         return fun
41
42     def __call__(self, req):
43         if req.pathinfo == "":
44             raise resp.redirect(req.uriname + "/")
45         if req.pathinfo[:1] != "/":
46             raise resp.notfound()
47         p = req.pathinfo[1:]
48         if p == "":
49             p = "__index__"
50             bi = 1
51         else:
52             p = p.partition("/")[0]
53             bi = len(p) + 1
54         if p in self.dir:
55             sreq = req.shift(bi)
56             sreq.selfpath = req.pathinfo[1:]
57             return self.dir[p](sreq)
58         raise resp.notfound()
59
60     def add(self, fun):
61         self.dir[self.unwrap(fun).__name__] = fun
62         return fun
63
64     def name(self, name):
65         def dec(fun):
66             self.dir[name] = fun
67             return fun
68         return dec
69
70 def persession(data=None):
71     def dec(callable):
72         def wrapper(req):
73             sess = session.get(req)
74             if callable not in sess:
75                 if data is None:
76                     sess[callable] = callable()
77                 else:
78                     if data not in sess:
79                         sess[data] = data()
80                     sess[callable] = callable(data)
81             return sess[callable].handle(req)
82         wrapper.__wrapped__ = callable
83         return wrapper
84     return dec
85
86 class preiter(object):
87     __slots__ = ["bk", "bki", "_next"]
88     end = object()
89     def __init__(self, real):
90         self.bk = real
91         self.bki = iter(real)
92         self._next = None
93         self.next()
94
95     def __iter__(self):
96         return self
97
98     def next(self):
99         if self._next is self.end:
100             raise StopIteration()
101         ret = self._next
102         try:
103             self._next = next(self.bki)
104         except StopIteration:
105             self._next = self.end
106         return ret
107
108     def close(self):
109         if hasattr(self.bk, "close"):
110             self.bk.close()
111
112 def pregen(callable):
113     def wrapper(*args, **kwargs):
114         return preiter(callable(*args, **kwargs))
115     wrapper.__wrapped__ = callable
116     return wrapper
117
118 class sessiondata(object):
119     @classmethod
120     def get(cls, req, create=True):
121         sess = cls.sessdb().get(req)
122         with sess.lock:
123             try:
124                 return sess[cls]
125             except KeyError:
126                 if not create:
127                     return None
128                 ret = cls(req, sess)
129                 sess[cls] = ret
130                 return ret
131
132     @classmethod
133     def sessdb(cls):
134         return session.default.val
135
136 class autodirty(sessiondata):
137     @classmethod
138     def get(cls, req):
139         ret = super(autodirty, cls).get(req)
140         if "_is_dirty" not in ret.__dict__:
141             ret.__dict__["_is_dirty"] = False
142         return ret
143
144     def sessfrozen(self):
145         self.__dict__["_is_dirty"] = False
146
147     def sessdirty(self):
148         return self._is_dirty
149
150     def __setattr__(self, name, value):
151         super(autodirty, self).__setattr__(name, value)
152         if "_is_dirty" in self.__dict__:
153             self.__dict__["_is_dirty"] = True
154
155     def __delattr__(self, name):
156         super(autodirty, self).__delattr__(name, value)
157         if "_is_dirty" in self.__dict__:
158             self.__dict__["_is_dirty"] = True
159
160 class manudirty(object):
161     def __init__(self, *args, **kwargs):
162         super(manudirty, self).__init__(*args, **kwargs)
163         self.__dirty = False
164
165     def sessfrozen(self):
166         self.__dirty = False
167
168     def sessdirty(self):
169         return self.__dirty
170
171     def dirty(self):
172         self.__dirty = True
173
174 class specslot(object):
175     __slots__ = ["nm", "idx", "dirty"]
176     unbound = object()
177     
178     def __init__(self, nm, idx, dirty):
179         self.nm = nm
180         self.idx = idx
181         self.dirty = dirty
182
183     @staticmethod
184     def slist(ins):
185         # Avoid calling __getattribute__
186         return specdirty.__sslots__.__get__(ins, type(ins))
187
188     def __get__(self, ins, cls):
189         val = self.slist(ins)[self.idx]
190         if val is specslot.unbound:
191             raise AttributeError("specslot %r is unbound" % self.nm)
192         return val
193
194     def __set__(self, ins, val):
195         self.slist(ins)[self.idx] = val
196         if self.dirty:
197             ins.dirty()
198
199     def __delete__(self, ins):
200         self.slist(ins)[self.idx] = specslot.unbound
201         ins.dirty()
202
203 class specclass(type):
204     def __init__(self, name, bases, tdict):
205         super(specclass, self).__init__(name, bases, tdict)
206         sslots = set()
207         dslots = set()
208         for cls in self.__mro__:
209             css = cls.__dict__.get("__saveslots__", ())
210             sslots.update(css)
211             dslots.update(cls.__dict__.get("__dirtyslots__", css))
212         self.__sslots_l__ = list(sslots)
213         self.__sslots_a__ = list(sslots | dslots)
214         for i, slot in enumerate(self.__sslots_a__):
215             setattr(self, slot, specslot(slot, i, slot in dslots))
216
217 class specdirty(sessiondata):
218     __metaclass__ = specclass
219     __slots__ = ["session", "__sslots__", "_is_dirty"]
220     
221     def __specinit__(self):
222         pass
223
224     @staticmethod
225     def __new__(cls, req, sess):
226         self = super(specdirty, cls).__new__(cls)
227         self.session = sess
228         self.__sslots__ = [specslot.unbound] * len(cls.__sslots_a__)
229         self.__specinit__()
230         self._is_dirty = False
231         return self
232
233     def __getnewargs__(self):
234         return (None, self.session)
235
236     def dirty(self):
237         self._is_dirty = True
238
239     def sessfrozen(self):
240         self._is_dirty = False
241
242     def sessdirty(self):
243         return self._is_dirty
244
245     def __getstate__(self):
246         ret = {}
247         for nm, val in zip(type(self).__sslots_a__, specslot.slist(self)):
248             if val is specslot.unbound:
249                 ret[nm] = False, None
250             else:
251                 ret[nm] = True, val
252         return ret
253
254     def __setstate__(self, st):
255         ss = specslot.slist(self)
256         for i, nm in enumerate(type(self).__sslots_a__):
257             bound, val = st.pop(nm, (False, None))
258             if not bound:
259                 ss[i] = specslot.unbound
260             else:
261                 ss[i] = val
262
263 def datecheck(req, mtime):
264     if "If-Modified-Since" in req.ihead:
265         rtime = proto.phttpdate(req.ihead["If-Modified-Since"])
266         if rtime is not None and rtime >= math.floor(mtime):
267             raise resp.unmodified()
268     req.ohead["Last-Modified"] = proto.httpdate(mtime)