OpenCores
URL https://opencores.org/ocsvn/s6soc/s6soc/trunk

Subversion Repositories s6soc

[/] [s6soc/] [trunk/] [sw/] [zipos/] [doorbell.c] - Diff between revs 22 and 27

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 22 Rev 27
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
//
//
// Filename:    doorbell.c
// Filename:    doorbell.c
//
//
// Project:     CMod S6 System on a Chip, ZipCPU demonstration project
// Project:     CMod S6 System on a Chip, ZipCPU demonstration project
//
//
// Purpose:     
// Purpose:     
//
//
// Creator:     Dan Gisselquist, Ph.D.
// Creator:     Dan Gisselquist, Ph.D.
//              Gisselquist Technology, LLC
//              Gisselquist Technology, LLC
//
//
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
//
//
// Copyright (C) 2015-2016, Gisselquist Technology, LLC
// Copyright (C) 2015-2016, Gisselquist Technology, LLC
//
//
// This program is free software (firmware): you can redistribute it and/or
// This program is free software (firmware): you can redistribute it and/or
// modify it under the terms of  the GNU General Public License as published
// 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
// by the Free Software Foundation, either version 3 of the License, or (at
// your option) any later version.
// your option) any later version.
//
//
// This program is distributed in the hope that it will be useful, but WITHOUT
// This program is distributed in the hope that it will be useful, but WITHOUT
// ANY WARRANTY; without even the implied warranty of MERCHANTIBILITY or
// ANY WARRANTY; without even the implied warranty of MERCHANTIBILITY or
// FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
// FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
// for more details.
// for more details.
//
//
// You should have received a copy of the GNU General Public License along
// You should have received a copy of the GNU General Public License along
// with this program.  (It's in the $(ROOT)/doc directory, run make with no
// with this program.  (It's in the $(ROOT)/doc directory, run make with no
// target there if the PDF file isn't present.)  If not, see
// target there if the PDF file isn't present.)  If not, see
// <http://www.gnu.org/licenses/> for a copy.
// <http://www.gnu.org/licenses/> for a copy.
//
//
// License:     GPL, v3, as defined and found on www.gnu.org,
// License:     GPL, v3, as defined and found on www.gnu.org,
//              http://www.gnu.org/licenses/gpl.html
//              http://www.gnu.org/licenses/gpl.html
//
//
//
//
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
//
//
//
//
#include "zipsys.h"
#include "zipsys.h"
#include "board.h"
#include "board.h"
#include "ksched.h"
#include "ksched.h"
#include "kfildes.h"
#include "kfildes.h"
#include "taskp.h"
#include "taskp.h"
#include "syspipe.h"
#include "syspipe.h"
#include "ktraps.h"
#include "ktraps.h"
#include "errno.h"
#include "errno.h"
#include "swint.h"
#include "swint.h"
 
 
#include "../dev/display.h"
#include "../dev/display.h"
#include "../dev/rtcsim.h"
#include "../dev/rtcsim.h"
 
 
/* Our system will need some pipes to handle ... life.  How about these:
/* Our system will need some pipes to handle ... life.  How about these:
 *
 *
 *      rxpipe  - read()s from this pipe read from the UART
 *      rxpipe  - read()s from this pipe read from the UART
 *                      Interrupt fed
 *                      Interrupt fed
 *      txpipe  - write()s to this pipe write to the UART
 *      txpipe  - write()s to this pipe write to the UART
 *                      Interrupt consumed
 *                      Interrupt consumed
 *      keypipe - read()s from this pipe return values read by the keypad
 *      keypipe - read()s from this pipe return values read by the keypad
 *      lcdpipe - write()s to this pipe write to the LCD display SPI port
 *      lcdpipe - write()s to this pipe write to the LCD display SPI port
 *      pwmpipe - write()s to this pipe will send values to the audio port
 *      pwmpipe - write()s to this pipe will send values to the audio port
 *                      Interrupt consumed
 *                      Interrupt consumed
 *      cmdpipe - written to by the user command task, read by the display task
 *      cmdpipe - written to by the user command task, read by the display task
 *              used to communicate menu status
 *              used to communicate menu status
 *
 *
 */
 */
 
 
