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

1 files changed, 0 insertions, 324 deletions

diff --git a/testhal/LPC13xx/IRQ_STORM/main.c b/testhal/LPC13xx/IRQ_STORM/main.c
deleted file mode 100644
index b9c2f0274..000000000
--- a/testhal/LPC13xx/IRQ_STORM/main.c
+++ /dev/null
@@ -1,324 +0,0 @@
-/*

-    ChibiOS/RT - Copyright (C) 2006-2013 Giovanni Di Sirio

-

-    Licensed under the Apache License, Version 2.0 (the "License");

-    you may not use this file except in compliance with the License.

-    You may obtain a copy of the License at

-

-        http://www.apache.org/licenses/LICENSE-2.0

-

-    Unless required by applicable law or agreed to in writing, software

-    distributed under the License is distributed on an "AS IS" BASIS,

-    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.

-    See the License for the specific language governing permissions and

-    limitations under the License.

-*/

-

-#include <stdlib.h>

-

-#include "ch.h"

-#include "hal.h"

-

-/*===========================================================================*/

-/* Configurable settings.                                                    */

-/*===========================================================================*/

-

-#ifndef RANDOMIZE

-#define RANDOMIZE       FALSE

-#endif

-

-#ifndef ITERATIONS

-#define ITERATIONS      100

-#endif

-

-#ifndef NUM_THREADS

-#define NUM_THREADS     4

-#endif

-

-#ifndef MAILBOX_SIZE

-#define MAILBOX_SIZE    4

-#endif

-

-/*===========================================================================*/

-/* Test related code.                                                        */

-/*===========================================================================*/

-

-#define MSG_SEND_LEFT   0

-#define MSG_SEND_RIGHT  1

-

-static bool_t saturated;

-

-/*

- * Mailboxes and buffers.

- */

-static Mailbox mb[NUM_THREADS];

-static msg_t b[NUM_THREADS][MAILBOX_SIZE];

-

-/*

- * Test worker threads.

- */

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

-static msg_t WorkerThread(void *arg) {

-  static volatile unsigned x = 0;

-  static unsigned cnt = 0;

-  unsigned me = (unsigned)arg;

-  unsigned target;

-  unsigned r;

-  msg_t msg;

-

-  chRegSetThreadName("worker");

-

-  /* Work loop.*/

-  while (TRUE) {

-    /* Waiting for a message.*/

-   chMBFetch(&mb[me], &msg, TIME_INFINITE);

-

-#if RANDOMIZE

-   /* Pseudo-random delay.*/

-   {

-     chSysLock();

-     r = rand() & 15;

-     chSysUnlock();

-     while (r--)

-       x++;

-   }

-#else

-   /* Fixed delay.*/

-   {

-     r = me >> 4;

-     while (r--)

-       x++;

-   }

-#endif

-

-    /* Deciding in which direction to re-send the message.*/

-    if (msg == MSG_SEND_LEFT)

-      target = me - 1;

-    else

-      target = me + 1;

-

-    if (target < NUM_THREADS) {

-      /* If this thread is not at the end of a chain re-sending the message,

-         note this check works because the variable target is unsigned.*/

-      msg = chMBPost(&mb[target], msg, TIME_IMMEDIATE);

-      if (msg != RDY_OK)

-        saturated = TRUE;

-    }

-    else {

-      /* Provides a visual feedback about the system.*/

-      if (++cnt >= 500) {

-        cnt = 0;

-        palTogglePad(GPIO0, GPIO0_LED2);

-      }

-    }

-  }

-}

-

-/*

- * GPT1 callback.

- */

-static void gpt1cb(GPTDriver *gptp) {

-  msg_t msg;

-

-  (void)gptp;

-  chSysLockFromIsr();

-  msg = chMBPostI(&mb[0], MSG_SEND_RIGHT);

-  if (msg != RDY_OK)

-    saturated = TRUE;

-  chSysUnlockFromIsr();

-}

-

-/*

- * GPT2 callback.

- */

-static void gpt2cb(GPTDriver *gptp) {

-  msg_t msg;

-

-  (void)gptp;

-  chSysLockFromIsr();

-  msg = chMBPostI(&mb[NUM_THREADS - 1], MSG_SEND_LEFT);

-  if (msg != RDY_OK)

-    saturated = TRUE;

-  chSysUnlockFromIsr();

-}

-

-/*

- * GPT1 configuration.

- */

-static const GPTConfig gpt1cfg = {

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

-  gpt1cb    /* Timer callback.*/

-};

-

-/*

- * GPT2 configuration.

- */

-static const GPTConfig gpt2cfg = {

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

-  gpt2cb    /* Timer callback.*/

-};

-

-

-/*===========================================================================*/

-/* Generic demo code.                                                        */

-/*===========================================================================*/

-

-static void print(char *p) {

-

-  while (*p) {

-    chSequentialStreamPut(&SD1, *p++);

-  }

-}

-

-static void println(char *p) {

-

-  while (*p) {

-    chSequentialStreamPut(&SD1, *p++);

-  }

-  chSequentialStreamWrite(&SD1, (uint8_t *)"\r\n", 2);

-}

-

-static void printn(uint32_t n) {

-  char buf[16], *p;

-

-  if (!n)

-    chSequentialStreamPut(&SD1, '0');

-  else {

-    p = buf;

-    while (n)

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

-    while (p > buf)

-      chSequentialStreamPut(&SD1, *--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 1 and 2.

-   */

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

-  gptStart(&GPTD1, &gpt1cfg);

-  gptStart(&GPTD2, &gpt2cfg);

-

-  /*

-   * Initializes the mailboxes and creates the worker threads.

-   */

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

-    chMBInit(&mb[i], b[i], MAILBOX_SIZE);

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

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

-  }

-

-  /*

-   * Test procedure.

-   */

-  println("");

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

-  println("***");

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

-  println(CH_KERNEL_VERSION);

-#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(LPC13xx_SYSCLK);

-  println("");

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

-  printn(ITERATIONS);

-  println("");

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

-  printn(RANDOMIZE);

-  println("");

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

-  printn(NUM_THREADS);

-  println("");

-  print("*** Mailbox size: ");

-  printn(MAILBOX_SIZE);

-  println("");

-

-  println("");

-  worst = 0;

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

-    print("Iteration ");

-    printn(i);

-    println("");

-    saturated = FALSE;

-    threshold = 0;

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

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

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

-      chThdSleepMilliseconds(1000);

-      gptStopTimer(&GPTD1);

-      gptStopTimer(&GPTD2);

-      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(&GPTD1);

-  gptStopTimer(&GPTD2);

-

-  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;

-}