Subversion Repositories Projects

/****************************************************************************

 *   Copyright (C) 2009-2015 by Claas Anders "CaScAdE" Rathje               *

 *   admiralcascade@gmail.com                                               *

 *   Project-URL: http://www.mylifesucks.de/oss/c-osd/                      *

 *                                                                          *

 *   This program 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 2 of the License.         *

 *                                                                          *

 *   This program 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, write to the                          *

 *   Free Software Foundation, Inc.,                                        *

 *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.              *

 ****************************************************************************/

#include "main.h"

#include <avr/io.h>

#include <util/delay.h>

#include <avr/pgmspace.h>

#include <string.h>

#include <stdlib.h>

#include "max7456_software_spi.h"

#include "usart0.h"

char conv_array[7]; // general array for number -> char conversation

int int_pow(int a, int b) {

    if (b <= 0) return 1;

    int res = 1;

    while (b-- > 0) res *= a;

    return res;

}

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

 * MAX7456 SPI & Display stuff

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

/**

 * Send a byte through SPI

 * inline because it increases the codesize currenlty 'only' by 110byte but saves

 * the context-change on every char and attribute which is at least done twice

 * (address and data byte), a significant speed-bost we do not want to miss :)

 */

inline void spi_send(uint8_t byte) {

    for (int8_t i = 7; i >= 0; i--) {

        if (((byte >> i) & 1)) {

            MAX_SDIN_HIGH

        } else {

            MAX_SDIN_LOW

        }

        MAX_SCLK_HIGH

        MAX_SCLK_LOW

    }

}

/**

 *  Send <byte> to <address> of MAX7456

 */

void spi_send_byte(uint8_t address, uint8_t byte) {

    // start sending

    MAX_CS_LOW

    spi_send(address);

    spi_send(byte);

    // end sending

    MAX_CS_HIGH

#ifdef SERIALDEBUGDRAW

    uint8_t c = address + byte;

    usart0_puts("#3");

    usart0_putc(address);

    usart0_putc(byte);

    usart0_putc(c);

    usart0_puts("\n");

#endif

}

/**

 *  write a <character> to <address> of MAX7456 display memory

 */

void write_char(uint16_t address, char character) {

    spi_send_byte(MAX7456_DMAH, (address & 0xFF00) >> 8);

    spi_send_byte(MAX7456_DMAL, (address & 0x00FF));

    spi_send_byte(MAX7456_DMDI, character);

}

/**

 *  clear display memory

 *  (also sets 8bit mode)

 */

void clear(void) {

    /*uint16_t memory_address = 0;

    for (unsigned int a = 0; a < 480; a++) {

        write_char(memory_address++, 0);

    }*/

    // clear all display-mem (DMM)

    spi_send_byte(MAX7456_DMM, 0b01000100);

    // clearing takes 20us according to maxim so lets wait longer

    _delay_us(21);

}

#if (ALLCHARSDEBUG|(WRITECHARS != -1))

/**

 * for testing write all chars to screen

 */

void write_all_chars() {

    uint16_t x = 3, y = 2, t = 0;

    while (t < 256) {

        write_char(x++ + y * 30, t++);

        if (x > 25) {

            y++;

            x = 3;

        }

    }

}

/**

 * let the MAX7456 learn a new character at <number>

 * with <data>.

 */

void learn_char(uint8_t number, unsigned char* data) {

    // select character to write

    spi_send_byte(MAX7456_CMAH, number);

    for (uint8_t i = 0; i < 54; i++) {

        // select 4pixel byte of char

        spi_send_byte(MAX7456_CMAL, i);

        // write 4pixel byte of char

        spi_send_byte(MAX7456_CMDI, data[i]);

    }

    // write to the NVM array from the shadow RAM

    spi_send_byte(MAX7456_CMM, 0b10100000);

    // according to maxim writing to nvram takes about 12ms, lets wait longer

    _delay_ms(120);

}

#endif

#if !(ALLCHARSDEBUG|(WRITECHARS != -1))

/**

 *  write a character <attribute> to <address> of MAX7456 display memory

 */

void write_char_att(uint16_t address, char attribute) {

    // the only important part is that the DMAH[1] is set

    // so we add 2 which binary is the 2nd lowest byte

    spi_send_byte(MAX7456_DMAH, ((address & 0xFF00) >> 8) | 2);

    spi_send_byte(MAX7456_DMAL, (address & 0x00FF));

    spi_send_byte(MAX7456_DMDI, attribute);

}

