gdb/

	* configure.tgt: Move mips*-*-pe and sh*-*-pe to
	the obsoletion stanza.
	* NEWS: Mention deleted targets.

	* config/sh/tm-wince.h: Remove.
	* config/sh/wince.mt: Remove.
	* config/mips/tm-wince.h: Remove.
	* config/mips/wince.mt: Remove.

	* wince.c: Remove.
	* wince-stub.c: Remove.
	* wince-stub.h: Remove.
	* Makefile.in (wince.o): Remove rule.
	(wince-stub.o): Likewise.

	* mips-tdep.c (mips_next_pc): Make static.
	* mips-tdep.h (mips_next_pc): Remove declaration.
	* arm-tdep.c (arm_pc_is_thumb): Make static.
	(thumb_get_next_pc): Likewise.
	(arm_get_next_pc): Likewise.
	* arm-tdep.h (arm_pc_is_thumb_dummy): Remove declaration.
	(arm_pc_is_thumb): Likewise.
	(thumb_get_next_pc): Likewise.
	(arm_get_next_pc): Likewise.

gdb/doc/

	* gdb.texinfo (WinCE): Delete obsolete subsection.

1 files changed, 0 insertions, 2099 deletions

diff --git a/gdb/wince.c b/gdb/wince.c
deleted file mode 100644
index 98189f4..0000000
--- a/gdb/wince.c
+++ /dev/null
@@ -1,2099 +0,0 @@
-/* Target-vector operations for controlling Windows CE child processes, for GDB.
-
-   Copyright (C) 1999, 2000, 2001, 2004, 2006, 2007
-   Free Software Foundation, Inc.
-   Contributed by Cygnus Solutions, A Red Hat Company.
-
-   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., 51 Franklin Street, Fifth Floor,
-   Boston, MA 02110-1301, USA.
- */
-
-/* by Christopher Faylor (cgf@cygnus.com) */
-
-/* We assume we're being built with and will be used for cygwin.  */
-
-#ifdef SHx
-#undef SH4
-#define SH4		/* Just to get all of the CONTEXT defines.  */
-#endif
-
-#include "defs.h"
-#include "frame.h"	/* required by inferior.h */
-#include "inferior.h"
-#include "target.h"
-#include "exceptions.h"
-#include "gdbcore.h"
-#include "command.h"
-#include <signal.h>
-#include <sys/types.h>
-#include <fcntl.h>
-#include <stdlib.h>
-
-#include <windows.h>
-#include <rapi.h>
-#include <netdb.h>
-#include <cygwin/in.h>
-#include <cygwin/socket.h>
-
-#include "buildsym.h"
-#include "symfile.h"
-#include "objfiles.h"
-#include "gdb_string.h"
-#include "gdbthread.h"
-#include "gdbcmd.h"
-#include <sys/param.h>
-#include "wince-stub.h"
-#include <time.h>
-#include "regcache.h"
-#ifdef MIPS
-#include "mips-tdep.h"
-#endif
-
-/* If we're not using the old Cygwin header file set, define the
-   following which never should have been in the generic Win32 API
-   headers in the first place since they were our own invention...  */
-#ifndef _GNU_H_WINDOWS_H
-#define FLAG_TRACE_BIT 0x100
-#ifdef CONTEXT_FLOATING_POINT
-#define CONTEXT_DEBUGGER0 (CONTEXT_FULL | CONTEXT_FLOATING_POINT)
-#else
-#define CONTEXT_DEBUGGER0 (CONTEXT_FULL)
-#endif
-#endif
-
-#ifdef SH4
-#define CONTEXT_DEBUGGER ((CONTEXT_DEBUGGER0 & ~(CONTEXT_SH4 | CONTEXT_FLOATING_POINT)) | CONTEXT_SH3)
-#else
-#define CONTEXT_DEBUGGER CONTEXT_DEBUGGER0
-#endif
-/* The string sent by cygwin when it processes a signal.
-   FIXME: This should be in a cygwin include file.  */
-#define CYGWIN_SIGNAL_STRING "cygwin: signal"
-
-#define CHECK(x)	check (x, __FILE__,__LINE__)
-#define DEBUG_EXEC(x)	if (debug_exec)		printf x
-#define DEBUG_EVENTS(x)	if (debug_events)	printf x
-#define DEBUG_MEM(x)	if (debug_memory)	printf x
-#define DEBUG_EXCEPT(x)	if (debug_exceptions)	printf x
-
-static int connection_initialized = 0;	/* True if we've initialized a
-					   RAPI session.  */
-
-/* The directory where the stub and executable files are uploaded.  */
-static const char *remote_directory = "\\gdb";
-
-/* The types automatic upload available.  */
-static enum
-  {
-    UPLOAD_ALWAYS = 0,
-    UPLOAD_NEWER = 1,
-    UPLOAD_NEVER = 2
-  }
-upload_when = UPLOAD_NEWER;
-
-/* Valid options for 'set remoteupload'.  Note that options
-   must track upload_when enum.  */
-static struct opts
-  {
-    const char *name;
-    int abbrev;
-  }
-upload_options[3] =
-{
-  {
-    "always", 1
-  }
-  ,
-  {
-    "newer", 3
-  }
-  ,
-  {
-    "never", 3
-  }
-};
-
-static char *remote_upload = NULL;	/* Set by set remoteupload.  */
-static int remote_add_host = 0;
-
-static int win32_child_thread_alive (ptid_t);
-void child_kill_inferior (void);
-
-static int last_sig = 0;	/* Set if a signal was received from
-				   the debugged process.  */
-
-/* Thread information structure used to track information that is
-   not available in gdb's thread structure.  */
-typedef struct thread_info_struct
-  {
-    struct thread_info_struct *next;
-    DWORD id;
-    HANDLE h;
-    char *name;
-    int suspend_count;
-    int stepped;		/* True if stepped.  */
-    CORE_ADDR step_pc;
-    CONTEXT context;
-  }
-thread_info;
-
-static thread_info thread_head =
-{NULL};
-static thread_info * thread_rec (DWORD id, int get_context);
-
-/* The process and thread handles for the above context.  */
-
-static DEBUG_EVENT current_event;	/* The current debug event from
-					   WaitForDebugEvent.  */
-static HANDLE current_process_handle;	/* Currently executing process.  */
-static thread_info *current_thread;	/* Info on currently selected
-					   thread.  */
-static thread_info *this_thread;	/* Info on thread returned by
-					   wait_for_debug_event.  */
-static DWORD main_thread_id;		/* Thread ID of the main thread.  */
-
-/* Counts of things.  */
-static int exception_count = 0;
-static int event_count = 0;
-
-/* User options.  */
-static int debug_exec = 0;		/* show execution */
-static int debug_events = 0;		/* show events from kernel */
-static int debug_memory = 0;		/* show target memory accesses */
-static int debug_exceptions = 0;	/* show target exceptions */
-
-/* An array of offset mappings into a Win32 Context structure.
-   This is a one-to-one mapping which is indexed by gdb's register
-   numbers.  It retrieves an offset into the context structure where
-   the 4 byte register is located.
-   An offset value of -1 indicates that Win32 does not provide this
-   register in it's CONTEXT structure.  regptr will return zero for this
-   register.
-
-   This is used by the regptr function.  */
-#define context_offset(x) ((int)&(((PCONTEXT)NULL)->x))
-static const int mappings[NUM_REGS + 1] =
-{
-#ifdef __i386__
-  context_offset (Eax),
-  context_offset (Ecx),
-  context_offset (Edx),
-  context_offset (Ebx),
-  context_offset (Esp),
-  context_offset (Ebp),
-  context_offset (Esi),
-  context_offset (Edi),
-  context_offset (Eip),
-  context_offset (EFlags),
-  context_offset (SegCs),
-  context_offset (SegSs),
-  context_offset (SegDs),
-  context_offset (SegEs),
-  context_offset (SegFs),
-  context_offset (SegGs),
-  context_offset (FloatSave.RegisterArea[0 * 10]),
-  context_offset (FloatSave.RegisterArea[1 * 10]),
-  context_offset (FloatSave.RegisterArea[2 * 10]),
-  context_offset (FloatSave.RegisterArea[3 * 10]),
-  context_offset (FloatSave.RegisterArea[4 * 10]),
-  context_offset (FloatSave.RegisterArea[5 * 10]),
-  context_offset (FloatSave.RegisterArea[6 * 10]),
-  context_offset (FloatSave.RegisterArea[7 * 10]),
-#elif defined(SHx)
-  context_offset (R0),
-  context_offset (R1),
-  context_offset (R2),
-  context_offset (R3),
-  context_offset (R4),
-  context_offset (R5),
-  context_offset (R6),
-  context_offset (R7),
-  context_offset (R8),
-  context_offset (R9),
-  context_offset (R10),
-  context_offset (R11),
-  context_offset (R12),
-  context_offset (R13),
-  context_offset (R14),
-  context_offset (R15),
-  context_offset (Fir),
-  context_offset (PR),		/* Procedure Register */
-  context_offset (GBR),		/* Global Base Register */
-  context_offset (MACH),	/* Accumulate */
-  context_offset (MACL),	/* Multiply */
-  context_offset (Psr),
-  context_offset (Fpul),
-  context_offset (Fpscr),
-  context_offset (FRegs[0]),
-  context_offset (FRegs[1]),
-  context_offset (FRegs[2]),
-  context_offset (FRegs[3]),
-  context_offset (FRegs[4]),
-  context_offset (FRegs[5]),
-  context_offset (FRegs[6]),
-  context_offset (FRegs[7]),
-  context_offset (FRegs[8]),
-  context_offset (FRegs[9]),
-  context_offset (FRegs[10]),
-  context_offset (FRegs[11]),
-  context_offset (FRegs[12]),
-  context_offset (FRegs[13]),
-  context_offset (FRegs[14]),
-  context_offset (FRegs[15]),
-  context_offset (xFRegs[0]),
-  context_offset (xFRegs[1]),
-  context_offset (xFRegs[2]),
-  context_offset (xFRegs[3]),
-  context_offset (xFRegs[4]),
-  context_offset (xFRegs[5]),
-  context_offset (xFRegs[6]),
-  context_offset (xFRegs[7]),
-  context_offset (xFRegs[8]),
-  context_offset (xFRegs[9]),
-  context_offset (xFRegs[10]),
-  context_offset (xFRegs[11]),
-  context_offset (xFRegs[12]),
-  context_offset (xFRegs[13]),
-  context_offset (xFRegs[14]),
-  context_offset (xFRegs[15]),
-#elif defined(MIPS)
-  context_offset (IntZero),
-  context_offset (IntAt),
-  context_offset (IntV0),
-  context_offset (IntV1),
-  context_offset (IntA0),
-  context_offset (IntA1),
-  context_offset (IntA2),
-  context_offset (IntA3),
-  context_offset (IntT0),
-  context_offset (IntT1),
-  context_offset (IntT2),
-  context_offset (IntT3),
-  context_offset (IntT4),
-  context_offset (IntT5),
-  context_offset (IntT6),
-  context_offset (IntT7),
-  context_offset (IntS0),
-  context_offset (IntS1),
-  context_offset (IntS2),
-  context_offset (IntS3),
-  context_offset (IntS4),
-  context_offset (IntS5),
-  context_offset (IntS6),
-  context_offset (IntS7),
-  context_offset (IntT8),
-  context_offset (IntT9),
-  context_offset (IntK0),
-  context_offset (IntK1),
-  context_offset (IntGp),
-  context_offset (IntSp),
-  context_offset (IntS8),
-  context_offset (IntRa),
-  context_offset (Psr),
-  context_offset (IntLo),
-  context_offset (IntHi),
-  -1,				/* bad */
-  -1,				/* cause */
-  context_offset (Fir),
-  context_offset (FltF0),
-  context_offset (FltF1),
-  context_offset (FltF2),
-  context_offset (FltF3),
-  context_offset (FltF4),
-  context_offset (FltF5),
-  context_offset (FltF6),
-  context_offset (FltF7),
-  context_offset (FltF8),
-  context_offset (FltF9),
-  context_offset (FltF10),
-  context_offset (FltF11),
-  context_offset (FltF12),
-  context_offset (FltF13),
-  context_offset (FltF14),
-  context_offset (FltF15),
-  context_offset (FltF16),
-  context_offset (FltF17),
-  context_offset (FltF18),
-  context_offset (FltF19),
-  context_offset (FltF20),
-  context_offset (FltF21),
-  context_offset (FltF22),
-  context_offset (FltF23),
-  context_offset (FltF24),
-  context_offset (FltF25),
-  context_offset (FltF26),
-  context_offset (FltF27),
-  context_offset (FltF28),
-  context_offset (FltF29),
-  context_offset (FltF30),
-  context_offset (FltF31),
-  context_offset (Fsr),
-  context_offset (Fir),
-  -1,				/* fp */
-#elif defined(ARM)
-  context_offset (R0),
-  context_offset (R1),
-  context_offset (R2),
-  context_offset (R3),
-  context_offset (R4),
-  context_offset (R5),
-  context_offset (R6),
-  context_offset (R7),
-  context_offset (R8),
-  context_offset (R9),
-  context_offset (R10),
-  context_offset (R11),
-  context_offset (R12),
-  context_offset (Sp),
-  context_offset (Lr),
-  context_offset (Pc),
-  -1,
-  -1,
-  -1,
-  -1,
-  -1,
-  -1,
-  -1,
-  -1,
-  -1,
-  context_offset (Psr),
-#endif
-  -1
-};
-
-/* Return a pointer into a CONTEXT field indexed by gdb register number.
-   Return a pointer to an address pointing to zero if there is no
-   corresponding CONTEXT field for the given register number.
- */
-static ULONG *
-regptr (LPCONTEXT c, int r)
-{
-  static ULONG zero = 0;
-  ULONG *p;
-  if (mappings[r] < 0)
-    p = &zero;
-  else
-    p = (ULONG *) (((char *) c) + mappings[r]);
-  return p;
-}
-
-/******************** Beginning of stub interface ********************/
-
-/* Stub interface description:
-
-   The Windows CE stub implements a crude RPC.  The hand-held device
-   connects to gdb using port 7000.  gdb and the stub then communicate
-   using packets where:
-
-   byte 0:              command id (e.g. Create Process)
-
-   byte 1-4:    DWORD
-
-   byte 1-2:    WORD
-
-   byte 1-2:    length
-   byte 3-n:    arbitrary memory.
-
-   The interface is deterministic, i.e., if the stub expects a DWORD
-   then the gdb server should send a DWORD.
- */
-
-/* Note: In the functions below, the `huh' parameter is a string
-   passed from the function containing a descriptive string concerning
-   the current operation.  This is used for error reporting.
-
-   The 'what' parameter is a command id as found in wince-stub.h.
-
-   Hopefully, the rest of the parameters are self-explanatory.
- */
-
-static int s;			/* communication socket */
-
-/* v-style interface for handling varying argyment list error messages.
-   Displays the error message in a dialog box and exits when user clicks
-   on OK.  */
-static void
-vstub_error (LPCSTR fmt, va_list * args)
-{
-  char buf[4096];
-  vsprintf (buf, fmt, args);
-  s = -1;
-  error (("%s"), buf);
-}
-
-/* The standard way to display an error message and exit.  */
-static void
-stub_error (LPCSTR fmt,...)
-{
-  va_list args;
-  va_start (args, fmt);
-  vstub_error (fmt, args);
-}
-
-/* Standard "oh well" can't communicate error.  Someday this might
-   attempt synchronization.  */
-static void
-attempt_resync (LPCSTR huh, int s)
-{
-  stub_error ("lost synchronization with target attempting %s", huh);
-}
-
-/* Read arbitrary stuff from a socket.  */
-static int
-sockread (LPCSTR huh, int s, void *str, size_t n)
-{
-  for (;;)
-    {
-      if (recv (s, str, n, 0) == n)
-	return n;
-      attempt_resync (huh, s);
-    }
-}
-
-/* Write arbitrary stuff to a socket.  */
-static int
-sockwrite (LPCSTR huh, const void *str, size_t n)
-{
-  for (;;)
-    {
-      if (send (s, str, n, 0) == n)
-	return n;
-      attempt_resync (huh, s);
-    }
-}
-
-/* Output an id/dword to the host.  */
-static void
-putdword (LPCSTR huh, gdb_wince_id what, DWORD n)
-{
-  if (sockwrite (huh, &what, sizeof (what)) != sizeof (what))
-    stub_error ("error writing record id to host for %s", huh);
-  if (sockwrite (huh, &n, sizeof (n)) != sizeof (n))
-    stub_error ("error writing %s to host.", huh);
-}
-
-/* Output an id/word to the host.  */
-static void
-putword (LPCSTR huh, gdb_wince_id what, WORD n)
-{
-  if (sockwrite (huh, &what, sizeof (what)) != sizeof (what))
-    stub_error ("error writing record id to host for %s", huh);
-  if (sockwrite (huh, &n, sizeof (n)) != sizeof (n))
-    stub_error ("error writing %s host.", huh);
-}
-
-/* Convenience define for outputting a "gdb_wince_len" type.  */
-#define putlen(huh, what, n) putword((huh), (what), (gdb_wince_len) (n))
-
-/* Put an arbitrary block of memory to the gdb host.  This comes in
-   two chunks an id/dword representing the length and the stream of
-   memory itself.  */
-static void
-putmemory (LPCSTR huh, gdb_wince_id what, 
-	   const void *mem, gdb_wince_len len)
-{
-  putlen (huh, what, len);
-  if (((short) len > 0) && sockwrite (huh, mem, len) != len)
-    stub_error ("error writing %s to host.", huh);
-}
-
-/* Output the result of an operation to the host.  If res != 0, sends
-   a block of memory starting at mem of len bytes.  If res == 0, sends
-   -GetLastError () and avoids sending the mem.  */
-static DWORD
-getdword (LPCSTR huh, gdb_wince_id what_this)
-{
-  DWORD n;
-  gdb_wince_id what;
-  do
-    if (sockread (huh, s, &what, sizeof (what)) != sizeof (what))
-      stub_error ("error getting record type from host - %s.", huh);
-  while (what_this != what);
-
-  if (sockread (huh, s, &n, sizeof (n)) != sizeof (n))
-    stub_error ("error getting %s from host.", huh);
-
-  return n;
-}
-
-/* Get a an ID (possibly) and a WORD from the host gdb.
-   Don't bother with the id if the main loop has already
-   read it.  */
-static WORD
-getword (LPCSTR huh, gdb_wince_id what_this)
-{
-  WORD n;
-  gdb_wince_id what;
-  do
-    if (sockread (huh, s, &what, sizeof (what)) != sizeof (what))
-      stub_error ("error getting record type from host - %s.", huh);
-  while (what_this != what);
-
-  if (sockread (huh, s, &n, sizeof (n)) != sizeof (n))
-    stub_error ("error getting %s from host.", huh);
-
-  return n;
-}
-
-/* Handy defines for getting/putting various types of values.  */
-#define gethandle(huh, what) (HANDLE) getdword ((huh), (what))
-#define getpvoid(huh, what) (LPVOID) getdword ((huh), (what))
-#define getlen(huh, what) (gdb_wince_len) getword ((huh), (what))
-#define puthandle(huh, what, h) putdword ((huh), (what), (DWORD) (h))
-#define putpvoid(huh, what, p) putdword ((huh), (what), (DWORD) (p))
-
-/* Retrieve the result of an operation from the stub.  If nbytes < 0)
-   then nbytes is actually an error and nothing else follows.  Use
-   SetLastError to remember this.  if nbytes > 0, retrieve a block of
-   *nbytes into buf.
- */
-int
-getresult (LPCSTR huh, gdb_wince_id what, LPVOID buf, 
-	   gdb_wince_len * nbytes)
-{
-  gdb_wince_len dummy;
-  if (nbytes == NULL)
-    nbytes = &dummy;
-
-  *nbytes = getlen (huh, what);
-
-  if ((short) *nbytes < 0)
-    {
-      SetLastError (-(short) *nbytes);
-      return 0;
-    }
-
-  if ((gdb_wince_len) sockread (huh, s, buf, *nbytes) != *nbytes)
-    stub_error ("couldn't read information from wince stub - %s", huh);
-
-  return 1;
-}
-
-/* Convert "narrow" string to "wide".  Manipulates a buffer ring of 8
-   buffers which hold the translated string.  This is an arbitrary limit
-   but it is approximately double the current needs of this module.
- */
-LPWSTR
-towide (const char *s, gdb_wince_len * out_len)
-{
-  static int n = -1;
-  static LPWSTR outs[8] =
-  {NULL /*, NULL, etc.  */ };
-  gdb_wince_len dummy;
-
-  if (!out_len)
-    out_len = &dummy;
-
-  /* First determine the length required to hold the converted string.  */
-  *out_len = sizeof (WCHAR) * MultiByteToWideChar (CP_ACP, 0, s, 
-						   -1, NULL, 0);
-  if (!*out_len)
-    return NULL;		/* The conversion failed.  */
-
-  if (++n >= (sizeof (outs) / sizeof (outs[0])))
-    n = 0;			/* wrap */
-
-  /* Allocate space for the converted string, reusing any previously
-     allocated space, if applicable. Note that if outs[n] is NULL,
-     xrealloc will act as a malloc (under cygwin, at least).
-   */
-  outs[n] = (LPWSTR) xrealloc (outs[n], *out_len);
-  memset (outs[n], 0, *out_len);
-  (void) MultiByteToWideChar (CP_ACP, 0, s, -1, outs[n], *out_len);
-  return outs[n];
-}
-
-/******************** Emulation routines start here. ********************
-
-  The functions below are modelled after their Win32 counterparts.
-  They are named similarly to Win32 and take exactly the same
-  arguments except where otherwise noted.  They communicate with the
-  stub on the hand-held device by sending their arguments over the
-  socket and waiting for results from the socket.
-
-  There is one universal change.  In cases where a length is expected
-  to be returned in a DWORD, we use a gdb_wince_len type instead.
-  Currently this is an unsigned short which is smaller than the
-  standard Win32 DWORD.  This is done to minimize unnecessary traffic
-  since the connection to Windows CE can be slow.  To change this,
-  modify the typedef in wince-stub.h and change the putlen/getlen
-  macros in this file and in the stub.
-*/
-
-static int
-create_process (LPSTR exec_file, LPSTR args, DWORD flags, 
-		PROCESS_INFORMATION * pi)
-{
-  gdb_wince_len len;
-  LPWSTR buf;
-
-  buf = towide (exec_file, &len);
-  putmemory ("CreateProcess exec_file", GDB_CREATEPROCESS, buf, len);
-  buf = towide (args, &len);
-  putmemory ("CreateProcess args", GDB_CREATEPROCESS, buf, len);
-  putdword ("CreateProcess flags", GDB_CREATEPROCESS, flags);
-  return getresult ("CreateProcess result", GDB_CREATEPROCESS, pi, NULL);
-}
-
-/* Emulate TerminateProcess.  
-   Don't bother with the second argument since CE ignores it.
- */
-static int
-terminate_process (HANDLE h)
-{
-  gdb_wince_result res;
-  if (s < 0)
-    return 1;
-  puthandle ("TerminateProcess handle", GDB_TERMINATEPROCESS, h);
-
-  return getresult ("TerminateProcess result", 
-		    GDB_TERMINATEPROCESS, &res, NULL);
-}
-
-static int
-wait_for_debug_event (DEBUG_EVENT * ev, DWORD ms)
-{
-  if (s < 0)
-    return 1;
-  putdword ("WaitForDebugEvent ms", GDB_WAITFORDEBUGEVENT, ms);
-
-  return getresult ("WaitForDebugEvent event", 
-		    GDB_WAITFORDEBUGEVENT, ev, NULL);
-}
-
-static int
-get_thread_context (HANDLE h, CONTEXT * c)
-{
-  if (s < 0)
-    return 1;
-  puthandle ("GetThreadContext handle", GDB_GETTHREADCONTEXT, h);
-  putdword ("GetThreadContext flags", GDB_GETTHREADCONTEXT, 
-	    c->ContextFlags);
-
-  return getresult ("GetThreadContext context", 
-		    GDB_GETTHREADCONTEXT, c, NULL);
-}
-
-static int
-set_thread_context (HANDLE h, CONTEXT * c)
-{
-  gdb_wince_result res;
-  if (s < 0)
-    return 1;
-  puthandle ("SetThreadContext handle", GDB_SETTHREADCONTEXT, h);
-  putmemory ("SetThreadContext context", GDB_SETTHREADCONTEXT, 
-	     c, sizeof (*c));
-
-  return getresult ("SetThreadContext context", 
-		    GDB_SETTHREADCONTEXT, &res, NULL);
-}
-
-static int
-read_process_memory (HANDLE h, LPCVOID where, 
-		     LPVOID buf, gdb_wince_len len, 
-		     gdb_wince_len * nbytes)
-{
-  if (s < 0)
-    return 1;
-  puthandle ("ReadProcessMemory handle", GDB_READPROCESSMEMORY, h);
-  putpvoid ("ReadProcessMemory location", GDB_READPROCESSMEMORY, where);
-  putlen ("ReadProcessMemory size", GDB_READPROCESSMEMORY, len);
-
-  return getresult ("ReadProcessMemory buf", 
-		    GDB_READPROCESSMEMORY, buf, nbytes);
-}
-
-static int
-write_process_memory (HANDLE h, LPCVOID where, 
-		      LPCVOID buf, gdb_wince_len len, 
-		      gdb_wince_len * nbytes)
-{
-  if (s < 0)
-    return 1;
-  puthandle ("WriteProcessMemory handle", GDB_WRITEPROCESSMEMORY, h);
-  putpvoid ("WriteProcessMemory location", GDB_WRITEPROCESSMEMORY, where);
-  putmemory ("WriteProcProcessMemory buf", GDB_WRITEPROCESSMEMORY, buf, len);
-
-  return getresult ("WriteProcessMemory result", 
-		    GDB_WRITEPROCESSMEMORY, nbytes, NULL);
-}
-
-static int
-remote_read_bytes (CORE_ADDR memaddr, char *myaddr, int len)
-{
-  gdb_wince_len nbytes;
-  if (!read_process_memory (current_process_handle, 
-			    (LPCVOID) memaddr,
-			    (LPVOID) myaddr, 
-			    len, &nbytes))
-    return -1;
-  return nbytes;
-}
-
-static int
-remote_write_bytes (CORE_ADDR memaddr, char *myaddr, int len)
-{
-  gdb_wince_len nbytes;
-  if (!write_process_memory (current_process_handle, 
-			     (LPCVOID) memaddr, 
-			     (LPCVOID) myaddr, 
-			     len, &nbytes))
-    return -1;
-  return nbytes;
-}
-
-/* This is not a standard Win32 function.  It instructs the stub to
-   return TRUE if the thread referenced by HANDLE h is alive.
- */
-static int
-thread_alive (HANDLE h)
-{
-  gdb_wince_result res;
-  if (s < 0)
-    return 1;
-  puthandle ("ThreadAlive handle", GDB_THREADALIVE, h);
-  return getresult ("ThreadAlive result", GDB_THREADALIVE, &res, NULL);
-}
-
-static int
-suspend_thread (HANDLE h)
-{
-  if (s < 0)
-    return 1;
-  puthandle ("SuspendThread handle", GDB_SUSPENDTHREAD, h);
-  return (int) getdword ("SuspendThread result", GDB_SUSPENDTHREAD);
-}
-
-static int
-resume_thread (HANDLE h)
-{
-  if (s < 0)
-    return 1;
-  puthandle ("ResumeThread handle", GDB_RESUMETHREAD, h);
-  return (int) getdword ("SuspendThread result", GDB_RESUMETHREAD);
-}
-
-static int
-continue_debug_event (DWORD pid, DWORD tid, DWORD status)
-{
-  gdb_wince_result res;
-  if (s < 0)
-    return 0;
-  putdword ("ContinueDebugEvent pid", GDB_CONTINUEDEBUGEVENT, pid);
-  putdword ("ContinueDebugEvent tid", GDB_CONTINUEDEBUGEVENT, tid);
-  putdword ("ContinueDebugEvent status", GDB_CONTINUEDEBUGEVENT, status);
-  return getresult ("ContinueDebugEvent result", 
-		    GDB_CONTINUEDEBUGEVENT, &res, NULL);
-}
-
-static int
-close_handle (HANDLE h)
-{
-  gdb_wince_result res;
-  if (s < 0)
-    return 1;
-  puthandle ("CloseHandle handle", GDB_CLOSEHANDLE, h);
-  return (int) getresult ("CloseHandle result", 
-			  GDB_CLOSEHANDLE, &res, NULL);
-}
-
-/* This is not a standard Win32 interface.  This function tells the
-   stub to terminate.
- */
-static void
-stop_stub (void)
-{
-  if (s < 0)
-    return;
-  (void) putdword ("Stopping gdb stub", GDB_STOPSTUB, 0);
-  s = -1;
-}
-
-/******************** End of emulation routines. ********************/
-/******************** End of stub interface ********************/
-
-#define check_for_step(a, x) (x)
-
-#ifdef MIPS
-static void
-undoSStep (thread_info * th)
-{
-  if (th->stepped)
-    {
-      remove_single_step_breakpoints ();
-      th->stepped = 0;
-    }
-}
-
-void
-wince_software_single_step (enum target_signal ignore,
-			    int insert_breakpoints_p)
-{
-  unsigned long pc;
-  /* Info on currently selected thread.  */
-  thread_info *th = current_thread;
-  CORE_ADDR mips_next_pc (CORE_ADDR pc);
-
-  if (!insert_breakpoints_p)
-    {
-      undoSStep (th);
-      return;
-    }
-
-  th->stepped = 1;
-  pc = read_register (PC_REGNUM);
-  th->step_pc = mips_next_pc (pc);
-  insert_single_step_breakpoint (th->step_pc);
-  return;
-}
-#elif SHx
-/* Renesas SH architecture instruction encoding masks */
-
-#define COND_BR_MASK   0xff00
-#define UCOND_DBR_MASK 0xe000
-#define UCOND_RBR_MASK 0xf0df
-#define TRAPA_MASK     0xff00
-
-#define COND_DISP      0x00ff
-#define UCOND_DISP     0x0fff
-#define UCOND_REG      0x0f00
-
-/* Renesas SH instruction opcodes */
-
-#define BF_INSTR       0x8b00
-#define BT_INSTR       0x8900
-#define BRA_INSTR      0xa000
-#define BSR_INSTR      0xb000
-#define JMP_INSTR      0x402b
-#define JSR_INSTR      0x400b
-#define RTS_INSTR      0x000b
-#define RTE_INSTR      0x002b
-#define TRAPA_INSTR    0xc300
-#define SSTEP_INSTR    0xc3ff
-
-
-#define T_BIT_MASK     0x0001
-
-static CORE_ADDR
-sh_get_next_pc (CONTEXT *c)
-{
-  short *instrMem;
-  int displacement;
-  int reg;
-  unsigned short opcode;
-
-  instrMem = (short *) c->Fir;
-
-  opcode = read_memory_integer ((CORE_ADDR) c->Fir, sizeof (opcode));
-
-  if ((opcode & COND_BR_MASK) == BT_INSTR)
-    {
-      if (c->Psr & T_BIT_MASK)
-	{
-	  displacement = (opcode & COND_DISP) << 1;
-	  if (displacement & 0x80)
-	    displacement |= 0xffffff00;
-	  /*
-	     * Remember PC points to second instr.
-	     * after PC of branch ... so add 4
-	   */
-	  instrMem = (short *) (c->Fir + displacement + 4);
-	}
-      else
-	instrMem += 1;
-    }
-  else if ((opcode & COND_BR_MASK) == BF_INSTR)
-    {
-      if (c->Psr & T_BIT_MASK)
-	instrMem += 1;
-      else
-	{
-	  displacement = (opcode & COND_DISP) << 1;
-	  if (displacement & 0x80)
-	    displacement |= 0xffffff00;
-	  /*
-	     * Remember PC points to second instr.
-	     * after PC of branch ... so add 4
-	   */
-	  instrMem = (short *) (c->Fir + displacement + 4);
-	}
-    }
-  else if ((opcode & UCOND_DBR_MASK) == BRA_INSTR)
-    {
-      displacement = (opcode & UCOND_DISP) << 1;
-      if (displacement & 0x0800)
-	displacement |= 0xfffff000;
-
-      /*
-	 * Remember PC points to second instr.
-	 * after PC of branch ... so add 4
-       */
-      instrMem = (short *) (c->Fir + displacement + 4);
-    }
-  else if ((opcode & UCOND_RBR_MASK) == JSR_INSTR)
-    {
-      reg = (char) ((opcode & UCOND_REG) >> 8);
-
-      instrMem = (short *) *regptr (c, reg);
-    }
-  else if (opcode == RTS_INSTR)
-    instrMem = (short *) c->PR;
-  else if (opcode == RTE_INSTR)
-    instrMem = (short *) *regptr (c, 15);
-  else if ((opcode & TRAPA_MASK) == TRAPA_INSTR)
-    instrMem = (short *) ((opcode & ~TRAPA_MASK) << 2);
-  else
-    instrMem += 1;
-
-  return (CORE_ADDR) instrMem;
-}
-/* Single step (in a painstaking fashion) by inspecting the current
-   instruction and setting a breakpoint on the "next" instruction
-   which would be executed.  This code hails from sh-stub.c.
- */
-static void
-undoSStep (thread_info * th)
-{
-  if (th->stepped)
-    {
-      remove_single_step_breakpoints ();
-      th->stepped = 0;
-    }
-  return;
-}
-
-/* Single step (in a painstaking fashion) by inspecting the current
-   instruction and setting a breakpoint on the "next" instruction
-   which would be executed.  This code hails from sh-stub.c.
- */
-void
-wince_software_single_step (enum target_signal ignore,
-			    int insert_breakpoints_p)
-{
-  /* Info on currently selected thread.  */
-  thread_info *th = current_thread;
-
-  if (!insert_breakpoints_p)
-    {
-      undoSStep (th);
-      return;
-    }
-
-  th->stepped = 1;
-  th->step_pc = sh_get_next_pc (&th->context);
-  insert_single_step_breakpoint (th->step_pc);
-  return;
-}
-#elif defined (ARM)
-#undef check_for_step
-
-static enum target_signal
-check_for_step (DEBUG_EVENT *ev, enum target_signal x)
-{
-  thread_info *th = thread_rec (ev->dwThreadId, 1);
-
-  if (th->stepped &&
-      th->step_pc == (CORE_ADDR) ev->u.Exception.ExceptionRecord.ExceptionAddress)
-    return TARGET_SIGNAL_TRAP;
-  else
-    return x;
-}
-
-/* Single step (in a painstaking fashion) by inspecting the current
-   instruction and setting a breakpoint on the "next" instruction
-   which would be executed.  This code hails from sh-stub.c.
- */
-static void
-undoSStep (thread_info * th)
-{
-  if (th->stepped)
-    {
-      remove_single_step_breakpoints ();
-      th->stepped = 0;
-    }
-}
-
-void
-wince_software_single_step (enum target_signal ignore,
-			    int insert_breakpoints_p)
-{
-  unsigned long pc;
-  /* Info on currently selected thread.  */
-  thread_info *th = current_thread;
-  CORE_ADDR mips_next_pc (CORE_ADDR pc);
-
-  if (!insert_breakpoints_p)
-    {
-      undoSStep (th);
-      return;
-    }
-
-  th->stepped = 1;
-  pc = read_register (PC_REGNUM);
-  th->step_pc = arm_get_next_pc (pc);
-  insert_single_step_breakpoint (th->step_pc);
-  return;
-}
-#endif
-
-/* Find a thread record given a thread id.
-   If get_context then also retrieve the context for this thread.  */
-
-static thread_info *
-thread_rec (DWORD id, int get_context)
-{
-  thread_info *th;
-
-  for (th = &thread_head; (th = th->next) != NULL;)
-    if (th->id == id)
-      {
-	if (!th->suspend_count && get_context)
-	  {
-	    if (get_context > 0 && th != this_thread)
-	      th->suspend_count = suspend_thread (th->h) + 1;
-	    else if (get_context < 0)
-	      th->suspend_count = -1;
-
-	    th->context.ContextFlags = CONTEXT_DEBUGGER;
-	    get_thread_context (th->h, &th->context);
-	  }
-	return th;
-      }
-  return NULL;
-}
-
-/* Add a thread to the thread list.  */
-static thread_info *
-child_add_thread (DWORD id, HANDLE h)
-{
-  thread_info *th;
-
-  if ((th = thread_rec (id, FALSE)))
-    return th;
-
-  th = (thread_info *) xmalloc (sizeof (*th));
-  memset (th, 0, sizeof (*th));
-  th->id = id;
-  th->h = h;
-  th->next = thread_head.next;
-  thread_head.next = th;
-  add_thread (id);
-  return th;
-}
-
-/* Clear out any old thread list and reintialize it to a
-   pristine state.  */
-static void
-child_init_thread_list (void)
-{
-  thread_info *th = &thread_head;
-
-  DEBUG_EVENTS (("gdb: child_init_thread_list\n"));
-  init_thread_list ();
-  while (th->next != NULL)
-    {
-      thread_info *here = th->next;
-      th->next = here->next;
-      (void) close_handle (here->h);
-      xfree (here);
-    }
-}
-
-/* Delete a thread from the list of threads.  */
-static void
-child_delete_thread (DWORD id)
-{
-  thread_info *th;
-
-  if (info_verbose)
-    printf_unfiltered ("[Deleting %s]\n", target_pid_to_str (id));
-  delete_thread (id);
-
-  for (th = &thread_head;
-       th->next != NULL && th->next->id != id;
-       th = th->next)
-    continue;
-
-  if (th->next != NULL)
-    {
-      thread_info *here = th->next;
-      th->next = here->next;
-      close_handle (here->h);
-      xfree (here);
-    }
-}
-
-static void
-check (BOOL ok, const char *file, int line)
-{
-  if (!ok)
-    printf_filtered ("error return %s:%d was %d\n", 
-		     file, line, GetLastError ());
-}
-
-static void
-do_child_fetch_inferior_registers (int r)
-{
-  if (r >= 0)
-    {
-      regcache_raw_supply (current_regcache, r,
-			   (char *) regptr (&current_thread->context, r));
-    }
-  else
-    {
-      for (r = 0; r < NUM_REGS; r++)
-	do_child_fetch_inferior_registers (r);
-    }
-}
-
-static void
-child_fetch_inferior_registers (int r)
-{
-  current_thread = thread_rec (PIDGET (inferior_ptid), TRUE);
-  do_child_fetch_inferior_registers (r);
-}
-
-static void
-do_child_store_inferior_registers (int r)
-{
-  if (r >= 0)
-    deprecated_read_register_gen (r, ((char *) &current_thread->context) + mappings[r]);
-  else
-    {
-      for (r = 0; r < NUM_REGS; r++)
-	do_child_store_inferior_registers (r);
-    }
-}
-
-/* Store a new register value into the current thread context.  */
-static void
-child_store_inferior_registers (int r)
-{
-  current_thread = thread_rec (PIDGET (inferior_ptid), TRUE);
-  do_child_store_inferior_registers (r);
-}
-
-/* Wait for child to do something.  Return pid of child, or -1 in case
-   of error; store status through argument pointer OURSTATUS.  */
-
-static int
-handle_load_dll (void *dummy)
-{
-  LOAD_DLL_DEBUG_INFO *event = &current_event.u.LoadDll;
-  char dll_buf[MAX_PATH + 1];
-  char *p, *bufp, *imgp, *dll_name, *dll_basename;
-  int len;
-
-  dll_buf[0] = dll_buf[sizeof (dll_buf) - 1] = '\0';
-  if (!event->lpImageName)
-    return 1;
-
-  len = 0;
-  for (bufp = dll_buf, imgp = event->lpImageName;
-       bufp < dll_buf + sizeof (dll_buf);
-       bufp += 16, imgp += 16)
-    {
-      gdb_wince_len nbytes = 0;
-      (void) read_process_memory (current_process_handle,
-				  imgp, bufp, 16, &nbytes);
-
-      if (!nbytes && bufp == dll_buf)
-	return 1;		/* couldn't read it */
-      for (p = bufp; p < bufp + nbytes; p++)
-	{
-	  len++;
-	  if (*p == '\0')
-	    goto out;
-	  if (event->fUnicode)
-	    p++;
-	}
-      if (!nbytes)
-	break;
-    }
-
-out:
-  if (!len)
-    return 1;
-#if 0
-  dll_buf[len] = '\0';
-#endif
-  dll_name = alloca (len);
-
-  if (!dll_name)
-    return 1;
-
-  if (!event->fUnicode)
-    memcpy (dll_name, dll_buf, len);
-  else
-    WideCharToMultiByte (CP_ACP, 0, (LPCWSTR) dll_buf,
-			 len, dll_name, len, 0, 0);
-
-  while ((p = strchr (dll_name, '\\')))
-    *p = '/';
-
-  /* FIXME!! It would be nice to define one symbol which pointed to
-     the front of the dll if we can't find any symbols.  */
-
-  if (!(dll_basename = strrchr (dll_name, '/')))
-    dll_basename = dll_name;
-  else
-    dll_basename++;
-
-  /* The symbols in a dll are offset by 0x1000, which is the
-     the offset from 0 of the first byte in an image - because
-     of the file header and the section alignment.
-
-     FIXME: Is this the real reason that we need the 0x1000 ? */
-
-  printf_unfiltered ("%x:%s", event->lpBaseOfDll, dll_name);
-  printf_unfiltered ("\n");
-
-  return 1;
-}
-
-/* Handle DEBUG_STRING output from child process.  */
-static void
-handle_output_debug_string (struct target_waitstatus *ourstatus)
-{
-  char p[256];
-  char s[255];
-  char *q;
-  gdb_wince_len nbytes_read;
-  gdb_wince_len nbytes = current_event.u.DebugString.nDebugStringLength;
-
-  if (nbytes > 255)
-    nbytes = 255;
-
-  memset (p, 0, sizeof (p));
-  if (!read_process_memory (current_process_handle,
-			    current_event.u.DebugString.lpDebugStringData,
-			    &p, nbytes, &nbytes_read)
-      || !*p)
-    return;
-
-  memset (s, 0, sizeof (s));
-  WideCharToMultiByte (CP_ACP, 0, (LPCWSTR) p, (int) nbytes_read,
-		       s, sizeof (s) - 1, NULL, NULL);
-  q = strchr (s, '\n');
-  if (q != NULL)
-    {
-      *q = '\0';
-      if (*--q = '\r')
-	*q = '\0';
-    }
-
-  warning (s);
-
-  return;
-}
-
-/* Handle target exceptions.  */
-static int
-handle_exception (struct target_waitstatus *ourstatus)
-{
-#if 0
-  if (current_event.u.Exception.dwFirstChance)
-    return 0;
-#endif
-
-  ourstatus->kind = TARGET_WAITKIND_STOPPED;
-
-  switch (current_event.u.Exception.ExceptionRecord.ExceptionCode)
-    {
-    case EXCEPTION_ACCESS_VIOLATION:
-      DEBUG_EXCEPT (("gdb: Target exception ACCESS_VIOLATION at 0x%08x\n",
-		     (unsigned) current_event.u.Exception.ExceptionRecord.ExceptionAddress));
-      ourstatus->value.sig = TARGET_SIGNAL_SEGV;
-      break;
-    case STATUS_STACK_OVERFLOW:
-      DEBUG_EXCEPT (("gdb: Target exception STACK_OVERFLOW at 0x%08x\n",
-		     (unsigned) current_event.u.Exception.ExceptionRecord.ExceptionAddress));
-      ourstatus->value.sig = TARGET_SIGNAL_SEGV;
-      break;
-    case EXCEPTION_BREAKPOINT:
-      DEBUG_EXCEPT (("gdb: Target exception BREAKPOINT at 0x%08x\n",
-		     (unsigned) current_event.u.Exception.ExceptionRecord.ExceptionAddress));
-      ourstatus->value.sig = TARGET_SIGNAL_TRAP;
-      break;
-    case DBG_CONTROL_C:
-      DEBUG_EXCEPT (("gdb: Target exception CONTROL_C at 0x%08x\n",
-		     (unsigned) current_event.u.Exception.ExceptionRecord.ExceptionAddress));
-      ourstatus->value.sig = TARGET_SIGNAL_INT;
-      /* User typed CTRL-C.  Continue with this status.  */
-      last_sig = SIGINT;	/* FIXME - should check pass state.  */
-      break;
-    case EXCEPTION_SINGLE_STEP:
-      DEBUG_EXCEPT (("gdb: Target exception SINGLE_STEP at 0x%08x\n",
-		     (unsigned) current_event.u.Exception.ExceptionRecord.ExceptionAddress));
-      ourstatus->value.sig = TARGET_SIGNAL_TRAP;
-      break;
-    case EXCEPTION_ILLEGAL_INSTRUCTION:
-      DEBUG_EXCEPT (("gdb: Target exception SINGLE_ILL at 0x%08x\n",
-		     /* (unsigned)? */ current_event.u.Exception.ExceptionRecord.ExceptionAddress));
-      ourstatus->value.sig = check_for_step (&current_event, 
-					     TARGET_SIGNAL_ILL);
-      break;
-    default:
-      /* This may be a structured exception handling exception.  In
-	 that case, we want to let the program try to handle it, and
-	 only break if we see the exception a second time.  */
-
-      printf_unfiltered 
-	("gdb: unknown target exception 0x%08x at 0x%08x\n",
-	 current_event.u.Exception.ExceptionRecord.ExceptionCode,
-	 current_event.u.Exception.ExceptionRecord.ExceptionAddress);
-      ourstatus->value.sig = TARGET_SIGNAL_UNKNOWN;
-      break;
-    }
-  exception_count++;
-  return 1;
-}
-
-/* Resume all artificially suspended threads if we are continuing
-   execution.  */
-static BOOL
-child_continue (DWORD continue_status, int id)
-{
-  int i;
-  thread_info *th;
-  BOOL res;
-
-  DEBUG_EVENTS (("ContinueDebugEvent (cpid=%d, ctid=%d, DBG_CONTINUE);\n",
-		 (unsigned) current_event.dwProcessId, 
-		 (unsigned) current_event.dwThreadId));
-  res = continue_debug_event (current_event.dwProcessId,
-			      current_event.dwThreadId,
-			      continue_status);
-  if (res)
-    for (th = &thread_head; (th = th->next) != NULL;)
-      if (((id == -1) || (id == th->id)) && th->suspend_count)
-	{
-	  for (i = 0; i < th->suspend_count; i++)
-	    (void) resume_thread (th->h);
-	  th->suspend_count = 0;
-	}
-
-  return res;
-}
-
-/* Get the next event from the child.  Return 1 if the event requires
-   handling by WFI (or whatever).
- */
-static int
-get_child_debug_event (int pid, struct target_waitstatus *ourstatus,
-		       DWORD target_event_code, int *retval)
-{
-  int breakout = 0;
-  BOOL debug_event;
-  DWORD continue_status, event_code;
-  thread_info *th = NULL;
-  static thread_info dummy_thread_info;
-
-  if (!(debug_event = wait_for_debug_event (&current_event, 1000)))
-    {
-      *retval = 0;
-      goto out;
-    }
-
-  event_count++;
-  continue_status = DBG_CONTINUE;
-  *retval = 0;
-
-  event_code = current_event.dwDebugEventCode;
-  breakout = event_code == target_event_code;
-
-  switch (event_code)
-    {
-    case CREATE_THREAD_DEBUG_EVENT:
-      DEBUG_EVENTS (("gdb: kernel event for pid=%d tid=%x code=%s)\n",
-		     (unsigned) current_event.dwProcessId,
-		     (unsigned) current_event.dwThreadId,
-		     "CREATE_THREAD_DEBUG_EVENT"));
-      /* Record the existence of this thread */
-      th = child_add_thread (current_event.dwThreadId,
-			     current_event.u.CreateThread.hThread);
-      if (info_verbose)
-	printf_unfiltered ("[New %s]\n",
-			   target_pid_to_str (current_event.dwThreadId));
-      break;
-
-    case EXIT_THREAD_DEBUG_EVENT:
-      DEBUG_EVENTS (("gdb: kernel event for pid=%d tid=%d code=%s)\n",
-		     (unsigned) current_event.dwProcessId,
-		     (unsigned) current_event.dwThreadId,
-		     "EXIT_THREAD_DEBUG_EVENT"));
-      child_delete_thread (current_event.dwThreadId);
-      th = &dummy_thread_info;
-      break;
-
-    case CREATE_PROCESS_DEBUG_EVENT:
-      DEBUG_EVENTS (("gdb: kernel event for pid=%d tid=%d code=%s)\n",
-		     (unsigned) current_event.dwProcessId,
-		     (unsigned) current_event.dwThreadId,
-		     "CREATE_PROCESS_DEBUG_EVENT"));
-      current_process_handle = current_event.u.CreateProcessInfo.hProcess;
-
-      main_thread_id = current_event.dwThreadId;
-      inferior_ptid = pid_to_ptid (main_thread_id);
-      /* Add the main thread */
-      th = child_add_thread (PIDGET (inferior_ptid),
-			     current_event.u.CreateProcessInfo.hThread);
-      break;
-
-    case EXIT_PROCESS_DEBUG_EVENT:
-      DEBUG_EVENTS (("gdb: kernel event for pid=%d tid=%d code=%s)\n",
-		     (unsigned) current_event.dwProcessId,
-		     (unsigned) current_event.dwThreadId,
-		     "EXIT_PROCESS_DEBUG_EVENT"));
-      ourstatus->kind = TARGET_WAITKIND_EXITED;
-      ourstatus->value.integer = current_event.u.ExitProcess.dwExitCode;
-      close_handle (current_process_handle);
-      *retval = current_event.dwProcessId;
-      breakout = 1;
-      break;
-
-    case LOAD_DLL_DEBUG_EVENT:
-      DEBUG_EVENTS (("gdb: kernel event for pid=%d tid=%d code=%s)\n",
-		     (unsigned) current_event.dwProcessId,
-		     (unsigned) current_event.dwThreadId,
-		     "LOAD_DLL_DEBUG_EVENT"));
-      catch_errors (handle_load_dll, NULL, 
-		    (char *) "", RETURN_MASK_ALL);
-      registers_changed ();	/* mark all regs invalid */
-      break;
-
-    case UNLOAD_DLL_DEBUG_EVENT:
-      DEBUG_EVENTS (("gdb: kernel event for pid=%d tid=%d code=%s)\n",
-		     (unsigned) current_event.dwProcessId,
-		     (unsigned) current_event.dwThreadId,
-		     "UNLOAD_DLL_DEBUG_EVENT"));
-      break;			/* FIXME: don't know what to do here */
-
-    case EXCEPTION_DEBUG_EVENT:
-      DEBUG_EVENTS (("gdb: kernel event for pid=%d tid=%d code=%s)\n",
-		     (unsigned) current_event.dwProcessId,
-		     (unsigned) current_event.dwThreadId,
-		     "EXCEPTION_DEBUG_EVENT"));
-      if (handle_exception (ourstatus))
-	*retval = current_event.dwThreadId;
-      else
-	{
-	  continue_status = DBG_EXCEPTION_NOT_HANDLED;
-	  breakout = 0;
-	}
-      break;
-
-    case OUTPUT_DEBUG_STRING_EVENT:	/* message from the kernel */
-      DEBUG_EVENTS (("gdb: kernel event for pid=%d tid=%d code=%s)\n",
-		     (unsigned) current_event.dwProcessId,
-		     (unsigned) current_event.dwThreadId,
-		     "OUTPUT_DEBUG_STRING_EVENT"));
-      handle_output_debug_string ( ourstatus);
-      break;
-    default:
-      printf_unfiltered ("gdb: kernel event for pid=%d tid=%d\n",
-			 current_event.dwProcessId,
-			 current_event.dwThreadId);
-      printf_unfiltered ("                 unknown event code %d\n",
-			 current_event.dwDebugEventCode);
-      break;
-    }
-
-  if (breakout)
-    this_thread = current_thread = th ?: thread_rec (current_event.dwThreadId,
-						     TRUE);
-  else
-    CHECK (child_continue (continue_status, -1));
-
-out:
-  return breakout;
-}
-
-/* Wait for interesting events to occur in the target process.  */
-static ptid_t
-child_wait (ptid_t ptid, struct target_waitstatus *ourstatus)
-{
-  DWORD event_code;
-  int retval;
-  int pid = PIDGET (ptid);
-
-  /* We loop when we get a non-standard exception rather than return
-     with a SPURIOUS because resume can try and step or modify things,
-     which needs a current_thread->h.  But some of these exceptions mark
-     the birth or death of threads, which mean that the current thread
-     isn't necessarily what you think it is.  */
-
-  while (1)
-    if (get_child_debug_event (pid, ourstatus, 
-			       EXCEPTION_DEBUG_EVENT, &retval))
-      return pid_to_ptid (retval);
-    else
-      {
-	int detach = 0;
-
-	if (deprecated_ui_loop_hook != NULL)
-	  detach = deprecated_ui_loop_hook (0);
-
-	if (detach)
-	  child_kill_inferior ();
-      }
-}
-
-/* Print status information about what we're accessing.  */
-
-static void
-child_files_info (struct target_ops *ignore)
-{
-  printf_unfiltered ("\tUsing the running image of child %s.\n",
-		     target_pid_to_str (inferior_ptid));
-}
-
-static void
-child_open (char *arg, int from_tty)
-{
-  error (_("Use the \"run\" command to start a child process."));
-}
-
-#define FACTOR (0x19db1ded53ea710LL)
-#define NSPERSEC 10000000
-
-/* Convert a Win32 time to "UNIX" format.  */
-long
-to_time_t (FILETIME * ptr)
-{
-  /* A file time is the number of 100ns since jan 1 1601
-     stuffed into two long words.
-     A time_t is the number of seconds since jan 1 1970.  */
-
-  long rem;
-  long long x = ((long long) ptr->dwHighDateTime << 32) + ((unsigned) ptr->dwLowDateTime);
-  x -= FACTOR;			/* Number of 100ns between 1601 and 1970.  */
-  rem = x % ((long long) NSPERSEC);
-  rem += (NSPERSEC / 2);
-  x /= (long long) NSPERSEC;	/* Number of 100ns in a second.  */
-  x += (long long) (rem / NSPERSEC);
-  return x;
-}
-
-/* Upload a file to the remote device depending on the user's
-   'set remoteupload' specification.  */
-char *
-upload_to_device (const char *to, const char *from)
-{
-  HANDLE h;
-  const char *dir = remote_directory ?: "\\gdb";
-  int len;
-  static char *remotefile = NULL;
-  LPWSTR wstr;
-  char *p;
-  DWORD err;
-  const char *in_to = to;
-  FILETIME crtime, actime, wrtime;
-  time_t utime;
-  struct stat st;
-  int fd;
-
-  /* Look for a path separator and only use trailing part.  */
-  while ((p = strpbrk (to, "/\\")) != NULL)
-    to = p + 1;
-
-  if (!*to)
-    error (_("no filename found to upload - %s."), in_to);
-
-  len = strlen (dir) + strlen (to) + 2;
-  remotefile = (char *) xrealloc (remotefile, len);
-  strcpy (remotefile, dir);
-  strcat (remotefile, "\\");
-  strcat (remotefile, to);
-
-  if (upload_when == UPLOAD_NEVER)
-    return remotefile;		/* Don't bother uploading.  */
-
-  /* Open the source.  */
-  if ((fd = openp (getenv ("PATH"), OPF_TRY_CWD_FIRST, (char *) from,
-		   O_RDONLY, 0, NULL)) < 0)
-    error (_("couldn't open %s"), from);
-
-  /* Get the time for later comparison.  */
-  if (fstat (fd, &st))
-    st.st_mtime = (time_t) - 1;
-
-  /* Always attempt to create the directory on the remote system.  */
-  wstr = towide (dir, NULL);
-  (void) CeCreateDirectory (wstr, NULL);
-
-  /* Attempt to open the remote file, creating it if it doesn't exist.  */
-  wstr = towide (remotefile, NULL);
-  h = CeCreateFile (wstr, GENERIC_READ | GENERIC_WRITE, 0, NULL,
-		    OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
-
-  /* Some kind of problem?  */
-  err = CeGetLastError ();
-  if (h == NULL || h == INVALID_HANDLE_VALUE)
-    error (_("error opening file \"%s\".  Windows error %d."),
-	   remotefile, err);
-
-  CeGetFileTime (h, &crtime, &actime, &wrtime);
-  utime = to_time_t (&wrtime);
-#if 0
-  if (utime < st.st_mtime)
-    {
-      char buf[80];
-      strcpy (buf, ctime(&utime));
-      printf ("%s < %s\n", buf, ctime(&st.st_mtime));
-    }
-#endif
-  /* See if we need to upload the file.  */
-  if (upload_when == UPLOAD_ALWAYS ||
-      err != ERROR_ALREADY_EXISTS ||
-      !CeGetFileTime (h, &crtime, &actime, &wrtime) ||
-      to_time_t (&wrtime) < st.st_mtime)
-    {
-      DWORD nbytes;
-      char buf[4096];
-      int n;
-
-      /* Upload the file.  */
-      while ((n = read (fd, buf, sizeof (buf))) > 0)
-	if (!CeWriteFile (h, buf, (DWORD) n, &nbytes, NULL))
-	  error (_("error writing to remote device - %d."),
-		 CeGetLastError ());
-    }
-
-  close (fd);
-  if (!CeCloseHandle (h))
-    error (_("error closing remote file - %d."), CeGetLastError ());
-
-  return remotefile;
-}
-
-/* Initialize the connection to the remote device.  */
-static void
-wince_initialize (void)
-{
-  int tmp;
-  char args[256];
-  char *hostname;
-  struct sockaddr_in sin;
-  char *stub_file_name;
-  int s0;
-  PROCESS_INFORMATION pi;
-
-  if (!connection_initialized)
-    switch (CeRapiInit ())
-      {
-      case 0:
-	connection_initialized = 1;
-	break;
-      default:
-	CeRapiUninit ();
-	error (_("Can't initialize connection to remote device."));
-      }
-
-  /* Upload the stub to the handheld device.  */
-  stub_file_name = upload_to_device ("wince-stub.exe", WINCE_STUB);
-  strcpy (args, stub_file_name);
-
-  if (remote_add_host)
-    {
-      strcat (args, " ");
-      hostname = strchr (args, '\0');
-      if (gethostname (hostname, sizeof (args) - strlen (args)))
-	error (_("couldn't get hostname of this system."));
-    }
-
-  /* Get a socket.  */
-  if ((s0 = socket (AF_INET, SOCK_STREAM, 0)) < 0)
-    stub_error ("Couldn't connect to host system.");
-
-  /* Allow rapid reuse of the port.  */
-  tmp = 1;
-  (void) setsockopt (s0, SOL_SOCKET, SO_REUSEADDR, 
-		     (char *) &tmp, sizeof (tmp));
-
-
-  /* Set up the information for connecting to the host gdb process.  */
-  memset (&sin, 0, sizeof (sin));
-  sin.sin_family = AF_INET;
-  sin.sin_port = htons (7000);	/* FIXME: This should be configurable.  */
-
-  if (bind (s0, (struct sockaddr *) &sin, sizeof (sin)))
-    error (_("couldn't bind socket"));
-
-  if (listen (s0, 1))
-    error (_("Couldn't open socket for listening."));
-
-  /* Start up the stub on the remote device.  */
-  if (!CeCreateProcess (towide (stub_file_name, NULL), 
-			towide (args, NULL),
-			NULL, NULL, 0, 0, 
-			NULL, NULL, NULL, &pi))
-    error (_("Unable to start remote stub '%s'.  Windows CE error %d."),
-	   stub_file_name, CeGetLastError ());
-
-  /* Wait for a connection */
-
-  if ((s = accept (s0, NULL, NULL)) < 0)
-    error (_("couldn't set up server for connection."));
-
-  close (s0);
-}
-
-/* Start an inferior win32 child process and sets inferior_ptid to its pid.
-   EXEC_FILE is the file to run.
-   ALLARGS is a string containing the arguments to the program.
-   ENV is the environment vector to pass.  
-   Errors reported with error().  */
-static void
-child_create_inferior (char *exec_file, char *args, char **env,
-		       int from_tty)
-{
-  PROCESS_INFORMATION pi;
-  struct target_waitstatus dummy;
-  int ret;
-  DWORD flags, event_code;
-  char *exec_and_args;
-
-  if (!exec_file)
-    error (_("No executable specified, use `target exec'."));
-
-  flags = DEBUG_PROCESS;
-
-  wince_initialize ();		/* Make sure we've got a connection.  */
-
-  exec_file = upload_to_device (exec_file, exec_file);
-
-  while (*args == ' ')
-    args++;
-
-  /* Allocate space for "command<sp>args" */
-  if (*args == '\0')
-    {
-      exec_and_args = alloca (strlen (exec_file) + 1);
-      strcpy (exec_and_args, exec_file);
-    }
-  else
-    {
-      exec_and_args = alloca (strlen (exec_file + strlen (args) + 2));
-      sprintf (exec_and_args, "%s %s", exec_file, args);
-    }
-
-  memset (&pi, 0, sizeof (pi));
-  /* Execute the process.  */
-  if (!create_process (exec_file, exec_and_args, flags, &pi))
-    error (_("Error creating process %s, (error %d)."), 
-	   exec_file, GetLastError ());
-
-  exception_count = 0;
-  event_count = 0;
-
-  current_process_handle = pi.hProcess;
-  current_event.dwProcessId = pi.dwProcessId;
-  memset (&current_event, 0, sizeof (current_event));
-  current_event.dwThreadId = pi.dwThreadId;
-  inferior_ptid = pid_to_ptid (current_event.dwThreadId);
-  push_target (&deprecated_child_ops);
-  child_init_thread_list ();
-  child_add_thread (pi.dwThreadId, pi.hThread);
-  init_wait_for_inferior ();
-  clear_proceed_status ();
-  target_terminal_init ();
-  target_terminal_inferior ();
-
-  /* Run until process and threads are loaded */
-  while (!get_child_debug_event (PIDGET (inferior_ptid), &dummy,
-				 CREATE_PROCESS_DEBUG_EVENT, &ret))
-    continue;
-}
-
-/* Chile has gone bye-bye.  */
-static void
-child_mourn_inferior (void)
-{
-  (void) child_continue (DBG_CONTINUE, -1);
-  unpush_target (&deprecated_child_ops);
-  stop_stub ();
-  CeRapiUninit ();
-  connection_initialized = 0;
-  generic_mourn_inferior ();
-}
-
-/* Move memory from child to/from gdb.  */
-int
-child_xfer_memory (CORE_ADDR memaddr, gdb_byte *our, 
-		   int len, int write,
-		   struct mem_attrib *attrib,
-		   struct target_ops *target)
-{
-  if (len <= 0)
-    return 0;
-
-  if (write)
-    res = remote_write_bytes (memaddr, our, len);
-  else
-    res = remote_read_bytes (memaddr, our, len);
-
-  return res;
-}
-
-/* Terminate the process and wait for child to tell us it has
-   completed.  */
-void
-child_kill_inferior (void)
-{
-  CHECK (terminate_process (current_process_handle));
-
-  for (;;)
-    {
-      if (!child_continue (DBG_CONTINUE, -1))
-	break;
-      if (!wait_for_debug_event (&current_event, INFINITE))
-	break;
-      if (current_event.dwDebugEventCode == EXIT_PROCESS_DEBUG_EVENT)
-	break;
-    }
-
-  CHECK (close_handle (current_process_handle));
-  close_handle (current_thread->h);
-  target_mourn_inferior ();	/* or just child_mourn_inferior?  */
-}
-
-/* Resume the child after an exception.  */
-void
-child_resume (ptid_t ptid, int step, enum target_signal sig)
-{
-  thread_info *th;
-  DWORD continue_status = last_sig > 0 && last_sig < NSIG ?
-    DBG_EXCEPTION_NOT_HANDLED : DBG_CONTINUE;
-  int pid = PIDGET (ptid);
-
-  DEBUG_EXEC (("gdb: child_resume (pid=%d, step=%d, sig=%d);\n",
-	       pid, step, sig));
-
-  /* Get context for currently selected thread */
-  th = thread_rec (current_event.dwThreadId, FALSE);
-
-  if (th->context.ContextFlags)
-    {
-      CHECK (set_thread_context (th->h, &th->context));
-      th->context.ContextFlags = 0;
-    }
-
-  /* Allow continuing with the same signal that interrupted us.
-     Otherwise complain.  */
-  if (sig && sig != last_sig)
-    fprintf_unfiltered (gdb_stderr, 
-			"Can't send signals to the child.  signal %d\n", 
-			sig);
-
-  last_sig = 0;
-  child_continue (continue_status, pid);
-}
-
-static void
-child_prepare_to_store (void)
-{
-  /* Do nothing, since we can store individual regs */
-}
-
-static int
-child_can_run (void)
-{
-  return 1;
-}
-
-static void
-child_close (void)
-{
-  DEBUG_EVENTS (("gdb: child_close, inferior_ptid=%d\n",
-		 PIDGET (inferior_ptid)));
-}
-
-/* Explicitly upload file to remotedir */
-
-static void
-child_load (char *file, int from_tty)
-{
-  upload_to_device (file, file);
-}
-
-static void
-init_child_ops (void)
-{
-  memset (&deprecated_child_ops, 0, sizeof (deprecated_child_ops));
-  deprecated_child_ops.to_shortname = (char *) "child";
-  deprecated_child_ops.to_longname = (char *) "Windows CE process";
-  deprecated_child_ops.to_doc = (char *) "Windows CE process (started by the \"run\" command).";
-  deprecated_child_ops.to_open = child_open;
-  deprecated_child_ops.to_close = child_close;
-  deprecated_child_ops.to_resume = child_resume;
-  deprecated_child_ops.to_wait = child_wait;
-  deprecated_child_ops.to_fetch_registers = child_fetch_inferior_registers;
-  deprecated_child_ops.to_store_registers = child_store_inferior_registers;
-  deprecated_child_ops.to_prepare_to_store = child_prepare_to_store;
-  deprecated_child_ops.deprecated_xfer_memory = child_xfer_memory;
-  deprecated_child_ops.to_files_info = child_files_info;
-  deprecated_child_ops.to_insert_breakpoint = memory_insert_breakpoint;
-  deprecated_child_ops.to_remove_breakpoint = memory_remove_breakpoint;
-  deprecated_child_ops.to_terminal_init = terminal_init_inferior;
-  deprecated_child_ops.to_terminal_inferior = terminal_inferior;
-  deprecated_child_ops.to_terminal_ours_for_output = terminal_ours_for_output;
-  deprecated_child_ops.to_terminal_ours = terminal_ours;
-  deprecated_child_ops.to_terminal_save_ours = terminal_save_ours;
-  deprecated_child_ops.to_terminal_info = child_terminal_info;
-  deprecated_child_ops.to_kill = child_kill_inferior;
-  deprecated_child_ops.to_load = child_load;
-  deprecated_child_ops.to_create_inferior = child_create_inferior;
-  deprecated_child_ops.to_mourn_inferior = child_mourn_inferior;
-  deprecated_child_ops.to_can_run = child_can_run;
-  deprecated_child_ops.to_thread_alive = win32_child_thread_alive;
-  deprecated_child_ops.to_stratum = process_stratum;
-  deprecated_child_ops.to_has_all_memory = 1;
-  deprecated_child_ops.to_has_memory = 1;
-  deprecated_child_ops.to_has_stack = 1;
-  deprecated_child_ops.to_has_registers = 1;
-  deprecated_child_ops.to_has_execution = 1;
-  deprecated_child_ops.to_magic = OPS_MAGIC;
-}
-
-
-/* Handle 'set remoteupload' parameter.  */
-
-#define replace_upload(what) \
-    upload_when = what; \
-    remote_upload = xrealloc (remote_upload, \
-			      strlen (upload_options[upload_when].name) + 1); \
-    strcpy (remote_upload, upload_options[upload_when].name);
-
-static void
-set_upload_type (char *ignore, int from_tty)
-{
-  int i, len;
-  char *bad_option;
-
-  if (!remote_upload || !remote_upload[0])
-    {
-      replace_upload (UPLOAD_NEWER);
-      if (from_tty)
-	printf_unfiltered ("Upload upload_options are: always, newer, never.\n");
-      return;
-    }
-
-  len = strlen (remote_upload);
-  for (i = 0; 
-       i < (sizeof (upload_options) / sizeof (upload_options[0])); 
-       i++)
-    if (len >= upload_options[i].abbrev &&
-	strncasecmp (remote_upload, upload_options[i].name, len) == 0)
-      {
-	replace_upload (i);
-	return;
-      }
-
-  bad_option = remote_upload;
-  replace_upload (UPLOAD_NEWER);
-  error (_("Unknown upload type: %s."), bad_option);
-}
-
-void
-_initialize_wince (void)
-{
-  struct cmd_list_element *set;
-  init_child_ops ();
-
-  add_setshow_string_noescape_cmd ("remotedirectory", no_class,
-				   &remote_directory, _("\
-Set directory for remote upload."), _("\
-Show directory for remote upload."), NULL,
-				   NULL, /* FIXME: i18n: */
-				   NULL, NULL,
-				   &setlist, &showlist);
-  remote_directory = xstrdup (remote_directory);
-
-  add_setshow_string_noescape_cmd ("remoteupload", no_class,
-				   &remote_upload, _("\
-Set how to upload executables to remote device."), _("\
-Show how to upload executables to remote device."), NULL,
-				   NULL, /* FIXME: i18n: */
-				   set_upload_type, NULL,
-				   &setlist, &showlist);
-  set_upload_type (NULL, 0);
-
-  add_setshow_boolean_cmd ("debugexec", class_support, &debug_exec, _("\
-Set whether to display execution in child process."), _("\
-Show whether to display execution in child process."), NULL,
-			   NULL,
-			   NULL, /* FIXME: i18n: */
-			   &setlist, &showlist);
-
-  add_setshow_boolean_cmd ("remoteaddhost", class_support,
-			   &remote_add_host, _("\
-Set whether to add this host to remote stub arguments for\n\
-debugging over a network."), _("\
-Show whether to add this host to remote stub arguments for\n\
-debugging over a network."), NULL,
-			   NULL,
-			   NULL, /* FIXME: i18n: */
-			   &setlist, &showlist);
-
-  add_setshow_boolean_cmd ("debugevents", class_support, &debug_events, _("\
-Set whether to display kernel events in child process."), _("\
-Show whether to display kernel events in child process."), NULL,
-			   NULL,
-			   NULL, /* FIXME: i18n: */
-			   &setlist, &showlist);
-
-  add_setshow_boolean_cmd ("debugmemory", class_support, &debug_memory, _("\
-Set whether to display memory accesses in child process."), _("\
-Show whether to display memory accesses in child process."), NULL,
-			   NULL,
-			   NULL, /* FIXME: i18n: */
-			   &setlist, &showlist);
-
-  add_setshow_boolean_cmd ("debugexceptions", class_support,
-			   &debug_exceptions, _("\
-Set whether to display kernel exceptions in child process."), _("\
-Show whether to display kernel exceptions in child process."), NULL,
-			   NULL,
-			   NULL, /* FIXME: i18n: */
-			   &setlist, &showlist);
-
-  add_target (&deprecated_child_ops);
-}
-
-/* Determine if the thread referenced by "pid" is alive by "polling"
-   it.  If WaitForSingleObject returns WAIT_OBJECT_0 it means that the
-   pid has died.  Otherwise it is assumed to be alive.  */
-static int
-win32_child_thread_alive (ptid_t ptid)
-{
-  int pid = PIDGET (ptid);
-  return thread_alive (thread_rec (pid, FALSE)->h);
-}
-
-/* Convert pid to printable format.  */
-char *
-cygwin_pid_to_str (int pid)
-{
-  static char buf[80];
-  if (pid == current_event.dwProcessId)
-    sprintf (buf, "process %d", pid);
-  else
-    sprintf (buf, "thread %d.0x%x", 
-	     (unsigned) current_event.dwProcessId, pid);
-  return buf;
-}