update/inst_001.c

   1 /*
   2  *      $Source$
   3  *      $Header$
   4  */
   5
   6 #ifndef lint
   7 static char *rcsid_inst_001_c = "$Header$";
   8 #endif  lint
   9
  10 #include <stdio.h>
  11 #include "gdb.h"
  12 #include "kludge.h"
  13 #include "sms_update_int.h"
  14
  15 STRING instructions = { 0, 0 };
  16 extern CONNECTION conn;
  17 extern int have_instructions;
  18 extern int code;
  19
  20 /*
  21  * instruction sequence transmission:
  22  * syntax:
  23  *      >>> (STRING) "inst_001"
  24  *      <<< (int)0
  25  *      >>> (STRING) instructions
  26  *      <<< (int)0
  27  */
  28
  29 inst_001(str)
  30      char *str;
  31 {
  32      if (send_ok())
  33           lose("sending okay for inst_001");
  34      code = receive_object(conn, (char *)&instructions, STRING_T);
  35      if (code) {
  36           report_error("reporting failure to receive instructions");
  37           return;
  38      }
  39      have_instructions = 1;
  40      if (send_ok())
  41           lose("sending okay after instructions");
  42      dprintf(("got instructions: %s\n", STRING_DATA(instructions)));
  43 }