Subversion Repositories neo430

// #################################################################################################

// #  < Morse code translator >                                                                    #

// # ********************************************************************************************* #

// # Translates a text string into Morse code. The encode can only encode letters.                 #

// # Output via GPIO.output(0) (bootloader status LED).                                            #

// # ********************************************************************************************* #

// # BSD 3-Clause License                                                                          #

// #                                                                                               #

// # Copyright (c) 2020, Stephan Nolting. All rights reserved.                                     #

// #                                                                                               #

// # Redistribution and use in source and binary forms, with or without modification, are          #

// # permitted provided that the following conditions are met:                                     #

// #                                                                                               #

// # 1. Redistributions of source code must retain the above copyright notice, this list of        #

// #    conditions and the following disclaimer.                                                   #

// #                                                                                               #

// # 2. Redistributions in binary form must reproduce the above copyright notice, this list of     #

// #    conditions and the following disclaimer in the documentation and/or other materials        #

// #    provided with the distribution.                                                            #

// #                                                                                               #

// # 3. Neither the name of the copyright holder nor the names of its contributors may be used to  #

// #    endorse or promote products derived from this software without specific prior written      #

// #    permission.                                                                                #

// #                                                                                               #

// # THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS   #

// # OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF               #

// # MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE    #

// # COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,     #

// # EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE #

// # GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED    #

// # AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING     #

// # NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED  #

// # OF THE POSSIBILITY OF SUCH DAMAGE.                                                            #

// # ********************************************************************************************* #

// # The NEO430 Processor - https://github.com/stnolting/neo430                                    #

// #################################################################################################

// Libraries

#include <stdint.h>

#include <neo430.h>

// Configuration

#define MAX_STRING_LENGTH 128 // max length of plain morse text

#define LED_PIN 0 // GPIO output pin #0

#define TIME_PRSC 192

#define BAUD_RATE 19200

// Global vars

uint32_t time_base;

// Prototypes

void send_morse(const char *s);

// Morse alphabet (ASCII order)

const char morse_code[][7] = {

  "--..--", // ,

  "-....-", // -

  ".-.-.-", // .

  "-..-.",  // /

  "-----",  // 0

  ".----",  // 1

  "..---",  // 2

  "...--",  // 3

  "....-",  // 4

  ".....",  // 5

  "-....",  // 6

  "--...",  // 7

  "---..",  // 8

  "----.",  // 9

  "---...", // :

  "-.-.-.", // ;

  "",       // < (not implemented)

  "-...-",  // =

  "",       // > (not implemented)

  "..--..", // ?

  "",       // @ (not implemented)

  ".-",     // A

  "-...",   // B

  "-.-.",   // C

  "-..",    // D

  ".",      // E

  "..-.",   // F

  "--.",    // G

  "....",   // H

  "..",     // I

  ".---",   // J

  "-.-",    // K

  ".-..",   // L

  "--",     // M

  "-.",     // N

  "---",    // O

  ".--.",   // P

  "--.-",   // Q

  ".-.",    // R

  "...",    // S

  "-",      // T

  "..-",    // U

  "...-",   // V

  ".--",    // W

  "-..-",   // X

  "-.--",   // Y

  "--..",   // Z

};

/* ------------------------------------------------------------

 * INFO Main function

 * ------------------------------------------------------------ */

int main(void) {

  char buffer[MAX_STRING_LENGTH];

  // setup UART

  neo430_uart_setup(BAUD_RATE);

  // configure time base

  uint32_t clock = CLOCKSPEED_32bit;

  time_base = 0;

  while (clock >= TIME_PRSC) {

    clock = clock - TIME_PRSC;

    time_base++; // time base for a 'Dit'

  }

  neo430_uart_br_print("\n--- Morse code translator ---\n");

  neo430_uart_br_print("Enter a string to translate it to Morse code.\n");

  neo430_uart_br_print("Output via high-active LED at GPIO.out(0) (bootloader status LED).\n");

  // check if GPIO unit was synthesized, exit if no GPIO is available

  if (!(SYS_FEATURES & (1<<SYS_GPIO_EN))) {

    neo430_uart_br_print("Error! No GPIO unit synthesized!");

    return 1;

  }

  neo430_gpio_port_set(0); // LED off

  while (1) {

    // get string

    neo430_uart_br_print("\nEnter text: ");

    uint16_t length = neo430_uart_scan(buffer, MAX_STRING_LENGTH, 1);

    neo430_uart_br_print("\nSending: ");

    // encode each letter

    uint16_t i = 0;

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

      char c = buffer[i];

      // cast to capital letters

      if ((c >= 'a') && (c <= 'z'))

        c -= 32;

      // in valid alphabet?

      if ((c >= ',') && (c <= 'Z')) {

        uint8_t index = c - ',';

        neo430_uart_br_print(" ");

        send_morse(morse_code[index]);

        uint32_t time = time_base * 3; // inter-letter pause

        while(time--)

          asm volatile ("nop");

      }

      // user abort?

      if (neo430_uart_char_received() != 0) {

        neo430_uart_br_print("\nAborted.");

        break;

      }

    }

  }

  return 0;

}

/* ------------------------------------------------------------

 * INFO Send morse code via LED pin

 * PARAM *s pointer to source morse symbol string

 * ------------------------------------------------------------ */

void send_morse(const char *s){

  char c = 0;

  uint32_t time = 0;

  while ((c = *s++)) {

    neo430_gpio_pin_set(LED_PIN); // LED on

    if (c == '.')

      time = time_base;

    else if (c == '-')

      time = time_base * 3;

    else

      time = 0;

    neo430_uart_putc(c);

    // wait

    while(time--)

      asm volatile ("nop");

    neo430_gpio_pin_clr(LED_PIN); // LED off

    // inter-symbol pause

    time = time_base;

    while(time--)

      asm volatile ("nop");

  }

}