git-svn-id: svn://svn.code.sf.net/p/chibios/svn/trunk@3637 35acf78f-673a-0410-8e92-d51de3d6d3f4

1 files changed, 278 insertions, 0 deletions

diff --git a/testhal/STM32F4xx/IRQ_STORM_FPU/main.c b/testhal/STM32F4xx/IRQ_STORM_FPU/main.c
new file mode 100644
index 000000000..3e6ac940c
--- /dev/null
+++ b/testhal/STM32F4xx/IRQ_STORM_FPU/main.c
@@ -0,0 +1,278 @@
+/*

+    ChibiOS/RT - Copyright (C) 2006,2007,2008,2009,2010,

+                 2011 Giovanni Di Sirio.

+

+    This file is part of ChibiOS/RT.

+

+    ChibiOS/RT 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.

+

+    ChibiOS/RT 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/>.

+*/

+

+#include <stdlib.h>

+

+#include "ch.h"

+#include "hal.h"

+

+float getfloat(float par);

+

+float setfloat(float par1, float par2, float par3, float par4);

+

+/*===========================================================================*/

+/* Configurable settings.                                                    */

+/*===========================================================================*/

+

+#ifndef RANDOMIZE

+#define RANDOMIZE       FALSE

+#endif

+

+#ifndef ITERATIONS

+#define ITERATIONS      100

+#endif

+

+#ifndef NUM_THREADS

+#define NUM_THREADS     4

+#endif

+

+/*===========================================================================*/

+/* Test related code.                                                        */

+/*===========================================================================*/

+

+static bool_t saturated;

+

+/*

+ * Test worker threads.

+ */

+static WORKING_AREA(waWorkerThread[NUM_THREADS], 128);

+static msg_t WorkerThread(void *arg) {

+

+  (void)arg;

+

+  palTogglePad(GPIOD, GPIOD_LED5);

+}

+

+/*

+ * GPT2 callback.

+ */

+static void gpt2cb(GPTDriver *gptp) {

+  float f1, f2, f3, f4, sum;

+

+  (void)gptp;

+

+  f1 = getfloat(2);

+  f2 = getfloat(3);

+  f3 = getfloat(4);

+  sum = f1 + f2 + f3;

+  f4 = getfloat(5);

+  sum = setfloat(sum, f4, sum, f4);

+  if (sum != 196)

+    chSysHalt();

+}

+

+/*

+ * GPT3 callback.

+ */

+static void gpt3cb(GPTDriver *gptp) {

+  float f1, f2, f3, f4, sum;

+

+  (void)gptp;

+

+  f1 = getfloat(1);

+  f2 = getfloat(2);

+  f3 = getfloat(3);

+  sum = f1 + f2 + f3;

+  f4 = getfloat(4);

+  sum = setfloat(sum, f4, sum, f4);

+  if (sum != 100)

+    chSysHalt();

+}

+

+/*

+ * GPT2 configuration.

+ */

+static const GPTConfig gpt2cfg = {

+  1000000,  /* 1MHz timer clock.*/

+  gpt2cb    /* Timer callback.*/

+};

+

+/*

+ * GPT3 configuration.

+ */

+static const GPTConfig gpt3cfg = {

+  1000000,  /* 1MHz timer clock.*/

+  gpt3cb    /* Timer callback.*/

+};

+

+

+/*===========================================================================*/

+/* Generic demo code.                                                        */

+/*===========================================================================*/

+

+static void print(char *p) {

+

+  while (*p) {

+    chIOPut(&SD2, *p++);

+  }

+}

+

+static void println(char *p) {

+

+  while (*p) {

+    chIOPut(&SD2, *p++);

+  }

+  chIOWriteTimeout(&SD2, (uint8_t *)"\r\n", 2, TIME_INFINITE);

+}

+

+static void printn(uint32_t n) {

+  char buf[16], *p;

+

+  if (!n)

+    chIOPut(&SD2, '0');

+  else {

+    p = buf;

+    while (n)

+      *p++ = (n % 10) + '0', n /= 10;

+    while (p > buf)

+      chIOPut(&SD2, *--p);

+  }

+}

+

+/*

+ * Application entry point.

+ */