/* We'll need some tasks as well:
/* We'll need some tasks as well:
 *      User command task
 *      User command task
 *              Handles user interaction
 *              Handles user interaction
 *                      Reads from pipe--either the keypad or the UARTRX pipe
 *                      Reads from pipe--either the keypad or the UARTRX pipe
 *                      (Might be two such tasks in the system, one for each.)
 *                      (Might be two such tasks in the system, one for each.)
 *              Sets clock upon request
 *              Sets clock upon request
 *              Reads from a pipe (rxpipe or keypipe), Writes to the txpipe pipe
 *              Reads from a pipe (rxpipe or keypipe), Writes to the txpipe pipe
 *      Doorbell task
 *      Doorbell task
 *              Maintains system time on the clock      : TIME: HH:MM:SS
 *              Maintains system time on the clock      : TIME: HH:MM:SS
 *              Maintains system status on display      : Light is (dis/en)abled
 *              Maintains system status on display      : Light is (dis/en)abled
 *              Transitions when the doorbell is rung to: (fixed time line)
 *              Transitions when the doorbell is rung to: (fixed time line)
 *                                                      : DOORBELL!!
 *                                                      : DOORBELL!!
 *              When the doorbell is clear, returns to the original task.
 *              When the doorbell is clear, returns to the original task.
 *              ---
 *              ---
 *              Waits on events, writes to the lcdpipe and pwmpipe.
 *              Waits on events, writes to the lcdpipe and pwmpipe.
 *              Reads from a command pipe, so that it can handle any user menu's
 *              Reads from a command pipe, so that it can handle any user menu's
 *                      Command pipe.  This, though, is tricky.  It requires
 *                      Command pipe.  This, though, is tricky.  It requires
 *                      a task that can be interrupted by either an event or a
 *                      a task that can be interrupted by either an event or a
 *                      pipe.  Blocking is going to be more tricky ...
 *                      pipe.  Blocking is going to be more tricky ...
 *      Keypad task
 *      Keypad task
 *              Normally, you might think this should be an interrupt task.
 *              Normally, you might think this should be an interrupt task.
 *              But, it needs state in order to have timeouts and to debounce
 *              But, it needs state in order to have timeouts and to debounce
 *              the input pin.  So ... let's leave this as a task.
 *              the input pin.  So ... let's leave this as a task.
 *              ---
 *              ---
 *              Waits on events(keypad/timer), writes to the keypipe
 *              Waits on events(keypad/timer), writes to the keypipe
 *      Display task
 *      Display task
 *              The display does *not* need to be written to at an interrupt
 *              The display does *not* need to be written to at an interrupt
 *              level.  It really needs to be written to at a task level, so
 *              level.  It really needs to be written to at a task level, so
 *              let's make a display task.
 *              let's make a display task.
 *              ---
 *              ---
 *              Reads from the lcdpipe
 *              Reads from the lcdpipe
 *      Real-time Clock Task
 *      Real-time Clock Task
 *              Gets called once per second to update the real-time clock
 *              Gets called once per second to update the real-time clock
 *              and to post those updates as an event to other tasks that might
 *              and to post those updates as an event to other tasks that might
 *              be interested in it.
 *              be interested in it.
 *              ---
 *              ---
 *              Waits on system tasks, uses two semaphores
 *              Waits on system tasks, uses two semaphores
 */
 */
 
 
 
 
/*
/*
 * Read the keypad, write the results to an output pipe
 * Read the keypad, write the results to an output pipe
 */
 */
// #define      KEYPAD_TASK     keypad_task_id
// #define      KEYPAD_TASK     keypad_task_id
/*
/*
 * Maintain a realtime clock
 * Maintain a realtime clock
 */
 */
#define RTCCLOCK_TASK   rtccclock_task_id
#define RTCCLOCK_TASK   rtccclock_task_id
/*
/*
 * Read from an incoming pipe, write results to the SPI port controlling the
 * Read from an incoming pipe, write results to the SPI port controlling the
 * display.
 * display.
 */
 */
