mirror of
https://github.com/darlinghq/darling-gdb.git
synced 2024-12-14 07:38:41 +00:00
4febd10272
(putpkt, getpkt): Use new return codes for SERIAL_READCHAR. * ser-go32.c: Return -1 on most failures, 0 on most successes, and use new return codes for go32_readchar(). * ser-unix.c: Ditto. Also, move error handling up to caller for SERIAL_SETBAUDRATE(). * serial.c (serial_open): Internal call, not SERIAL_OPEN to get to specific routine. (serial_close): New routine to wrap around device close routine. serial.h: Clean & document return values more clearly.
310 lines
4.9 KiB
C
310 lines
4.9 KiB
C
/* Remote serial interface for local (hardwired) serial ports for GO32.
|
|
Copyright 1992, 1993 Free Software Foundation, Inc.
|
|
|
|
This file is part of GDB.
|
|
|
|
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, or
|
|
(at your option) any later version.
|
|
|
|
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., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
|
|
|
#include "defs.h"
|
|
#include "serial.h"
|
|
#include <sys/dos.h>
|
|
|
|
#define SIGNATURE 0x4154
|
|
#define VERSION 1
|
|
#define OFFSET 0x104
|
|
|
|
#define peek(a,b) (*(unsigned short *)(0xe0000000 + (a)*16 + (b)))
|
|
|
|
typedef struct {
|
|
short jmp_op;
|
|
short signature;
|
|
short version;
|
|
short buffer_start;
|
|
short buffer_end;
|
|
short getp;
|
|
short putp;
|
|
short iov;
|
|
} ASYNC_STRUCT;
|
|
|
|
static ASYNC_STRUCT *async;
|
|
static int iov;
|
|
#define com_rb iov
|
|
#define com_tb iov
|
|
#define com_ier iov+1
|
|
#define com_ifr iov+2
|
|
#define com_bfr iov+3
|
|
#define com_mcr iov+4
|
|
#define com_lsr iov+5
|
|
#define com_msr iov+6
|
|
|
|
static int
|
|
strncasecmp(str1, str2, len)
|
|
char *str1, *str2;
|
|
register int len;
|
|
{
|
|
unsigned char c1, c2;
|
|
|
|
for (; len != 0; --len)
|
|
{
|
|
c1 = *str1++;
|
|
c2 = *str2++;
|
|
|
|
if (toupper(c1) != toupper(c2))
|
|
return toupper(c1) - toupper(c2);
|
|
|
|
if (c1 == '\0')
|
|
return 0;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static char *
|
|
aptr(p)
|
|
short p;
|
|
{
|
|
return (char *)((unsigned)async - OFFSET + p);
|
|
}
|
|
|
|
static ASYNC_STRUCT *
|
|
getivec(int which)
|
|
{
|
|
ASYNC_STRUCT *a;
|
|
|
|
if (peek(0, which*4) != OFFSET)
|
|
return 0;
|
|
|
|
a = (ASYNC_STRUCT *)(0xe0000000 + peek(0, which*4+2)*16 + peek(0, which*4));
|
|
|
|
if (a->signature != SIGNATURE)
|
|
return 0;
|
|
|
|
if (a->version != VERSION)
|
|
return 0;
|
|
|
|
return a;
|
|
}
|
|
|
|
static int
|
|
dos_async_init(port)
|
|
int port;
|
|
{
|
|
int i;
|
|
|
|
switch (port)
|
|
{
|
|
case 1:
|
|
async = getivec (12);
|
|
break;
|
|
case 2:
|
|
async = getivec (11);
|
|
break;
|
|
default:
|
|
return 0;
|
|
}
|
|
|
|
if (!async)
|
|
{
|
|
error("GDB can not connect to asynctsr program, check that it is installed\n\
|
|
and that serial I/O is not being redirected (perhaps by NFS)\n\n\
|
|
example configuration:\n\
|
|
C> mode com2:9600,n,8,1,p\n\
|
|
C> asynctsr 2\n\
|
|
C> gdb \n");
|
|
|
|
}
|
|
|
|
iov = async->iov;
|
|
outportb(com_ier, 0x0f);
|
|
outportb(com_bfr, 0x03);
|
|
outportb(com_mcr, 0x0b);
|
|
async->getp = async->putp = async->buffer_start;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static void
|
|
dos_async_tx(c)
|
|
const char c;
|
|
{
|
|
while (~inportb(com_lsr) & 0x20);
|
|
|
|
outportb(com_tb, c);
|
|
}
|
|
|
|
static int
|
|
dos_async_ready()
|
|
{
|
|
return (async->getp != async->putp);
|
|
}
|
|
|
|
static int
|
|
dos_async_rx()
|
|
{
|
|
char rv;
|
|
|
|
while (!dos_async_ready())
|
|
if (kbhit())
|
|
{
|
|
printf("abort!\n");
|
|
return 0;
|
|
}
|
|
|
|
rv = *aptr(async->getp++);
|
|
if (async->getp >= async->buffer_end)
|
|
async->getp = async->buffer_start;
|
|
|
|
return rv;
|
|
}
|
|
|
|
static int
|
|
dosasync_read (fd, buf, len, timeout)
|
|
int fd;
|
|
char *buf;
|
|
int len;
|
|
int timeout;
|
|
{
|
|
long now, then;
|
|
int l = len;
|
|
|
|
time (&now);
|
|
then = now + timeout;
|
|
|
|
while (l--)
|
|
{
|
|
if (timeout)
|
|
{
|
|
while (!dos_async_ready())
|
|
{
|
|
time (&now);
|
|
if (now >= then)
|
|
return len - l - 1;
|
|
}
|
|
}
|
|
*buf++ = dos_async_rx();
|
|
}
|
|
|
|
return len;
|
|
}
|
|
|
|
static int
|
|
dosasync_write(fd, buf, len)
|
|
int fd;
|
|
const char *buf;
|
|
int len;
|
|
{
|
|
int l = len;
|
|
|
|
while (l--)
|
|
dos_async_tx (*buf++);
|
|
|
|
return len;
|
|
}
|
|
|
|
static int
|
|
go32_open (scb, name)
|
|
serial_t scb;
|
|
const char *name;
|
|
{
|
|
int port;
|
|
|
|
if (strncasecmp (name, "com", 3) != 0)
|
|
{
|
|
errno = ENOENT;
|
|
return -1;
|
|
}
|
|
|
|
port = name[3] - '0';
|
|
|
|
if ((port != 1) && (port != 2))
|
|
{
|
|
errno = ENOENT;
|
|
return -11;
|
|
}
|
|
|
|
scb->fd = dos_async_init(port);
|
|
if (!scb->fd)
|
|
return -1;
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void
|
|
go32_raw (scb)
|
|
serial_t scb;
|
|
{
|
|
/* Always in raw mode */
|
|
}
|
|
|
|
static int
|
|
go32_readchar (scb, timeout)
|
|
serial_t scb;
|
|
int timeout;
|
|
{
|
|
char buf;
|
|
|
|
if (dosasync_read(scb->fd, &buf, 1, timeout))
|
|
return buf;
|
|
else
|
|
return SERIAL_TIMEOUT;
|
|
}
|
|
|
|
static int
|
|
go32_setbaudrate (scb, rate)
|
|
serial_t scb;
|
|
int rate;
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
go32_write (scb, str, len)
|
|
serial_t scb;
|
|
const char *str;
|
|
int len;
|
|
{
|
|
dosasync_write(scb->fd, str, len);
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void
|
|
go32_close ()
|
|
{
|
|
}
|
|
|
|
static void
|
|
go32_restore (scb)
|
|
serial_t scb;
|
|
{
|
|
}
|
|
|
|
static struct serial_ops go32_ops =
|
|
{
|
|
"hardwire",
|
|
0,
|
|
go32_open,
|
|
go32_close,
|
|
go32_readchar,
|
|
go32_write,
|
|
go32_raw,
|
|
go32_restore,
|
|
go32_setbaudrate
|
|
};
|
|
|
|
_initialize_ser_go32 ()
|
|
{
|
|
serial_add_interface (&go32_ops);
|
|
}
|