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, Boston, MA 02111-1307, USA.  */
  21
  22 #include "defs.h"
  23 #include "serial.h"
  24
  25 #ifdef _WIN32
  26 #include <windows.h>
  27 #endif
  28
  29 static int ser_ocd_open PARAMS ((serial_t scb, const char *name));
  30 static void ser_ocd_raw PARAMS ((serial_t scb));
  31 static int ser_ocd_readchar PARAMS ((serial_t scb, int timeout));
  32 static int ser_ocd_setbaudrate PARAMS ((serial_t scb, int rate));
  33 static int ser_ocd_write PARAMS ((serial_t scb, const char *str, int len));
  34 static void ser_ocd_close PARAMS ((serial_t scb));
  35 static serial_ttystate ser_ocd_get_tty_state PARAMS ((serial_t scb));
  36 static int ser_ocd_set_tty_state PARAMS ((serial_t scb, serial_ttystate state));
  37
  38 #ifdef _WIN32
  39 /* On Windows, this function pointer is initialized to a function in
  40    the wiggler DLL.  */
  41 static int (*dll_do_command) PARAMS ((const char *, char *));
  42 #endif
  43
  44 static int
  45 ocd_open (scb, name)
  46      serial_t scb;
  47      const char *name;
  48 {
  49 #ifdef _WIN32
  50   /* Find the wiggler DLL which talks to the board.  */
  51   if (dll_do_command == NULL)
  52     {
  53       HINSTANCE handle;
  54
  55       /* FIXME: Should the user be able to configure this?  */
  56       handle = LoadLibrary ("Wigglers.dll");
  57       if (handle == NULL)
  58         error ("Can't load Wigglers.dll");
  59
  60       dll_do_command = ((int (*) PARAMS ((const char *, char *)))
  61                         GetProcAddress (handle, "do_command"));
  62       if (dll_do_command == NULL)
  63         error ("Can't find do_command function in Wigglers.dll");
  64     }
  65 #endif
  66
  67   return 0;
  68 }
  69
  70 static int
  71 ocd_noop (scb)
  72      serial_t scb;
  73 {
  74   return 0;
  75 }
  76
  77 static void
  78 ocd_raw (scb)
  79      serial_t scb;
  80 {
  81   /* Always in raw mode */
  82 }
  83
  84 static void
  85 ocd_readremote ()
  86 {
  87 }
  88
  89 /* We need a buffer to store responses from the Wigglers.dll */
  90 #define WIGGLER_BUFF_SIZE 512
  91 unsigned char from_wiggler_buffer[WIGGLER_BUFF_SIZE];
  92 unsigned char * wiggler_buffer_ptr;     /* curr spot in buffer */
  93
  94 static int
  95 ocd_readchar (scb, timeout)
  96      serial_t scb;
  97      int timeout;
  98 {
  99   /* Catch attempts at reading past the end of the buffer */
 100   if (wiggler_buffer_ptr >
 101               (from_wiggler_buffer + (sizeof (char *) * WIGGLER_BUFF_SIZE)))
 102     error ("ocd_readchar asked to read past the end of the buffer!");
 103
 104   return (int) *wiggler_buffer_ptr++; /* return curr char and increment ptr */
 105 }
 106
 107 struct ocd_ttystate {
 108   int dummy;
 109 };
 110
 111 /* ocd_{get set}_tty_state() are both dummys to fill out the function
 112    vector.  Someday, they may do something real... */
 113
 114 static serial_ttystate
 115 ocd_get_tty_state (scb)
 116      serial_t scb;
 117 {
 118   struct ocd_ttystate *state;
 119
 120   state = (struct ocd_ttystate *) xmalloc (sizeof *state);
 121
 122   return (serial_ttystate) state;
 123 }
 124
 125 static int
 126 ocd_set_tty_state (scb, ttystate)
 127      serial_t scb;
 128      serial_ttystate ttystate;
 129 {
 130   return 0;
 131 }
 132
 133 static int
 134 ocd_noflush_set_tty_state (scb, new_ttystate, old_ttystate)
 135      serial_t scb;
 136      serial_ttystate new_ttystate;
 137      serial_ttystate old_ttystate;
 138 {
 139   return 0;
 140 }
 141
 142 static void
 143 ocd_print_tty_state (scb, ttystate)
 144      serial_t scb;
 145      serial_ttystate ttystate;
 146 {
 147   /* Nothing to print.  */
 148   return;
 149 }
 150
 151 static int
 152 ocd_setbaudrate (scb, rate)
 153      serial_t scb;
 154      int rate;
 155 {
 156   return 0;
 157 }
 158
 159 static int
 160 ocd_write (scb, str, len)
 161      serial_t scb;
 162      const char *str;
 163      int len;
 164 {
 165   char c;
 166
 167 #ifdef _WIN32
 168   /* send packet to Wigglers.dll and store response so we can give it to
 169         remote-wiggler.c when get_packet is run */
 170   dll_do_command (str, from_wiggler_buffer);
 171   wiggler_buffer_ptr = from_wiggler_buffer;
 172 #endif
 173
 174   return 0;
 175 }
 176
 177 static void
 178 ocd_close (scb)
 179      serial_t scb;
 180 {
 181 }
 182
 183 static struct serial_ops ocd_ops =
 184 {
 185   "ocd",
 186   0,
 187   ocd_open,
 188   ocd_close,
 189   ocd_readchar,
 190   ocd_write,
 191   ocd_noop,             /* flush output */
 192   ocd_noop,             /* flush input */
 193   ocd_noop,             /* send break -- currently used only for nindy */
 194   ocd_raw,
 195   ocd_get_tty_state,
 196   ocd_set_tty_state,
 197   ocd_print_tty_state,
 198   ocd_noflush_set_tty_state,
 199   ocd_setbaudrate,
 200 };
 201
 202 void
 203 _initialize_ser_ocd_bdm ()
 204 {
 205   serial_add_interface (&ocd_ops);
 206 }