chiark / gitweb /
18785122831681b708ddc082b599d6d978645351
[hippotat.git] / src / bin / server.rs
1 // Copyright 2021 Ian Jackson and contributors to Hippotat
2 // SPDX-License-Identifier: GPL-3.0-or-later
3 // There is NO WARRANTY.
4
5 use hippotat::prelude::*;
6
7 #[derive(StructOpt,Debug)]
8 pub struct Opts {
9   #[structopt(flatten)]
10   log: LogOpts,
11
12   #[structopt(flatten)]
13   config: config::Opts,
14 }
15
16 const METADATA_MAX_LEN: usize = MAX_OVERHEAD;
17
18 type AllClients = HashMap<ClientName, ClientHandles>;
19
20 struct ClientHandles {
21   ic: Arc<InstanceConfig>,
22   web: tokio::sync::mpsc::Sender<WebRequest>,
23 }
24
25 struct WebRequest {
26   reply: tokio::sync::oneshot::Sender<()>,
27 }
28
29 async fn handle(
30   _all_clients: Arc<AllClients>,
31   req: hyper::Request<hyper::Body>
32 ) -> Result<hyper::Response<hyper::Body>, Void> {
33   if req.method() == Method::GET {
34     let mut resp = hyper::Response::new(hyper::Body::from("hippotat\r\n"));
35     resp.headers_mut().insert(
36       "Content-Type",
37       "text/plain; charset=US-ASCII".try_into().unwrap()
38     );
39     return Ok(resp)
40   }
41
42   let mut warnings: Warnings = default();
43
44   match async {
45
46     let mkboundary = |b: &'_ _| format!("\n--{}", b).into_bytes();
47     let boundary = match (||{
48       let mut ctypes = req.headers().get_all("Content-Type").iter();
49       let t = ctypes.next().ok_or_else(|| anyhow!("missing Content-Type"))?;
50       if ctypes.next().is_some() { throw!(anyhow!("several Content-Type")) }
51       let t = t.to_str().context("interpret Content-Type as utf-8")?;
52       let t: mime::Mime = t.parse().context("parse Content-Type")?;
53       if t.type_() != "multipart" { throw!(anyhow!("not multipart/")) }
54       let b = mime::BOUNDARY;
55       let b = t.get_param(b).ok_or_else(|| anyhow!("missing boundary=..."))?;
56       if t.subtype() != "form-data" {
57         warnings.add(&"Content-Type not /form-data")?;
58       }
59       let b = mkboundary(b.as_str());
60       Ok::<_,AE>(b)
61     })() {
62       Ok(y) => y,
63       Err(e) => {
64         warnings.add(&e.wrap_err("guessing boundary"))?;
65         mkboundary("b")
66       },
67     };
68
69     let mut body = req.into_body();
70     let initial = match read_limited_bytes(METADATA_MAX_LEN, &mut body).await {
71       Ok(all) => all,
72       Err(ReadLimitedError::Truncated { sofar,.. }) => sofar,
73       Err(ReadLimitedError::Hyper(e)) => throw!(e),
74     };
75
76     let finder = memmem::Finder::new(&boundary);
77     let mut find_iter = finder.find_iter(&initial);
78
79     let start = if initial.starts_with(&boundary[1..]) { boundary.len()-1 }
80     else if let Some(start) = find_iter.next() { start + boundary.len() }
81     else { throw!(anyhow!("initial boundary not found")) };
82
83     let comp = multipart::process_component
84       (&mut warnings, &initial[start..], PartName::m)?
85       .ok_or_else(|| anyhow!(r#"no "m" component"#))?;
86
87     if comp.name != PartName::m { throw!(anyhow!(
88       r#"first multipart component must be name="m""#
89     )) }
90
91     let mut meta = MetadataFieldIterator::new(comp.payload_start);
92
93     let client: ClientName = meta.need_parse().context("client addr")?;
94     let token: &str = meta.need_next().context("token")?;
95     
96 // let client = all_clients.get(&client).ok_or_else(|| anyhow!(BAD_CLIENT))?;
97
98     eprintln!("boundary={:?} start={} name={:?} client={}",
99               boundary, start, &comp.name, client);
100
101     Ok::<_,AE>(())
102   }.await {
103     Ok(()) => {
104     },
105     Err(e) => {
106       eprintln!("error={}", e);
107     }
108   }
109
110   eprintln!("warnings={:?}", &warnings);
111
112   Ok(hyper::Response::new(hyper::Body::from("Hello World")))
113 }
114
115 async fn run_client(_ic: Arc<InstanceConfig>, _web: mpsc::Receiver<WebRequest>)
116                     -> Result<Void, AE>
117 {
118   Err(anyhow!("xxx"))
119 }
120
121 #[tokio::main]
122 async fn main() {
123   let opts = Opts::from_args();
124   let mut tasks: Vec<(
125     JoinHandle<AE>,
126     String,
127   )> = vec![];
128
129   let (global, ipif) = config::startup(
130     "hippotatd", LinkEnd::Server,
131     &opts.config, &opts.log, |ics|
132   {
133     let global = config::InstanceConfigGlobal::from(&ics);
134     let ipif = Ipif::start(&global.ipif, None)?;
135
136     let all_clients: AllClients = ics.into_iter().map(|ic| {
137       let ic = Arc::new(ic);
138
139       let (web_send, web_recv) = mpsc::channel(
140         5 // xxx should me max_requests_outstanding but that's
141           // marked client-only so needs rework
142       );
143
144       let ic_ = ic.clone();
145       tasks.push((tokio::spawn(async move {
146         run_client(ic_, web_recv).await.void_unwrap_err()
147       }), format!("client {}", &ic)));
148
149       (ic.link.client,
150        ClientHandles {
151          ic,
152          web: web_send,
153        })
154     }).collect();
155     let all_clients = Arc::new(all_clients);
156
157     for addr in &global.addrs {
158       let all_clients_ = all_clients.clone();
159       let make_service = hyper::service::make_service_fn(move |_conn| {
160         let all_clients_ = all_clients_.clone();
161         async { Ok::<_, Void>( hyper::service::service_fn(move |req| {
162           handle(all_clients_.clone(), req)
163         }) ) } }
164       );
165
166       let addr = SocketAddr::new(*addr, global.port);
167       let server = hyper::Server::try_bind(&addr)
168         .context("bind")?
169         .http1_preserve_header_case(true)
170         .serve(make_service);
171       info!("listening on {}", &addr);
172       let task = tokio::task::spawn(async move {
173         match server.await {
174           Ok(()) => anyhow!("shut down?!"),
175           Err(e) => e.into(),
176         }
177       });
178       tasks.push((task, format!("http server {}", addr)));
179     }
180     
181     Ok((global, ipif))
182   });
183
184   let died = future::select_all(
185     tasks.iter_mut().map(|e| &mut e.0)
186   ).await;
187   error!("xxx {:?}", &died);
188
189   ipif.quitting(None).await;
190
191   dbg!(global);
192 }