X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=hippotat.git;a=blobdiff_plain;f=server;h=3781d5607ab95d99e2bb4fb7be5e213420742d8b;hp=6c229a92bcd930680a209438a6c31678304fb6af;hb=3e35fc99a2863b179d76897c8bb748cad183b816;hpb=094ee3a203ff528b50a2f4d776d16cd64fae042a diff --git a/server b/server index 6c229a9..3781d56 100755 --- a/server +++ b/server @@ -1,177 +1,241 @@ #!/usr/bin/python3 -import twisted.web.server import Site -from twisted.web.resource import Resource -from twisted.web.server import NOT_DONE_YET -from twisted.internet import reactor +from hippotat import * + +import os -import configparser -import ipaddress +import twisted.internet +from twisted.web.server import NOT_DONE_YET -import collections +#import twisted.web.server import Site +#from twisted.web.resource import Resource import syslog clients = { } -def ipaddress(input): - try: - r = ipaddress.IPv4Address(input) - except AddressValueError: - r = ipaddress.IPv6Address(input) - return r +#---------- "router" ---------- -def ipnetwork(input): - try: - r = ipaddress.IPv4Network(input) - except NetworkValueError: - r = ipaddress.IPv6Network(input) - return r - -defcfg = u''' -[DEFAULT] -max_batch_down = 65536 -max_queue_time = 10 -max_request_time = 54 - -[limits] -max_batch_down = 262144 -max_queue_time = 121 -max_request_time = 121 -''' - -def route(packet. daddr): - try: client = clients[daddr] +def route(packet, iface, saddr, daddr): + def lt(dest): + log_debug(DBG.ROUTE, 'route: %s -> %s: %s' % (saddr,daddr,dest), d=packet) + try: dclient = clients[daddr] except KeyError: dclient = None if dclient is not None: + lt('client') dclient.queue_outbound(packet) - else if daddr = server or daddr not in network: + elif daddr == c.server or daddr not in c.network: + lt('inbound') queue_inbound(packet) + elif daddr == relay: + lt('discard relay') + log_discard(packet, iface, saddr, daddr, 'relay') else: - syslog.syslog(syslog.LOG_DEBUG, 'no client for %s' % daddr) + lt('discard no-client') + log_discard(packet, iface, saddr, daddr, 'no-client') + +#---------- client ---------- class Client(): - def __init__(self, ip, cs): + def __init__(self, ip, cs, pw): # instance data members self._ip = ip self._cs = cs - self.pw = cfg.get(cs, 'password') + self.pw = pw self._rq = collections.deque() # requests - self._pq = collections.deque() # packets + # self._pq = PacketQueue(...) # plus from config: # .max_batch_down # .max_queue_time - # .max_request_time - for k in ('max_batch_down','max_queue_time','max_request_time'): + # .target_requests_outstanding + + if ip not in c.network: + raise ValueError('client %s not in network' % ip) + + for k in ('max_batch_down','max_queue_time','http_timeout', + 'target_requests_outstanding'): req = cfg.getint(cs, k) limit = cfg.getint('limits',k) self.__dict__[k] = min(req, limit) - def process_arriving_data(self, d): - for packet in slip_decode(d): - (saddr, daddr) = ip_64_addrs(packet) - if saddr != self._ip: - raise ValueError('wrong source address %s' % saddr) - route(packet, daddr) + self._pq = PacketQueue(str(ip), self.max_queue_time) + + if ip in clients: + raise ValueError('multiple client cfg sections for %s' % ip) + clients[ip] = self + + self._log(DBG.INIT, 'new') + + def _log(self, dflag, msg, **kwargs): + log_debug(dflag, ('client %s: ' % self._ip)+msg, **kwargs) + + def process_arriving_data(self, d): + self._log(DBG.FLOW, "req data (enc'd)", d=d) + if not len(d): return + for packet in slip.decode(d): + (saddr, daddr) = packet_addrs(packet) + if saddr != self._ip: + raise ValueError('wrong source address %s' % saddr) + route(packet, self._ip, saddr, daddr) + + def _req_cancel(self, request): + self._log(DBG.HTTP_CTRL, 'cancel', idof=request) + request.finish() + + def _req_error(self, err, request): + self._log(DBG.HTTP_CTRL, 'error %s' % err, idof=request) + self._req_cancel(request) + + def queue_outbound(self, packet): + self._pq.append(packet) + self._check_outbound() + + def new_request(self, request): + request.setHeader('Content-Type','application/octet-stream') + reactor.callLater(self.http_timeout, self._req_cancel, request) + request.notifyFinish().addErrback(self._req_error, request) + self._rq.append(request) + self._check_outbound() + + def _req_write(self, req, d): + self._log(DBG.HTTP, 'req_write ', idof=req, d=d) + req.write(d) + + def _check_outbound(self): + log_debug(DBG.HTTP_CTRL, 'CHKO') + while True: + try: request = self._rq[0] + except IndexError: request = None + if request and request.finished: + self._log(DBG.HTTP_CTRL, 'CHKO req finished, discard', idof=request) + self._rq.popleft() + continue + + if not self._pq.nonempty(): + # no packets, oh well + self._log(DBG.HTTP_CTRL, 'CHKO no packets, OUT-DONE', idof=request) + break + + if request is None: + # no request + self._log(DBG.HTTP_CTRL, 'CHKO no request, OUT-DONE', idof=request) + break + + self._log(DBG.HTTP_CTRL, 'CHKO processing', idof=request) + # request, and also some non-expired packets + self._pq.process((lambda: request.sentLength), + (lambda d: self._req_write(request, d)), + self.max_batch_down) + + assert(request.sentLength) + self._rq.popleft() + request.finish() + self._log(DBG.HTTP, 'complete', idof=request) + # round again, looking for more to do - def _req_cancel(self, request): + while len(self._rq) > self.target_requests_outstanding: + request = self._rq.popleft() + self._log(DBG.HTTP, 'CHKO above target, returning empty', idof=request) request.finish() - def _req_error(self, err, request): - self._req_cancel(request) - - def queue_outbound(self, packet): - self._pq.append((time.monotonic(), packet)) - - def http_request(self, request): - request.setHeader('Content-Type','application/octet-stream') - reactor.callLater(self.max_request_time, self._req_cancel, request) - request.notifyFinish().addErrback(self._req_error, request) - self._rq.append(request) - self._check_outbound() - - def _check_outbound(self): - while True: - try: request = self._rq[0] - except IndexError: request = None - if request and request.finished: - self._rq.popleft() - continue - - # now request is an unfinished request, or None - try: (queuetime, packet) = self._pq[0] - except: IndexError: - # no packets, oh well - break - - age = time.monotonic() - queuetime - if age > self.max_queue_time: - self._pq.popleft() - continue - - if request is None: - # no request - break - - # request, and also some non-expired packets - while True: - try: (dummy, packet) = self._pq[0] - except IndexError: break - - encoded = slip_encode(packet) - - if request.sentLength > 0: - if (request.sentLength + len(slip_delimiter) - + len(encoded) > self.max_batch_down): - break - request.write(slip_delimiter) - - request.write(encoded) - self._pq.popLeft() - - assert(request.sentLength) - self._rq.popLeft() - request.finish() - # round again, looking for more to do +def process_request(request, desca): + # find client, update config, etc. + metadata = request.args[b'm'][0] + metadata = metadata.split(b'\r\n') + (ci_s, pw, tro, cto) = metadata[0:4] + desca['m[0,2:3]'] = [ci_s, tro, cto] + ci_s = ci_s.decode('utf-8') + tro = int(tro); desca['tro']= tro + cto = int(cto); desca['cto']= cto + ci = ipaddr(ci_s) + desca['ci'] = ci + cl = clients[ci] + if pw != cl.pw: raise ValueError('bad password') + desca['pwok']=True + + if tro != cl.target_requests_outstanding: + raise ValueError('tro must be %d' % cl.target_requests_outstanding) + + if cto < cl.http_timeout: + raise ValueError('cto must be >= %d' % cl.http_timeout) -def process_cfg(): - global network - global ourself + try: + d = request.args[b'd'][0] + desca['d'] = d + desca['dlen'] = len(d) + except KeyError: + d = b'' + desca['dlen'] = None + + log_http(desca, 'processing', idof=id(request), d=d) + + d = mime_translate(d) - network = ipnetwork(cfg.get('virtual','network')) + cl.process_arriving_data(d) + cl.new_request(request) + +def log_http(desca, msg, **kwargs): try: - ourself = cfg.get('virtual','server') - except ConfigParser.NoOptionError: - ourself = network.hosts().next() - - for cs in cfg.sections(): - if not (':' in cs or '.' in cs): continue - ci = ipaddress(cs) - if ci not in network: - raise ValueError('client %s not in network' % ci) - if ci in clients: - raise ValueError('multiple client cfg sections for %s' % ci) - clients[ci] = Client(ci, cs) - -class FormPage(Resource): + kwargs['d'] = desca['d'] + del desca['d'] + except KeyError: + pass + log_debug(DBG.HTTP, msg + repr(desca), **kwargs) + +class IphttpResource(twisted.web.resource.Resource): + isLeaf = True def render_POST(self, request): - # find client, update config, etc. - ci = ipaddress(request.args['i']) - c = clients[ci] - pw = request.args['pw'] - if pw != c.pw: raise ValueError('bad password') - - # update config - for r, w in (('mbd', 'max_batch_down'), - ('mqt', 'max_queue_time'), - ('mrt', 'max_request_time')): - try: v = request.args[r] - except KeyError: continue - v = int(v) - c.__dict__[w] = v - - try: d = request.args['d'] - except KeyError: d = '' - - c.process_arriving_data(d) - c.new_request(request) + log_debug(DBG.HTTP_FULL, + 'req recv: ' + repr(request) + ' ' + repr(request.args), + idof=id(request)) + desca = {'d': None} + try: process_request(request, desca) + except Exception as e: + emsg = traceback.format_exc() + log_http(desca, 'RETURNING EXCEPTION ' + emsg) + request.setHeader('Content-Type','text/plain; charset="utf-8"') + request.setResponseCode(400) + return (emsg + ' # ' + repr(desca) + '\r\n').encode('utf-8') + log_debug(DBG.HTTP_CTRL, '...', idof=id(request)) + return NOT_DONE_YET + + def render_GET(self, request): + log_debug(DBG.HTTP, 'GET request') + return b'hippotat' + +def start_http(): + resource = IphttpResource() + site = twisted.web.server.Site(resource) + for sa in c.saddrs: + ep = sa.make_endpoint() + crash_on_defer(ep.listen(site)) + log_debug(DBG.INIT, 'listening on %s' % sa) + +#---------- config and setup ---------- + +def process_cfg(): + process_cfg_common_always() + process_cfg_server() + process_cfg_network() + + try: + c.relay = cfg.get('virtual','relay') + except NoOptionError: + for search in c.network.hosts(): + if search == c.server: continue + c.relay = search + break + + process_cfg_saddrs() + process_cfg_clients(Client) + + process_cfg_ipif('server', + (('local','server'), + ('peer', 'relay'), + ('rnets','network'))) + +common_startup() +process_cfg() +start_ipif(c.ipif_command, (lambda p,s,d: route(p,"[ipif]",s,d))) +start_http() +common_run()