pios_sys.c

Go to the documentation of this file.

/* 
 * This program is free software; you can redistribute it and/or modify 
 * it under the terms of the GNU General Public License as published by 
 * the Free Software Foundation; either version 3 of the License, or 
 * (at your option) any later version.
 * 
 * This program is distributed in the hope that it will be useful, but 
 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY 
 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 
 * for more details.
 * 
 * You should have received a copy of the GNU General Public License along 
 * with this program; if not, see <http://www.gnu.org/licenses/>
 */

/* Project Includes */
#include "pios.h"

#if defined(PIOS_INCLUDE_SYS)

/* Private Function Prototypes */
void NVIC_Configuration(void);
void SysTick_Handler(void);

/* Local Macros */
#define MEM8(addr)  (*((volatile uint8_t  *)(addr)))
#define MEM16(addr)  (*((volatile uint16_t  *)(addr)))
#define MEM32(addr)  (*((volatile uint32_t  *)(addr)))

void PIOS_SYS_Init(void)
{
        /* Setup STM32 system (RCC, clock, PLL and Flash configuration) - CMSIS Function */
        SystemInit();

        /* Enable GPIOA, GPIOB, GPIOC, GPIOD, GPIOE and AFIO clocks */
        RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA | RCC_APB2Periph_GPIOB | RCC_APB2Periph_GPIOC | RCC_APB2Periph_GPIOD | RCC_APB2Periph_GPIOE |
                               RCC_APB2Periph_AFIO | RCC_APB2Periph_SPI1, ENABLE);

        RCC_APB1PeriphClockCmd(RCC_APB1Periph_SPI2 | RCC_APB1Periph_SPI3, ENABLE);

#if (PIOS_USB_ENABLED)
        /*  Ensure that pull-up is active on detect pin */
        GPIO_InitTypeDef GPIO_InitStructure;
        GPIO_StructInit(&GPIO_InitStructure);
        GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IPU;
        GPIO_InitStructure.GPIO_Pin = PIOS_USB_DETECT_GPIO_PIN;
        GPIO_Init(PIOS_USB_DETECT_GPIO_PORT, &GPIO_InitStructure);
#endif

        /* Initialise Basic NVIC */
        NVIC_Configuration();

}

int32_t PIOS_SYS_Reset(void)
{
        // disable all interrupts
        PIOS_IRQ_Disable();

        // turn off all board LEDs
#if defined(PIOS_LED_HEARTBEAT)
        PIOS_ANNUNC_Off(PIOS_LED_HEARTBEAT);
#endif  /* PIOS_LED_HEARTBEAT */
#if defined(PIOS_LED_ALARM)
        PIOS_ANNUNC_Off(PIOS_LED_ALARM);
#endif  /* PIOS_LED_ALARM */

        RCC_APB2PeriphResetCmd(0xffffffff, DISABLE);
        RCC_APB1PeriphResetCmd(0xffffffff, DISABLE);
        NVIC_SystemReset();

        while (1) ;

        /* We will never reach this point */
        return -1;
}

int32_t PIOS_SYS_SerialNumberGetBinary(uint8_t *array)
{
        int i;

        /* Stored in the so called "electronic signature" */
        for (i = 0; i < PIOS_SYS_SERIAL_NUM_BINARY_LEN; ++i) {
                uint8_t b = MEM8(0x1ffff7e8 + i);

                array[i] = b;
        }

        /* No error */
        return 0;
}

int32_t PIOS_SYS_SerialNumberGet(char *str)
{
        int i;

        /* Stored in the so called "electronic signature" */
        for (i = 0; i < PIOS_SYS_SERIAL_NUM_ASCII_LEN; ++i) {
                uint8_t b = MEM8(0x1ffff7e8 + (i / 2));
                if (!(i & 1))
                        b >>= 4;
                b &= 0x0f;

                str[i] = ((b > 9) ? ('A' - 10) : '0') + b;
        }
        str[i] = '\0';

        /* No error */
        return 0;
}

static inline size_t unused_mem(uint32_t *top, uint32_t *bot, uint32_t pattern)
{
        uint32_t *p = bot;
        for (; p < top && *p == pattern; p++);
        return (p - bot) * sizeof(uint32_t);
}

#ifdef PIOS_INCLUDE_CHIBIOS

#if !defined(CRT0_STACKS_FILL_PATTERN)
#define CRT0_STACKS_FILL_PATTERN    0x55555555 /* ChibiOS ResetHandler */
#endif
/* c.f. linker */
extern uint32_t __main_stack_base__;
extern uint32_t __main_stack_end__;
extern uint32_t __process_stack_base__;
extern uint32_t __process_stack_end__;

size_t PIOS_SYS_IrqStackUnused(void)
{
        return unused_mem(&__main_stack_end__, &__main_stack_base__,
                CRT0_STACKS_FILL_PATTERN);
}

size_t PIOS_SYS_OsStackUnused(void)
{
        return unused_mem(&__process_stack_end__, &__process_stack_base__,
                CRT0_STACKS_FILL_PATTERN);
}

#else

/* c.f. linker */
extern uint32_t _irq_stack_end;
extern uint32_t _irq_stack_top;

size_t PIOS_SYS_IrqStackUnused(void)
{
        return unused_mem(&_irq_stack_top, &_irq_stack_end, 0xa5a5);
}

size_t PIOS_SYS_OsStackUnused(void)
{
        return 0;
}

#endif /* PIOS_INCLUDE_CHIBIOS */

void NVIC_Configuration(void)
{
        /* Set the Vector Table base address as specified in .ld file */
        extern void *pios_isr_vector_table_base;
        NVIC_SetVectorTable((uint32_t)&pios_isr_vector_table_base, 0x0);

        /* 4 bits for Interrupt priorities so no sub priorities */
        NVIC_PriorityGroupConfig(NVIC_PriorityGroup_4);

        /* Configure HCLK clock as SysTick clock source. */
        SysTick_CLKSourceConfig(SysTick_CLKSource_HCLK);
}

#ifdef USE_FULL_ASSERT

void assert_failed(uint8_t * file, uint32_t line)
{
        /* When serial debugging is implemented, use something like this. */
        /* printf("Wrong parameters value: file %s on line %d\r\n", file, line); */

        /* Setup the LEDs to Alternate */
#if defined(PIOS_LED_HEARTBEAT)
        PIOS_ANNUNC_On(PIOS_LED_HEARTBEAT);
#endif  /* PIOS_LED_HEARTBEAT */
#if defined(PIOS_LED_ALARM)
        PIOS_ANNUNC_Off(PIOS_LED_ALARM);
#endif  /* PIOS_LED_ALARM */

        /* Infinite loop */
        while (1) {
#if defined(PIOS_LED_HEARTBEAT)
                PIOS_ANNUNC_Toggle(PIOS_LED_HEARTBEAT);
#endif  /* PIOS_LED_HEARTBEAT */
#if defined(PIOS_LED_ALARM)
                PIOS_ANNUNC_Toggle(PIOS_LED_ALARM);
#endif  /* PIOS_LED_ALARM */
                for (int i = 0; i < 1000000; i++) ;
        }
}
#endif

#endif