/**

 *  write a <character> at <x>/<y> to MAX7456 display memory

 */

void write_char_xy(uint8_t x, uint8_t y, char character) {

    uint16_t address = y * 30 + x;

    write_char(address, character);

}

/**

 *  write a  character <attribute> at <x>/<y> to MAX7456 display memory

 */

void write_char_att_xy(uint8_t x, uint8_t y, char attribute) {

    uint16_t address = y * 30 + x;

    write_char_att(address, attribute);

}

/**

 *  write an ascii <character> to <address> of MAX7456 display memory

 */

void write_ascii_char(uint16_t address, char c) {

    if (c == 32) c = 0; // remap space

    else if (c > 48 && c <= 57) c -= 48; // remap numbers

    else if (c == '0') c = 10; // remap zero

    else if (c >= 65 && c <= 90) c -= 54; // remap big letters

    else if (c >= 97 && c <= 122) c -= 60; // remap small letters

    else if (c == '(') c = 63; // remap

    else if (c == ')') c = 64; // remap

    else if (c == '.') c = 65; // remap

    else if (c == '-') c = 73; // remap minus

    else if (c == ';') c = 67; // remap

    else if (c == ':') c = 68; // remap

    else if (c == ',') c = 69; // remap

    else if (c == '?') c = 66; // remap

    else if (c == '\\') c = 70; // remap

    else if (c == '_') c = 0xE3; // remap

    else if (c == '/') c = 71; // remap

    else if (c == '"') c = 72; // remap

    else if (c == '<') c = 74; // remap

    else if (c == '>') c = 75; // remap

    else if (c == '@') c = 76; // remap

    write_char(address, c);

}

/**

 *  write an ascii <string> at <x>/<y> to MAX7456 display memory

 */

void write_ascii_string(uint8_t x, uint8_t y, char *string) {

    while (*string) {

        write_ascii_char(((x++)+(y * 30)), *string);

        string++;

    }

}

/**

 *  write an ascii <string> with lenght <len> at <x>/<y> to MAX7456 display memory

 */

void write_ascii_string_len(uint8_t x, uint8_t y, char *string, uint8_t len) {

    while (len--) {

        write_ascii_char(((x++)+(y * 30)), *string);

        string++;

    }

}

/**

 *  write an ascii <string> from progmen at <x>/<y> to MAX7456 display memory

 */

void write_ascii_string_pgm(uint8_t x, uint8_t y, const char *string) {

    while (pgm_read_byte(string) != 0x00)

        write_ascii_char(((x++)+(y * 30)), pgm_read_byte(string++));

}

/**

 *  write an <string> from progmen at <x>/<y> downwards to MAX7456 display memory

 */

void write_string_pgm_down(uint8_t x, uint8_t y, const char *string, uint8_t length) {

    while (length--)

        write_char((x + (y++ * 30)), pgm_read_byte(string++));

}

/**

 * Write a unsigned <number> at <x>/<y> to MAX7456 display memory

 * <length> represents the length to rightbound the number

 * <pad> = 1 will cause blank spaced to be filled up with zeros e.g. 007 instead of   7

 */

void write_ndigit_number_u(uint8_t x, uint8_t y, uint16_t number, int16_t length, uint8_t pad) {

    if (number >= int_pow(10, length)) {

        number = int_pow(10, length) - 1;

    }

    itoa(number, conv_array, 10);

    for (uint8_t i = 0; i < length - strlen(conv_array); i++) {

        if (pad) write_char((x++)+(y * 30), 10);

        else write_ascii_char((x++)+(y * 30), 0);

    }

    write_ascii_string(x, y, conv_array);

}

/**

 * Write a signed <number> at <x>/<y> to MAX7456 display memory

 * <length> represents the length to rightbound the number

 * <pad> = 1 will cause blank spaced to be filled up with zeros e.g. 007 instead of   7

 */

void write_ndigit_number_s(uint8_t x, uint8_t y, int16_t number, int16_t length, uint8_t pad) {

    if (number <= -int_pow(10, length)) {

        number = -int_pow(10, length) + 1;

    } else if (number >= int_pow(10, length)) {

        number = int_pow(10, length) - 1;

    }

    itoa(number, conv_array, 10);

    if (strlen(conv_array) < length) {

        for (uint8_t i = 0; i < length - strlen(conv_array); i++) {

            if (pad) write_char((x++)+(y * 30), 10);

            else write_ascii_char((x++)+(y * 30), 0);

        }

    }

    write_ascii_string(x, y, conv_array);

}

