1 files changed, 94 insertions, 0 deletions
diff --git a/testhal/STM32L1xx/GPT/main.c b/testhal/STM32L1xx/GPT/main.c
new file mode 100644
index 000000000..b7e84e557
--- /dev/null
+++ b/testhal/STM32L1xx/GPT/main.c
@@ -0,0 +1,94 @@
+/*
+    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 "ch.h"
+#include "hal.h"
+
+/*
+ * GPT1 callback.
+ */
+static void gpt2cb(GPTDriver *gptp) {
+
+  (void)gptp;
+  palSetPad(GPIOB, GPIOB_LED4);
+  chSysLockFromIsr();
+  gptStartOneShotI(&GPTD3, 200);   /* 0.02 second pulse.*/
+  chSysUnlockFromIsr();
+}
+
+/*
+ * GPT2 callback.
+ */
+static void gpt3cb(GPTDriver *gptp) {
+
+  (void)gptp;
+  palClearPad(GPIOB, GPIOB_LED4);
+}
+
+/*
+ * GPT2 configuration.
+ */
+static const GPTConfig gpt2cfg = {
+  10000,    /* 10KHz timer clock.*/
+  gpt2cb    /* Timer callback.*/
+};
+
+/*
+ * GPT3 configuration.
+ */
+static const GPTConfig gpt3cfg = {
+  10000,    /* 10KHz timer clock.*/
+  gpt3cb    /* Timer callback.*/
+};
+
+/*
+ * Application entry point.
+ */
+int main(void) {
+
+  /*
+   * 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();
+
+  /*
+   * Initializes the GPT drivers 2 and 3.
+   */
+  gptStart(&GPTD2, &gpt2cfg);
+  gptPolledDelay(&GPTD2, 10); /* Small delay.*/
+  gptStart(&GPTD3, &gpt3cfg);
+  gptPolledDelay(&GPTD3, 10); /* Small delay.*/
+
+  /*
+   * Normal main() thread activity, it changes the GPT1 period every
+   * five seconds.
+   */
+  while (TRUE) {
+    gptStartContinuous(&GPTD2, 5000);
+    chThdSleepMilliseconds(5000);
+    gptStartContinuous(&GPTD2, 2500);
+    chThdSleepMilliseconds(5000);
+  }
+}