+int main(void) {

+  unsigned i;

+  gptcnt_t interval, threshold, worst;

+

+  /*

+   * System initializations.

+   * - HAL initialization, this also initializes the configured device drivers

+   *   and performs the board-specific initializations.

+   * - Kernel initialization, the main() function becomes a thread and the

+   *   RTOS is active.

+   */

+  halInit();

+  chSysInit();

+

+  /*

+   * Prepares the Serial driver 2 and GPT drivers 2 and 3.

+   */

+  sdStart(&SD2, NULL);          /* Default is 38400-8-N-1.*/

+  palSetPadMode(GPIOA, 2, PAL_MODE_ALTERNATE(7));

+  palSetPadMode(GPIOA, 3, PAL_MODE_ALTERNATE(7));

+  gptStart(&GPTD2, &gpt2cfg);

+  gptStart(&GPTD3, &gpt3cfg);

+

+  /*

+   * Initializes the mailboxes and creates the worker threads.

+   */

+  for (i = 0; i < NUM_THREADS; i++) {

+    chThdCreateStatic(waWorkerThread[i], sizeof waWorkerThread[i],

+                      NORMALPRIO - 20, WorkerThread, (void *)i);

+  }

+

+  /*

+   * Test procedure.

+   */

+  println("");

+  println("*** ChibiOS/RT IRQ-STORM-FPU long duration test");

+  println("***");

+  print("*** Kernel:       ");

+  println(CH_KERNEL_VERSION);

+  print("*** Compiled:     ");

+  println(__DATE__ " - " __TIME__);

+#ifdef CH_COMPILER_NAME

+  print("*** Compiler:     ");

+  println(CH_COMPILER_NAME);

+#endif

+  print("*** Architecture: ");

+  println(CH_ARCHITECTURE_NAME);

+#ifdef CH_CORE_VARIANT_NAME

+  print("*** Core Variant: ");

+  println(CH_CORE_VARIANT_NAME);

+#endif

+#ifdef CH_PORT_INFO

+  print("*** Port Info:    ");

+  println(CH_PORT_INFO);

+#endif

+#ifdef PLATFORM_NAME

+  print("*** Platform:     ");

+  println(PLATFORM_NAME);

+#endif

+#ifdef BOARD_NAME

+  print("*** Test Board:   ");

+  println(BOARD_NAME);

+#endif

+  println("***");

+  print("*** System Clock: ");

+  printn(STM32_SYSCLK);

+  println("");

+  print("*** Iterations:   ");

+  printn(ITERATIONS);

+  println("");

+  print("*** Randomize:    ");

+  printn(RANDOMIZE);

+  println("");

+  print("*** Threads:      ");

+  printn(NUM_THREADS);

+  println("");

+

+  println("");

+  worst = 0;

+  for (i = 1; i <= ITERATIONS; i++){

+    print("Iteration ");

+    printn(i);

+    println("");

+    saturated = FALSE;

+    threshold = 0;

+    for (interval = 2000; interval >= 10; interval -= interval / 10) {

+      gptStartContinuous(&GPTD2, interval - 1); /* Slightly out of phase.*/

+      gptStartContinuous(&GPTD3, interval + 1); /* Slightly out of phase.*/

+      chThdSleepMilliseconds(1000);

+      gptStopTimer(&GPTD2);

+      gptStopTimer(&GPTD3);

+      if (!saturated)

+        print(".");

+      else {

+        print("#");

+        if (threshold == 0)

+          threshold = interval;

+      }

+    }

+    /* Gives the worker threads a chance to empty the mailboxes before next

+       cycle.*/

+    chThdSleepMilliseconds(20);

+    println("");

+    print("Saturated at ");

+    printn(threshold);

+    println(" uS");

+    println("");

+    if (threshold > worst)

+      worst = threshold;

+  }

+  gptStopTimer(&GPTD2);

+  gptStopTimer(&GPTD3);

+

+  print("Worst case at ");

+  printn(worst);

+  println(" uS");

+  println("");

+  println("Test Complete");

+

+  /*

+   * Normal main() thread activity, nothing in this test.

+   */

+  while (TRUE) {

+    chThdSleepMilliseconds(5000);

+  }

+  return 0;

+}