/**

 * Write a unsigned <number> at <x>/<y> to MAX7456 display memory as /10th of value

 * <length> represents the length to rightbound the number

 * <pad> = 1 will cause blank spaced to be filled up with zeros e.g. 007 instead of   7

 */

void write_ndigit_number_u_10th(uint8_t x, uint8_t y, uint16_t number, int16_t length, uint8_t pad) {

    if (number >= int_pow(10, length)) {

        number = int_pow(10, length) - 1;

    }

    itoa(number, conv_array, 10);

    uint8_t len = strlen(conv_array);

    for (uint8_t i = 0; i < length - len; i++) {

        if (pad) write_char((x++)+(y * 30), 10); //  zero

        else write_char((x++)+(y * 30), 0); // blank

    }

    char rest = conv_array[len - 1];

    conv_array[len - 1] = 0;

    if (len == 1) {

        write_char((x - 1)+(y * 30), 10); // zero

    } else if (len == 2 && conv_array[0] == '-') {

        write_char((x - 1)+(y * 30), 0x49); // minus

        write_char((x)+(y * 30), 10); // zero

    } else {

        write_ascii_string(x, y, conv_array);

    }

    x += len - 1;

    write_char((x++)+(y * 30), 65); // decimal point

    write_ascii_char((x++)+(y * 30), rest); // after dot

}

/**

 * Write a signed <number> at <x>/<y> to MAX7456 display memory as /10th of value

 * <length> represents the length to rightbound the number

 * <pad> = 1 will cause blank spaced to be filled up with zeros e.g. 007 instead of   7

 */

void write_ndigit_number_s_10th(uint8_t x, uint8_t y, int16_t number, int16_t length, uint8_t pad) {

    if (number >= int_pow(10, length)) {

        number = int_pow(10, length) - 1;

    }

    itoa(number, conv_array, 10);

    uint8_t len = strlen(conv_array);

    for (uint8_t i = 0; i < length - len; i++) {

        if (pad) write_char((x++)+(y * 30), 10); //  zero

        else write_char((x++)+(y * 30), 0); // blank

    }

    char rest = conv_array[len - 1];

    conv_array[len - 1] = 0;

    if (len == 1) {

        write_char((x - 1)+(y * 30), 10); // zero

    } else if (len == 2 && conv_array[0] == '-') {

        write_char((x - 1)+(y * 30), 0x49); // minus

        write_char((x)+(y * 30), 10); // zero

    } else {

        write_ascii_string(x, y, conv_array);

    }

    x += len - 1;

    write_char((x++)+(y * 30), 65); // decimal point

    write_ascii_char((x++)+(y * 30), rest); // after dot

}

/**

 *  write <seconds> as human readable time at <x>/<y> to MAX7456 display mem

 */

void write_time(uint8_t x, uint8_t y, uint16_t seconds) {

    uint16_t min = seconds / 60;

    seconds -= min * 60;

    write_ndigit_number_u(x, y, min, 3, 0);

    write_char_xy(x + 3, y, 68);

    write_ndigit_number_u(x + 4, y, seconds, 2, 1);

}

/**

 * wirte a <position> at <x>/<y> assuming it is a gps position for long-/latitude

 */

void write_gps_pos(uint8_t x, uint8_t y, int32_t position) {

    if (position < 0) {

        position ^= ~0;

        position++;

        write_char_xy(x++, y, 0x49); // minus

    } else {

        write_char_xy(x++, y, 0); // clear ('+' would be nice, maybe later)

    }

    write_ndigit_number_u(x, y, (uint16_t)(position / (int32_t)10000000), 3, 1);

    write_char_xy(x + 3, y, 65); // decimal point

    position = position - ((position / (int32_t)10000000) * (int32_t)10000000);

    write_ndigit_number_u(x + 4, y, (uint16_t)(position / (int32_t)1000), 4, 1);

    position = position - ((uint16_t)(position / (int32_t)1000) * (int32_t)1000);

    write_ndigit_number_u(x + 8, y, (uint16_t)position, 3, 1);

    write_char_xy(x + 11, y, 0xD0); // degree symbol

}

#endif