#define DISPLAY_TASK    display_task_id
#define DISPLAY_TASK    display_task_id
 
 
/*
/*
 * Wait for a button press, and then based upon the clock set a light
 * Wait for a button press, and then based upon the clock set a light
 */
 */
#define DOORBELL_TASK   doorbell_task_id
#define DOORBELL_TASK   doorbell_task_id
 
 
/*
/*
 * Interract with any user commands, such as setting the clock, setting
 * Interract with any user commands, such as setting the clock, setting
 * nighttime (when the lights turn on) or setting daytime when only the
 * nighttime (when the lights turn on) or setting daytime when only the
 * doorbell rings.
 * doorbell rings.
 */
 */
// #define      COMMAND_TASK    command_task_id
// #define      COMMAND_TASK    command_task_id
#define LAST_TASK       last_task_id
#define LAST_TASK       last_task_id
 
 
typedef enum    {
typedef enum    {
#ifdef  RTCCLOCK_TASK
#ifdef  RTCCLOCK_TASK
        RTCCLOCK_TASK,
        RTCCLOCK_TASK,
#endif
#endif
#ifdef  DOORBELL_TASK
#ifdef  DOORBELL_TASK
#ifdef  DISPLAY_TASK
#ifdef  DISPLAY_TASK
        DOORBELL_TASK, DISPLAY_TASK,
        DOORBELL_TASK, DISPLAY_TASK,
#endif
#endif
#endif
#endif
#ifdef  KEYPAD_TASK
#ifdef  KEYPAD_TASK
        KEYPAD_TASK,
        KEYPAD_TASK,
#endif
#endif
#ifdef  COMMAND_TASK
#ifdef  COMMAND_TASK
        COMMAND_TASK,
        COMMAND_TASK,
#endif
#endif
        LAST_TASK
        LAST_TASK
} TASKNAME;
} TASKNAME;
 
 
 
 
void    rtctask(void),
void    rtctask(void),
        doorbell_task(void),
        doorbell_task(void),
        display_task(void),
        display_task(void),
        keypad_task(void),
        keypad_task(void),
        command_task(void);
        command_task(void);
        // idle_task ... is accomplished within the kernel
        // idle_task ... is accomplished within the kernel
