URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [gdb-5.0/] [gdb/] [ser-e7kpc.c] - Blame information for rev 1772

Go to most recent revision | Details | Compare with Previous | View Log


/* Remote serial interface using Hitachi E7000 PC ISA card in a PC
   Copyright 1994, 1999, 2000 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., 59 Temple Place - Suite 330,
   Boston, MA 02111-1307, USA.  */
 
#if defined __GO32__ || defined _WIN32
#include "defs.h"
#include "serial.h"
#include "gdb_string.h"
 
/* MSVC uses strnicmp instead of strncasecmp */
#ifdef _MSC_VER
#define strncasecmp strnicmp
#define WIN32_LEAN_AND_MEAN
#endif
 
#ifdef _WIN32
#include <windows.h>
#endif
 
#ifdef __GO32__
#include <sys/dos.h>
#endif
 
static int e7000pc_open PARAMS ((serial_t scb, const char *name));
static void e7000pc_raw PARAMS ((serial_t scb));
static int e7000pc_readchar PARAMS ((serial_t scb, int timeout));
static int e7000pc_setbaudrate PARAMS ((serial_t scb, int rate));
static int e7000pc_write PARAMS ((serial_t scb, const char *str, int len));
static void e7000pc_close PARAMS ((serial_t scb));
static serial_ttystate e7000pc_get_tty_state PARAMS ((serial_t scb));
static int e7000pc_set_tty_state PARAMS ((serial_t scb, serial_ttystate state));
 
#define OFF_DPD         0x0000
#define OFF_DDP         0x1000
#define OFF_CPD         0x2000
#define OFF_CDP         0x2400
#define OFF_FA          0x3000
#define OFF_FB          0x3002
#define OFF_FC          0x3004
#define OFF_IRQTOD      0x3008
#define OFF_IRQTOP      0x300a
#define OFF_READY       0x300c
#define OFF_PON         0x300e
 
#define IDLE       0x0000
#define CMD_CI     0x4349
#define CMD_CO     0x434f
#define CMD_LO     0x4c4f
#define CMD_LS     0x4c53
#define CMD_SV     0x5356
#define CMD_SS     0x5353
#define CMD_OK     0x4f4b
#define CMD_ER     0x4552
#define CMD_NF     0x4e46
#define CMD_AB     0x4142
#define CMD_ED     0x4544
#define CMD_CE     0x4345
 
static unsigned long fa;
static unsigned long irqtod;
static unsigned long ready;
static unsigned long fb;
static unsigned long cpd;
static unsigned long cdp;
static unsigned long ready;
static unsigned long pon;
static unsigned long irqtop;
static unsigned long board_at;
 
#ifdef __GO32__
 
#define SET_BYTE(x,y)   { char _buf = y;dosmemput(&_buf,1, x);}
#define SET_WORD(x,y)   { short _buf = y;dosmemput(&_buf,2, x);}
#define GET_BYTE(x)     ( dosmemget(x,1,&bb), bb)
#define GET_WORD(x)     ( dosmemget(x,2,&sb), sb)
static unsigned char bb;
static unsigned short sb;
 
#else /* win32 */
 
#define SET_BYTE(x,y)   *(volatile unsigned char *)(x) = (y)
#define SET_WORD(x,y)   *(volatile unsigned short *)(x) = (y)
#define GET_BYTE(x)     (*(volatile unsigned char *)(x))
#define GET_WORD(x)     (*(volatile unsigned short *)(x))
#define dosmemget(FROM, LEN, TO) memcpy ((void *)(TO), (void *)(FROM), (LEN))
#define dosmemput(FROM, LEN, TO) memcpy ((void *)(TO), (void *)(FROM), (LEN))
#endif
 
static struct sw
  {
    int sw;
    int addr;
  }
sigs[] =
{
  {
    0x14, 0xd0000
  }
  ,
  {
    0x15, 0xd4000
  }
  ,
  {
    0x16, 0xd8000
  }
  ,
  {
    0x17, 0xdc000
  }
  ,
 
};
 
