wlan_common/

timer.rs

// Copyright 2018 The Fuchsia Authors. All rights reserved.
// Use of this source code is governed by a BSD-style license that can be
// found in the LICENSE file.

use fuchsia_async as fasync;
use futures::channel::mpsc;
use futures::{FutureExt, Stream, StreamExt};
use std::sync::{Arc, atomic};
use zx;

use crate::sink::UnboundedSink;

pub type ScheduledEvent<E> = (zx::MonotonicInstant, Event<E>, EventHandle);
pub type EventSender<E> = UnboundedSink<ScheduledEvent<E>>;
pub type EventStream<E> = mpsc::UnboundedReceiver<ScheduledEvent<E>>;
pub type EventId = u64;

// The returned timer will send scheduled timeouts to the returned EventStream.
// Note that this will not actually have any timed behavior unless events are pulled off
// the EventStream and handled asynchronously.
pub fn create_timer<E>() -> (Timer<E>, EventStream<E>) {
    let (timer_sink, time_stream) = mpsc::unbounded();
    (Timer::new(UnboundedSink::new(timer_sink)), time_stream)
}

pub fn make_async_timed_event_stream<E>(
    time_stream: impl Stream<Item = ScheduledEvent<E>>,
) -> impl Stream<Item = Event<E>> {
    // Timer firings are not correctly ordered if we
    // filter_map before buffered_unordered.
    Box::pin(
        time_stream
            .map(|(deadline, timed_event, handle)| {
                fasync::Timer::new(fasync::MonotonicInstant::from_zx(deadline))
                    .map(|_| (timed_event, handle))
            })
            .buffer_unordered(usize::MAX)
            .filter_map(|(timed_event, handle)| async move {
                if handle.is_active() { Some(timed_event) } else { None }
            }),
    )
}

#[derive(Debug)]
pub struct Event<E> {
    pub id: EventId,
    pub event: E,
}

impl<E: Clone> Clone for Event<E> {
    fn clone(&self) -> Self {
        Event { id: self.id, event: self.event.clone() }
    }
}

#[derive(Debug)]
pub struct Timer<E> {
    sender: EventSender<E>,
    next_id: EventId,
}

impl<E> Timer<E> {
    pub fn new(sender: EventSender<E>) -> Self {
        Timer { sender, next_id: 0 }
    }

    /// Returns the current time according to the global executor.
    ///
    /// # Panics
    ///
    /// This function will panic if it's called when no executor is set up.
    pub fn now(&self) -> zx::MonotonicInstant {
        // We use fasync to support time manipulation in tests.
        fasync::MonotonicInstant::now().into_zx()
    }

    pub fn schedule_at(&mut self, deadline: zx::MonotonicInstant, event: E) -> EventHandle {
        let id = self.next_id;
        let timer_handle = EventHandle::new(id);
        let inner_handle = EventHandle {
            active: Arc::clone(&timer_handle.active),
            event_id: id,
            // This field is only used in the timer handle returned by this fn, so the value
            // here does not matter.
            cancel_on_drop: true,
        };
        self.sender.send((deadline, Event { id, event }, inner_handle));
        self.next_id += 1;
        timer_handle
    }

    pub fn schedule_after(&mut self, duration: zx::MonotonicDuration, event: E) -> EventHandle {
        self.schedule_at(fasync::MonotonicInstant::after(duration).into_zx(), event)
    }

    pub fn schedule<EV>(&mut self, event: EV) -> EventHandle
    where
        EV: TimeoutDuration + Into<E>,
    {
        self.schedule_after(event.timeout_duration(), event.into())
    }
}

pub trait TimeoutDuration {
    fn timeout_duration(&self) -> zx::MonotonicDuration;
}

/// An EventHandle is used to manage a single scheduled timer. If a handle is
/// dropped, the corresponding timeout will not fire. This behavior may be
/// bypassed via `EventHandle::drop_without_cancel`.
#[derive(Debug)]
pub struct EventHandle {
    active: Arc<atomic::AtomicBool>,
    event_id: EventId,
    cancel_on_drop: bool,
}

