#![no_main]
#![no_std]

extern crate cortex_m;
extern crate cortex_m_rt;
extern crate panic_halt;

#[macro_use]
extern crate stm32f030_hal as hal;

use hal::delay::Delay;
use hal::gpio::*;
use hal::prelude::*;

use cortex_m::interrupt::Mutex;
use cortex_m::peripheral::Peripherals as c_m_Peripherals;
use cortex_m_rt::entry;

pub use hal::stm32;
pub use hal::stm32::*;

use core::cell::RefCell;
use core::ops::DerefMut;

// Make our LED globally available
static LED: Mutex<RefCell<Option<gpiob::PA1<Output<PushPull>>>>> = Mutex::new(RefCell::new(None));

// Make our delay provider globally available
static DELAY: Mutex<RefCell<Option<Delay>>> = Mutex::new(RefCell::new(None));

// Make external interrupt registers globally available
static INT: Mutex<RefCell<Option<EXTI>>> = Mutex::new(RefCell::new(None));

#[entry]
fn main() -> ! {
    if let (Some(p), Some(cp)) = (Peripherals::take(), c_m_Peripherals::take()) {
        let gpioa = p.GPIOA.split();
        let gpiob = p.GPIOB.split();
        let syscfg = p.SYSCFG;
        let exti = p.EXTI;

        // Enable clock for SYSCFG
        let mut rcc = p.RCC;
        rcc.apb2enr.modify(|_, w| w.syscfgen().set_bit());

        // Configure PB1 as input (button)
        let _ = gpiob.pb1.into_pull_down_input();

        // Configure PA1 as output (LED)
        let mut led = gpiob.pa1.into_push_pull_output();

        // Turn off LED
        led.set_low();

        // Configure clock to 8 MHz (i.e. the default) and freeze it
        let clocks = rcc.constrain().cfgr.sysclk(8.mhz()).freeze();

        // Initialise delay provider
        let mut delay = Delay::new(cp.SYST, clocks);

        // Enable external interrupt for PB1
        syscfg.exticr1.modify(|_, w| unsafe { w.exti1().bits(1) });

        // Set interrupt request mask for line 1
        exti.imr.modify(|_, w| w.mr1().set_bit());

        // Set interrupt rising trigger for line 1
        exti.rtsr.modify(|_, w| w.tr1().set_bit());

        // Move control over LED and DELAY and EXTI into global mutexes
        cortex_m::interrupt::free(move |cs| {
            *LED.borrow(cs).borrow_mut() = Some(led);
            *DELAY.borrow(cs).borrow_mut() = Some(delay);
            *INT.borrow(cs).borrow_mut() = Some(exti);
        });

        // Enable EXTI IRQ, set prio 1 and clear any pending IRQs
        let mut nvic = cp.NVIC;
        nvic.enable(Interrupt::EXTI0_1);
        unsafe { nvic.set_priority(Interrupt::EXTI0_1, 1) };
        cortex_m::peripheral::NVIC::unpend(Interrupt::EXTI0_1);
    }

    loop {
        continue;
    }
}

/* Define an intterupt handler, i.e. function to call when exception occurs. Here if our external
 * interrupt trips the flash function which will be called */
interrupt!(EXTI0_1, button_press);

fn button_press() {
    // Enter critical section
    cortex_m::interrupt::free(|cs| {
        // Obtain all Mutex protected resources
        if let (&mut Some(ref mut led), &mut Some(ref mut delay), &mut Some(ref mut exti)) = (
            LED.borrow(cs).borrow_mut().deref_mut(),
            DELAY.borrow(cs).borrow_mut().deref_mut(),
            INT.borrow(cs).borrow_mut().deref_mut(),
        ) {
            // Turn on LED
            led.set_high();

            // Wait a second
            delay.delay_ms(1_000_u16);

            // Turn off LED
            led.set_low();

            // Clear interrupt
            exti.pr.modify(|_, w| w.pif1().set_bit());
        }
    });
}