3 from hippotatlib
import *
7 import twisted
.internet
8 from twisted
.web
.server
import NOT_DONE_YET
10 #import twisted.web.server import Site
11 #from twisted.web.resource import Resource
17 #---------- "router" ----------
19 def route(packet
, iface
, saddr
, daddr
):
21 log_debug(DBG
.ROUTE
, 'route: %s -> %s: %s' %
(saddr
,daddr
,dest
), d
=packet
)
22 try: dclient
= clients
[daddr
]
23 except KeyError: dclient
= None
24 if dclient
is not None:
26 dclient
.queue_outbound(packet
)
27 elif daddr
== c
.vaddr
or daddr
not in c
.vnetwork
:
29 queue_inbound(ipif
, packet
)
30 elif daddr
== c
.relay
:
32 log_discard(packet
, iface
, saddr
, daddr
, 'relay')
34 lt('discard no-client')
35 log_discard(packet
, iface
, saddr
, daddr
, 'no-client')
37 #---------- client ----------
40 def __init__(self
, ip
, cc
):
41 # instance data members
44 self
._rq
= collections
.deque() # requests
45 self
._pq
= PacketQueue(str(ip
), self
.cc
.max_queue_time
)
47 if ip
not in c
.vnetwork
:
48 raise ValueError('client %s not in vnetwork' % ip
)
51 raise ValueError('multiple client cfg sections for %s' % ip
)
54 self
._log(DBG
.INIT
, 'new')
56 def _log(self
, dflag
, msg
, **kwargs
):
57 log_debug(dflag
, ('client %s: ' % self
._ip
)+msg
, **kwargs
)
59 def process_arriving_data(self
, d
):
60 self
._log(DBG
.FLOW
, "req data (enc'd)", d
=d
)
62 for packet
in slip
.decode(d
):
63 (saddr
, daddr
) = packet_addrs(packet
)
65 raise ValueError('wrong source address %s' % saddr
)
66 route(packet
, self
._ip
, saddr
, daddr
)
68 def _req_cancel(self
, request
):
69 self
._log(DBG
.HTTP_CTRL
, 'cancel', idof
=request
)
72 def _req_error(self
, err
, request
):
73 self
._log(DBG
.HTTP_CTRL
, 'error %s' % err
, idof
=request
)
74 self
._req_cancel(request
)
76 def queue_outbound(self
, packet
):
77 self
._pq
.append(packet
)
78 self
._check_outbound()
80 def _req_fin(self
, dummy
, request
, cl
):
81 self
._log(DBG
.HTTP_CTRL
, '_req_fin ' + repr(dummy
), idof
=request
)
83 except twisted
.internet
.error
.AlreadyCalled
: pass
85 def new_request(self
, request
):
86 request
.setHeader('Content-Type','application/octet-stream')
87 cl
= reactor
.callLater(self
.cc
.http_timeout
, self
._req_cancel
, request
)
88 nf
= request
.notifyFinish()
89 nf
.addErrback(self
._req_error
, request
)
90 nf
.addCallback(self
._req_fin
, request
, cl
)
91 self
._rq
.append(request
)
92 self
._check_outbound()
94 def _req_write(self
, req
, d
):
95 self
._log(DBG
.HTTP
, 'req_write ', idof
=req
, d
=d
)
98 def _check_outbound(self
):
99 log_debug(DBG
.HTTP_CTRL
, 'CHKO')
101 try: request
= self
._rq
[0]
102 except IndexError: request
= None
103 if request
and request
.finished
:
104 self
._log(DBG
.HTTP_CTRL
, 'CHKO req finished, discard', idof
=request
)
108 if not self
._pq
.nonempty():
109 # no packets, oh well
110 self
._log(DBG
.HTTP_CTRL
, 'CHKO no packets, OUT-DONE', idof
=request
)
115 self
._log(DBG
.HTTP_CTRL
, 'CHKO no request, OUT-DONE', idof
=request
)
118 self
._log(DBG
.HTTP_CTRL
, 'CHKO processing', idof
=request
)
119 # request, and also some non-expired packets
120 self
._pq
.process((lambda: request
.sentLength
),
121 (lambda d
: self
._req_write(request
, d
)),
122 self
.cc
.max_batch_down
)
124 assert(request
.sentLength
)
127 self
._log(DBG
.HTTP
, 'complete', idof
=request
)
128 # round again, looking for more to do
130 while len(self
._rq
) > self
.cc
.target_requests_outstanding
:
131 request
= self
._rq
.popleft()
132 self
._log(DBG
.HTTP
, 'CHKO above target, returning empty', idof
=request
)
135 def process_request(request
, desca
):
136 # find client, update config, etc.
137 metadata
= request
.args
[b
'm'][0]
138 metadata
= metadata
.split(b
'\r\n')
139 (ci_s
, pw
, tro
, cto
) = metadata
[0:4]
140 desca
['m[0,2:3]'] = [ci_s
, tro
, cto
]
141 ci_s
= ci_s
.decode('utf-8')
142 tro
= int(tro
); desca
['tro']= tro
143 cto
= int(cto
); desca
['cto']= cto
147 if pw
!= cl
.cc
.password
: raise ValueError('bad password')
150 if tro
!= cl
.cc
.target_requests_outstanding
:
151 raise ValueError('tro must be %d' % cl
.cc
.target_requests_outstanding
)
153 if cto
< cl
.cc
.http_timeout
:
154 raise ValueError('cto must be >= %d' % cl
.cc
.http_timeout
)
157 d
= request
.args
[b
'd'][0]
159 desca
['dlen'] = len(d
)
164 log_http(desca
, 'processing', idof
=id(request
), d
=d
)
166 d
= mime_translate(d
)
168 cl
.process_arriving_data(d
)
169 cl
.new_request(request
)
171 def log_http(desca
, msg
, **kwargs
):
173 kwargs
['d'] = desca
['d']
177 log_debug(DBG
.HTTP
, msg
+ repr(desca
), **kwargs
)
179 class IphttpResource(twisted
.web
.resource
.Resource
):
181 def render_POST(self
, request
):
182 log_debug(DBG
.HTTP_FULL
,
183 'req recv: ' + repr(request
) + ' ' + repr(request
.args
),
186 try: process_request(request
, desca
)
187 except Exception as e
:
188 emsg
= traceback
.format_exc()
189 log_http(desca
, 'RETURNING EXCEPTION ' + emsg
)
190 request
.setHeader('Content-Type','text/plain; charset="utf-8"')
191 request
.setResponseCode(400)
192 return (emsg
+ ' # ' + repr(desca
) + '\r\n').encode('utf-8')
193 log_debug(DBG
.HTTP_CTRL
, '...', idof
=id(request
))
196 def render_GET(self
, request
):
197 log_debug(DBG
.HTTP
, 'GET request')
198 return b
'<html><body>hippotat</body></html>'
201 resource
= IphttpResource()
202 site
= twisted
.web
.server
.Site(resource
)
204 ep
= sa
.make_endpoint()
205 crash_on_defer(ep
.listen(site
))
206 log_debug(DBG
.INIT
, 'listening on %s' % sa
)
208 #---------- config and setup ----------
210 def process_cfg(putative_servers
, putative_clients
):
213 c
.server
= cfg
.get('SERVER','server')
215 cfg_process_common(c
, c
.server
)
216 cfg_process_saddrs(c
, c
.server
)
217 cfg_process_vnetwork(c
, c
.server
)
218 cfg_process_vaddr(c
, c
.server
)
220 for (ci
,cs
) in putative_clients
.items():
222 sections
= cfg_process_client_common(cc
,c
.server
,cs
,ci
)
223 if not sections
: continue
224 cfg_process_client_limited(cc
,c
.server
,sections
, 'max_batch_down')
225 cfg_process_client_limited(cc
,c
.server
,sections
, 'max_queue_time')
229 c
.vrelay
= cfg
.get(c
.server
, 'vrelay')
230 except NoOptionError
:
231 for search
in c
.vnetwork
.hosts():
232 if search
== c
.vaddr
: continue
237 [c
.server
, 'DEFAULT'],
240 ('rnets','vnetwork')))
242 common_startup(process_cfg
)
243 ipif
= start_ipif(c
.ipif_command
, (lambda p
,s
,d
: route(p
,"[ipif]",s
,d
)))