#ifdef _MSC_VER
/* Get the base of the data segment.  This is needed to calculate the offset
   between data segment addresses and the base of linear memory, which is where
   device registers reside.  Note that this is really only necessary for
   Win32s, since Win95 and NT keep the data segment at linear 0.  */
 
static unsigned long
get_ds_base (void)
{
  unsigned short dsval;
  LDT_ENTRY ldt;
  unsigned long dsbase;
 
  __asm
  {
    mov dsval, ds
  }
 
  dsbase = 0;
 
  GetThreadSelectorEntry (GetCurrentThread (), dsval, &ldt);
 
  dsbase = ldt.HighWord.Bits.BaseHi << 24 | ldt.HighWord.Bits.BaseMid << 16
    | ldt.BaseLow;
 
  return dsbase;
}
#else /* !_MSC_VER */
#define get_ds_base() 0
#endif /* _MSC_VER */
 
static int
e7000pc_init ()
{
  int try;
  unsigned long dsbase;
 
  dsbase = get_ds_base ();
 
  /* Look around in memory for the board's signature */
 
  for (try = 0; sigs[try].sw; try++)
    {
      int val;
      board_at = sigs[try].addr - dsbase;
      fa = board_at + OFF_FA;
      fb = board_at + OFF_FB;
      cpd = board_at + OFF_CPD;
      cdp = board_at + OFF_CDP;
      ready = board_at + OFF_READY;
      pon = board_at + OFF_PON;
      irqtop = board_at + OFF_IRQTOP;
      irqtod = board_at + OFF_IRQTOD;
 
      val = GET_WORD (ready);
 
      if (val == (0xaaa0 | sigs[try].sw))
        {
          if (GET_WORD (pon) & 0xf)
            {
              SET_WORD (fa, 0);
              SET_WORD (fb, 0);
 
              SET_WORD (irqtop, 1);     /* Disable interrupts from e7000 */
              SET_WORD (ready, 1);
              printf_filtered ("\nConnected to the E7000PC at address 0x%x\n",
                               sigs[try].addr);
              return 1;
            }
          error ("The E7000 PC board is working, but the E7000 is turned off.\n");
          return 0;
        }
    }
 
  error ("GDB cannot connect to the E7000 PC board, check that it is installed\n\
and that the switch settings are correct.  Some other DOS programs can \n\
stop the board from working.  Try starting from a very minimal boot, \n\
perhaps you need to disable EMM386 over the region where the board has\n\
its I/O space, remove other unneeded cards, etc etc\n");
  return 0;
 
}
 
static int pbuf_size;
static int pbuf_index;
 
/* Return next byte from cdp.  If no more, then return -1.  */
 
static int
e7000_get (void)
{
  static char pbuf[1000];
  char tmp[1000];
  int x;
 
  if (pbuf_index < pbuf_size)
    {
      x = pbuf[pbuf_index++];
    }
  else if ((GET_WORD (fb) & 1))
    {
      int i;
      pbuf_size = GET_WORD (cdp + 2);
 
      dosmemget (cdp + 8, pbuf_size + 1, tmp);
 
      /* Tell the E7000 we've eaten */
      SET_WORD (fb, 0);
      /* Swap it around */
      for (i = 0; i < pbuf_size; i++)
        {
          pbuf[i] = tmp[i ^ 1];
        }
      pbuf_index = 0;
      x = pbuf[pbuf_index++];
    }
  else
    {
      x = -1;
    }
  return x;
}
 
/* Works just like read(), except that it takes a TIMEOUT in seconds.  Note
   that TIMEOUT == 0 is a poll, and TIMEOUT == -1 means wait forever. */
 
static int
dosasync_read (fd, buf, len, timeout)
     int fd;
     char *buf;
     int len;
     int timeout;
 
