[freertos] / FreeRTOS / Demo / CORTEX_STM32F103_GCC_Rowley / main.c

/*\r
 * FreeRTOS Kernel V10.2.1\r
 * Copyright (C) 2019 Amazon.com, Inc. or its affiliates.  All Rights Reserved.\r
 *\r
 * Permission is hereby granted, free of charge, to any person obtaining a copy of\r
 * this software and associated documentation files (the "Software"), to deal in\r
 * the Software without restriction, including without limitation the rights to\r
 * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of\r
 * the Software, and to permit persons to whom the Software is furnished to do so,\r
 * subject to the following conditions:\r
 *\r
 * The above copyright notice and this permission notice shall be included in all\r
 * copies or substantial portions of the Software.\r
 *\r
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\r
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS\r
 * FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR\r
 * COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER\r
 * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN\r
 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.\r
 *\r
 * http://www.FreeRTOS.org\r
 * http://aws.amazon.com/freertos\r
 *\r
 * 1 tab == 4 spaces!\r
 */\r
\r
\r
/*\r
 * Creates all the demo application tasks, then starts the scheduler.  The WEB\r
 * documentation provides more details of the standard demo application tasks\r
 * (which just exist to test the kernel port and provide an example of how to use\r
 * each FreeRTOS API function).\r
 *\r
 * In addition to the standard demo tasks, the following tasks and tests are\r
 * defined and/or created within this file:\r
 *\r
 * "Check" task - This only executes every five seconds but has the highest\r
 * priority so is guaranteed to get processor time.  Its main function is to\r
 * check that all the standard demo tasks are still operational. The check task\r
 * will toggle LED 3 (PB11) every five seconds so long as no errors have been\r
 * detected.  The toggle rate will increase to half a second if an error has\r
 * been found in any task.\r
 *\r
 * "Echo" task - This is a very basic task that simply echoes any characters\r
 * received on COM0 (USART1).  This can be tested by transmitting a text file\r
 * from a dumb terminal to the STM32 USART then observing or capturing the text\r
 * that is echoed back.  Missing characters will be all the more obvious if the\r
 * file contains a simple repeating string of fixed width.\r
 *\r
 * Currently this demo does not include interrupt nesting examples.  High\r
 * frequency timer and simpler nesting examples can be found in most Cortex-M3\r
 * demo applications.\r
 *\r
 * The functions used to initialise, set and clear LED outputs are normally\r
 * defined in partest.c.  This demo includes two partest files, one that is\r
 * configured for use with the Keil MCBSTM32 evaluation board (called\r
 * ParTest_MCBSTM32.c) and one that is configured for use with the official\r
 * ST Eval board (called ParTest_ST_Eval.c).  One one of these files should be\r
 * included in the build at any one time, as appropriate for the hardware\r
 * actually being used.\r
 */\r
\r
/* Standard includes. */\r
#include <string.h>\r
\r
/* Scheduler includes. */\r
#include "FreeRTOS.h"\r
#include "task.h"\r
#include "queue.h"\r
\r
/* Library includes. */\r
#include "stm32f10x_it.h"\r
\r
/* Demo app includes. */\r
#include "BlockQ.h"\r
#include "integer.h"\r
#include "flash.h"\r
#include "partest.h"\r
#include "semtest.h"\r
#include "GenQTest.h"\r
#include "QPeek.h"\r
#include "recmutex.h"\r
\r
/* Driver includes. */\r
#include "STM32_USART.h"\r
\r
\r
/* The time between cycles of the 'check' task - which depends on whether the\r
check task has detected an error or not. */\r
#define mainCHECK_DELAY_NO_ERROR                        ( ( TickType_t ) 5000 / portTICK_PERIOD_MS )\r
#define mainCHECK_DELAY_ERROR                           ( ( TickType_t ) 500 / portTICK_PERIOD_MS )\r
\r
/* The LED controlled by the 'check' task. */\r
#define mainCHECK_LED                                           ( 3 )\r
\r
/* Task priorities. */\r
#define mainSEM_TEST_PRIORITY                           ( tskIDLE_PRIORITY + 1 )\r
#define mainBLOCK_Q_PRIORITY                            ( tskIDLE_PRIORITY + 2 )\r
#define mainCHECK_TASK_PRIORITY                         ( tskIDLE_PRIORITY + 3 )\r
#define mainFLASH_TASK_PRIORITY                         ( tskIDLE_PRIORITY + 2 )\r
#define mainECHO_TASK_PRIORITY                          ( tskIDLE_PRIORITY + 1 )\r
#define mainINTEGER_TASK_PRIORITY           ( tskIDLE_PRIORITY )\r
#define mainGEN_QUEUE_TASK_PRIORITY                     ( tskIDLE_PRIORITY )\r
\r
/* COM port and baud rate used by the echo task. */\r
#define mainCOM0                                                        ( 0 )\r
#define mainBAUD_RATE                                           ( 115200 )\r
\r
/*-----------------------------------------------------------*/\r
\r
/*\r
 * Configure the hardware for the demo.\r
 */\r
