mirror of
https://github.com/darlinghq/darling-gdb.git
synced 2024-12-05 19:07:07 +00:00
b803fb0f0f
* event-loop.c (call_async_signal_handler): New. * event-loop.h (call_async_signal_handler) (gdb_call_async_signal_handler): Declare. (mark_async_signal_handler): Add comments. * event-top.c (handle_sigint): Use gdb_call_async_signal_handler. * mingw-hdep.c (sigint_event, sigint_handler): New. (gdb_select): Use them. Wait for the readline signal handler to finish. (gdb_call_async_signal_handler, _initialize_mingw_hdep): New functions. * posix-hdep.c (gdb_call_async_signal_handler): New function. * remote-fileio.c (sigint_fileio_token, async_remote_fileio_interrupt): New. (remote_fileio_ctrl_c_signal_handler): Use gdb_call_async_signal_handler. (initialize_remote_fileio): Initialize sigint_fileio_token. * remote.c (initialize_sigint_signal_handler, handle_remote_sigint): Do not initialize tokens here. (handle_remote_sigint_twice): Likewise. Reinstall handle_remote_sigint. (async_remote_interrupt_twice): Just call interrupt_query. (cleanup_sigint_signal_handler): Do not delete tokens. (remote_interrupt, remote_interrupt_twice): Use gdb_call_async_signal_handler. (interrupt_query): Reinstall the default signal handler. (_initialize_remote): Initialize tokens here.
1475 lines
34 KiB
C
1475 lines
34 KiB
C
/* Remote File-I/O communications
|
|
|
|
Copyright (C) 2003, 2005, 2006, 2007, 2008 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 3 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, see <http://www.gnu.org/licenses/>. */
|
|
|
|
/* See the GDB User Guide for details of the GDB remote protocol. */
|
|
|
|
#include "defs.h"
|
|
#include "gdb_string.h"
|
|
#include "gdbcmd.h"
|
|
#include "remote.h"
|
|
#include "gdb/fileio.h"
|
|
#include "gdb_wait.h"
|
|
#include "gdb_stat.h"
|
|
#include "exceptions.h"
|
|
#include "remote-fileio.h"
|
|
#include "event-loop.h"
|
|
|
|
#include <fcntl.h>
|
|
#include <sys/time.h>
|
|
#ifdef __CYGWIN__
|
|
#include <sys/cygwin.h> /* For cygwin_conv_to_full_posix_path. */
|
|
#endif
|
|
#include <signal.h>
|
|
|
|
static struct {
|
|
int *fd_map;
|
|
int fd_map_size;
|
|
} remote_fio_data;
|
|
|
|
#define FIO_FD_INVALID -1
|
|
#define FIO_FD_CONSOLE_IN -2
|
|
#define FIO_FD_CONSOLE_OUT -3
|
|
|
|
static int remote_fio_system_call_allowed = 0;
|
|
|
|
static struct async_signal_handler *sigint_fileio_token;
|
|
|
|
static int
|
|
remote_fileio_init_fd_map (void)
|
|
{
|
|
int i;
|
|
|
|
if (!remote_fio_data.fd_map)
|
|
{
|
|
remote_fio_data.fd_map = (int *) xmalloc (10 * sizeof (int));
|
|
remote_fio_data.fd_map_size = 10;
|
|
remote_fio_data.fd_map[0] = FIO_FD_CONSOLE_IN;
|
|
remote_fio_data.fd_map[1] = FIO_FD_CONSOLE_OUT;
|
|
remote_fio_data.fd_map[2] = FIO_FD_CONSOLE_OUT;
|
|
for (i = 3; i < 10; ++i)
|
|
remote_fio_data.fd_map[i] = FIO_FD_INVALID;
|
|
}
|
|
return 3;
|
|
}
|
|
|
|
static int
|
|
remote_fileio_resize_fd_map (void)
|
|
{
|
|
int i = remote_fio_data.fd_map_size;
|
|
|
|
if (!remote_fio_data.fd_map)
|
|
return remote_fileio_init_fd_map ();
|
|
remote_fio_data.fd_map_size += 10;
|
|
remote_fio_data.fd_map =
|
|
(int *) xrealloc (remote_fio_data.fd_map,
|
|
remote_fio_data.fd_map_size * sizeof (int));
|
|
for (; i < remote_fio_data.fd_map_size; i++)
|
|
remote_fio_data.fd_map[i] = FIO_FD_INVALID;
|
|
return remote_fio_data.fd_map_size - 10;
|
|
}
|
|
|
|
static int
|
|
remote_fileio_next_free_fd (void)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < remote_fio_data.fd_map_size; ++i)
|
|
if (remote_fio_data.fd_map[i] == FIO_FD_INVALID)
|
|
return i;
|
|
return remote_fileio_resize_fd_map ();
|
|
}
|
|
|
|
static int
|
|
remote_fileio_fd_to_targetfd (int fd)
|
|
{
|
|
int target_fd = remote_fileio_next_free_fd ();
|
|
remote_fio_data.fd_map[target_fd] = fd;
|
|
return target_fd;
|
|
}
|
|
|
|
static int
|
|
remote_fileio_map_fd (int target_fd)
|
|
{
|
|
remote_fileio_init_fd_map ();
|
|
if (target_fd < 0 || target_fd >= remote_fio_data.fd_map_size)
|
|
return FIO_FD_INVALID;
|
|
return remote_fio_data.fd_map[target_fd];
|
|
}
|
|
|
|
static void
|
|
remote_fileio_close_target_fd (int target_fd)
|
|
{
|
|
remote_fileio_init_fd_map ();
|
|
if (target_fd >= 0 && target_fd < remote_fio_data.fd_map_size)
|
|
remote_fio_data.fd_map[target_fd] = FIO_FD_INVALID;
|
|
}
|
|
|
|
static int
|
|
remote_fileio_oflags_to_host (long flags)
|
|
{
|
|
int hflags = 0;
|
|
|
|
if (flags & FILEIO_O_CREAT)
|
|
hflags |= O_CREAT;
|
|
if (flags & FILEIO_O_EXCL)
|
|
hflags |= O_EXCL;
|
|
if (flags & FILEIO_O_TRUNC)
|
|
hflags |= O_TRUNC;
|
|
if (flags & FILEIO_O_APPEND)
|
|
hflags |= O_APPEND;
|
|
if (flags & FILEIO_O_RDONLY)
|
|
hflags |= O_RDONLY;
|
|
if (flags & FILEIO_O_WRONLY)
|
|
hflags |= O_WRONLY;
|
|
if (flags & FILEIO_O_RDWR)
|
|
hflags |= O_RDWR;
|
|
/* On systems supporting binary and text mode, always open files in
|
|
binary mode. */
|
|
#ifdef O_BINARY
|
|
hflags |= O_BINARY;
|
|
#endif
|
|
return hflags;
|
|
}
|
|
|
|
static mode_t
|
|
remote_fileio_mode_to_host (long mode, int open_call)
|
|
{
|
|
mode_t hmode = 0;
|
|
|
|
if (!open_call)
|
|
{
|
|
if (mode & FILEIO_S_IFREG)
|
|
hmode |= S_IFREG;
|
|
if (mode & FILEIO_S_IFDIR)
|
|
hmode |= S_IFDIR;
|
|
if (mode & FILEIO_S_IFCHR)
|
|
hmode |= S_IFCHR;
|
|
}
|
|
if (mode & FILEIO_S_IRUSR)
|
|
hmode |= S_IRUSR;
|
|
if (mode & FILEIO_S_IWUSR)
|
|
hmode |= S_IWUSR;
|
|
if (mode & FILEIO_S_IXUSR)
|
|
hmode |= S_IXUSR;
|
|
#ifdef S_IRGRP
|
|
if (mode & FILEIO_S_IRGRP)
|
|
hmode |= S_IRGRP;
|
|
#endif
|
|
#ifdef S_IWGRP
|
|
if (mode & FILEIO_S_IWGRP)
|
|
hmode |= S_IWGRP;
|
|
#endif
|
|
#ifdef S_IXGRP
|
|
if (mode & FILEIO_S_IXGRP)
|
|
hmode |= S_IXGRP;
|
|
#endif
|
|
if (mode & FILEIO_S_IROTH)
|
|
hmode |= S_IROTH;
|
|
#ifdef S_IWOTH
|
|
if (mode & FILEIO_S_IWOTH)
|
|
hmode |= S_IWOTH;
|
|
#endif
|
|
#ifdef S_IXOTH
|
|
if (mode & FILEIO_S_IXOTH)
|
|
hmode |= S_IXOTH;
|
|
#endif
|
|
return hmode;
|
|
}
|
|
|
|
static LONGEST
|
|
remote_fileio_mode_to_target (mode_t mode)
|
|
{
|
|
mode_t tmode = 0;
|
|
|
|
if (S_ISREG(mode))
|
|
tmode |= FILEIO_S_IFREG;
|
|
if (S_ISDIR(mode))
|
|
tmode |= FILEIO_S_IFDIR;
|
|
if (S_ISCHR(mode))
|
|
tmode |= FILEIO_S_IFCHR;
|
|
if (mode & S_IRUSR)
|
|
tmode |= FILEIO_S_IRUSR;
|
|
if (mode & S_IWUSR)
|
|
tmode |= FILEIO_S_IWUSR;
|
|
if (mode & S_IXUSR)
|
|
tmode |= FILEIO_S_IXUSR;
|
|
#ifdef S_IRGRP
|
|
if (mode & S_IRGRP)
|
|
tmode |= FILEIO_S_IRGRP;
|
|
#endif
|
|
#ifdef S_IWRGRP
|
|
if (mode & S_IWGRP)
|
|
tmode |= FILEIO_S_IWGRP;
|
|
#endif
|
|
#ifdef S_IXGRP
|
|
if (mode & S_IXGRP)
|
|
tmode |= FILEIO_S_IXGRP;
|
|
#endif
|
|
if (mode & S_IROTH)
|
|
tmode |= FILEIO_S_IROTH;
|
|
#ifdef S_IWOTH
|
|
if (mode & S_IWOTH)
|
|
tmode |= FILEIO_S_IWOTH;
|
|
#endif
|
|
#ifdef S_IXOTH
|
|
if (mode & S_IXOTH)
|
|
tmode |= FILEIO_S_IXOTH;
|
|
#endif
|
|
return tmode;
|
|
}
|
|
|
|
static int
|
|
remote_fileio_errno_to_target (int error)
|
|
{
|
|
switch (error)
|
|
{
|
|
case EPERM:
|
|
return FILEIO_EPERM;
|
|
case ENOENT:
|
|
return FILEIO_ENOENT;
|
|
case EINTR:
|
|
return FILEIO_EINTR;
|
|
case EIO:
|
|
return FILEIO_EIO;
|
|
case EBADF:
|
|
return FILEIO_EBADF;
|
|
case EACCES:
|
|
return FILEIO_EACCES;
|
|
case EFAULT:
|
|
return FILEIO_EFAULT;
|
|
case EBUSY:
|
|
return FILEIO_EBUSY;
|
|
case EEXIST:
|
|
return FILEIO_EEXIST;
|
|
case ENODEV:
|
|
return FILEIO_ENODEV;
|
|
case ENOTDIR:
|
|
return FILEIO_ENOTDIR;
|
|
case EISDIR:
|
|
return FILEIO_EISDIR;
|
|
case EINVAL:
|
|
return FILEIO_EINVAL;
|
|
case ENFILE:
|
|
return FILEIO_ENFILE;
|
|
case EMFILE:
|
|
return FILEIO_EMFILE;
|
|
case EFBIG:
|
|
return FILEIO_EFBIG;
|
|
case ENOSPC:
|
|
return FILEIO_ENOSPC;
|
|
case ESPIPE:
|
|
return FILEIO_ESPIPE;
|
|
case EROFS:
|
|
return FILEIO_EROFS;
|
|
case ENOSYS:
|
|
return FILEIO_ENOSYS;
|
|
case ENAMETOOLONG:
|
|
return FILEIO_ENAMETOOLONG;
|
|
}
|
|
return FILEIO_EUNKNOWN;
|
|
}
|
|
|
|
static int
|
|
remote_fileio_seek_flag_to_host (long num, int *flag)
|
|
{
|
|
if (!flag)
|
|
return 0;
|
|
switch (num)
|
|
{
|
|
case FILEIO_SEEK_SET:
|
|
*flag = SEEK_SET;
|
|
break;
|
|
case FILEIO_SEEK_CUR:
|
|
*flag = SEEK_CUR;
|
|
break;
|
|
case FILEIO_SEEK_END:
|
|
*flag = SEEK_END;
|
|
break;
|
|
default:
|
|
return -1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
remote_fileio_extract_long (char **buf, LONGEST *retlong)
|
|
{
|
|
char *c;
|
|
int sign = 1;
|
|
|
|
if (!buf || !*buf || !**buf || !retlong)
|
|
return -1;
|
|
c = strchr (*buf, ',');
|
|
if (c)
|
|
*c++ = '\0';
|
|
else
|
|
c = strchr (*buf, '\0');
|
|
while (strchr ("+-", **buf))
|
|
{
|
|
if (**buf == '-')
|
|
sign = -sign;
|
|
++*buf;
|
|
}
|
|
for (*retlong = 0; **buf; ++*buf)
|
|
{
|
|
*retlong <<= 4;
|
|
if (**buf >= '0' && **buf <= '9')
|
|
*retlong += **buf - '0';
|
|
else if (**buf >= 'a' && **buf <= 'f')
|
|
*retlong += **buf - 'a' + 10;
|
|
else if (**buf >= 'A' && **buf <= 'F')
|
|
*retlong += **buf - 'A' + 10;
|
|
else
|
|
return -1;
|
|
}
|
|
*retlong *= sign;
|
|
*buf = c;
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
remote_fileio_extract_int (char **buf, long *retint)
|
|
{
|
|
int ret;
|
|
LONGEST retlong;
|
|
|
|
if (!retint)
|
|
return -1;
|
|
ret = remote_fileio_extract_long (buf, &retlong);
|
|
if (!ret)
|
|
*retint = (long) retlong;
|
|
return ret;
|
|
}
|
|
|
|
static int
|
|
remote_fileio_extract_ptr_w_len (char **buf, CORE_ADDR *ptrval, int *length)
|
|
{
|
|
char *c;
|
|
LONGEST retlong;
|
|
|
|
if (!buf || !*buf || !**buf || !ptrval || !length)
|
|
return -1;
|
|
c = strchr (*buf, '/');
|
|
if (!c)
|
|
return -1;
|
|
*c++ = '\0';
|
|
if (remote_fileio_extract_long (buf, &retlong))
|
|
return -1;
|
|
*ptrval = (CORE_ADDR) retlong;
|
|
*buf = c;
|
|
if (remote_fileio_extract_long (buf, &retlong))
|
|
return -1;
|
|
*length = (int) retlong;
|
|
return 0;
|
|
}
|
|
|
|
/* Convert to big endian */
|
|
static void
|
|
remote_fileio_to_be (LONGEST num, char *buf, int bytes)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < bytes; ++i)
|
|
buf[i] = (num >> (8 * (bytes - i - 1))) & 0xff;
|
|
}
|
|
|
|
static void
|
|
remote_fileio_to_fio_uint (long num, fio_uint_t fnum)
|
|
{
|
|
remote_fileio_to_be ((LONGEST) num, (char *) fnum, 4);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_to_fio_mode (mode_t num, fio_mode_t fnum)
|
|
{
|
|
remote_fileio_to_be (remote_fileio_mode_to_target(num), (char *) fnum, 4);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_to_fio_time (time_t num, fio_time_t fnum)
|
|
{
|
|
remote_fileio_to_be ((LONGEST) num, (char *) fnum, 4);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_to_fio_long (LONGEST num, fio_long_t fnum)
|
|
{
|
|
remote_fileio_to_be (num, (char *) fnum, 8);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_to_fio_ulong (LONGEST num, fio_ulong_t fnum)
|
|
{
|
|
remote_fileio_to_be (num, (char *) fnum, 8);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_to_fio_stat (struct stat *st, struct fio_stat *fst)
|
|
{
|
|
LONGEST blksize;
|
|
|
|
/* `st_dev' is set in the calling function */
|
|
remote_fileio_to_fio_uint ((long) st->st_ino, fst->fst_ino);
|
|
remote_fileio_to_fio_mode (st->st_mode, fst->fst_mode);
|
|
remote_fileio_to_fio_uint ((long) st->st_nlink, fst->fst_nlink);
|
|
remote_fileio_to_fio_uint ((long) st->st_uid, fst->fst_uid);
|
|
remote_fileio_to_fio_uint ((long) st->st_gid, fst->fst_gid);
|
|
remote_fileio_to_fio_uint ((long) st->st_rdev, fst->fst_rdev);
|
|
remote_fileio_to_fio_ulong ((LONGEST) st->st_size, fst->fst_size);
|
|
#ifdef HAVE_STRUCT_STAT_ST_BLKSIZE
|
|
blksize = st->st_blksize;
|
|
#else
|
|
blksize = 512;
|
|
#endif
|
|
remote_fileio_to_fio_ulong (blksize, fst->fst_blksize);
|
|
#if HAVE_STRUCT_STAT_ST_BLOCKS
|
|
remote_fileio_to_fio_ulong ((LONGEST) st->st_blocks, fst->fst_blocks);
|
|
#else
|
|
/* FIXME: This is correct for DJGPP, but other systems that don't
|
|
have st_blocks, if any, might prefer 512 instead of st_blksize.
|
|
(eliz, 30-12-2003) */
|
|
remote_fileio_to_fio_ulong (((LONGEST) st->st_size + blksize - 1)
|
|
/ blksize,
|
|
fst->fst_blocks);
|
|
#endif
|
|
remote_fileio_to_fio_time (st->st_atime, fst->fst_atime);
|
|
remote_fileio_to_fio_time (st->st_mtime, fst->fst_mtime);
|
|
remote_fileio_to_fio_time (st->st_ctime, fst->fst_ctime);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_to_fio_timeval (struct timeval *tv, struct fio_timeval *ftv)
|
|
{
|
|
remote_fileio_to_fio_time (tv->tv_sec, ftv->ftv_sec);
|
|
remote_fileio_to_fio_long (tv->tv_usec, ftv->ftv_usec);
|
|
}
|
|
|
|
static int remote_fio_ctrl_c_flag = 0;
|
|
static int remote_fio_no_longjmp = 0;
|
|
|
|
#if defined (HAVE_SIGACTION) && defined (SA_RESTART)
|
|
static struct sigaction remote_fio_sa;
|
|
static struct sigaction remote_fio_osa;
|
|
#else
|
|
static void (*remote_fio_ofunc)(int);
|
|
#endif
|
|
|
|
static void
|
|
remote_fileio_sig_init (void)
|
|
{
|
|
#if defined (HAVE_SIGACTION) && defined (SA_RESTART)
|
|
remote_fio_sa.sa_handler = SIG_IGN;
|
|
sigemptyset (&remote_fio_sa.sa_mask);
|
|
remote_fio_sa.sa_flags = 0;
|
|
sigaction (SIGINT, &remote_fio_sa, &remote_fio_osa);
|
|
#else
|
|
remote_fio_ofunc = signal (SIGINT, SIG_IGN);
|
|
#endif
|
|
}
|
|
|
|
static void
|
|
remote_fileio_sig_set (void (*sigint_func)(int))
|
|
{
|
|
#if defined (HAVE_SIGACTION) && defined (SA_RESTART)
|
|
remote_fio_sa.sa_handler = sigint_func;
|
|
sigemptyset (&remote_fio_sa.sa_mask);
|
|
remote_fio_sa.sa_flags = 0;
|
|
sigaction (SIGINT, &remote_fio_sa, NULL);
|
|
#else
|
|
signal (SIGINT, sigint_func);
|
|
#endif
|
|
}
|
|
|
|
static void
|
|
remote_fileio_sig_exit (void)
|
|
{
|
|
#if defined (HAVE_SIGACTION) && defined (SA_RESTART)
|
|
sigaction (SIGINT, &remote_fio_osa, NULL);
|
|
#else
|
|
signal (SIGINT, remote_fio_ofunc);
|
|
#endif
|
|
}
|
|
|
|
static void
|
|
async_remote_fileio_interrupt (gdb_client_data arg)
|
|
{
|
|
deprecated_throw_reason (RETURN_QUIT);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_ctrl_c_signal_handler (int signo)
|
|
{
|
|
remote_fileio_sig_set (SIG_IGN);
|
|
remote_fio_ctrl_c_flag = 1;
|
|
if (!remote_fio_no_longjmp)
|
|
gdb_call_async_signal_handler (sigint_fileio_token, 1);
|
|
remote_fileio_sig_set (remote_fileio_ctrl_c_signal_handler);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_reply (int retcode, int error)
|
|
{
|
|
char buf[32];
|
|
|
|
remote_fileio_sig_set (SIG_IGN);
|
|
strcpy (buf, "F");
|
|
if (retcode < 0)
|
|
{
|
|
strcat (buf, "-");
|
|
retcode = -retcode;
|
|
}
|
|
sprintf (buf + strlen (buf), "%x", retcode);
|
|
if (error || remote_fio_ctrl_c_flag)
|
|
{
|
|
if (error && remote_fio_ctrl_c_flag)
|
|
error = FILEIO_EINTR;
|
|
if (error < 0)
|
|
{
|
|
strcat (buf, "-");
|
|
error = -error;
|
|
}
|
|
sprintf (buf + strlen (buf), ",%x", error);
|
|
if (remote_fio_ctrl_c_flag)
|
|
strcat (buf, ",C");
|
|
}
|
|
remote_fileio_sig_set (remote_fileio_ctrl_c_signal_handler);
|
|
putpkt (buf);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_ioerror (void)
|
|
{
|
|
remote_fileio_reply (-1, FILEIO_EIO);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_badfd (void)
|
|
{
|
|
remote_fileio_reply (-1, FILEIO_EBADF);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_return_errno (int retcode)
|
|
{
|
|
remote_fileio_reply (retcode,
|
|
retcode < 0 ? remote_fileio_errno_to_target (errno) : 0);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_return_success (int retcode)
|
|
{
|
|
remote_fileio_reply (retcode, 0);
|
|
}
|
|
|
|
/* Wrapper function for remote_write_bytes() which has the disadvantage to
|
|
write only one packet, regardless of the requested number of bytes to
|
|
transfer. This wrapper calls remote_write_bytes() as often as needed. */
|
|
static int
|
|
remote_fileio_write_bytes (CORE_ADDR memaddr, gdb_byte *myaddr, int len)
|
|
{
|
|
int ret = 0, written;
|
|
|
|
while (len > 0 && (written = remote_write_bytes (memaddr, myaddr, len)) > 0)
|
|
{
|
|
len -= written;
|
|
memaddr += written;
|
|
myaddr += written;
|
|
ret += written;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_open (char *buf)
|
|
{
|
|
CORE_ADDR ptrval;
|
|
int length, retlength;
|
|
long num;
|
|
int flags, fd;
|
|
mode_t mode;
|
|
char *pathname;
|
|
struct stat st;
|
|
|
|
/* 1. Parameter: Ptr to pathname / length incl. trailing zero */
|
|
if (remote_fileio_extract_ptr_w_len (&buf, &ptrval, &length))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
/* 2. Parameter: open flags */
|
|
if (remote_fileio_extract_int (&buf, &num))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
flags = remote_fileio_oflags_to_host (num);
|
|
/* 3. Parameter: open mode */
|
|
if (remote_fileio_extract_int (&buf, &num))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
mode = remote_fileio_mode_to_host (num, 1);
|
|
|
|
/* Request pathname using 'm' packet */
|
|
pathname = alloca (length);
|
|
retlength = remote_read_bytes (ptrval, (gdb_byte *) pathname, length);
|
|
if (retlength != length)
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
|
|
/* Check if pathname exists and is not a regular file or directory. If so,
|
|
return an appropriate error code. Same for trying to open directories
|
|
for writing. */
|
|
if (!stat (pathname, &st))
|
|
{
|
|
if (!S_ISREG (st.st_mode) && !S_ISDIR (st.st_mode))
|
|
{
|
|
remote_fileio_reply (-1, FILEIO_ENODEV);
|
|
return;
|
|
}
|
|
if (S_ISDIR (st.st_mode)
|
|
&& ((flags & O_WRONLY) == O_WRONLY || (flags & O_RDWR) == O_RDWR))
|
|
{
|
|
remote_fileio_reply (-1, FILEIO_EISDIR);
|
|
return;
|
|
}
|
|
}
|
|
|
|
remote_fio_no_longjmp = 1;
|
|
fd = open (pathname, flags, mode);
|
|
if (fd < 0)
|
|
{
|
|
remote_fileio_return_errno (-1);
|
|
return;
|
|
}
|
|
|
|
fd = remote_fileio_fd_to_targetfd (fd);
|
|
remote_fileio_return_success (fd);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_close (char *buf)
|
|
{
|
|
long num;
|
|
int fd;
|
|
|
|
/* Parameter: file descriptor */
|
|
if (remote_fileio_extract_int (&buf, &num))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
fd = remote_fileio_map_fd ((int) num);
|
|
if (fd == FIO_FD_INVALID)
|
|
{
|
|
remote_fileio_badfd ();
|
|
return;
|
|
}
|
|
|
|
remote_fio_no_longjmp = 1;
|
|
if (fd != FIO_FD_CONSOLE_IN && fd != FIO_FD_CONSOLE_OUT && close (fd))
|
|
remote_fileio_return_errno (-1);
|
|
remote_fileio_close_target_fd ((int) num);
|
|
remote_fileio_return_success (0);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_read (char *buf)
|
|
{
|
|
long target_fd, num;
|
|
LONGEST lnum;
|
|
CORE_ADDR ptrval;
|
|
int fd, ret, retlength;
|
|
gdb_byte *buffer;
|
|
size_t length;
|
|
off_t old_offset, new_offset;
|
|
|
|
/* 1. Parameter: file descriptor */
|
|
if (remote_fileio_extract_int (&buf, &target_fd))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
fd = remote_fileio_map_fd ((int) target_fd);
|
|
if (fd == FIO_FD_INVALID)
|
|
{
|
|
remote_fileio_badfd ();
|
|
return;
|
|
}
|
|
/* 2. Parameter: buffer pointer */
|
|
if (remote_fileio_extract_long (&buf, &lnum))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
ptrval = (CORE_ADDR) lnum;
|
|
/* 3. Parameter: buffer length */
|
|
if (remote_fileio_extract_int (&buf, &num))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
length = (size_t) num;
|
|
|
|
switch (fd)
|
|
{
|
|
case FIO_FD_CONSOLE_OUT:
|
|
remote_fileio_badfd ();
|
|
return;
|
|
case FIO_FD_CONSOLE_IN:
|
|
{
|
|
static char *remaining_buf = NULL;
|
|
static int remaining_length = 0;
|
|
|
|
buffer = (gdb_byte *) xmalloc (32768);
|
|
if (remaining_buf)
|
|
{
|
|
remote_fio_no_longjmp = 1;
|
|
if (remaining_length > length)
|
|
{
|
|
memcpy (buffer, remaining_buf, length);
|
|
memmove (remaining_buf, remaining_buf + length,
|
|
remaining_length - length);
|
|
remaining_length -= length;
|
|
ret = length;
|
|
}
|
|
else
|
|
{
|
|
memcpy (buffer, remaining_buf, remaining_length);
|
|
xfree (remaining_buf);
|
|
remaining_buf = NULL;
|
|
ret = remaining_length;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
ret = ui_file_read (gdb_stdtargin, (char *) buffer, 32767);
|
|
remote_fio_no_longjmp = 1;
|
|
if (ret > 0 && (size_t)ret > length)
|
|
{
|
|
remaining_buf = (char *) xmalloc (ret - length);
|
|
remaining_length = ret - length;
|
|
memcpy (remaining_buf, buffer + length, remaining_length);
|
|
ret = length;
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
default:
|
|
buffer = (gdb_byte *) xmalloc (length);
|
|
/* POSIX defines EINTR behaviour of read in a weird way. It's allowed
|
|
for read() to return -1 even if "some" bytes have been read. It
|
|
has been corrected in SUSv2 but that doesn't help us much...
|
|
Therefore a complete solution must check how many bytes have been
|
|
read on EINTR to return a more reliable value to the target */
|
|
old_offset = lseek (fd, 0, SEEK_CUR);
|
|
remote_fio_no_longjmp = 1;
|
|
ret = read (fd, buffer, length);
|
|
if (ret < 0 && errno == EINTR)
|
|
{
|
|
new_offset = lseek (fd, 0, SEEK_CUR);
|
|
/* If some data has been read, return the number of bytes read.
|
|
The Ctrl-C flag is set in remote_fileio_reply() anyway */
|
|
if (old_offset != new_offset)
|
|
ret = new_offset - old_offset;
|
|
}
|
|
break;
|
|
}
|
|
|
|
if (ret > 0)
|
|
{
|
|
retlength = remote_fileio_write_bytes (ptrval, buffer, ret);
|
|
if (retlength != ret)
|
|
ret = -1; /* errno has been set to EIO in remote_fileio_write_bytes() */
|
|
}
|
|
|
|
if (ret < 0)
|
|
remote_fileio_return_errno (-1);
|
|
else
|
|
remote_fileio_return_success (ret);
|
|
|
|
xfree (buffer);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_write (char *buf)
|
|
{
|
|
long target_fd, num;
|
|
LONGEST lnum;
|
|
CORE_ADDR ptrval;
|
|
int fd, ret, retlength;
|
|
gdb_byte *buffer;
|
|
size_t length;
|
|
|
|
/* 1. Parameter: file descriptor */
|
|
if (remote_fileio_extract_int (&buf, &target_fd))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
fd = remote_fileio_map_fd ((int) target_fd);
|
|
if (fd == FIO_FD_INVALID)
|
|
{
|
|
remote_fileio_badfd ();
|
|
return;
|
|
}
|
|
/* 2. Parameter: buffer pointer */
|
|
if (remote_fileio_extract_long (&buf, &lnum))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
ptrval = (CORE_ADDR) lnum;
|
|
/* 3. Parameter: buffer length */
|
|
if (remote_fileio_extract_int (&buf, &num))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
length = (size_t) num;
|
|
|
|
buffer = (gdb_byte *) xmalloc (length);
|
|
retlength = remote_read_bytes (ptrval, buffer, length);
|
|
if (retlength != length)
|
|
{
|
|
xfree (buffer);
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
|
|
remote_fio_no_longjmp = 1;
|
|
switch (fd)
|
|
{
|
|
case FIO_FD_CONSOLE_IN:
|
|
remote_fileio_badfd ();
|
|
xfree (buffer);
|
|
return;
|
|
case FIO_FD_CONSOLE_OUT:
|
|
ui_file_write (target_fd == 1 ? gdb_stdtarg : gdb_stdtargerr,
|
|
(char *) buffer, length);
|
|
gdb_flush (target_fd == 1 ? gdb_stdtarg : gdb_stdtargerr);
|
|
ret = length;
|
|
break;
|
|
default:
|
|
ret = write (fd, buffer, length);
|
|
if (ret < 0 && errno == EACCES)
|
|
errno = EBADF; /* Cygwin returns EACCESS when writing to a R/O file.*/
|
|
break;
|
|
}
|
|
|
|
if (ret < 0)
|
|
remote_fileio_return_errno (-1);
|
|
else
|
|
remote_fileio_return_success (ret);
|
|
|
|
xfree (buffer);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_lseek (char *buf)
|
|
{
|
|
long num;
|
|
LONGEST lnum;
|
|
int fd, flag;
|
|
off_t offset, ret;
|
|
|
|
/* 1. Parameter: file descriptor */
|
|
if (remote_fileio_extract_int (&buf, &num))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
fd = remote_fileio_map_fd ((int) num);
|
|
if (fd == FIO_FD_INVALID)
|
|
{
|
|
remote_fileio_badfd ();
|
|
return;
|
|
}
|
|
else if (fd == FIO_FD_CONSOLE_IN || fd == FIO_FD_CONSOLE_OUT)
|
|
{
|
|
remote_fileio_reply (-1, FILEIO_ESPIPE);
|
|
return;
|
|
}
|
|
|
|
/* 2. Parameter: offset */
|
|
if (remote_fileio_extract_long (&buf, &lnum))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
offset = (off_t) lnum;
|
|
/* 3. Parameter: flag */
|
|
if (remote_fileio_extract_int (&buf, &num))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
if (remote_fileio_seek_flag_to_host (num, &flag))
|
|
{
|
|
remote_fileio_reply (-1, FILEIO_EINVAL);
|
|
return;
|
|
}
|
|
|
|
remote_fio_no_longjmp = 1;
|
|
ret = lseek (fd, offset, flag);
|
|
|
|
if (ret == (off_t) -1)
|
|
remote_fileio_return_errno (-1);
|
|
else
|
|
remote_fileio_return_success (ret);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_rename (char *buf)
|
|
{
|
|
CORE_ADDR old_ptr, new_ptr;
|
|
int old_len, new_len, retlength;
|
|
char *oldpath, *newpath;
|
|
int ret, of, nf;
|
|
struct stat ost, nst;
|
|
|
|
/* 1. Parameter: Ptr to oldpath / length incl. trailing zero */
|
|
if (remote_fileio_extract_ptr_w_len (&buf, &old_ptr, &old_len))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
|
|
/* 2. Parameter: Ptr to newpath / length incl. trailing zero */
|
|
if (remote_fileio_extract_ptr_w_len (&buf, &new_ptr, &new_len))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
|
|
/* Request oldpath using 'm' packet */
|
|
oldpath = alloca (old_len);
|
|
retlength = remote_read_bytes (old_ptr, (gdb_byte *) oldpath, old_len);
|
|
if (retlength != old_len)
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
|
|
/* Request newpath using 'm' packet */
|
|
newpath = alloca (new_len);
|
|
retlength = remote_read_bytes (new_ptr, (gdb_byte *) newpath, new_len);
|
|
if (retlength != new_len)
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
|
|
/* Only operate on regular files and directories */
|
|
of = stat (oldpath, &ost);
|
|
nf = stat (newpath, &nst);
|
|
if ((!of && !S_ISREG (ost.st_mode) && !S_ISDIR (ost.st_mode))
|
|
|| (!nf && !S_ISREG (nst.st_mode) && !S_ISDIR (nst.st_mode)))
|
|
{
|
|
remote_fileio_reply (-1, FILEIO_EACCES);
|
|
return;
|
|
}
|
|
|
|
remote_fio_no_longjmp = 1;
|
|
ret = rename (oldpath, newpath);
|
|
|
|
if (ret == -1)
|
|
{
|
|
/* Special case: newpath is a non-empty directory. Some systems
|
|
return ENOTEMPTY, some return EEXIST. We coerce that to be
|
|
always EEXIST. */
|
|
if (errno == ENOTEMPTY)
|
|
errno = EEXIST;
|
|
#ifdef __CYGWIN__
|
|
/* Workaround some Cygwin problems with correct errnos. */
|
|
if (errno == EACCES)
|
|
{
|
|
if (!of && !nf && S_ISDIR (nst.st_mode))
|
|
{
|
|
if (S_ISREG (ost.st_mode))
|
|
errno = EISDIR;
|
|
else
|
|
{
|
|
char oldfullpath[PATH_MAX + 1];
|
|
char newfullpath[PATH_MAX + 1];
|
|
int len;
|
|
|
|
cygwin_conv_to_full_posix_path (oldpath, oldfullpath);
|
|
cygwin_conv_to_full_posix_path (newpath, newfullpath);
|
|
len = strlen (oldfullpath);
|
|
if (newfullpath[len] == '/'
|
|
&& !strncmp (oldfullpath, newfullpath, len))
|
|
errno = EINVAL;
|
|
else
|
|
errno = EEXIST;
|
|
}
|
|
}
|
|
}
|
|
#endif
|
|
|
|
remote_fileio_return_errno (-1);
|
|
}
|
|
else
|
|
remote_fileio_return_success (ret);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_unlink (char *buf)
|
|
{
|
|
CORE_ADDR ptrval;
|
|
int length, retlength;
|
|
char *pathname;
|
|
int ret;
|
|
struct stat st;
|
|
|
|
/* Parameter: Ptr to pathname / length incl. trailing zero */
|
|
if (remote_fileio_extract_ptr_w_len (&buf, &ptrval, &length))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
/* Request pathname using 'm' packet */
|
|
pathname = alloca (length);
|
|
retlength = remote_read_bytes (ptrval, (gdb_byte *) pathname, length);
|
|
if (retlength != length)
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
|
|
/* Only operate on regular files (and directories, which allows to return
|
|
the correct return code) */
|
|
if (!stat (pathname, &st) && !S_ISREG (st.st_mode) && !S_ISDIR (st.st_mode))
|
|
{
|
|
remote_fileio_reply (-1, FILEIO_ENODEV);
|
|
return;
|
|
}
|
|
|
|
remote_fio_no_longjmp = 1;
|
|
ret = unlink (pathname);
|
|
|
|
if (ret == -1)
|
|
remote_fileio_return_errno (-1);
|
|
else
|
|
remote_fileio_return_success (ret);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_stat (char *buf)
|
|
{
|
|
CORE_ADDR statptr, nameptr;
|
|
int ret, namelength, retlength;
|
|
char *pathname;
|
|
LONGEST lnum;
|
|
struct stat st;
|
|
struct fio_stat fst;
|
|
|
|
/* 1. Parameter: Ptr to pathname / length incl. trailing zero */
|
|
if (remote_fileio_extract_ptr_w_len (&buf, &nameptr, &namelength))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
|
|
/* 2. Parameter: Ptr to struct stat */
|
|
if (remote_fileio_extract_long (&buf, &lnum))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
statptr = (CORE_ADDR) lnum;
|
|
|
|
/* Request pathname using 'm' packet */
|
|
pathname = alloca (namelength);
|
|
retlength = remote_read_bytes (nameptr, (gdb_byte *) pathname, namelength);
|
|
if (retlength != namelength)
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
|
|
remote_fio_no_longjmp = 1;
|
|
ret = stat (pathname, &st);
|
|
|
|
if (ret == -1)
|
|
{
|
|
remote_fileio_return_errno (-1);
|
|
return;
|
|
}
|
|
/* Only operate on regular files and directories */
|
|
if (!ret && !S_ISREG (st.st_mode) && !S_ISDIR (st.st_mode))
|
|
{
|
|
remote_fileio_reply (-1, FILEIO_EACCES);
|
|
return;
|
|
}
|
|
if (statptr)
|
|
{
|
|
remote_fileio_to_fio_stat (&st, &fst);
|
|
remote_fileio_to_fio_uint (0, fst.fst_dev);
|
|
|
|
retlength = remote_fileio_write_bytes (statptr,
|
|
(gdb_byte *) &fst, sizeof fst);
|
|
if (retlength != sizeof fst)
|
|
{
|
|
remote_fileio_return_errno (-1);
|
|
return;
|
|
}
|
|
}
|
|
remote_fileio_return_success (ret);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_fstat (char *buf)
|
|
{
|
|
CORE_ADDR ptrval;
|
|
int fd, ret, retlength;
|
|
long target_fd;
|
|
LONGEST lnum;
|
|
struct stat st;
|
|
struct fio_stat fst;
|
|
struct timeval tv;
|
|
|
|
/* 1. Parameter: file descriptor */
|
|
if (remote_fileio_extract_int (&buf, &target_fd))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
fd = remote_fileio_map_fd ((int) target_fd);
|
|
if (fd == FIO_FD_INVALID)
|
|
{
|
|
remote_fileio_badfd ();
|
|
return;
|
|
}
|
|
/* 2. Parameter: Ptr to struct stat */
|
|
if (remote_fileio_extract_long (&buf, &lnum))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
ptrval = (CORE_ADDR) lnum;
|
|
|
|
remote_fio_no_longjmp = 1;
|
|
if (fd == FIO_FD_CONSOLE_IN || fd == FIO_FD_CONSOLE_OUT)
|
|
{
|
|
remote_fileio_to_fio_uint (1, fst.fst_dev);
|
|
st.st_mode = S_IFCHR | (fd == FIO_FD_CONSOLE_IN ? S_IRUSR : S_IWUSR);
|
|
st.st_nlink = 1;
|
|
#ifdef HAVE_GETUID
|
|
st.st_uid = getuid ();
|
|
#else
|
|
st.st_uid = 0;
|
|
#endif
|
|
#ifdef HAVE_GETGID
|
|
st.st_gid = getgid ();
|
|
#else
|
|
st.st_gid = 0;
|
|
#endif
|
|
st.st_rdev = 0;
|
|
st.st_size = 0;
|
|
#ifdef HAVE_STRUCT_STAT_ST_BLKSIZE
|
|
st.st_blksize = 512;
|
|
#endif
|
|
#if HAVE_STRUCT_STAT_ST_BLOCKS
|
|
st.st_blocks = 0;
|
|
#endif
|
|
if (!gettimeofday (&tv, NULL))
|
|
st.st_atime = st.st_mtime = st.st_ctime = tv.tv_sec;
|
|
else
|
|
st.st_atime = st.st_mtime = st.st_ctime = (time_t) 0;
|
|
ret = 0;
|
|
}
|
|
else
|
|
ret = fstat (fd, &st);
|
|
|
|
if (ret == -1)
|
|
{
|
|
remote_fileio_return_errno (-1);
|
|
return;
|
|
}
|
|
if (ptrval)
|
|
{
|
|
remote_fileio_to_fio_stat (&st, &fst);
|
|
|
|
retlength = remote_fileio_write_bytes (ptrval, (gdb_byte *) &fst, sizeof fst);
|
|
if (retlength != sizeof fst)
|
|
{
|
|
remote_fileio_return_errno (-1);
|
|
return;
|
|
}
|
|
}
|
|
remote_fileio_return_success (ret);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_gettimeofday (char *buf)
|
|
{
|
|
LONGEST lnum;
|
|
CORE_ADDR ptrval;
|
|
int ret, retlength;
|
|
struct timeval tv;
|
|
struct fio_timeval ftv;
|
|
|
|
/* 1. Parameter: struct timeval pointer */
|
|
if (remote_fileio_extract_long (&buf, &lnum))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
ptrval = (CORE_ADDR) lnum;
|
|
/* 2. Parameter: some pointer value... */
|
|
if (remote_fileio_extract_long (&buf, &lnum))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
/* ...which has to be NULL */
|
|
if (lnum)
|
|
{
|
|
remote_fileio_reply (-1, FILEIO_EINVAL);
|
|
return;
|
|
}
|
|
|
|
remote_fio_no_longjmp = 1;
|
|
ret = gettimeofday (&tv, NULL);
|
|
|
|
if (ret == -1)
|
|
{
|
|
remote_fileio_return_errno (-1);
|
|
return;
|
|
}
|
|
|
|
if (ptrval)
|
|
{
|
|
remote_fileio_to_fio_timeval (&tv, &ftv);
|
|
|
|
retlength = remote_fileio_write_bytes (ptrval, (gdb_byte *) &ftv, sizeof ftv);
|
|
if (retlength != sizeof ftv)
|
|
{
|
|
remote_fileio_return_errno (-1);
|
|
return;
|
|
}
|
|
}
|
|
remote_fileio_return_success (ret);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_isatty (char *buf)
|
|
{
|
|
long target_fd;
|
|
int fd;
|
|
|
|
/* Parameter: file descriptor */
|
|
if (remote_fileio_extract_int (&buf, &target_fd))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
remote_fio_no_longjmp = 1;
|
|
fd = remote_fileio_map_fd ((int) target_fd);
|
|
remote_fileio_return_success (fd == FIO_FD_CONSOLE_IN ||
|
|
fd == FIO_FD_CONSOLE_OUT ? 1 : 0);
|
|
}
|
|
|
|
static void
|
|
remote_fileio_func_system (char *buf)
|
|
{
|
|
CORE_ADDR ptrval;
|
|
int ret, length, retlength;
|
|
char *cmdline = NULL;
|
|
|
|
/* Parameter: Ptr to commandline / length incl. trailing zero */
|
|
if (remote_fileio_extract_ptr_w_len (&buf, &ptrval, &length))
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
|
|
if (length)
|
|
{
|
|
/* Request commandline using 'm' packet */
|
|
cmdline = alloca (length);
|
|
retlength = remote_read_bytes (ptrval, (gdb_byte *) cmdline, length);
|
|
if (retlength != length)
|
|
{
|
|
remote_fileio_ioerror ();
|
|
return;
|
|
}
|
|
}
|
|
|
|
/* Check if system(3) has been explicitely allowed using the
|
|
`set remote system-call-allowed 1' command. If length is 0,
|
|
indicating a NULL parameter to the system call, return zero to
|
|
indicate a shell is not available. Otherwise fail with EPERM. */
|
|
if (!remote_fio_system_call_allowed)
|
|
{
|
|
if (!length)
|
|
remote_fileio_return_success (0);
|
|
else
|
|
remote_fileio_reply (-1, FILEIO_EPERM);
|
|
return;
|
|
}
|
|
|
|
remote_fio_no_longjmp = 1;
|
|
ret = system (cmdline);
|
|
|
|
if (!length)
|
|
remote_fileio_return_success (ret);
|
|
else if (ret == -1)
|
|
remote_fileio_return_errno (-1);
|
|
else
|
|
remote_fileio_return_success (WEXITSTATUS (ret));
|
|
}
|
|
|
|
static struct {
|
|
char *name;
|
|
void (*func)(char *);
|
|
} remote_fio_func_map[] = {
|
|
{ "open", remote_fileio_func_open },
|
|
{ "close", remote_fileio_func_close },
|
|
{ "read", remote_fileio_func_read },
|
|
{ "write", remote_fileio_func_write },
|
|
{ "lseek", remote_fileio_func_lseek },
|
|
{ "rename", remote_fileio_func_rename },
|
|
{ "unlink", remote_fileio_func_unlink },
|
|
{ "stat", remote_fileio_func_stat },
|
|
{ "fstat", remote_fileio_func_fstat },
|
|
{ "gettimeofday", remote_fileio_func_gettimeofday },
|
|
{ "isatty", remote_fileio_func_isatty },
|
|
{ "system", remote_fileio_func_system },
|
|
{ NULL, NULL }
|
|
};
|
|
|
|
static int
|
|
do_remote_fileio_request (struct ui_out *uiout, void *buf_arg)
|
|
{
|
|
char *buf = buf_arg;
|
|
char *c;
|
|
int idx;
|
|
|
|
remote_fileio_sig_set (remote_fileio_ctrl_c_signal_handler);
|
|
|
|
c = strchr (++buf, ',');
|
|
if (c)
|
|
*c++ = '\0';
|
|
else
|
|
c = strchr (buf, '\0');
|
|
for (idx = 0; remote_fio_func_map[idx].name; ++idx)
|
|
if (!strcmp (remote_fio_func_map[idx].name, buf))
|
|
break;
|
|
if (!remote_fio_func_map[idx].name) /* ERROR: No such function. */
|
|
return RETURN_ERROR;
|
|
remote_fio_func_map[idx].func (c);
|
|
return 0;
|
|
}
|
|
|
|
/* Close any open descriptors, and reinitialize the file mapping. */
|
|
|
|
void
|
|
remote_fileio_reset (void)
|
|
{
|
|
int ix;
|
|
|
|
for (ix = 0; ix != remote_fio_data.fd_map_size; ix++)
|
|
{
|
|
int fd = remote_fio_data.fd_map[ix];
|
|
|
|
if (fd >= 0)
|
|
close (fd);
|
|
}
|
|
if (remote_fio_data.fd_map)
|
|
{
|
|
free (remote_fio_data.fd_map);
|
|
remote_fio_data.fd_map = NULL;
|
|
remote_fio_data.fd_map_size = 0;
|
|
}
|
|
}
|
|
|
|
void
|
|
remote_fileio_request (char *buf)
|
|
{
|
|
int ex;
|
|
|
|
remote_fileio_sig_init ();
|
|
|
|
remote_fio_ctrl_c_flag = 0;
|
|
remote_fio_no_longjmp = 0;
|
|
|
|
ex = catch_exceptions (uiout, do_remote_fileio_request, (void *)buf,
|
|
RETURN_MASK_ALL);
|
|
switch (ex)
|
|
{
|
|
case RETURN_ERROR:
|
|
remote_fileio_reply (-1, FILEIO_ENOSYS);
|
|
break;
|
|
case RETURN_QUIT:
|
|
remote_fileio_reply (-1, FILEIO_EINTR);
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
|
|
remote_fileio_sig_exit ();
|
|
}
|
|
|
|
static void
|
|
set_system_call_allowed (char *args, int from_tty)
|
|
{
|
|
if (args)
|
|
{
|
|
char *arg_end;
|
|
int val = strtoul (args, &arg_end, 10);
|
|
if (*args && *arg_end == '\0')
|
|
{
|
|
remote_fio_system_call_allowed = !!val;
|
|
return;
|
|
}
|
|
}
|
|
error (_("Illegal argument for \"set remote system-call-allowed\" command"));
|
|
}
|
|
|
|
static void
|
|
show_system_call_allowed (char *args, int from_tty)
|
|
{
|
|
if (args)
|
|
error (_("Garbage after \"show remote system-call-allowed\" command: `%s'"), args);
|
|
printf_unfiltered ("Calling host system(3) call from target is %sallowed\n",
|
|
remote_fio_system_call_allowed ? "" : "not ");
|
|
}
|
|
|
|
void
|
|
initialize_remote_fileio (struct cmd_list_element *remote_set_cmdlist,
|
|
struct cmd_list_element *remote_show_cmdlist)
|
|
{
|
|
sigint_fileio_token =
|
|
create_async_signal_handler (async_remote_fileio_interrupt, NULL);
|
|
|
|
add_cmd ("system-call-allowed", no_class,
|
|
set_system_call_allowed,
|
|
_("Set if the host system(3) call is allowed for the target."),
|
|
&remote_set_cmdlist);
|
|
add_cmd ("system-call-allowed", no_class,
|
|
show_system_call_allowed,
|
|
_("Show if the host system(3) call is allowed for the target."),
|
|
&remote_show_cmdlist);
|
|
}
|