{
  long now;
  long then;
  int i = 0;
 
  /* Then look for some more if we're still hungry */
  time (&now);
  then = now + timeout;
  while (i < len)
    {
      int ch = e7000_get ();
 
      /* While there's room in the buffer, and we've already
         read the stuff in, suck it over */
      if (ch != -1)
        {
          buf[i++] = ch;
          while (i < len && pbuf_index < pbuf_size)
            {
              ch = e7000_get ();
              if (ch == -1)
                break;
              buf[i++] = ch;
            }
        }
 
      time (&now);
 
      if (timeout == 0)
        return i;
      if (now >= then && timeout > 0)
        {
          return i;
        }
    }
  return len;
}
 
 
static int
dosasync_write (fd, buf, len)
     int fd;
     const char *buf;
     int len;
{
  int i;
  char dummy[1000];
 
  /* Construct copy locally */
  ((short *) dummy)[0] = CMD_CI;
  ((short *) dummy)[1] = len;
  ((short *) dummy)[2] = 0;
  ((short *) dummy)[3] = 0;
  for (i = 0; i < len; i++)
    {
      dummy[(8 + i) ^ 1] = buf[i];
    }
 
  /* Wait for the card to get ready */
  while (GET_WORD (fa) & 1);
 
  /* Blast onto the ISA card */
  dosmemput (dummy, 8 + len + 1, cpd);
 
  SET_WORD (fa, 1);
  SET_WORD (irqtod, 1);         /* Interrupt the E7000 */
 
  return len;
}
 
static int
e7000pc_open (scb, name)
     serial_t scb;
     const char *name;
{
  if (strncasecmp (name, "pc", 2) != 0)
    {
      errno = ENOENT;
      return -1;
    }
 
  scb->fd = e7000pc_init ();
 
  if (!scb->fd)
    return -1;
 
  return 0;
}
 
static int
e7000pc_noop (scb)
     serial_t scb;
{
  return 0;
}
 
static void
e7000pc_raw (scb)
     serial_t scb;
{
  /* Always in raw mode */
}
 
static int
e7000pc_readchar (scb, timeout)
     serial_t scb;
     int timeout;
{
  char buf;
 
top:
 
  if (dosasync_read (scb->fd, &buf, 1, timeout))
    {
      if (buf == 0)
        goto top;
      return buf;
    }
  else
    return SERIAL_TIMEOUT;
}
 
struct e7000pc_ttystate
{
  int dummy;
};
 
/* e7000pc_{get set}_tty_state() are both dummys to fill out the function
   vector.  Someday, they may do something real... */
 
static serial_ttystate
e7000pc_get_tty_state (scb)
     serial_t scb;
{
  struct e7000pc_ttystate *state;
 
  state = (struct e7000pc_ttystate *) xmalloc (sizeof *state);
 
  return (serial_ttystate) state;
}
 
static int
e7000pc_set_tty_state (scb, ttystate)
     serial_t scb;
     serial_ttystate ttystate;
{
  return 0;
}
 
static int
e7000pc_noflush_set_tty_state (scb, new_ttystate, old_ttystate)
     serial_t scb;
     serial_ttystate new_ttystate;
     serial_ttystate old_ttystate;
{
  return 0;
}
 
static void
e7000pc_print_tty_state (serial_t scb,
                         serial_ttystate ttystate,
                         struct ui_file *stream)
{
  /* Nothing to print.  */
  return;
}
 
static int
e7000pc_setbaudrate (scb, rate)
     serial_t scb;
     int rate;
{
  return 0;
}
 
static int
e7000pc_write (scb, str, len)
     serial_t scb;
     const char *str;
     int len;
{
  dosasync_write (scb->fd, str, len);
 
  return 0;
}
 
static void
e7000pc_close (scb)
     serial_t scb;
{
}
 
static struct serial_ops e7000pc_ops =
{
  "pc",
  0,
  e7000pc_open,
  e7000pc_close,
  e7000pc_readchar,
  e7000pc_write,
  e7000pc_noop,                 /* flush output */
  e7000pc_noop,                 /* flush input */
  e7000pc_noop,                 /* send break -- currently used only for nindy */
  e7000pc_raw,
  e7000pc_get_tty_state,
  e7000pc_set_tty_state,
  e7000pc_print_tty_state,
  e7000pc_noflush_set_tty_state,
  e7000pc_setbaudrate,
  e7000pc_noop,                 /* wait for output to drain */
};
 
void
_initialize_ser_e7000pc ()
{
  serial_add_interface (&e7000pc_ops);
}
#else
 