impl EventHandle {
    fn new(event_id: EventId) -> Self {
        Self { active: Arc::new(atomic::AtomicBool::new(true)), event_id, cancel_on_drop: true }
    }

    /// Helper fn to construct an EventHandle with a specific event ID.
    /// For tests only.
    pub fn new_test(event_id: EventId) -> Self {
        Self::new(event_id)
    }

    /// Returns true if the event is still scheduled to fire.
    fn is_active(&self) -> bool {
        self.active.load(atomic::Ordering::Acquire)
    }

    /// The unique ID assigned to this event.
    pub fn id(&self) -> EventId {
        self.event_id
    }

    /// Drop this event handle, but still fire the underlying timer when expired.
    /// If we will never cancel a scheduled timer, this fn can be used to avoid
    /// unnecessary bookkeeping.
    pub fn drop_without_cancel(mut self) {
        self.cancel_on_drop = false;
    }
}

impl std::ops::Drop for EventHandle {
    fn drop(&mut self) {
        if self.cancel_on_drop {
            self.active.store(false, atomic::Ordering::Release);
        }
    }
}

#[cfg(test)]
mod tests {
    use super::*;
    use assert_matches::assert_matches;
    use fuchsia_async as fasync;

    use futures::channel::mpsc::UnboundedSender;
    use std::pin::pin;
    use std::task::Poll;

    type TestEvent = u32;
    impl TimeoutDuration for TestEvent {
        fn timeout_duration(&self) -> zx::MonotonicDuration {
            zx::MonotonicDuration::from_seconds(10)
        }
    }

    #[test]
    fn test_timer_schedule_at() {
        let _exec = fasync::TestExecutor::new();
        let (mut timer, mut time_stream) = create_timer::<TestEvent>();
        let timeout1 = zx::MonotonicInstant::after(zx::MonotonicDuration::from_seconds(5));
        let timeout2 = zx::MonotonicInstant::after(zx::MonotonicDuration::from_seconds(10));
        let event_handle1 = timer.schedule_at(timeout1, 7);
        let event_handle2 = timer.schedule_at(timeout2, 9);
        assert_eq!(event_handle1.id(), 0);
        assert_eq!(event_handle2.id(), 1);

        let (t1, event1, _) = time_stream.try_recv().expect("expect time entry");
        assert_eq!(t1, timeout1);
        assert_eq!(event1.id, 0);
        assert_eq!(event1.event, 7);

        let (t2, event2, _) = time_stream.try_recv().expect("expect time entry");
        assert_eq!(t2, timeout2);
        assert_eq!(event2.id, 1);
        assert_eq!(event2.event, 9);

        assert_matches!(time_stream.try_recv(), Err(e) => {
            assert_eq!(e.to_string(), "receive failed because channel is empty")
        });
    }

    #[test]
    fn test_timer_schedule_after() {
        let _exec = fasync::TestExecutor::new();
        let (mut timer, mut time_stream) = create_timer::<TestEvent>();
        let timeout1 = zx::MonotonicDuration::from_seconds(1000);
        let timeout2 = zx::MonotonicDuration::from_seconds(5);
        let event_handle1 = timer.schedule_after(timeout1, 7);
        let event_handle2 = timer.schedule_after(timeout2, 9);
        assert_eq!(event_handle1.id(), 0);
        assert_eq!(event_handle2.id(), 1);

        let (t1, event1, _) = time_stream.try_recv().expect("expect time entry");
        assert_eq!(event1.id, 0);
        assert_eq!(event1.event, 7);

        let (t2, event2, _) = time_stream.try_recv().expect("expect time entry");
        assert_eq!(event2.id, 1);
        assert_eq!(event2.event, 9);

        // Confirm that the ordering of timeouts is expected. We can't check the actual
        // values since they're dependent on the system clock.
        assert!(t1.into_nanos() > t2.into_nanos());

        assert_matches!(time_stream.try_recv(), Err(e) => {
            assert_eq!(e.to_string(), "receive failed because channel is empty")
        });
    }