static void prvSetupHardware( void );\r
\r
/* The 'check' task as described at the top of this file. */\r
static void prvCheckTask( void *pvParameters );\r
\r
/* A simple task that echoes all the characters that are received on COM0\r
(USART1). */\r
static void prvUSARTEchoTask( void *pvParameters );\r
\r
/*-----------------------------------------------------------*/\r
\r
int main( void )\r
{\r
#ifdef DEBUG\r
  debug();\r
#endif\r
\r
        /* Set up the clocks and memory interface. */\r
        prvSetupHardware();\r
\r
        /* Start the standard demo tasks.  These are just here to exercise the\r
        kernel port and provide examples of how the FreeRTOS API can be used. */\r
        vStartBlockingQueueTasks( mainBLOCK_Q_PRIORITY );\r
    vStartSemaphoreTasks( mainSEM_TEST_PRIORITY );\r
    vStartIntegerMathTasks( mainINTEGER_TASK_PRIORITY );\r
    vStartGenericQueueTasks( mainGEN_QUEUE_TASK_PRIORITY );\r
        vStartLEDFlashTasks( mainFLASH_TASK_PRIORITY );\r
    vStartQueuePeekTasks();\r
    vStartRecursiveMutexTasks();\r
\r
        /* Create the 'echo' task, which is also defined within this file. */\r
        xTaskCreate( prvUSARTEchoTask, "Echo", configMINIMAL_STACK_SIZE, NULL, mainECHO_TASK_PRIORITY, NULL );\r
\r
        /* Create the 'check' task, which is also defined within this file. */\r
        xTaskCreate( prvCheckTask, "Check", configMINIMAL_STACK_SIZE, NULL, mainCHECK_TASK_PRIORITY, NULL );\r
\r
    /* Start the scheduler. */\r
        vTaskStartScheduler();\r
\r
    /* Will only get here if there was insufficient memory to create the idle\r
    task.  The idle task is created within vTaskStartScheduler(). */\r
        for( ;; );\r
}\r
/*-----------------------------------------------------------*/\r
\r
/* Described at the top of this file. */\r
static void prvCheckTask( void *pvParameters )\r
{\r
TickType_t xLastExecutionTime;\r
unsigned long ulTicksToWait = mainCHECK_DELAY_NO_ERROR;\r
\r
        /* Just to remove the compiler warning about the unused parameter. */\r
        ( void ) pvParameters;\r
\r
        /* Initialise the variable used to control our iteration rate prior to\r
        its first use. */\r
        xLastExecutionTime = xTaskGetTickCount();\r
\r
        for( ;; )\r
        {\r
                /* Wait until it is time to run the tests again. */\r
                vTaskDelayUntil( &xLastExecutionTime, ulTicksToWait );\r
\r
                /* Has an error been found in any task? */\r
                if( xAreGenericQueueTasksStillRunning() != pdTRUE )\r
                {\r
                        /* Reduce the time between cycles of this task - which has the\r
                        effect of increasing the rate at which the 'check' LED toggles to\r
                        indicate the existence of an error to an observer. */\r
                        ulTicksToWait = mainCHECK_DELAY_ERROR;\r
                }\r
                else if( xAreQueuePeekTasksStillRunning() != pdTRUE )\r
                {\r
                        ulTicksToWait = mainCHECK_DELAY_ERROR;\r
                }\r
                else if( xAreBlockingQueuesStillRunning() != pdTRUE )\r
                {\r
                        ulTicksToWait = mainCHECK_DELAY_ERROR;\r
                }\r
                else if( xAreSemaphoreTasksStillRunning() != pdTRUE )\r
                {\r
                        ulTicksToWait = mainCHECK_DELAY_ERROR;\r
                }\r
                else if( xAreIntegerMathsTaskStillRunning() != pdTRUE )\r
                {\r
                        ulTicksToWait = mainCHECK_DELAY_ERROR;\r
                }\r
                else if( xAreRecursiveMutexTasksStillRunning() != pdTRUE )\r
                {\r
                        ulTicksToWait = mainCHECK_DELAY_ERROR;\r
                }\r
\r
                vParTestToggleLED( mainCHECK_LED );\r
        }\r
}\r
/*-----------------------------------------------------------*/\r
\r
/* Described at the top of this file. */\r
static void prvUSARTEchoTask( void *pvParameters )\r
{\r
signed char cChar;\r
\r
/* String declared static to ensure it does not end up on the stack, no matter\r
what the optimisation level. */\r
static const char *pcLongishString =\r
"ABBA was a Swedish pop music group formed in Stockholm in 1972, consisting of Anni-Frid Frida Lyngstad, "\r
"Björn Ulvaeus, Benny Andersson and Agnetha Fältskog. Throughout the band's existence, Fältskog and Ulvaeus "\r
"were a married couple, as were Lyngstad and Andersson - although both couples later divorced. They became one "\r
"of the most commercially successful acts in the history of popular music, and they topped the charts worldwide "\r
"from 1972 to 1983.  ABBA gained international popularity employing catchy song hooks, simple lyrics, sound "\r
"effects (reverb, phasing) and a Wall of Sound achieved by overdubbing the female singers' voices in multiple "\r
"harmonies. As their popularity grew, they were sought after to tour Europe, Australia, and North America, drawing "\r
"crowds of ardent fans, notably in Australia. Touring became a contentious issue, being particularly cumbersome for "\r
"Fältskog, but they continued to release studio albums to widespread commercial success. At the height of their "\r
"popularity, however, both relationships began suffering strain that led ultimately to the collapse of first the "\r
"Ulvaeus-Fältskog marriage (in 1979) and then of the Andersson-Lyngstad marriage in 1981. In the late 1970s and early "\r
"1980s these relationship changes began manifesting in the group's music, as they produced more thoughtful, "\r
"introspective lyrics with different compositions.";\r
\r
        /* Just to avoid compiler warnings. */\r
        ( void ) pvParameters;\r
\r
        /* Initialise COM0, which is USART1 according to the STM32 libraries. */\r
        lCOMPortInit( mainCOM0, mainBAUD_RATE );\r
\r
        /* Try sending out a string all in one go, as a very basic test of the\r
    lSerialPutString() function. */\r
    lSerialPutString( mainCOM0, pcLongishString, strlen( pcLongishString ) );\r
\r
        for( ;; )\r
        {\r
                /* Block to wait for a character to be received on COM0. */\r
                xSerialGetChar( mainCOM0, &cChar, portMAX_DELAY );\r
\r
                /* Write the received character back to COM0. */\r
                xSerialPutChar( mainCOM0, cChar, 0 );\r
        }\r
}\r
/*-----------------------------------------------------------*/\r
\r
static void prvSetupHardware( void )\r
{\r
        /* RCC system reset(for debug purpose). */\r
        RCC_DeInit ();\r
\r
    /* Enable HSE. */\r
        RCC_HSEConfig( RCC_HSE_ON );\r
\r
        /* Wait till HSE is ready. */\r
        while (RCC_GetFlagStatus(RCC_FLAG_HSERDY) == RESET);\r
\r
    /* HCLK = SYSCLK. */\r
        RCC_HCLKConfig( RCC_SYSCLK_Div1 );\r
\r
    /* PCLK2  = HCLK. */\r
        RCC_PCLK2Config( RCC_HCLK_Div1 );\r
\r
    /* PCLK1  = HCLK/2. */\r
        RCC_PCLK1Config( RCC_HCLK_Div2 );\r
\r
        /* ADCCLK = PCLK2/4. */\r
        RCC_ADCCLKConfig( RCC_PCLK2_Div4 );\r
\r
    /* Flash 2 wait state. */\r
        *( volatile unsigned long  * )0x40022000 = 0x01;\r
\r
        /* PLLCLK = 8MHz * 9 = 72 MHz */\r
        RCC_PLLConfig( RCC_PLLSource_HSE_Div1, RCC_PLLMul_9 );\r
\r
    /* Enable PLL. */\r
        RCC_PLLCmd( ENABLE );\r
\r
        /* Wait till PLL is ready. */\r
        while (RCC_GetFlagStatus(RCC_FLAG_PLLRDY) == RESET);\r
\r
        /* Select PLL as system clock source. */\r
        RCC_SYSCLKConfig (RCC_SYSCLKSource_PLLCLK);\r
\r
        /* Wait till PLL is used as system clock source. */\r
        while (RCC_GetSYSCLKSource() != 0x08);\r
\r
        /* Enable GPIOA, GPIOB, GPIOC, GPIOD, GPIOE and AFIO clocks */\r
        RCC_APB2PeriphClockCmd( RCC_APB2Periph_GPIOA | RCC_APB2Periph_GPIOB |RCC_APB2Periph_GPIOC\r
                                                        | RCC_APB2Periph_GPIOD | RCC_APB2Periph_GPIOE | RCC_APB2Periph_AFIO, ENABLE );\r
\r
        /* Set the Vector Table base address at 0x08000000. */\r
        NVIC_SetVectorTable( NVIC_VectTab_FLASH, 0x0 );\r
\r
        NVIC_PriorityGroupConfig( NVIC_PriorityGroup_4 );\r
\r
        /* Configure HCLK clock as SysTick clock source. */\r
        SysTick_CLKSourceConfig( SysTick_CLKSource_HCLK );\r
\r
        /* Initialise the IO used for the LED outputs. */\r
        vParTestInitialise();\r
\r
        /* SPI2 Periph clock enable */\r
        RCC_APB1PeriphClockCmd( RCC_APB1Periph_SPI2, ENABLE );\r
}\r
/*-----------------------------------------------------------*/\r
\r
void vApplicationStackOverflowHook( TaskHandle_t pxTask, char *pcTaskName )\r
{\r
        /* This function will get called if a task overflows its stack.   If the\r
        parameters are corrupt then inspect pxCurrentTCB to find which was the\r
        offending task. */\r
\r
        ( void ) pxTask;\r
        ( void ) pcTaskName;\r
\r
        for( ;; );\r
}\r
/*-----------------------------------------------------------*/\r
\r
void assert_failed( unsigned char *pucFile, unsigned long ulLine )\r
{\r
        ( void ) pucFile;\r
        ( void ) ulLine;\r
\r
        for( ;; );\r
}\r
\r