void
_initialize_ser_e7000pc ()
{
 
}
#endif

Browse

Tools

Subversion Repositories or1k

[/] [or1k/] [trunk/] [gdb-5.0/] [gdb/] [ser-e7kpc.c] - Blame information for rev 1772

Line No.	Rev	Author	Line
1	104	markom	`/* Remote serial interface using Hitachi E7000 PC ISA card in a PC`
2			`Copyright 1994, 1999, 2000 Free Software Foundation, Inc.`
3
4			`This file is part of GDB.`
5
6			`This program is free software; you can redistribute it and/or modify`
7			`it under the terms of the GNU General Public License as published by`
8			`the Free Software Foundation; either version 2 of the License, or`
9			`(at your option) any later version.`
10
11			`This program is distributed in the hope that it will be useful,`
12			`but WITHOUT ANY WARRANTY; without even the implied warranty of`
13			`MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the`
14			`GNU General Public License for more details.`
15
16			`You should have received a copy of the GNU General Public License`
17			`along with this program; if not, write to the Free Software`
18			`Foundation, Inc., 59 Temple Place - Suite 330,`
19			`Boston, MA 02111-1307, USA. */`
20
21			`#if defined __GO32__ \|\| defined _WIN32`
22			`#include "defs.h"`
23			`#include "serial.h"`
24			`#include "gdb_string.h"`
25
26			`/* MSVC uses strnicmp instead of strncasecmp */`
27			`#ifdef _MSC_VER`
28			`#define strncasecmp strnicmp`
29			`#define WIN32_LEAN_AND_MEAN`
30			`#endif`
31
32			`#ifdef _WIN32`
33			`#include <windows.h>`
34			`#endif`
35
36			`#ifdef __GO32__`
37			`#include <sys/dos.h>`
38			`#endif`
39
40			`static int e7000pc_open PARAMS ((serial_t scb, const char *name));`
41			`static void e7000pc_raw PARAMS ((serial_t scb));`
42			`static int e7000pc_readchar PARAMS ((serial_t scb, int timeout));`
43			`static int e7000pc_setbaudrate PARAMS ((serial_t scb, int rate));`
44			`static int e7000pc_write PARAMS ((serial_t scb, const char *str, int len));`
45			`static void e7000pc_close PARAMS ((serial_t scb));`
46			`static serial_ttystate e7000pc_get_tty_state PARAMS ((serial_t scb));`
47			`static int e7000pc_set_tty_state PARAMS ((serial_t scb, serial_ttystate state));`
48
49			`#define OFF_DPD 0x0000`
50			`#define OFF_DDP 0x1000`
51			`#define OFF_CPD 0x2000`
52			`#define OFF_CDP 0x2400`
53			`#define OFF_FA 0x3000`
54			`#define OFF_FB 0x3002`
55			`#define OFF_FC 0x3004`
56			`#define OFF_IRQTOD 0x3008`
57			`#define OFF_IRQTOP 0x300a`
58			`#define OFF_READY 0x300c`
59			`#define OFF_PON 0x300e`
60
61			`#define IDLE 0x0000`
62			`#define CMD_CI 0x4349`
63			`#define CMD_CO 0x434f`
64			`#define CMD_LO 0x4c4f`
65			`#define CMD_LS 0x4c53`
66			`#define CMD_SV 0x5356`
67			`#define CMD_SS 0x5353`
68			`#define CMD_OK 0x4f4b`
69			`#define CMD_ER 0x4552`
70			`#define CMD_NF 0x4e46`
71			`#define CMD_AB 0x4142`
72			`#define CMD_ED 0x4544`
73			`#define CMD_CE 0x4345`
74
75			`static unsigned long fa;`
76			`static unsigned long irqtod;`
77			`static unsigned long ready;`
78			`static unsigned long fb;`
79			`static unsigned long cpd;`
80			`static unsigned long cdp;`
81			`static unsigned long ready;`
82			`static unsigned long pon;`
83			`static unsigned long irqtop;`
84			`static unsigned long board_at;`
85
86			`#ifdef __GO32__`
87
88			`#define SET_BYTE(x,y) { char _buf = y;dosmemput(&_buf,1, x);}`
89			`#define SET_WORD(x,y) { short _buf = y;dosmemput(&_buf,2, x);}`
90			`#define GET_BYTE(x) ( dosmemget(x,1,&bb), bb)`
91			`#define GET_WORD(x) ( dosmemget(x,2,&sb), sb)`
92			`static unsigned char bb;`
93			`static unsigned short sb;`
94
95			`#else /* win32 */`
96
97			`#define SET_BYTE(x,y) (volatile unsigned char )(x) = (y)`
98			`#define SET_WORD(x,y) (volatile unsigned short )(x) = (y)`
99			`#define GET_BYTE(x) ((volatile unsigned char )(x))`
100			`#define GET_WORD(x) ((volatile unsigned short )(x))`
101			`#define dosmemget(FROM, LEN, TO) memcpy ((void )(TO), (void )(FROM), (LEN))`
102			`#define dosmemput(FROM, LEN, TO) memcpy ((void )(TO), (void )(FROM), (LEN))`
103			`#endif`
104
105			`static struct sw`
106			`{`
107			`int sw;`
108			`int addr;`
109			`}`
110			`sigs[] =`
111			`{`
112			`{`
113			`0x14, 0xd0000`
114			`}`
115			`,`
116			`{`
117			`0x15, 0xd4000`
118			`}`
119			`,`
120			`{`
121			`0x16, 0xd8000`
122			`}`
123			`,`
124			`{`
125			`0x17, 0xdc000`
126			`}`
127			`,`
128
129			`};`
130
131			`#ifdef _MSC_VER`
132			`/* Get the base of the data segment. This is needed to calculate the offset`
133			`between data segment addresses and the base of linear memory, which is where`
134			`device registers reside. Note that this is really only necessary for`
135			`Win32s, since Win95 and NT keep the data segment at linear 0. */`
136
137			`static unsigned long`
138			`get_ds_base (void)`
139			`{`
140			`unsigned short dsval;`
141			`LDT_ENTRY ldt;`
142			`unsigned long dsbase;`
143
144			`__asm`
145			`{`
146			`mov dsval, ds`
147			`}`
148
149			`dsbase = 0;`
150
151			`GetThreadSelectorEntry (GetCurrentThread (), dsval, &ldt);`
152
153			`dsbase = ldt.HighWord.Bits.BaseHi << 24 \| ldt.HighWord.Bits.BaseMid << 16`
154			`\| ldt.BaseLow;`
155
156			`return dsbase;`
157			`}`
158			`#else /* !_MSC_VER */`
159			`#define get_ds_base() 0`
160			`#endif /* _MSC_VER */`
161
162			`static int`
163			`e7000pc_init ()`
164			`{`
165			`int try;`
166			`unsigned long dsbase;`
167
168			`dsbase = get_ds_base ();`
169
170			`/* Look around in memory for the board's signature */`
171
172			`for (try = 0; sigs[try].sw; try++)`
173			`{`
174			`int val;`
175			`board_at = sigs[try].addr - dsbase;`
176			`fa = board_at + OFF_FA;`
177			`fb = board_at + OFF_FB;`
178			`cpd = board_at + OFF_CPD;`
179			`cdp = board_at + OFF_CDP;`
180			`ready = board_at + OFF_READY;`
181			`pon = board_at + OFF_PON;`
182			`irqtop = board_at + OFF_IRQTOP;`
183			`irqtod = board_at + OFF_IRQTOD;`
184
185			`val = GET_WORD (ready);`
186
187			`if (val == (0xaaa0 \| sigs[try].sw))`
188			`{`
189			`if (GET_WORD (pon) & 0xf)`
190			`{`
191			`SET_WORD (fa, 0);`
192			`SET_WORD (fb, 0);`
193
194			`SET_WORD (irqtop, 1); /* Disable interrupts from e7000 */`
195			`SET_WORD (ready, 1);`
196			`printf_filtered ("\nConnected to the E7000PC at address 0x%x\n",`
197			`sigs[try].addr);`
198			`return 1;`
199			`}`
200			`error ("The E7000 PC board is working, but the E7000 is turned off.\n");`
201			`return 0;`
202			`}`
203			`}`
204
205			`error ("GDB cannot connect to the E7000 PC board, check that it is installed\n\`
206			`and that the switch settings are correct. Some other DOS programs can \n\`
207			`stop the board from working. Try starting from a very minimal boot, \n\`
208			`perhaps you need to disable EMM386 over the region where the board has\n\`
209			`its I/O space, remove other unneeded cards, etc etc\n");`
210			`return 0;`
211
212			`}`
213
214			`static int pbuf_size;`
215			`static int pbuf_index;`
216
217			`/* Return next byte from cdp. If no more, then return -1. */`
218
219			`static int`
220			`e7000_get (void)`
221			`{`
222			`static char pbuf[1000];`
223			`char tmp[1000];`
224			`int x;`
225
226			`if (pbuf_index < pbuf_size)`
227			`{`
228			`x = pbuf[pbuf_index++];`
229			`}`
230			`else if ((GET_WORD (fb) & 1))`
231			`{`
232			`int i;`
233			`pbuf_size = GET_WORD (cdp + 2);`
234
235			`dosmemget (cdp + 8, pbuf_size + 1, tmp);`
236
237			`/* Tell the E7000 we've eaten */`
238			`SET_WORD (fb, 0);`
239			`/* Swap it around */`
240			`for (i = 0; i < pbuf_size; i++)`
241			`{`
242			`pbuf[i] = tmp[i ^ 1];`
243			`}`
244			`pbuf_index = 0;`
245			`x = pbuf[pbuf_index++];`
246			`}`
247			`else`
248			`{`
249			`x = -1;`
250			`}`
251			`return x;`
252			`}`
253
254			`/* Works just like read(), except that it takes a TIMEOUT in seconds. Note`
255			`that TIMEOUT == 0 is a poll, and TIMEOUT == -1 means wait forever. */`
256
257			`static int`
258			`dosasync_read (fd, buf, len, timeout)`
259			`int fd;`
260			`char *buf;`
261			`int len;`
262			`int timeout;`
263
264			`{`
265			`long now;`
266			`long then;`
267			`int i = 0;`
268
269			`/* Then look for some more if we're still hungry */`
270			`time (&now);`
271			`then = now + timeout;`
272			`while (i < len)`
273			`{`
274			`int ch = e7000_get ();`
275
276			`/* While there's room in the buffer, and we've already`
277			`read the stuff in, suck it over */`
278			`if (ch != -1)`
279			`{`
280			`buf[i++] = ch;`
281			`while (i < len && pbuf_index < pbuf_size)`
282			`{`
283			`ch = e7000_get ();`
284			`if (ch == -1)`
285			`break;`
286			`buf[i++] = ch;`
287			`}`
288			`}`
289
290			`time (&now);`
291
292			`if (timeout == 0)`
293			`return i;`
294			`if (now >= then && timeout > 0)`
295			`{`
296			`return i;`
297			`}`
298			`}`
299			`return len;`
300			`}`
301
302
303			`static int`
304			`dosasync_write (fd, buf, len)`
305			`int fd;`
306			`const char *buf;`
307			`int len;`
308			`{`
309			`int i;`
310			`char dummy[1000];`
311
312			`/* Construct copy locally */`
313			`((short *) dummy)[0] = CMD_CI;`
314			`((short *) dummy)[1] = len;`
315			`((short *) dummy)[2] = 0;`
316			`((short *) dummy)[3] = 0;`
317			`for (i = 0; i < len; i++)`
318			`{`
319			`dummy[(8 + i) ^ 1] = buf[i];`
320			`}`
321
322			`/* Wait for the card to get ready */`
323			`while (GET_WORD (fa) & 1);`
324
325			`/* Blast onto the ISA card */`
326			`dosmemput (dummy, 8 + len + 1, cpd);`
327
328			`SET_WORD (fa, 1);`
329			`SET_WORD (irqtod, 1); /* Interrupt the E7000 */`
330
331			`return len;`
332			`}`
333
334			`static int`
335			`e7000pc_open (scb, name)`
336			`serial_t scb;`
337			`const char *name;`
338			`{`
339			`if (strncasecmp (name, "pc", 2) != 0)`
340			`{`
341			`errno = ENOENT;`
342			`return -1;`
343			`}`
344
345			`scb->fd = e7000pc_init ();`
346
347			`if (!scb->fd)`
348			`return -1;`
349
350			`return 0;`
351			`}`
352
353			`static int`
354			`e7000pc_noop (scb)`
355			`serial_t scb;`
356			`{`
357			`return 0;`
358			`}`
359
360			`static void`
361			`e7000pc_raw (scb)`
362			`serial_t scb;`
363			`{`
364			`/* Always in raw mode */`
365			`}`
366
367			`static int`
368			`e7000pc_readchar (scb, timeout)`
369			`serial_t scb;`
370			`int timeout;`
371			`{`
372			`char buf;`
373
374			`top:`
375
376			`if (dosasync_read (scb->fd, &buf, 1, timeout))`
377			`{`
378			`if (buf == 0)`
379			`goto top;`
380			`return buf;`
381			`}`
382			`else`
383			`return SERIAL_TIMEOUT;`
384			`}`
385
386			`struct e7000pc_ttystate`
387			`{`
388			`int dummy;`
389			`};`
390
391			`/* e7000pc_{get set}_tty_state() are both dummys to fill out the function`
392			`vector. Someday, they may do something real... */`
393
394			`static serial_ttystate`
395			`e7000pc_get_tty_state (scb)`
396			`serial_t scb;`
397			`{`
398			`struct e7000pc_ttystate *state;`
399
400			`state = (struct e7000pc_ttystate ) xmalloc (sizeof state);`
401
402			`return (serial_ttystate) state;`
403			`}`
404
405			`static int`
406			`e7000pc_set_tty_state (scb, ttystate)`
407			`serial_t scb;`
408			`serial_ttystate ttystate;`
409			`{`
410			`return 0;`
411			`}`
412
413			`static int`
414			`e7000pc_noflush_set_tty_state (scb, new_ttystate, old_ttystate)`
415			`serial_t scb;`
416			`serial_ttystate new_ttystate;`
417			`serial_ttystate old_ttystate;`
418			`{`
419			`return 0;`
420			`}`
421
422			`static void`
423			`e7000pc_print_tty_state (serial_t scb,`
424			`serial_ttystate ttystate,`
425			`struct ui_file *stream)`
426			`{`
427			`/* Nothing to print. */`
428			`return;`
429			`}`
430
431			`static int`
432			`e7000pc_setbaudrate (scb, rate)`
433			`serial_t scb;`
434			`int rate;`
435			`{`
436			`return 0;`
437			`}`
438
439			`static int`
440			`e7000pc_write (scb, str, len)`
441			`serial_t scb;`
442			`const char *str;`
443			`int len;`
444			`{`
445			`dosasync_write (scb->fd, str, len);`
446
447			`return 0;`
448			`}`
449
450			`static void`
451			`e7000pc_close (scb)`
452			`serial_t scb;`
453			`{`
454			`}`
455
456			`static struct serial_ops e7000pc_ops =`
457			`{`
458			`"pc",`
459			`0,`
460			`e7000pc_open,`
461			`e7000pc_close,`
462			`e7000pc_readchar,`
463			`e7000pc_write,`
464			`e7000pc_noop, /* flush output */`
465			`e7000pc_noop, /* flush input */`
466			`e7000pc_noop, /* send break -- currently used only for nindy */`
467			`e7000pc_raw,`
468			`e7000pc_get_tty_state,`
469			`e7000pc_set_tty_state,`
470			`e7000pc_print_tty_state,`
471			`e7000pc_noflush_set_tty_state,`
472			`e7000pc_setbaudrate,`
473			`e7000pc_noop, /* wait for output to drain */`
474			`};`
475
476			`void`
477			`_initialize_ser_e7000pc ()`
478			`{`
479			`serial_add_interface (&e7000pc_ops);`
480			`}`
481			`#else`
482
483			`void`
484			`_initialize_ser_e7000pc ()`
485			`{`
486
487			`}`
488			`#endif`