    #[test]
    fn test_timer_schedule() {
        let _exec = fasync::TestExecutor::new();
        let (mut timer, mut time_stream) = create_timer::<TestEvent>();
        let start = zx::MonotonicInstant::after(zx::MonotonicDuration::from_millis(0));

        let event_handle = timer.schedule(5u32);
        assert_eq!(event_handle.id(), 0);

        let (t, event, _) = time_stream.try_recv().expect("expect time entry");
        assert_eq!(event.id, 0);
        assert_eq!(event.event, 5);
        assert!(start + zx::MonotonicDuration::from_seconds(10) <= t);
    }

    #[test]
    fn test_timer_stream() {
        let mut exec = fasync::TestExecutor::new_with_fake_time();
        let fut = async {
            let (timer, time_stream) = mpsc::unbounded::<ScheduledEvent<TestEvent>>();
            let mut timeout_stream = make_async_timed_event_stream(time_stream);
            let now = zx::MonotonicInstant::get();
            let _handle1 = schedule(&timer, now + zx::MonotonicDuration::from_millis(40), 0);
            let _handle2 = schedule(&timer, now + zx::MonotonicDuration::from_millis(10), 1);
            let _handle3 = schedule(&timer, now + zx::MonotonicDuration::from_millis(20), 2);
            let _handle4 = schedule(&timer, now + zx::MonotonicDuration::from_millis(30), 3);

            let mut events = vec![];
            for _ in 0u32..4 {
                let event = timeout_stream.next().await.expect("timer terminated prematurely");
                events.push(event.event);
            }
            events
        };
        let mut fut = pin!(fut);
        for _ in 0u32..4 {
            assert_eq!(Poll::Pending, exec.run_until_stalled(&mut fut));
            assert!(exec.wake_next_timer().is_some());
        }
        assert_matches!(
            exec.run_until_stalled(&mut fut),
            Poll::Ready(events) => assert_eq!(events, vec![1, 2, 3, 0])
        );
    }

    #[test]
    fn test_timer_stream_cancel() {
        let mut exec = fasync::TestExecutor::new_with_fake_time();
        let (mut timer, time_stream) = create_timer::<TestEvent>();
        let mut timeout_stream = make_async_timed_event_stream(time_stream);

        let deadline = zx::MonotonicInstant::after(zx::Duration::from_seconds(5));

        {
            // Schedule an event and then drop the handle.
            let _event_handle = timer.schedule_at(deadline, 0);
        }

        exec.set_fake_time(deadline.into());
        let mut next = timeout_stream.next();
        assert_matches!(exec.run_until_stalled(&mut next), Poll::Pending);
    }

    #[test]
    fn test_timer_stream_drop_without_cancel() {
        let mut exec = fasync::TestExecutor::new_with_fake_time();
        let (mut timer, time_stream) = create_timer::<TestEvent>();
        let mut timeout_stream = make_async_timed_event_stream(time_stream);

        let deadline = zx::MonotonicInstant::after(zx::Duration::from_seconds(5));

        {
            // Schedule an event and then drop the handle.
            timer.schedule_at(deadline, 7357).drop_without_cancel();
        }

        exec.set_fake_time(deadline.into());
        let mut next = timeout_stream.next();
        // The event still appears.
        let event =
            assert_matches!(exec.run_until_stalled(&mut next), Poll::Ready(Some(event)) => event);
        assert_eq!(event.event, 7357);
    }

    fn schedule(
        timer: &UnboundedSender<ScheduledEvent<TestEvent>>,
        deadline: zx::MonotonicInstant,
        event: TestEvent,
    ) -> EventHandle {
        let id = 0;
        let handle = EventHandle::new(id);
        let inner_handle =
            EventHandle { active: Arc::clone(&handle.active), event_id: id, cancel_on_drop: true };
        let entry = (deadline, Event { id, event }, inner_handle);
        timer.unbounded_send(entry).expect("expect send successful");
        handle
    }
}