extern  void    restore_context(int *), save_context(int *);
extern  void    restore_context(int *), save_context(int *);
extern  SYSPIPE *rxpipe, *txpipe, *pwmpipe, *lcdpipe;
extern  SYSPIPE *rxpipe, *txpipe, *pwmpipe, *lcdpipe;
SYSPIPE *midpipe;
SYSPIPE *midpipe;
extern  KDEVICE *pipedev;
extern  KDEVICE *pipedev;
 
 
int     kntasks(void) {
int     kntasks(void) {
        return LAST_TASK;
        return LAST_TASK;
} void  kinit(TASKP *tasklist) {
} void  kinit(TASKP *tasklist) {
#ifdef  RTCCLOCK_TASK
#ifdef  RTCCLOCK_TASK
        //
        //
        tasklist[RTCCLOCK_TASK]    = new_task(16, rtctask);
        tasklist[RTCCLOCK_TASK]    = new_task(16, rtctask);
#endif
#endif
 
 
#ifdef  DOORBELL_TASK
#ifdef  DOORBELL_TASK
#ifdef  DISPLAY_TASK
#ifdef  DISPLAY_TASK
        //
        // 13 + 10 +9(uwrite)+4(uarthex)+2(uartstr)+2(uartchr)
        tasklist[DOORBELL_TASK]    = new_task(64, doorbell_task);
        tasklist[DOORBELL_TASK]    = new_task(64, doorbell_task);
        tasklist[DOORBELL_TASK]->fd[FILENO_STDOUT] = sys_malloc(sizeof(KFILDES));
        tasklist[DOORBELL_TASK]->fd[FILENO_STDOUT] = sys_malloc(sizeof(KFILDES));
                tasklist[DOORBELL_TASK]->fd[FILENO_STDOUT]->id = (int)lcdpipe;
                tasklist[DOORBELL_TASK]->fd[FILENO_STDOUT]->id = (int)lcdpipe;
                tasklist[DOORBELL_TASK]->fd[FILENO_STDOUT]->dev= pipedev;
                tasklist[DOORBELL_TASK]->fd[FILENO_STDOUT]->dev= pipedev;
 
        tasklist[DOORBELL_TASK]->fd[FILENO_STDERR] = sys_malloc(sizeof(KFILDES));
 
                tasklist[DOORBELL_TASK]->fd[FILENO_STDERR]->id = (int)txpipe;
 
                tasklist[DOORBELL_TASK]->fd[FILENO_STDERR]->dev= pipedev;
        tasklist[DOORBELL_TASK]->fd[FILENO_AUX] = sys_malloc(sizeof(KFILDES));
        tasklist[DOORBELL_TASK]->fd[FILENO_AUX] = sys_malloc(sizeof(KFILDES));
                tasklist[DOORBELL_TASK]->fd[FILENO_AUX]->id = (int)pwmpipe;
                tasklist[DOORBELL_TASK]->fd[FILENO_AUX]->id = (int)pwmpipe;
                tasklist[DOORBELL_TASK]->fd[FILENO_AUX]->dev= pipedev;
                tasklist[DOORBELL_TASK]->fd[FILENO_AUX]->dev= pipedev;
 
 
        //
        //
        tasklist[DISPLAY_TASK] = new_task(32, display_task);
        tasklist[DISPLAY_TASK] = new_task(32, display_task);
        tasklist[DISPLAY_TASK]->fd[FILENO_STDIN] = sys_malloc(sizeof(KFILDES));
        tasklist[DISPLAY_TASK]->fd[FILENO_STDIN] = sys_malloc(sizeof(KFILDES));
                tasklist[DISPLAY_TASK]->fd[FILENO_STDIN]->id = (int)lcdpipe;
                tasklist[DISPLAY_TASK]->fd[FILENO_STDIN]->id = (int)lcdpipe;
                tasklist[DISPLAY_TASK]->fd[FILENO_STDIN]->dev= pipedev;
                tasklist[DISPLAY_TASK]->fd[FILENO_STDIN]->dev= pipedev;
#endif
#endif
#endif
#endif
 
 
 
 
#ifdef  KEYPAD_TASK
#ifdef  KEYPAD_TASK
        tasklist[KEYPAD_TASK]    = new_task(16, keypad_task);
        tasklist[KEYPAD_TASK]    = new_task(16, keypad_task);
        tasklist[KEYPAD_TASK]->fd[FILENO_STDOUT] = sys_malloc(sizeof(KFILDES));
        tasklist[KEYPAD_TASK]->fd[FILENO_STDOUT] = sys_malloc(sizeof(KFILDES));
                tasklist[NMEA_TASK]->fd[FILENO_STDOUT]->id = (int)keypipe;
                tasklist[NMEA_TASK]->fd[FILENO_STDOUT]->id = (int)keypipe;
                tasklist[NMEA_TASK]->fd[FILENO_STDOUT]->dev= pipedev;
                tasklist[NMEA_TASK]->fd[FILENO_STDOUT]->dev= pipedev;
#endif
#endif
}
}
 
 
#ifdef DOORBELL_TASK
#ifdef DOORBELL_TASK
// #define      HALF_HOUR_S     1800    // Seconds per half hour
// #define      HALF_HOUR_S     1800    // Seconds per half hour
// #define      HALF_HOUR_S     180     // Seconds per three minutes--for test
// #define      HALF_HOUR_S     180     // Seconds per three minutes--for test
#define HALF_HOUR_S     30      // 3 Mins is to long, here's 3 seconds
#define HALF_HOUR_S     30      // 3 Mins is to long, here's 3 seconds
 
 
#include "../dev/samples.c"
#include "../dev/samples.c"
 
 
const unsigned  dawn = 0x060000, dusk = 0x180000;
const unsigned  dawn = 0x060000, dusk = 0x180000;
 
