diff -r 000000000000 -r bb616224c02a kml/hh_http.py
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/kml/hh_http.py	Mon May 18 08:48:51 2020 +0200
@@ -0,0 +1,258 @@
+# coding=utf8
+
+import sys
+import os
+import time
+import cgi
+import cgitb
+import html
+from kml import *
+from kml import deb
+from subprocess import Popen
+
+class Http():
+    titles = {}
+    titles['general'] = """
+● vytvoří KML-stream z elementů LookAt pro GoogleEarth tak, aby vznikl pohyb kamery jako symetrický průlet kolem cílového bodu, na který kamera po celou dobu letu hledí
+● cílový bod leží v počátku lokálních souřadnic letu
+● křivka průletu je parabola y = abs(Y1 + x**exp) s počátkem v bodu průletu a je symetrická podle roviny y,z lokálních souřadnic
+● zadávané souřadnice výchozího bodu a bodu průletu jsou lokální souřadnice (v metrech) vzhledem k cílovému bodu
+● výchozí bod má souřadnice X0>=0, Y0, Z0>{minZ}; pro X0=0 se vytváří jen jediný LookAt (vlastně Placemark)
+● bod průletu má souřadnice X1=0, Y1, Z1>{minZ}
+● zadávaný exponent paraboly je exp>0; pro exp=1 přejde parabola do polopřímek
+● pro Z0=Z1 probíhá let ve vodorovné rovině, pro Y0=Y1 ve svislé rovině rovnoběžné s osou x
+● zadávané geodetické souřadnice cílového bodu (ve stupních) a azimut kamery na startu (sever=0) uchycují lokální soustavu do geodetických souřadnic, výška cílového bodu je vždy 0 nad terénem
+● průběh rychlosti se může zadat jako nelineární se zpomalením v průletu s několika druhy průběhu
+● přepínač "flyby" řídí vytvoření celého průletu nebo jen letu do největšího přiblížení (do bodu průletu)
+● konfigurace letů a geo-souřadnice cílových bodů je možno pojmenovat a uložit ("store conf" resp. "store geo") a později vytáhnout do formuláře ("get conf" resp. "get geo")
+"""
+    titles['name'] = 'jméno pro uložení aktuální konfigurace z obrazovky na server {server}'
+    titles['target'] = 'jméno pro uložení aktuálních geodetických souřadnic cílového bodu z obrazovky na server {server}'
+    titles['submitstored'] = 'vytvořit KML-stream z konfigurace uložené na serveru {server} pod zadaným jménem'
+    titles['submitconf'] = 'vytvořit KML-stream z konfigurace vyplněné ve formuláři na obrazovce'
+    titles['storeconf'] = 'uložit konfiguraci na server {server} pod jménem zadaným v položce name'
+    titles['getconf'] = 'vytáhnout konfiguraci uloženou na serveru {server} pod zadaným jménem'
+    titles['storegeo'] = 'uložit souřadnice cílového bodu na server {server} pod jménem zadaným v položce target'
+    titles['getgeo'] = 'vytáhnout souřadnice cílového bodu uložené na serveru {server} pod jménem zadaným v položce target'
+    titles['azimuth'] = 'geodetický azimut cílového bodu při pohledu z výchozího bodu x0,y0,z0'
+    titles['speedfact'] = 'koeficient konstantní složky rychlosti letu >0'
+    titles['slowfact'] = 'koeficient zpomalení v průletu >0'
+    titles['slowdown'] = 'průběh zpomalení v průletu'
+    titles['exponent'] = 'exponent (>0) průletové paraboly x = abs(Y1 + x**exp); pro exp=1 přejde parabola do polopřímek s počátkem v bodu průletu'
+    titles['flyby'] = 'přepínač průlet/nálet; nálet = let z výchozího bodu do maximálního přiblížení (bodu průletu)'
+    titles['steps'] = 'počet bodů KML-streamu < {stepsMax}'
+    titles['xyz0'] = 'lokální souřadnice X0>=0, Y0, Z0>{minZ} v metrech výchozího (krajního) bodu průletové paraboly x = abs(Y1 + x**exp); počátek lokálních souřadnic je v cílovém bodě'
+    titles['xyz1'] = 'lokální souřadnice X1=0, Y1, Z1>{minZ} bodu průletu kolem cílového bodu po parabole x = abs(Y1 + x**exp); počátek lokálních souřadnic je v cílovém bodě'
+    titles['lat'] = 'geodetická šířka cílového bodu ve stupních -90<š<90; cílový bod je zároveň počátkem lokálních souřadnic letové paraboly'
+    titles['long'] = 'geodetická délka cílového bodu ve stupních -180<d<180; cílový bod je zároveň počátkem lokálních souřadnic letové paraboly'
+
+    def __init__(self, config):
+        self.c = config
+        self.titles['general'] = self.titles['general'].format(minZ=self.c.minZ)
+        self.titles['xyz0'] = self.titles['xyz0'].format(minZ=self.c.minZ)
+        self.titles['xyz1'] = self.titles['xyz1'].format(minZ=self.c.minZ)
+        self.titles['steps'] = self.titles['steps'].format(stepsMax=self.c.stepsMax)
+        self.titles['name'] = self.titles['name'].format(server=self.c.configqual)
+        self.titles['target'] = self.titles['target'].format(server=self.c.configqual)
+        self.titles['submitstored'] = self.titles['submitstored'].format(server=self.c.configqual)
+        self.titles['storeconf'] = self.titles['storeconf'].format(server=self.c.configqual)
+        self.titles['getconf'] = self.titles['getconf'].format(server=self.c.configqual)
+        self.titles['storegeo'] = self.titles['storegeo'].format(server=self.c.configqual)
+        self.titles['getgeo'] = self.titles['getgeo'].format(server=self.c.configqual)
+        # deb(self.titles)
+
+    def parsehttp(self, msg):
+        c = self.c
+        # cgitb.enable()
+        p = cgi.parse()
+        # deb(('parsehttp, p', p))
+
+        c.domainname = '.'.join(os.environ['HTTP_HOST'].split('.')[1:])
+        if c.name.keyact in p: c.name.val = p[c.name.keyact][0]
+        if c.name.key in p: c.name.val = p[c.name.key][0]
+        if c.targname.keyact in p: c.targname.val = p[c.targname.keyact][0]
+        if c.slowdown.keyact in p: c.slowdown.val = p[c.slowdown.keyact][0]
+
+        if 'downlkml' in p:
+            self.sendfile(c.kmlfile)
+            return False
+        if 'downlurl' in p:
+            self.httpheader(c.urlfile)
+            Kml().urlPlacemark(c.dnldUrl, c.dnldPath)
+            sys.stdout.close()
+            # self.sendfile(c.urlfile)
+            return False
+
+        c.restoreparms()
+
+        if 'getparms' in p:
+            return False
+        if 'submitstored' in p:
+            if c.flagged:
+                return False
+            else:
+                c.adjust()
+                return True
+
+        c.update_influentials(p)
+
+        if 'gettarget' in p:
+            c.long.val, c.lat.val = c.gettarget(c.targname.val)
+            return False
+        if 'storetarget' in p and c.lat.chk and c.long.chk:
+            c.storetarget(c.targname.val, c.long.val, c.lat.val)
+            return False
+
+        if c.flagged:
+            return False
+        c.adjust()
+        if 'submit' in p:
+            return True
+        if 'storeparms' in p:
+            c.storeparms()
+            return False
+        return False
+
+    def htmlhead(self):
+        print("Content-type: text/html")
+        print('')
+        print('<!DOCTYPE html><html><head>')
+        print('<meta charset=\"utf-8\"/>')
+        print('<style type="text/css">')
+        print('.box {border: 1px solid; padding: .4em}')
+        print('.round {border:.12em solid; border-radius:50%; width:1.2em; line-height:1.2em; text-align:center;}')
+        print('.flag {background-color: #ffaaaa}')
+        print('.emph {color: #ff00ff; font-weight: bold}')
+        print('</style>')
+        print('</head><body>')
+        print('<div style="display:flex" title="{}">'.format(html.escape(self.titles['general'])))
+        print('<br><span class="box"><b>Google Earth parabolic flyby</b></span>')
+        print('&nbsp;<div><div class="round"><b>?</b></div></div>')
+        print('</div><br>')
+
+    def htmltrail(self):
+        print('</body></html>')
+
+    def sendform(self, confirm=True):
+        c = self.c
+        # cgitb.enable()
+        # cgi.test()
+        self.htmlhead()
+        if(confirm): self.sendconfirm()
+
+        if(c.flagged):
+            print('<p style="color: red"><b>FLAG</b></p>')
+        print('<form method=POST>')
+        print('<input type=hidden name="{kaname}" value="{actualname}">'
+              .format(kaname=c.name.keyact, actualname=c.name.val))
+        print('<input type=hidden name="{katargname}" value="{actualtargname}">'
+              .format(katargname=c.targname.keyact, actualtargname=c.targname.val))
+        print('<input type=hidden name="{kaslowdown}" value="{actualsldn}">'
+              .format(kaslowdown=c.slowdown.keyact, actualsldn=c.slowdown.val))
+
+        print('<table><tr><td><label><b>name</b> [{name}]<br><input type="text" name="{kname}" list="names" title="{tname}">'
+              .format(kname=c.name.key, name=c.name.val, tname=self.titles['name']))
+        print('<datalist id="names">')
+        for i in c.parmsls():
+            print('<option value="{}"/>'.format(i))
+        print('</datalist></input></label></td></tr></table>')
+        print('<input type=submit name="getparms" value="get stored conf" title="{}">'
+              .format(self.titles['getconf']))
+        print('<input type=submit name="storeparms" value="store conf" title="{}">'
+              .format(self.titles['storeconf']))
+        print('<input type=submit name="submitstored" value="submit stored conf" title="{}">'
+              .format(html.escape(self.titles['submitstored'])))
+        print('<br><br>')
+
+        print('<table><tr><td><label><b>target</b> [{targname}]<br><input type="text" name="{ktargname}" list="targets" title="{ttarget}">'
+              .format(ktargname=c.targname.key, targname=c.targname.val, ttarget=self.titles['target']))
+        print('<datalist id="targets">')
+        for i in c.targsls():
+            print('<option value="{}"/>'.format(i))
+        print('</datalist></input></label></td>')
+        print('<td><label><b>latitude<br><input type="text" name="{kla}" value="{vla}" title="{lat}" class="{flag}"></td>'
+              .format(kla=c.lat.key, vla=c.lat.val, lat=self.titles['lat'], flag='' if c.lat.chk else 'flag'))
+        print('<td><label><b>longitude<br><input type="text" name="{klo}" value="{vlo}" title="{long}" class="{flag}"></td>'
+              .format(klo=c.long.key, vlo=c.long.val, long=self.titles['long'], flag='' if c.long.chk else 'flag'))
+        print('</tr></table>')
+        print('<input type=submit name="gettarget" value="get stored geo" title="{}">'
+              .format(self.titles['getgeo']))
+        print('<input type=submit name="storetarget" value="store geo" title="{}">'
+              .format(self.titles['storegeo']))
+        print('<br><br>')
+
+        print('<table><tr>')
+        print('<td><label><b>X0<br><input type="text" name="{kx0}" value="{vx0}" title="{xyz0}" class="{flag}"></label></td>'
+              .format(kx0=c.x0.key, vx0=c.x0.val, xyz0=self.titles['xyz0'], flag='' if c.x0.chk else 'flag'))
+        print('<td><label><b>Y0<br><input type="text" name="{ky0}" value="{vy0}" title="{xyz0}" class="{flag}"></label></td>'
+              .format(ky0=c.y0.key, vy0=c.y0.val, xyz0=self.titles['xyz0'], flag='' if c.y0.chk else 'flag'))
+        print('<td><label><b>Z0<br><input type="text" name="{kz0}" value="{vz0}" title="{xyz0}" class="{flag}"></label></td>'
+              .format(kz0=c.z0.key, vz0=c.z0.val, xyz0=self.titles['xyz0'], flag='' if c.z0.chk else 'flag'))
+        print('</tr>')
+        print('<tr>')
+        print('<td><label><b>azimuth<br><input type="text" name="{kh0}" value="{vh0}" title="{azimuth}" class="{flag}"></label></td>'
+              .format(kh0=c.h0.key, vh0=c.h0.val, azimuth=self.titles['azimuth'], flag='' if c.h0.chk else 'flag'))
+        print('<td><label><b>Y1<br><input type="text" name="{ky1}" value="{vy1}" title="{xyz1}" class="{flag}"></label></td>'
+              .format(ky1=c.y1.key, vy1=c.y1.val, xyz1=self.titles['xyz1'], flag='' if c.y1.chk else 'flag'))
+        print('<td><label><b>Z1<br><input type="text" name="{kz1}" value="{vz1}" title="{xyz1}" class="{flag}"></label></td>'
+              .format(kz1=c.z1.key, vz1=c.z1.val, xyz1=self.titles['xyz1'], flag='' if c.z1.chk else 'flag'))
+        print('<tr/>')
+        print('<tr>')
+        print('<td><label><b>speed factor<br><input type="text" name="{kspeedfact}" value="{speedfact}" title="{tspeedfact}" class="{flag}"></label></td>'
+              .format(kspeedfact=c.speedfact.key, speedfact=c.speedfact.val, tspeedfact=self.titles['speedfact'], flag='' if c.speedfact.chk else 'flag'))
+        print('<td><label><b>slowdown</b> [{slowdown}]<br><input type="text" name="{kslowdown}" list="slowdowns" title="{tslowdown}" class="{flag}"></label></td>'
+              .format(kslowdown=c.slowdown.key, slowdown='' if not c.slowdown.chk else SpeedAdjust.abrv[c.slowdown.val],
+                      tslowdown=self.titles['slowdown'], flag='' if c.slowdown.chk else 'flag'))
+        print('<td><label><b>slowdown factor<br><input type="text" name="{kslowdfact}" value="{slowdfact}" title="{tslowfact}" class="{flag}"></label></td>'
+              .format(kslowdfact=c.slowdfact.key, slowdfact=c.slowdfact.val, tslowfact=self.titles['slowfact'], flag='' if c.slowdfact.chk else 'flag'))
+        print('</tr>')
+        print('<tr>')
+        print('<td><label><b>exponent<br><input type="text" name="{kex}" value="{vex}" title="{exponent}" class="{flag}"></label></td>'
+              .format(kex=c.exp.key, vex=c.exp.val, exponent=self.titles['exponent'], flag='' if c.exp.chk else 'flag'))
+        print('<td><label><b>flyby<br><input type="text" name="{kfl}" value="{vfl}" title="{flyby}"></label></td>'
+              .format(kfl=c.flyby.key, vfl=(1 if c.flyby.val else 0), flyby=self.titles['flyby']))
+        print('<td><label><b># of steps<br><input type="text" name="{kst}" value="{vst}" title="{steps}" class="{flag}"></label></td>'
+              .format(kst=c.steps.key, vst=c.steps.val, steps=self.titles['steps'], flag='' if c.steps.chk else 'flag'))
+        print('</tr>')
+        print('</table>')
+
+        print('<input type=submit name="submit" value="submit conf" title="{submitconf}">'
+              .format(submitconf=self.titles['submitconf']))
+        print('<input type=submit name="storeparms" value="store conf" title="{storeconf}">'
+              .format(storeconf=self.titles['storeconf']))
+        print('<datalist id="slowdowns">')
+        for i in SpeedAdjust.keys:
+            print('<option value="{}"/>'.format(i))
+        print('</datalist></form>')
+        self.htmltrail()
+
+    def sendconfirm(self):
+        print("""
+        <b>{}</b><br><br>
+        <div style="font-size: smaller;">
+        Flyby KML is <span class="emph">ready</span> to be opened on Google Earth (GE):<br>
+        <ul>
+        <li>for both <b>standalone-</b> and <b>web-GE</b> download KML and open file on GE</li>
+        or<br>
+        <li>on standalone-GE open KML directly via html-ref placemark http://{}/<br>
+        <span style="font-style: italic;">(download URL-placemark and place it (via open) in GE's placemarks for subsequent direct openings)</span>.</li>
+        </ul></div>
+        <form method=POST>
+        <input type="submit" name="downlkml" value="download flyby KML">
+        <input type="submit" name="downlurl" value="download URL placemark">
+        </form>
+        <div style="font-size: 66%;"><br>{conf}<br>{coor}<br></div>
+        <hr><br>
+        """.format(time.asctime(), self.c.dnldqual, conf=self.c.confcomm, coor=self.c.coorcomm))
+
+    def httpheader(self, fn):
+        print('Content-Type: application/vnd.google-earth.kml+xml')
+        print('Content-Disposition: attachment; filename="{}"'.format(fn))
+        print()
+
+    def sendfile(self, fn):
+        self.httpheader(fn)
+        sys.stdout.flush()
+        p = Popen(('cat', fn))
+        p.wait()
+        sys.stdout.close()