chiark / gitweb /
c5eaf9296a99be682fff4d3b7b86e1a0ece0b59c
[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 = meta.next()
94       .map(|r| r.map_err(Into::into))
95       .unwrap_or_else(|| Err(anyhow!("missing")))
96       .context("client addr")?;
97
98     let client: IpAddr = client.parse().context("client address")?;
99 // let client = all_clients.get(&client).ok_or_else(|| anyhow!(BAD_CLIENT))?;
100
101     eprintln!("boundary={:?} start={} name={:?} client={}",
102               boundary, start, &comp.name, client);
103
104     Ok::<_,AE>(())
105   }.await {
106     Ok(()) => {
107     },
108     Err(e) => {
109       eprintln!("error={}", e);
110     }
111   }
112
113   eprintln!("warnings={:?}", &warnings);
114
115   Ok(hyper::Response::new(hyper::Body::from("Hello World")))
116 }
117
118 async fn run_client(_ic: Arc<InstanceConfig>, _web: mpsc::Receiver<WebRequest>)
119                     -> Result<Void, AE>
120 {
121   Err(anyhow!("xxx"))
122 }
123
124 #[tokio::main]
125 async fn main() {
126   let opts = Opts::from_args();
127   let mut tasks: Vec<(
128     JoinHandle<AE>,
129     String,
130   )> = vec![];
131
132   let (global, ipif) = config::startup(
133     "hippotatd", LinkEnd::Server,
134     &opts.config, &opts.log, |ics|
135   {
136     let global = config::InstanceConfigGlobal::from(&ics);
137     let ipif = Ipif::start(&global.ipif, None)?;
138
139     let all_clients: AllClients = ics.into_iter().map(|ic| {
140       let ic = Arc::new(ic);
141
142       let (web_send, web_recv) = mpsc::channel(
143         5 // xxx should me max_requests_outstanding but that's
144           // marked client-only so needs rework
145       );
146
147       let ic_ = ic.clone();
148       tasks.push((tokio::spawn(async move {
149         run_client(ic_, web_recv).await.void_unwrap_err()
150       }), format!("client {}", &ic)));
151
152       (ic.link.client,
153        ClientHandles {
154          ic,
155          web: web_send,
156        })
157     }).collect();
158     let all_clients = Arc::new(all_clients);
159
160     for addr in &global.addrs {
161       let all_clients_ = all_clients.clone();
162       let make_service = hyper::service::make_service_fn(move |_conn| {
163         let all_clients_ = all_clients_.clone();
164         async { Ok::<_, Void>( hyper::service::service_fn(move |req| {
165           handle(all_clients_.clone(), req)
166         }) ) } }
167       );
168
169       let addr = SocketAddr::new(*addr, global.port);
170       let server = hyper::Server::try_bind(&addr)
171         .context("bind")?
172         .http1_preserve_header_case(true)
173         .serve(make_service);
174       info!("listening on {}", &addr);
175       let task = tokio::task::spawn(async move {
176         match server.await {
177           Ok(()) => anyhow!("shut down?!"),
178           Err(e) => e.into(),
179         }
180       });
181       tasks.push((task, format!("http server {}", addr)));
182     }
183     
184     Ok((global, ipif))
185   });
186
187   let died = future::select_all(
188     tasks.iter_mut().map(|e| &mut e.0)
189   ).await;
190   error!("xxx {:?}", &died);
191
192   ipif.quitting(None).await;
193
194   dbg!(global);
195 }