int     nwritten = 0, nread = 0, nstarts = 0;
 
 
void    shownow(unsigned now) { // Uses 10 stack slots + 8 for write()
void    shownow(unsigned now) { // Uses 10 stack slots + 8 for write()
        char    dmsg[9];
        char    dmsg[9];
        dmsg[0] = PACK(0x1b,'[','j','T');
        dmsg[0] = PACK(0x1b,'[','j','T');
        dmsg[1] = PACK('i','m','e',':');
        dmsg[1] = PACK('i','m','e',':');
        dmsg[2] = PACK(' ',((now>>20)&0x3)+'0',
        dmsg[2] = PACK(' ',((now>>20)&0x3)+'0',
                        ((now>>16)&0xf)+'0',':');
                        ((now>>16)&0xf)+'0',':');
        dmsg[3] = PACK( ((now>>12)&0xf)+'0',
        dmsg[3] = PACK( ((now>>12)&0xf)+'0',
                        ((now>> 8)&0xf)+'0',
                        ((now>> 8)&0xf)+'0',
                        ':',
                        ':',
                        ((now>> 4)&0xf)+'0');
                        ((now>> 4)&0xf)+'0');
        dmsg[4] = PACK( ((now    )&0xf)+'0',
        dmsg[4] = PACK( ((now    )&0xf)+'0',
                        0x1b, '[', '1');
                        0x1b, '[', '1');
        dmsg[5] = PACK(';','0','H',' ');
        dmsg[5] = PACK(';','0','H',' ');
        if ((now < dawn)||(now > dusk)) {
        if ((now < dawn)||(now > dusk)) {
                dmsg[6] = PACK('N','i','g','h');
                dmsg[6] = PACK('N','i','g','h');
                dmsg[7] = PACK('t',' ','t','i');
                dmsg[7] = PACK('t',' ','t','i');
                dmsg[8] = PACK('m','e',0,0);
                dmsg[8] = PACK('m','e',0,0);
        } else {
        } else {
                dmsg[6] = PACK('D','a','y','l');
                dmsg[6] = PACK('D','a','y','l');
                dmsg[7] = PACK('i','g','h','t');
                dmsg[7] = PACK('i','g','h','t');
                dmsg[8] = PACK('!',' ',0,0);
                dmsg[8] = PACK('!',' ',0,0);
        } write(FILENO_STDOUT, dmsg, 9);
        } write(FILENO_STDOUT, dmsg, 9);
}
}
 
 
void    showbell(unsigned now) {        // Uses 10 stack slots + 8 for write()
void    showbell(unsigned now) {        // Uses 10 stack slots + 8 for write()
        char    dmsg[9];
        char    dmsg[9];
        dmsg[0] = PACK(0x1b,'[','j','T');
        dmsg[0] = PACK(0x1b,'[','j','T');
        dmsg[1] = PACK('i','m','e',':');
        dmsg[1] = PACK('i','m','e',':');
        dmsg[2] = PACK(' ',((now>>20)&0x3)+'0',
        dmsg[2] = PACK(' ',((now>>20)&0x3)+'0',
                        ((now>>16)&0xf)+'0',':');
                        ((now>>16)&0xf)+'0',':');
        dmsg[3] = PACK( ((now>>12)&0xf)+'0',
        dmsg[3] = PACK( ((now>>12)&0xf)+'0',
                        ((now>> 8)&0xf)+'0',
                        ((now>> 8)&0xf)+'0',
                        ':',
                        ':',
                        ((now>> 4)&0xf)+'0');
                        ((now>> 4)&0xf)+'0');
        dmsg[4] = PACK( ((now    )&0xf)+'0',
        dmsg[4] = PACK( ((now    )&0xf)+'0',
                        0x1b, '[', '1');
                        0x1b, '[', '1');
        dmsg[5] = PACK(';','0','H',' ');
        dmsg[5] = PACK(';','0','H',' ');
        dmsg[6] = PACK('D','o','o','r');
        dmsg[6] = PACK('D','o','o','r');
        dmsg[7] = PACK('b','e','l','l');
        dmsg[7] = PACK('b','e','l','l');
        dmsg[8] = PACK('!',' ',0,0);
        dmsg[8] = PACK('!',' ',0,0);
        write(FILENO_STDOUT, dmsg, 9);
        write(FILENO_STDOUT, dmsg, 9);
}
}
 
 
void    belllight(unsigned now) {
void    belllight(unsigned now) {
        IOSPACE *sys = (IOSPACE *)IOADDR;
        IOSPACE *sys = (IOSPACE *)IOADDR;
        if ((now < dawn)||(now > dusk))
        if ((now < dawn)||(now > dusk))
                sys->io_spio = 0x088; // Turn our light on
                sys->io_spio = 0x088; // Turn our light on
        else
        else
                sys->io_spio = 0x80; // Turn light off
                sys->io_spio = 0x80; // Turn light off
}
}
 
 
 
