Subversion Repositories openrisc

//==========================================================================

//

//        io.c

//

//        Linux I/O support for Cirrus Logic EDB7xxx eval board tools

//

//==========================================================================

// ####ECOSGPLCOPYRIGHTBEGIN####                                            

// -------------------------------------------                              

// This file is part of eCos, the Embedded Configurable Operating System.   

// Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.

//

// eCos 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 or (at your option) any later      

// version.                                                                 

//

// eCos 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 eCos; if not, write to the Free Software Foundation, Inc.,    

// 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.            

//

// As a special exception, if other files instantiate templates or use      

// macros or inline functions from this file, or you compile this file      

// and link it with other works to produce a work based on this file,       

// this file does not by itself cause the resulting work to be covered by   

// the GNU General Public License. However the source code for this file    

// must still be made available in accordance with section (3) of the GNU   

// General Public License v2.                                               

//

// This exception does not invalidate any other reasons why a work based    

// on this file might be covered by the GNU General Public License.         

// -------------------------------------------                              

// ####ECOSGPLCOPYRIGHTEND####                                              

//==========================================================================

//#####DESCRIPTIONBEGIN####

//

// Author(s):     gthomas

// Contributors:  gthomas

// Date:          1999-06-16

// Description:   Linux I/O support for Cirrus Logic EDB7xxx FLASH tools

//####DESCRIPTIONEND####

//

// io.c - I/O functions

//

#include <stdio.h>

#include <sys/ioctl.h>

#include <fcntl.h>

#include <termios.h>

#include <errno.h>

char _ReceiveChar(long port)

{

    char buf;

    int res;

    // Port is in non-blocking mode, this needs to have a loop

    do {

        res = read(port, &buf, 1);

    } while (res < 0);

//    printf("Read: %c\n", buf);

    return buf;

}

static void

uspin(int len)

{

    volatile int cnt;

    while (--len >= 0) {

        for (cnt = 1;  cnt < 2000;  cnt++) ;

    }

}

void _SendChar(long port, char ch)

{

    char buf = ch;

    write(port, &buf, 1);

//    printf("Send: %x\n", ch);

//    usleep(100);

    uspin(100);

}

void _SetBaud(long port, long reqRate)

{

    struct termios buf;

    int rate;

    // Get original configuration

    if (tcgetattr(port, &buf)) {

        fprintf(stderr, "Can't get port config\n");

        return;

    }

    // Reset to raw.

    buf.c_iflag &= ~(IGNBRK|BRKINT|PARMRK|ISTRIP

                     |INLCR|IGNCR|ICRNL|IXON);

    buf.c_oflag &= ~OPOST;

    buf.c_lflag &= ~(ECHO|ECHONL|ICANON|ISIG|IEXTEN);

    buf.c_cflag &= ~(CSIZE|PARENB);

    buf.c_cflag |= CS8;

    // Set baud rate.

    switch (reqRate) {

    case 9600:

        rate = B9600;

        break;

    case 38400:

        rate = B38400;

        break;

    case 57600:

        rate = B57600;

        break;

    case 115200:

        rate = B115200;

        break;

    }

    cfsetispeed(&buf, rate);

    cfsetospeed(&buf, rate);

    // Set data bits.

    buf.c_cflag &= ~CSIZE;

    buf.c_cflag |= CS8;

    // Set stop bits.

    buf.c_cflag &= ~CSTOPB;  // One stop

    // Set parity.

    buf.c_cflag &= ~(PARENB | PARODD); // no parity.

    // Set the new settings

    if (tcsetattr(port, TCSADRAIN, &buf)) {

        fprintf(stderr, "Error: tcsetattr\n");

        return;

    }

    tcdrain(port);

    usleep(1000000/10*2);

    sleep(2);

}

int _CharReady(long port)

{

#ifdef __CYGWIN__

    // Windows doesn't support the below ioctl

    return 1;

#else

    int n, res;

    res = ioctl(port, FIONREAD, &n);

    if (res < 0) {

        fprintf(stderr, "I/O error: %s\n", strerror(errno));

        exit(1);

    }

    return n;  // Non-zero if characters ready to read

#endif

}

void _WaitForOutputEmpty(long port)

{

    usleep(2000000);

}

long _OpenPort(char *name)

{

    int fd;

    fd = open(name, O_RDWR|O_NONBLOCK);

    return fd;

}