This commit was generated by cvs2svn to track changes on a CVS vendor
[platform/upstream/binutils.git] / gdb / ser-ocd.c
1 /* Remote serial interface for Macraigor Systems implementation of
2    On-Chip Debugging using serial target box or serial wiggler
3
4    Copyright 1994, 1997 Free Software Foundation, Inc.
5
6    This file is part of GDB.
7
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 59 Temple Place - Suite 330,
21    Boston, MA 02111-1307, USA.  */
22
23 #include "defs.h"
24 #include "serial.h"
25
26 #ifdef _WIN32
27 #include <windows.h>
28 #endif
29
30 static int ser_ocd_open PARAMS ((serial_t scb, const char *name));
31 static void ser_ocd_raw PARAMS ((serial_t scb));
32 static int ser_ocd_readchar PARAMS ((serial_t scb, int timeout));
33 static int ser_ocd_setbaudrate PARAMS ((serial_t scb, int rate));
34 static int ser_ocd_write PARAMS ((serial_t scb, const char *str, int len));
35 static void ser_ocd_close PARAMS ((serial_t scb));
36 static serial_ttystate ser_ocd_get_tty_state PARAMS ((serial_t scb));
37 static int ser_ocd_set_tty_state PARAMS ((serial_t scb, serial_ttystate state));
38
39 #ifdef _WIN32
40 /* On Windows, this function pointer is initialized to a function in
41    the wiggler DLL.  */
42 static int (*dll_do_command) PARAMS ((const char *, char *));
43 #endif
44
45 static int
46 ocd_open (scb, name)
47      serial_t scb;
48      const char *name;
49 {
50 #ifdef _WIN32
51   /* Find the wiggler DLL which talks to the board.  */
52   if (dll_do_command == NULL)
53     {
54       HINSTANCE handle;
55
56       /* FIXME: Should the user be able to configure this?  */
57       handle = LoadLibrary ("Wigglers.dll");
58       if (handle == NULL)
59         error ("Can't load Wigglers.dll");
60
61       dll_do_command = ((int (*)PARAMS ((const char *, char *)))
62                         GetProcAddress (handle, "do_command"));
63       if (dll_do_command == NULL)
64         error ("Can't find do_command function in Wigglers.dll");
65     }
66 #else
67   /* No wiggler DLLs on Unix yet, fail.  */
68   error ("Wiggler library not available for this type of host.");
69 #endif /* _WIN32 */
70   return 0;
71 }
72
73 static int
74 ocd_noop (scb)
75      serial_t scb;
76 {
77   return 0;
78 }
79
80 static void
81 ocd_raw (scb)
82      serial_t scb;
83 {
84   /* Always in raw mode */
85 }
86
87 static void
88 ocd_readremote ()
89 {
90 }
91
92 /* We need a buffer to store responses from the Wigglers.dll */
93 #define WIGGLER_BUFF_SIZE 512
94 unsigned char from_wiggler_buffer[WIGGLER_BUFF_SIZE];
95 unsigned char *wiggler_buffer_ptr;      /* curr spot in buffer */
96
97 static int
98 ocd_readchar (scb, timeout)
99      serial_t scb;
100      int timeout;
101 {
102   /* Catch attempts at reading past the end of the buffer */
103   if (wiggler_buffer_ptr >
104       (from_wiggler_buffer + (sizeof (char *) * WIGGLER_BUFF_SIZE)))
105       error ("ocd_readchar asked to read past the end of the buffer!");
106
107   return (int) *wiggler_buffer_ptr++;   /* return curr char and increment ptr */
108 }
109
110 struct ocd_ttystate
111 {
112   int dummy;
113 };
114
115 /* ocd_{get set}_tty_state() are both dummys to fill out the function
116    vector.  Someday, they may do something real... */
117
118 static serial_ttystate
119 ocd_get_tty_state (scb)
120      serial_t scb;
121 {
122   struct ocd_ttystate *state;
123
124   state = (struct ocd_ttystate *) xmalloc (sizeof *state);
125
126   return (serial_ttystate) state;
127 }
128
129 static int
130 ocd_set_tty_state (scb, ttystate)
131      serial_t scb;
132      serial_ttystate ttystate;
133 {
134   return 0;
135 }
136
137 static int
138 ocd_noflush_set_tty_state (scb, new_ttystate, old_ttystate)
139      serial_t scb;
140      serial_ttystate new_ttystate;
141      serial_ttystate old_ttystate;
142 {
143   return 0;
144 }
145
146 static void
147 ocd_print_tty_state (scb, ttystate)
148      serial_t scb;
149      serial_ttystate ttystate;
150 {
151   /* Nothing to print.  */
152   return;
153 }
154
155 static int
156 ocd_setbaudrate (scb, rate)
157      serial_t scb;
158      int rate;
159 {
160   return 0;
161 }
162
163 static int
164 ocd_write (scb, str, len)
165      serial_t scb;
166      const char *str;
167      int len;
168 {
169   char c;
170
171 #ifdef _WIN32
172   /* send packet to Wigglers.dll and store response so we can give it to
173      remote-wiggler.c when get_packet is run */
174   dll_do_command (str, from_wiggler_buffer);
175   wiggler_buffer_ptr = from_wiggler_buffer;
176 #endif
177
178   return 0;
179 }
180
181 static void
182 ocd_close (scb)
183      serial_t scb;
184 {
185 }
186
187 static struct serial_ops ocd_ops =
188 {
189   "ocd",
190   0,
191   ocd_open,
192   ocd_close,
193   ocd_readchar,
194   ocd_write,
195   ocd_noop,                     /* flush output */
196   ocd_noop,                     /* flush input */
197   ocd_noop,                     /* send break -- currently used only for nindy */
198   ocd_raw,
199   ocd_get_tty_state,
200   ocd_set_tty_state,
201   ocd_print_tty_state,
202   ocd_noflush_set_tty_state,
203   ocd_setbaudrate,
204   ocd_noop,                     /* wait for output to drain */
205 };
206
207 void
208 _initialize_ser_ocd_bdm ()
209 {
210   serial_add_interface (&ocd_ops);
211 }