void    uartchr(char v) {
 
        if (write(FILENO_STDERR, &v, 1) != 1)
 
                write(FILENO_STDERR, "APPLE-PANIC", 11);
 
}
 
 
 
void    uartstr(const char *str) {
 
        int     cnt=0;
 
        while(str[cnt])
 
                cnt++;
 
        if (cnt != write(FILENO_STDERR, str, cnt))
 
                write(FILENO_STDERR, "PIPE-PANIC", 10);
 
}
 
 
 
void    uarthex(int num) {
 
        for(int ds=28; ds>=0; ds-=4) {
 
                int ch;
 
                ch = (num>>ds)&0x0f;
 
                if (ch >= 10)
 
                        ch = 'A'+ch-10;
 
                else
 
                        ch += '0';
 
                uartchr(ch);
 
        } uartstr("\r\n\0");
 
}
 
 
void    doorbell_task(void) {
void    doorbell_task(void) {
        // Controls LED 0x08
        // Controls LED 0x08
 
 
        // Start by initializing the display to GT Gisselquist\nTechnology
        // Start by initializing the display to GT Gisselquist\nTechnology
        // write(KFD_STDOUT, disp_build_backslash,sizeof(disp_build_backslash));
        // write(KFD_STDOUT, disp_build_backslash,sizeof(disp_build_backslash));
        // write(KFD_STDOUT, disp_build_gtlogo, sizeof(disp_build_gtlogo));
        // write(KFD_STDOUT, disp_build_gtlogo, sizeof(disp_build_gtlogo));
        // write(KFD_STDOUT, disp_reset_data, sizeof(disp_reset_data));
        // write(KFD_STDOUT, disp_reset_data, sizeof(disp_reset_data));
        // write(KFD_STDOUT, disp_gtech_data, sizeof(disp_gtech_data));
        // write(KFD_STDOUT, disp_gtech_data, sizeof(disp_gtech_data));
 
 
        IOSPACE *sys = (IOSPACE *)IOADDR;
        IOSPACE *sys = (IOSPACE *)IOADDR;
 
 
        while(1) {
        while(1) {
 
                nread = nwritten = 0;
                int     event;
                int     event;
                // Initial state: doorbell is not ringing.  In this state, we
                // Initial state: doorbell is not ringing.  In this state, we
                // can wait forever for an event
                // can wait forever for an event
                sys->io_spio = 0x080; // Turn our light off
                sys->io_spio = 0x080; // Turn our light off
                event = wait(INT_BUTTON|SWINT_PPS,-1);
                event = wait(INT_BUTTON|SWINT_PPS,-1);
                unsigned when = rtcclock;
                unsigned when = rtcclock;
                if (event & INT_BUTTON)
                if (event & INT_BUTTON)
                        showbell(when);
                        showbell(when);
                else if (event & SWINT_PPS)
                else if (event & SWINT_PPS)
                        shownow(when);
                        shownow(when);
 
 
                while(event & INT_BUTTON) {
                while(event & INT_BUTTON) {
                        // Next state, the button has been pressed, the
                        // Next state, the button has been pressed, the
                        // doorbell is ringing
                        // doorbell is ringing
 
 
                        // Seconds records the number of seconds since the
                        // Seconds records the number of seconds since the
                        // button was last pressed.
                        // button was last pressed.
                        int     seconds = 0;
                        int     seconds = 0;
 
 
                        // Check time: should we turn our light on or not?
                        // Check time: should we turn our light on or not?
                        belllight(rtcclock);
                        belllight(rtcclock);
                        const int *sptr = sound_data;
                        const int *sptr = sound_data;
                        sys->io_uart = 'N';
                        // uartchr('N');
                        while(sptr < &sound_data[NSAMPLE_WORDS]) {
                        while(sptr < &sound_data[NSAMPLE_WORDS]) {
                                int     len = &sound_data[NSAMPLE_WORDS]-sptr;
                                int     len = &sound_data[NSAMPLE_WORDS]-sptr;
                                if (len > 256)
                                if (len > 256)
                                        len = 256;
                                        len = 256;
 
 
                                // We stall here, if the audio FIFO is full
                                /*
 
                                while(len > 64) {
 
                                        write(FILENO_AUX, sptr, 64);
 
                                        sptr += 64;
 
                                        len -= 64;
 
                                }*/
 
 
 
                                // We will stall here, if the audio FIFO is full
                                write(FILENO_AUX, sptr, len);
                                write(FILENO_AUX, sptr, len);
                                sptr += len;
                                sptr += len;
 
                                nwritten += len;
 
 
                                // If the user presses the button more than
                                // If the user presses the button more than
                                // once, we start the sound over as well as
                                // once, we start the sound over as well as
                                // our light counter.
                                // our light counter.
                                event = wait(INT_BUTTON|SWINT_PPS, 0);
                                event = wait(INT_BUTTON|SWINT_PPS, 0);
                                if (event&INT_BUTTON) {
                                if (event&INT_BUTTON) {
                                        if (sptr > &sound_data[2048]) {
                                        if (sptr > &sound_data[2048]) {
                                                sptr = sound_data;
                                                sptr = sound_data;
                                                seconds = 0;
                                                seconds = 0;
                                                when = (volatile unsigned)rtcclock;
                                                when = (volatile unsigned)rtcclock;
                                                showbell(when);
                                                showbell(when);
                                        }
                                        }
                                } else if (event&SWINT_PPS) {
                                } else if (event&SWINT_PPS) {
                                        seconds++;
                                        seconds++;
                                        belllight(rtcclock);
                                        belllight(rtcclock);
                                        showbell(when);
                                        showbell(when);
                                }
                                }
                        }
                        }
 
 
                        sys->io_uart = 'D';
                        uartchr('D');
 
 
                        // Next state: the doorbell is no longer ringing, but
                        // Next state: the doorbell is no longer ringing, but
                        // we have yet to return to normal--the light is still
                        // we have yet to return to normal--the light is still
                        // on.
                        // on.
                        while((seconds < HALF_HOUR_S)&&
                        while((seconds < HALF_HOUR_S)&&
                                (((event=wait(INT_BUTTON|SWINT_PPS,-1))&INT_BUTTON)==0)) {
                                (((event=wait(INT_BUTTON|SWINT_PPS,-1))&INT_BUTTON)==0)) {
                                seconds++;
                                seconds++;
                                belllight(rtcclock);
                                belllight(rtcclock);
                                showbell(when);
                                showbell(when);
                        }
                        }
                        if (event&INT_BUTTON) {
                        if (event&INT_BUTTON) {
                                when = (volatile unsigned)rtcclock;
                                when = (volatile unsigned)rtcclock;
                                showbell(when);
                                showbell(when);
                                sys->io_uart = 'S';
                                uartchr('B');
                        }
                        }
                }
                }
 
 
 
                // uartstr("\r\n");
 
                uartstr("\r\nNWritten: "); uarthex(nwritten);
 
                uartstr("NRead   : "); uarthex(nread);
 
                uartstr("NStarts : "); uarthex(nstarts);
 
                nwritten = nread = nstarts = 0;
        }
        }
}
}
#endif
#endif
 
 
 
 
 No newline at end of file
 No newline at end of file
 
 
 
/*
 
 
 
 
 
NWritten: 000018E7
 
NRead   : 000018E7
 
NStarts : 00000001
 
 
 
 
 
*/
 
 
 No newline at end of file
 No newline at end of file

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.