bertos/kern/proc_test.c

   1 /**
   2  * \file
   3  * <!--
   4  * This file is part of BeRTOS.
   5  *
   6  * Bertos is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  19  *
  20  * As a special exception, you may use this file as part of a free software
  21  * library without restriction.  Specifically, if other files instantiate
  22  * templates or use macros or inline functions from this file, or you compile
  23  * this file and link it with other files to produce an executable, this
  24  * file does not by itself cause the resulting executable to be covered by
  25  * the GNU General Public License.  This exception does not however
  26  * invalidate any other reasons why the executable file might be covered by
  27  * the GNU General Public License.
  28  *
  29  * Copyright 2008 Develer S.r.l. (http://www.develer.com/)
  30  * -->
  31  *
  32  *
  33  * \brief Test kernel process.
  34  *
  35  * \version $Id$
  36  * \author Daniele Basile <asterix@develer.com>
  37  */
  38
  39 #include <kern/proc.h>
  40 #include <kern/irq.h>
  41 #include <kern/monitor.h>
  42
  43 #include <drv/timer.h>
  44 #include <cfg/test.h>
  45
  46
  47 // Global settings for the test.
  48 #define DELAY                           5
  49
  50 // Settings for the test process.
  51 //Process 1
  52 #define INC_PROC_T1                     1
  53 #define DELAY_PROC_T1   INC_PROC_T1*DELAY
  54 //Process 2
  55 #define INC_PROC_T2                     3
  56 #define DELAY_PROC_T2   INC_PROC_T2*DELAY
  57 //Process 3
  58 #define INC_PROC_T3                     5
  59 #define DELAY_PROC_T3   INC_PROC_T3*DELAY
  60 //Process 4
  61 #define INC_PROC_T4                     7
  62 #define DELAY_PROC_T4   INC_PROC_T4*DELAY
  63 //Process 5
  64 #define INC_PROC_T5                    11
  65 #define DELAY_PROC_T5   INC_PROC_T5*DELAY
  66 //Process 6
  67 #define INC_PROC_T6                    13
  68 #define DELAY_PROC_T6   INC_PROC_T6*DELAY
  69 //Process 7
  70 #define INC_PROC_T7                    17
  71 #define DELAY_PROC_T7   INC_PROC_T7*DELAY
  72 //Process 8
  73 #define INC_PROC_T8                    19
  74 #define DELAY_PROC_T8   INC_PROC_T8*DELAY
  75
  76 //Global count for each process.
  77 unsigned int t1_count = 0;
  78 unsigned int t2_count = 0;
  79 unsigned int t3_count = 0;
  80 unsigned int t4_count = 0;
  81 unsigned int t5_count = 0;
  82 unsigned int t6_count = 0;
  83 unsigned int t7_count = 0;
  84 unsigned int t8_count = 0;
  85
  86 /*
  87  * These macros generate the code needed to create the test process functions.
  88  */
  89 #define PROC_TEST(num) static void proc_test##num(void) \
  90 { \
  91         for (int i = 0; i < INC_PROC_T##num; ++i) \
  92         { \
  93                 t##num##_count++; \
  94                 kprintf("> Process[%d]: count[%d]\n", num, t##num##_count); \
  95                 timer_delay(DELAY_PROC_T##num); \
  96         } \
  97 } \
  98
  99 #define PROC_TEST_STACK(num)  static cpu_stack_t proc_test##num##_stack[CONFIG_KERN_MINSTACKSIZE / sizeof(cpu_stack_t)];
 100 #define PROC_TEST_INIT(num)   proc_new(proc_test##num, NULL, sizeof(proc_test##num##_stack), proc_test##num##_stack);
 101
 102 // Define process
 103 PROC_TEST(1)
 104 PROC_TEST(2)
 105 PROC_TEST(3)
 106 PROC_TEST(4)
 107 PROC_TEST(5)
 108 PROC_TEST(6)
 109 PROC_TEST(7)
 110 PROC_TEST(8)
 111
 112 // Define process stacks for test.
 113 PROC_TEST_STACK(1)
 114 PROC_TEST_STACK(2)
 115 PROC_TEST_STACK(3)
 116 PROC_TEST_STACK(4)
 117 PROC_TEST_STACK(5)
 118 PROC_TEST_STACK(6)
 119 PROC_TEST_STACK(7)
 120 PROC_TEST_STACK(8)
 121
 122
 123 /**
 124  * Process scheduling test
 125  */
 126 int proc_testRun(void)
 127 {
 128         kprintf("Run Process test..\n");
 129
 130         //Init the process tests
 131         PROC_TEST_INIT(1)
 132         PROC_TEST_INIT(2)
 133         PROC_TEST_INIT(3)
 134         PROC_TEST_INIT(4)
 135         PROC_TEST_INIT(5)
 136         PROC_TEST_INIT(6)
 137         PROC_TEST_INIT(7)
 138         PROC_TEST_INIT(8)
 139         kputs("> Main: Processes created\n");
 140
 141         for (int i = 0; i < 30; ++i)
 142         {
 143                 kputs("> Main\n");
 144                 timer_delay(93);
 145                 monitor_report();
 146         }
 147
 148         if( t1_count == INC_PROC_T1 &&
 149                 t2_count == INC_PROC_T2 &&
 150                 t3_count == INC_PROC_T3 &&
 151                 t4_count == INC_PROC_T4 &&
 152                 t5_count == INC_PROC_T5 &&
 153                 t6_count == INC_PROC_T6 &&
 154                 t7_count == INC_PROC_T7 &&
 155                 t8_count == INC_PROC_T8)
 156         {
 157                 kputs("> Main: process test finished..ok!\n");
 158                 return 0;
 159         }
 160
 161         kputs("> Main: process test..fail!\n");
 162         return -1;
 163 }
 164
 165
 166 int proc_testSetup(void)
 167 {
 168         kdbg_init();
 169
 170         #if CONFIG_KERN_PREEMPT
 171                 kprintf("Init Interrupt (preempt mode)..");
 172                 irq_init();
 173                 kprintf("Done.\n");
 174         #endif
 175
 176         kprintf("Init Timer..");
 177         timer_init();
 178         kprintf("Done.\n");
 179
 180         kprintf("Init Process..");
 181         proc_init();
 182         kprintf("Done.\n");
 183
 184         return 0;
 185 }
 186
 187 int proc_testTearDown(void)
 188 {
 189         kputs("TearDown Process test.\n");
 190         return 0;
 191 }
 192
 193 TEST_MAIN(proc);