//****************************************************************************//// DOWNLOAD.C - Automates the download of code into the flash on the//              Cirrus Logic EDB7XXX boards.//// Copyright (c) 1999 Cirrus Logic, Inc.//// Adapted for Linux by Red Hat, Inc.//   Renamed 'dl_edb7xxx' to indicate support for all Cirrus Logic eval boards.////****************************************************************************#include <stdio.h>#include "bootcode.h"#ifndef _WIN32#define CHAR_READY_IS_RELIABLE#endif#define DEFAULT_PORT "/dev/ttyS0"extern char _ReceiveChar(long);extern void _SendChar(long, char);extern void _SetBaud(long, long);extern int  _CharRead(long port);extern void _WaitForOutputReady(long port);extern long _OpenPort(char *);extern int  _CharReady(long port);#define ReceiveChar _ReceiveChar#define SendChar    _SendChar#define SetBaud     _SetBaud#define CharRead    _CharRead#define WaitForOutputEmpty _WaitForOutputEmpty#define OpenPort    _OpenPort#define CharReady   _CharReady//****************************************************************************//// WaitFor waits until a specific character is read from the comm port.////****************************************************************************voidWaitFor(long lPort, char cWaitChar){    char cChar;    //    // Wait until we read a specific character from the comm port.    //    while(1)    {        //        // Read a character.        //        cChar = ReceiveChar(lPort);        //        // Stop waiting if we received the character.        //        if(cChar == cWaitChar)        {            break;        }    }}//****************************************************************************//// This program waits for the '<' character from the boot ROM, sends the boot// code, waits for the '>' from the boot ROM, waits for the '?' from the boot// code, changes the serial port rate (preferably to 115200), downloads the// user data file, and then prints out progress status as the boot code writes// the user data file to the flash.////****************************************************************************voidmain(int argc, char *argv[]){    long lPort;    long lRate = 38400;    long lFileSize, lIdx;    char cChar, cFirstChar, *pcFile, cRateChar;    FILE *pFile;    //    // Make sure that a filename was specified.    //    if(argc < 2)    {        fprintf(stderr, "Usage: %s <filename> {<baud rate> {<comm port>}}\n", argv[0]);        return;    }    //    // If a baud rate was specified, then read it and make sure it is valid.    //    if(argc > 2)    {        lRate = atoi(argv[2]);        if((lRate != 9600) && (lRate != 19200) && (lRate != 28800) &&           (lRate != 38400) && (lRate != 57600) && (lRate != 115200))        {            fprintf(stderr, "Invalid baud rate: %d(%s).\n", lRate, argv[2]);            return;        }    }    //    // If a comm port was specified, then read it and make sure it is valid.    //    if(argc > 3)    {        lPort = OpenPort(argv[3]);        if (lPort < 0)        {            fprintf(stderr, "Can't open port: %s\n", argv[3]);            return;        }    } else     {        lPort = OpenPort(DEFAULT_PORT);        if (lPort < 0)        {            fprintf(stderr, "Can't open port: %s\n", DEFAULT_PORT);            return;        }    }    //    // Open the file to be downloaded.    //    pFile = fopen(argv[1], "rb");    if(!pFile)    {        fprintf(stderr, "Could not open file '%s'.\n", argv[1]);        return;    }    //    // Get the size of the file.    //    fseek(pFile, 0, SEEK_END);    lFileSize = ftell(pFile);    fseek(pFile, 0, SEEK_SET);    //    // Allocate memory to hold the file contents.    //    pcFile = (char *)malloc(lFileSize);    if(!pcFile)    {        fprintf(stderr, "Failed to allocate memory for the file.\n");        return;    }    //    // Read the contents of the file into memory.    //    if(fread(pcFile, 1, lFileSize, pFile) != lFileSize)    {        fprintf(stderr, "Failed to read file '%s'.\n", argv[1]);        return;    }    //    // Close the file.    //    fclose(pFile);    //    // Get the baud rate divisor for the given baud rate.    //    SetBaud(lPort, 9600);    switch(lRate)    {        case 9600:        {            cRateChar = '0';            break;        }        case 19200:        {            cRateChar = '1';            break;        }        case 28800:        {            cRateChar = '2';            break;        }        case 38400:        {            cRateChar = '3';            break;        }        case 57600:        {            cRateChar = '4';            break;        }        case 115200:        {            cRateChar = '5';            break;        }    }    //    // Empty out the input queue.    //#ifdef CHAR_READY_IS_RELIABLE    while(CharReady(lPort))    {        cChar = ReceiveChar(lPort);    }#endif    //    // Tell the user to reset the board.    //    fprintf(stderr, "Waiting for the board to wakeup...");    //    // Wait until we read a '<' from the comm port.    //    WaitFor(lPort, '<');    //    // Tell the user that we are downloading the boot code.    //    fprintf(stderr, "\nDownloading boot code...(  0%%)");    //    // Write the boot code to the comm port.    //    for(lIdx = 0; lIdx < 2048; lIdx++)    {        //        // Write this character.        //        SendChar(lPort, pcBoot[lIdx]);        //        // Periodically print out our progress.        //        if((lIdx & 127) == 127)        {            fprintf(stderr, "\b\b\b\b\b%3d%%)", ((lIdx + 1) * 100) / 2048);        }    }                //    // Wait until we read a '>' from the comm port.    //    WaitFor(lPort, '>');    //    // Wait until we read a '?' from the comm port.    //    WaitFor(lPort, '?');    //    // Tell the boot code to switch to the desired baud rate.    //    SendChar(lPort, 'B');    SendChar(lPort, cRateChar);    //    // Wait until the output buffer is empty.    //    WaitForOutputEmpty();    //    // Switch our baud rate to the desired rate.    //    SetBaud(lPort, lRate);    //    // Send a '-' character until we receive back a '?' character.    //    while(1)    {        //        // Send a '-' character.        //        SendChar(lPort, '-');        //        // Wait a little bit.        //        for(lIdx = 0; lIdx < 1024 * 1024; lIdx++)        {        }        //        // See if there is a character waiting to be read.        //#ifdef CHAR_READY_IS_RELIABLE        if(CharReady(lPort))#else        if (1)#endif        {            //            // Read the character.            //            cChar = ReceiveChar(lPort);            //            // Quit waiting if this is a '?'.            //            if(cChar == '?')            {                break;            }        }    }    //    // Empty out the input queue.    //#ifdef CHAR_READY_IS_RELIABLE    while(CharReady(lPort))    {        cChar = ReceiveChar(lPort);    }#endif    //    // Send the program flash command.    //    SendChar(lPort, 'F');    //    // We always program the flash at location 0.    //    SendChar(lPort, 0);    SendChar(lPort, 0);    SendChar(lPort, 0);    SendChar(lPort, 0);    //    // Send the length of the data file.    //    SendChar(lPort, (char)(lFileSize & 0xFF));    SendChar(lPort, (char)((lFileSize >> 8) & 0xFF));    SendChar(lPort, (char)((lFileSize >> 16) & 0xFF));    SendChar(lPort, (char)((lFileSize >> 24) & 0xFF));    //    // Tell the user that we are downloading the file data.    //    fprintf(stderr, "\nDownloading file data...(  0%%)");    //    // Send the actual data in the file.    //    for(lIdx = 0; lIdx < lFileSize; lIdx++)    {        //        // Send this byte.        //        SendChar(lPort, pcFile[lIdx]);        //        // Periodically print out our progress.        //        if((lIdx & 127) == 127)        {            fprintf(stderr, "\b\b\b\b\b%3d%%)", ((lIdx + 1) * 100) / lFileSize);        }    }    //    // Tell the user that we are erasing the flash.    //    fprintf(stderr, "\nErasing the flash...(  0%%)");    //    // Wait until the flash has been erased.    //    cFirstChar = cChar = ReceiveChar(lPort);    while(cChar != '1')    {        //        // Print out our progress.        //        fprintf(stderr, "\b\b\b\b\b%3d%%)",               ((cFirstChar - cChar + 1) * 100) / (cFirstChar - '0'));        fprintf(stderr, "%c\n", cChar);        //        // Read a character from the boot code.        //        cChar = ReceiveChar(lPort);    }    //    // Tell the user that we are programming the flash.    //    fprintf(stderr, "\nProgramming the flash...(  0%%)");    //    // Wait until the flash has been programmed.    //    lIdx = 0;    while(1)    {        //        // Read a character from the boot code.        //        cChar = ReceiveChar(lPort);        //        // If the character is a '?', then we are done.        //        if(cChar == '?')        {            break;        }        //        // Print out our progress.        //        fprintf(stderr, "\b\b\b\b\b%3d%%)",               (++lIdx * 100) / ((lFileSize + 1023) / 1024));    }    //    // Tell the user we are done.    //    fprintf(stderr, "\nSuccessfully downloaded '%s'.\n", argv[1]);}