// Copyright 2021 Ian Jackson and contributors to Hippotat
-// SPDX-License-Identifier: AGPL-3.0-or-later
+// SPDX-License-Identifier: GPL-3.0-or-later
// There is NO WARRANTY.
use hippotat::prelude::*;
use hippotat_macros::into_crlfs;
+#[derive(StructOpt,Debug)]
+pub struct Opts {
+ #[structopt(flatten)]
+ log: LogOpts,
+
+ #[structopt(flatten)]
+ config: config::Opts,
+}
+
type OutstandingRequest<'r> = Pin<Box<
- dyn Future<Output=Option<Bytes>> + Send + 'r
+ dyn Future<Output=Option<Box<[u8]>>> + Send + 'r
>>;
impl<T> HCC for T where
reporter: &'c parking_lot::Mutex<Reporter<'c>>,
}
+#[derive(Debug)]
+struct TxQueued {
+ expires: Instant,
+ data: Box<[u8]>,
+}
+
#[throws(AE)]
fn submit_request<'r, 'c:'r, C:HCC>(
c: &'c ClientContext<C>,
+ req_num: &mut ReqNum,
reqs: &mut Vec<OutstandingRequest<'r>>,
upbound: FramesData,
) {
.saturating_add(Duration::from_nanos(999_999_999))
.as_secs();
- let time_t = SystemTime::now()
- .duration_since(UNIX_EPOCH)
- .unwrap_or_else(|_| Duration::default()) // clock is being weird
- .as_secs();
+ let time_t = time_t_now();
let time_t = format!("{:x}", time_t);
let hmac = token_hmac(c.ic.secret.0.as_bytes(), time_t.as_bytes());
+ //dbg!(DumpHex(&hmac));
let mut token = time_t;
write!(token, " ").unwrap();
base64::encode_config_buf(&hmac, BASE64_CONFIG, &mut token);
+ let req_num = { *req_num += 1; *req_num };
+
let prefix1 = format!(into_crlfs!(
r#"--b
Content-Type: text/plain; charset="utf-8"
Content-Disposition: form-data; name="m"
+ {}
+ {}
+ {}
{}
{}
{}
token,
c.ic.target_requests_outstanding,
show_timeout,
+ c.ic.mtu,
+ c.ic.max_batch_down,
+ c.ic.max_batch_up,
);
let prefix2 = format!(into_crlfs!(
as_ref,
).map(|b| b.len()).sum();
+ trace!("{} #{}: req; tx body_len={} frames={}",
+ &c.ic, req_num, body_len, upbound.len());
+
let body = hyper::body::Body::wrap_stream(
futures::stream::iter(
content!(
let resp = c.hclient.request(req);
let fut = Box::pin(async move {
- let r = async { tokio::time::timeout( c.ic.http_timeout, async {
+ let r = async { tokio::time::timeout( c.ic.effective_http_timeout, async {
let resp = resp.await.context("make request")?;
let status = resp.status();
- let resp = resp.into_body();
- // xxx: some size limit to avoid mallocing the universe
- let resp = hyper::body::to_bytes(resp).await
- .context("HTTP error fetching response body")?;
+ let mut resp = resp.into_body();
+ let max_body = c.ic.max_batch_down.sat() + MAX_OVERHEAD;
+ let resp = read_limited_bytes(
+ max_body, default(), default(), &mut resp
+ ).await
+ .discard_data().context("fetching response body")?;
if ! status.is_success() {
- // xxx get body and log it
throw!(anyhow!("HTTP error status={} body={:?}",
&status, String::from_utf8_lossy(&resp)));
}
Ok::<_,AE>(resp)
}).await? }.await;
- let r = c.reporter.lock().report(r);
+ let r = c.reporter.lock().filter(Some(req_num), r);
- if r.is_none() {
+ if let Some(r) = &r {
+ trace!("{} #{}: rok; rx bytes={}", &c.ic, req_num, r.len());
+ } else {
tokio::time::sleep(c.ic.http_retry).await;
}
r
reqs.push(fut);
}
-#[allow(unused_variables)] // xxx
async fn run_client<C:HCC>(
ic: InstanceConfig,
hclient: Arc<hyper::Client<C>>
ic: &ic,
};
- let mut ipif = tokio::process::Command::new("sh")
- .args(&["-c", &ic.ipif])
- .stdin (process::Stdio::piped())
- .stdout(process::Stdio::piped())
- .stderr(process::Stdio::piped())
- .kill_on_drop(true)
- .spawn().context("spawn ipif")?;
-
- let stderr = ipif.stderr.take().unwrap();
- let ic_name = ic.to_string();
- let _ = task::spawn(async move {
- let mut stderr = tokio::io::BufReader::new(stderr).lines();
- while let Some(l) = stderr.next_line().await? {
- error!("{}: ipif stderr: {}", &ic_name, l.trim_end());
- }
- Ok::<_,io::Error>(())
- });
+ let mut ipif = Ipif::start(&ic.ipif, Some(ic.to_string()))?;
- let tx_stream = ipif.stdout.take().unwrap();
- let mut tx_stream = tokio::io::BufReader::new(tx_stream).split(SLIP_END);
- let mut packets: VecDeque<Box<[u8]>> = default();
- let mut upbound = Frames::default();
+ let mut req_num: ReqNum = 0;
- let stream_for_rx = ipif.stdin .take().unwrap();
+ let mut tx_queue: VecDeque<TxQueued> = default();
+ let mut upbound = Frames::default();
let mut reqs: Vec<OutstandingRequest>
= Vec::with_capacity(ic.max_requests_outstanding.sat());
- // xxx check that ic settings are all honoured
+ let mut rx_queue: FrameQueue = default();
- async {
+ let trouble = async {
loop {
+ let rx_queue_space =
+ if rx_queue.remaining() < ic.max_batch_down.sat() {
+ Ok(())
+ } else {
+ Err(())
+ };
+
select! {
- data = tx_stream.next_segment(),
- if packets.is_empty() =>
+ biased;
+
+ y = ipif.rx.write_all_buf(&mut rx_queue),
+ if ! rx_queue.is_empty() =>
{
- let data =
- data.context("read from ipif")?
- .ok_or_else(|| io::Error::from(io::ErrorKind::UnexpectedEof))?;
- // eprintln!("packet={:x?}", &packet);
-
- packets = check
- ::<_,_,true>(ic.mtu, &data, |_| Ok(()), |e| match e {
- e => error!("PACKET ERROR {}", e), // xxx
- }).into();
+ let () = y.context("write rx data to ipif")?;
+ },
+
+ () = async {
+ let expires = tx_queue.front().unwrap().expires;
+ tokio::time::sleep_until(expires).await
+ },
+ if ! tx_queue.is_empty() =>
+ {
+ let _ = tx_queue.pop_front();
+ },
+
+ data = ipif.tx.next_segment(),
+ if tx_queue.is_empty() =>
+ {
+ let data = (||{
+ data?.ok_or_else(|| io::Error::from(io::ErrorKind::UnexpectedEof))
+ })().context("read from ipif")?;
+ //eprintln!("data={:?}", DumpHex(&data));
+
+ match check1(Slip2Mime, ic.mtu, &data, |header| {
+ let addr = ip_packet_addr::<false>(header)?;
+ if addr != ic.link.client.0 { throw!(PE::Src(addr)) }
+ Ok(())
+ }) {
+ Ok(data) => tx_queue.push_back(TxQueued {
+ data,
+ expires: Instant::now() + ic.max_queue_time
+ }),
+ Err(PE::Empty) => { },
+ Err(e@ PE::Src(_)) => debug!("{}: tx discarding: {}", &ic, e),
+ Err(e) => error!("{}: tx discarding: {}", &ic, e),
+ };
},
_ = async { },
if ! upbound.tried_full() &&
- ! packets.is_empty() =>
+ ! tx_queue.is_empty() =>
{
- while let Some(packet) = packets.pop_front() {
- match upbound.add(ic.max_batch_up, packet.into()/*xxx*/) {
- Err(packet) => { packets.push_front(packet.into()/*xxx*/); break; }
+ while let Some(TxQueued { data, expires }) = tx_queue.pop_front() {
+ match upbound.add(ic.max_batch_up, data.into()/*todo:504*/) {
+ Err(data) => {
+ tx_queue.push_front(TxQueued { data: data.into(), expires });
+ break;
+ }
Ok(()) => { },
}
}
},
_ = async { },
- if reqs.len() < ic.target_requests_outstanding.sat() ||
- (reqs.len() < ic.max_requests_outstanding.sat() &&
- ! upbound.is_empty()) =>
+ if rx_queue_space.is_ok() &&
+ (reqs.len() < ic.target_requests_outstanding.sat() ||
+ (reqs.len() < ic.max_requests_outstanding.sat() &&
+ ! upbound.is_empty()))
+ =>
{
- submit_request(&c, &mut reqs, mem::take(&mut upbound).into())?;
+ submit_request(&c, &mut req_num, &mut reqs,
+ mem::take(&mut upbound).into())?;
},
(got, goti, _) = async { future::select_all(&mut reqs).await },
if ! reqs.is_empty() =>
{
reqs.swap_remove(goti);
+
if let Some(got) = got {
- dbg!(&got.remaining()); // xxx
+
+ //eprintln!("got={:?}", DumpHex(&got));
+ match checkn(SlipNoConv,ic.mtu, &got, |header| {
+ let addr = ip_packet_addr::<true>(header)?;
+ if addr != ic.link.client.0 { throw!(PE::Dst(addr)) }
+ Ok(())
+ }, |o| rx_queue.push(o),
+ |e| error!("{} #{}: rx discarding: {}", &ic, req_num, e))
+ {
+ Ok(()) => reporter.lock().success(),
+ Err(ErrorOnlyBad) => {
+ reqs.push(Box::pin(async {
+ tokio::time::sleep(ic.http_retry).await;
+ None
+ }));
+ },
+ }
}
- }
+ },
+
+ _ = tokio::time::sleep(c.ic.effective_http_timeout),
+ if rx_queue_space.is_err() =>
+ {
+ reporter.lock().filter(None, Err::<Void,_>(
+ anyhow!("rx queue full, blocked")
+ ));
+ },
}
}
- }.await
+ }.await;
+
+ ipif.quitting(Some(&ic)).await;
+ trouble
}
#[tokio::main]
-async fn main() -> Result<(), AE> {
- let ics = config::read(LinkEnd::Client)?;
- if ics.is_empty() { throw!(anyhow!("no associations with server(s)")); }
-
- env_logger::init();
+async fn main() {
+ let opts = Opts::from_args();
+ let (ics,) = config::startup("hippotat", LinkEnd::Client,
+ &opts.config, &opts.log, |ics|Ok((ics,)));
let https = HttpsConnector::new();
- let hclient = hyper::Client::builder().build::<_, hyper::Body>(https);
+ let hclient = hyper::Client::builder()
+ .http1_preserve_header_case(true)
+ .build::<_, hyper::Body>(https);
let hclient = Arc::new(hclient);
info!("starting");
});
match join.await {
Ok(e) => {
- error!("{} failed: {:?}", &assocname, e);
+ error!("{} failed: {}", &assocname, e);
},
Err(je) => {
error!("{} panicked!", &assocname);