1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309 |
- /* Remote File-I/O communications
- Copyright (C) 2003-2022 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 "gdbcmd.h"
- #include "remote.h"
- #include "gdbsupport/gdb_wait.h"
- #include <sys/stat.h>
- #include "remote-fileio.h"
- #include "gdbsupport/event-loop.h"
- #include "target.h"
- #include "filenames.h"
- #include "gdbsupport/filestuff.h"
- #include <fcntl.h>
- #include "gdbsupport/gdb_sys_time.h"
- #ifdef __CYGWIN__
- #include <sys/cygwin.h> /* For cygwin_conv_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 int
- remote_fileio_init_fd_map (void)
- {
- int i;
- if (!remote_fio_data.fd_map)
- {
- remote_fio_data.fd_map = XNEWVEC (int, 10);
- 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 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;
- }
- static void
- remote_fileio_to_fio_long (LONGEST num, fio_long_t fnum)
- {
- host_to_bigendian (num, (char *) fnum, 8);
- }
- static void
- remote_fileio_to_fio_timeval (struct timeval *tv, struct fio_timeval *ftv)
- {
- host_to_fileio_time (tv->tv_sec, ftv->ftv_sec);
- remote_fileio_to_fio_long (tv->tv_usec, ftv->ftv_usec);
- }
- /* The quit handler originally installed. */
- static quit_handler_ftype *remote_fileio_o_quit_handler;
- /* What to do on a QUIT call while handling a file I/O request. We
- throw a quit exception, which is caught by remote_fileio_request
- and translated to an EINTR reply back to the target. */
- static void
- remote_fileio_quit_handler (void)
- {
- if (check_quit_flag ())
- quit ();
- }
- static void
- remote_fileio_reply (remote_target *remote, int retcode, int error)
- {
- char buf[32];
- int ctrl_c = check_quit_flag ();
- strcpy (buf, "F");
- if (retcode < 0)
- {
- strcat (buf, "-");
- retcode = -retcode;
- }
- sprintf (buf + strlen (buf), "%x", retcode);
- if (error || ctrl_c)
- {
- if (error && ctrl_c)
- error = FILEIO_EINTR;
- if (error < 0)
- {
- strcat (buf, "-");
- error = -error;
- }
- sprintf (buf + strlen (buf), ",%x", error);
- if (ctrl_c)
- strcat (buf, ",C");
- }
- quit_handler = remote_fileio_o_quit_handler;
- putpkt (remote, buf);
- }
- static void
- remote_fileio_ioerror (remote_target *remote)
- {
- remote_fileio_reply (remote, -1, FILEIO_EIO);
- }
- static void
- remote_fileio_badfd (remote_target *remote)
- {
- remote_fileio_reply (remote, -1, FILEIO_EBADF);
- }
- static void
- remote_fileio_return_errno (remote_target *remote, int retcode)
- {
- remote_fileio_reply (remote, retcode, retcode < 0
- ? host_to_fileio_error (errno) : 0);
- }
- static void
- remote_fileio_return_success (remote_target *remote, int retcode)
- {
- remote_fileio_reply (remote, retcode, 0);
- }
- static void
- remote_fileio_func_open (remote_target *remote, char *buf)
- {
- CORE_ADDR ptrval;
- int length;
- 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 (remote);
- return;
- }
- /* 2. Parameter: open flags */
- if (remote_fileio_extract_int (&buf, &num))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- flags = remote_fileio_oflags_to_host (num);
- /* 3. Parameter: open mode */
- if (remote_fileio_extract_int (&buf, &num))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- mode = remote_fileio_mode_to_host (num, 1);
- /* Request pathname. */
- pathname = (char *) alloca (length);
- if (target_read_memory (ptrval, (gdb_byte *) pathname, length) != 0)
- {
- remote_fileio_ioerror (remote);
- 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 (remote, -1, FILEIO_ENODEV);
- return;
- }
- if (S_ISDIR (st.st_mode)
- && ((flags & O_WRONLY) == O_WRONLY || (flags & O_RDWR) == O_RDWR))
- {
- remote_fileio_reply (remote, -1, FILEIO_EISDIR);
- return;
- }
- }
- fd = gdb_open_cloexec (pathname, flags, mode).release ();
- if (fd < 0)
- {
- remote_fileio_return_errno (remote, -1);
- return;
- }
- fd = remote_fileio_fd_to_targetfd (fd);
- remote_fileio_return_success (remote, fd);
- }
- static void
- remote_fileio_func_close (remote_target *remote, char *buf)
- {
- long num;
- int fd;
- /* Parameter: file descriptor */
- if (remote_fileio_extract_int (&buf, &num))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- fd = remote_fileio_map_fd ((int) num);
- if (fd == FIO_FD_INVALID)
- {
- remote_fileio_badfd (remote);
- return;
- }
- if (fd != FIO_FD_CONSOLE_IN && fd != FIO_FD_CONSOLE_OUT && close (fd))
- remote_fileio_return_errno (remote, -1);
- remote_fileio_close_target_fd ((int) num);
- remote_fileio_return_success (remote, 0);
- }
- static void
- remote_fileio_func_read (remote_target *remote, char *buf)
- {
- long target_fd, num;
- LONGEST lnum;
- CORE_ADDR ptrval;
- int fd, ret;
- 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 (remote);
- return;
- }
- fd = remote_fileio_map_fd ((int) target_fd);
- if (fd == FIO_FD_INVALID)
- {
- remote_fileio_badfd (remote);
- return;
- }
- /* 2. Parameter: buffer pointer */
- if (remote_fileio_extract_long (&buf, &lnum))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- ptrval = (CORE_ADDR) lnum;
- /* 3. Parameter: buffer length */
- if (remote_fileio_extract_int (&buf, &num))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- length = (size_t) num;
- switch (fd)
- {
- case FIO_FD_CONSOLE_OUT:
- remote_fileio_badfd (remote);
- return;
- case FIO_FD_CONSOLE_IN:
- {
- static char *remaining_buf = NULL;
- static int remaining_length = 0;
- buffer = (gdb_byte *) xmalloc (16384);
- if (remaining_buf)
- {
- 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
- {
- /* Windows (at least XP and Server 2003) has difficulty
- with large reads from consoles. If a handle is
- backed by a real console device, overly large reads
- from the handle will fail and set errno == ENOMEM.
- On a Windows Server 2003 system where I tested,
- reading 26608 bytes from the console was OK, but
- anything above 26609 bytes would fail. The limit has
- been observed to vary on different systems. So, we
- limit this read to something smaller than that - by a
- safe margin, in case the limit depends on system
- resources or version. */
- ret = gdb_stdtargin->read ((char *) buffer, 16383);
- 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);
- 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)
- {
- errno = target_write_memory (ptrval, buffer, ret);
- if (errno != 0)
- ret = -1;
- }
- if (ret < 0)
- remote_fileio_return_errno (remote, -1);
- else
- remote_fileio_return_success (remote, ret);
- xfree (buffer);
- }
- static void
- remote_fileio_func_write (remote_target *remote, char *buf)
- {
- long target_fd, num;
- LONGEST lnum;
- CORE_ADDR ptrval;
- int fd, ret;
- gdb_byte *buffer;
- size_t length;
- /* 1. Parameter: file descriptor */
- if (remote_fileio_extract_int (&buf, &target_fd))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- fd = remote_fileio_map_fd ((int) target_fd);
- if (fd == FIO_FD_INVALID)
- {
- remote_fileio_badfd (remote);
- return;
- }
- /* 2. Parameter: buffer pointer */
- if (remote_fileio_extract_long (&buf, &lnum))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- ptrval = (CORE_ADDR) lnum;
- /* 3. Parameter: buffer length */
- if (remote_fileio_extract_int (&buf, &num))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- length = (size_t) num;
-
- buffer = (gdb_byte *) xmalloc (length);
- if (target_read_memory (ptrval, buffer, length) != 0)
- {
- xfree (buffer);
- remote_fileio_ioerror (remote);
- return;
- }
- switch (fd)
- {
- case FIO_FD_CONSOLE_IN:
- remote_fileio_badfd (remote);
- xfree (buffer);
- return;
- case FIO_FD_CONSOLE_OUT:
- {
- ui_file *file = target_fd == 1 ? gdb_stdtarg : gdb_stdtargerr;
- file->write ((char *) buffer, length);
- file->flush ();
- 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 (remote, -1);
- else
- remote_fileio_return_success (remote, ret);
- xfree (buffer);
- }
- static void
- remote_fileio_func_lseek (remote_target *remote, 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 (remote);
- return;
- }
- fd = remote_fileio_map_fd ((int) num);
- if (fd == FIO_FD_INVALID)
- {
- remote_fileio_badfd (remote);
- return;
- }
- else if (fd == FIO_FD_CONSOLE_IN || fd == FIO_FD_CONSOLE_OUT)
- {
- remote_fileio_reply (remote, -1, FILEIO_ESPIPE);
- return;
- }
- /* 2. Parameter: offset */
- if (remote_fileio_extract_long (&buf, &lnum))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- offset = (off_t) lnum;
- /* 3. Parameter: flag */
- if (remote_fileio_extract_int (&buf, &num))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- if (remote_fileio_seek_flag_to_host (num, &flag))
- {
- remote_fileio_reply (remote, -1, FILEIO_EINVAL);
- return;
- }
-
- ret = lseek (fd, offset, flag);
- if (ret == (off_t) -1)
- remote_fileio_return_errno (remote, -1);
- else
- remote_fileio_return_success (remote, ret);
- }
- static void
- remote_fileio_func_rename (remote_target *remote, char *buf)
- {
- CORE_ADDR old_ptr, new_ptr;
- int old_len, new_len;
- 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 (remote);
- 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 (remote);
- return;
- }
-
- /* Request oldpath using 'm' packet */
- oldpath = (char *) alloca (old_len);
- if (target_read_memory (old_ptr, (gdb_byte *) oldpath, old_len) != 0)
- {
- remote_fileio_ioerror (remote);
- return;
- }
-
- /* Request newpath using 'm' packet */
- newpath = (char *) alloca (new_len);
- if (target_read_memory (new_ptr, (gdb_byte *) newpath, new_len) != 0)
- {
- remote_fileio_ioerror (remote);
- 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 (remote, -1, FILEIO_EACCES);
- return;
- }
- 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];
- char newfullpath[PATH_MAX];
- int len;
- cygwin_conv_path (CCP_WIN_A_TO_POSIX, oldpath, oldfullpath,
- PATH_MAX);
- cygwin_conv_path (CCP_WIN_A_TO_POSIX, newpath, newfullpath,
- PATH_MAX);
- len = strlen (oldfullpath);
- if (IS_DIR_SEPARATOR (newfullpath[len])
- && !filename_ncmp (oldfullpath, newfullpath, len))
- errno = EINVAL;
- else
- errno = EEXIST;
- }
- }
- }
- #endif
- remote_fileio_return_errno (remote, -1);
- }
- else
- remote_fileio_return_success (remote, ret);
- }
- static void
- remote_fileio_func_unlink (remote_target *remote, char *buf)
- {
- CORE_ADDR ptrval;
- int length;
- 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 (remote);
- return;
- }
- /* Request pathname using 'm' packet */
- pathname = (char *) alloca (length);
- if (target_read_memory (ptrval, (gdb_byte *) pathname, length) != 0)
- {
- remote_fileio_ioerror (remote);
- 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 (remote, -1, FILEIO_ENODEV);
- return;
- }
- ret = unlink (pathname);
- if (ret == -1)
- remote_fileio_return_errno (remote, -1);
- else
- remote_fileio_return_success (remote, ret);
- }
- static void
- remote_fileio_func_stat (remote_target *remote, char *buf)
- {
- CORE_ADDR statptr, nameptr;
- int ret, namelength;
- 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 (remote);
- return;
- }
- /* 2. Parameter: Ptr to struct stat */
- if (remote_fileio_extract_long (&buf, &lnum))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- statptr = (CORE_ADDR) lnum;
-
- /* Request pathname using 'm' packet */
- pathname = (char *) alloca (namelength);
- if (target_read_memory (nameptr, (gdb_byte *) pathname, namelength) != 0)
- {
- remote_fileio_ioerror (remote);
- return;
- }
- ret = stat (pathname, &st);
- if (ret == -1)
- {
- remote_fileio_return_errno (remote, -1);
- return;
- }
- /* Only operate on regular files and directories. */
- if (!ret && !S_ISREG (st.st_mode) && !S_ISDIR (st.st_mode))
- {
- remote_fileio_reply (remote, -1, FILEIO_EACCES);
- return;
- }
- if (statptr)
- {
- host_to_fileio_stat (&st, &fst);
- host_to_fileio_uint (0, fst.fst_dev);
- errno = target_write_memory (statptr, (gdb_byte *) &fst, sizeof fst);
- if (errno != 0)
- {
- remote_fileio_return_errno (remote, -1);
- return;
- }
- }
- remote_fileio_return_success (remote, ret);
- }
- static void
- remote_fileio_func_fstat (remote_target *remote, char *buf)
- {
- CORE_ADDR ptrval;
- int fd, ret;
- 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 (remote);
- return;
- }
- fd = remote_fileio_map_fd ((int) target_fd);
- if (fd == FIO_FD_INVALID)
- {
- remote_fileio_badfd (remote);
- return;
- }
- /* 2. Parameter: Ptr to struct stat */
- if (remote_fileio_extract_long (&buf, &lnum))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- ptrval = (CORE_ADDR) lnum;
- if (fd == FIO_FD_CONSOLE_IN || fd == FIO_FD_CONSOLE_OUT)
- {
- host_to_fileio_uint (1, fst.fst_dev);
- memset (&st, 0, sizeof (st));
- 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 ();
- #endif
- #ifdef HAVE_GETGID
- st.st_gid = getgid ();
- #endif
- #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 (remote, -1);
- return;
- }
- if (ptrval)
- {
- host_to_fileio_stat (&st, &fst);
- errno = target_write_memory (ptrval, (gdb_byte *) &fst, sizeof fst);
- if (errno != 0)
- {
- remote_fileio_return_errno (remote, -1);
- return;
- }
- }
- remote_fileio_return_success (remote, ret);
- }
- static void
- remote_fileio_func_gettimeofday (remote_target *remote, char *buf)
- {
- LONGEST lnum;
- CORE_ADDR ptrval;
- int ret;
- struct timeval tv;
- struct fio_timeval ftv;
- /* 1. Parameter: struct timeval pointer */
- if (remote_fileio_extract_long (&buf, &lnum))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- ptrval = (CORE_ADDR) lnum;
- /* 2. Parameter: some pointer value... */
- if (remote_fileio_extract_long (&buf, &lnum))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- /* ...which has to be NULL. */
- if (lnum)
- {
- remote_fileio_reply (remote, -1, FILEIO_EINVAL);
- return;
- }
- ret = gettimeofday (&tv, NULL);
- if (ret == -1)
- {
- remote_fileio_return_errno (remote, -1);
- return;
- }
- if (ptrval)
- {
- remote_fileio_to_fio_timeval (&tv, &ftv);
- errno = target_write_memory (ptrval, (gdb_byte *) &ftv, sizeof ftv);
- if (errno != 0)
- {
- remote_fileio_return_errno (remote, -1);
- return;
- }
- }
- remote_fileio_return_success (remote, ret);
- }
- static void
- remote_fileio_func_isatty (remote_target *remote, char *buf)
- {
- long target_fd;
- int fd;
- /* Parameter: file descriptor */
- if (remote_fileio_extract_int (&buf, &target_fd))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- fd = remote_fileio_map_fd ((int) target_fd);
- int ret = fd == FIO_FD_CONSOLE_IN || fd == FIO_FD_CONSOLE_OUT ? 1 : 0;
- remote_fileio_return_success (remote, ret);
- }
- static void
- remote_fileio_func_system (remote_target *remote, char *buf)
- {
- CORE_ADDR ptrval;
- int ret, length;
- char *cmdline = NULL;
- /* Parameter: Ptr to commandline / length incl. trailing zero */
- if (remote_fileio_extract_ptr_w_len (&buf, &ptrval, &length))
- {
- remote_fileio_ioerror (remote);
- return;
- }
- if (length)
- {
- /* Request commandline using 'm' packet */
- cmdline = (char *) alloca (length);
- if (target_read_memory (ptrval, (gdb_byte *) cmdline, length) != 0)
- {
- remote_fileio_ioerror (remote);
- return;
- }
- }
-
- /* Check if system(3) has been explicitly 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 (remote, 0);
- else
- remote_fileio_reply (remote, -1, FILEIO_EPERM);
- return;
- }
- ret = system (cmdline);
- if (!length)
- remote_fileio_return_success (remote, ret);
- else if (ret == -1)
- remote_fileio_return_errno (remote, -1);
- else
- remote_fileio_return_success (remote, WEXITSTATUS (ret));
- }
- static struct {
- const char *name;
- void (*func)(remote_target *remote, 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 void
- do_remote_fileio_request (remote_target *remote, char *buf)
- {
- char *c;
- int idx;
- quit_handler = remote_fileio_quit_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)
- remote_fileio_reply (remote, -1, FILEIO_ENOSYS);
- else
- remote_fio_func_map[idx].func (remote, c);
- }
- /* 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)
- {
- xfree (remote_fio_data.fd_map);
- remote_fio_data.fd_map = NULL;
- remote_fio_data.fd_map_size = 0;
- }
- }
- /* Handle a file I/O request. BUF points to the packet containing the
- request. CTRLC_PENDING_P should be nonzero if the target has not
- acknowledged the Ctrl-C sent asynchronously earlier. */
- void
- remote_fileio_request (remote_target *remote, char *buf, int ctrlc_pending_p)
- {
- /* Save the previous quit handler, so we can restore it. No need
- for a cleanup since we catch all exceptions below. Note that the
- quit handler is also restored by remote_fileio_reply just before
- pushing a packet. */
- remote_fileio_o_quit_handler = quit_handler;
- if (ctrlc_pending_p)
- {
- /* If the target hasn't responded to the Ctrl-C sent
- asynchronously earlier, take this opportunity to send the
- Ctrl-C synchronously. */
- set_quit_flag ();
- remote_fileio_reply (remote, -1, FILEIO_EINTR);
- }
- else
- {
- try
- {
- do_remote_fileio_request (remote, buf);
- }
- catch (const gdb_exception &ex)
- {
- if (ex.reason == RETURN_QUIT)
- remote_fileio_reply (remote, -1, FILEIO_EINTR);
- else
- remote_fileio_reply (remote, -1, FILEIO_EIO);
- }
- }
- quit_handler = remote_fileio_o_quit_handler;
- }
- /* Unpack an fio_uint_t. */
- static unsigned int
- remote_fileio_to_host_uint (fio_uint_t fnum)
- {
- return extract_unsigned_integer ((gdb_byte *) fnum, 4,
- BFD_ENDIAN_BIG);
- }
- /* Unpack an fio_ulong_t. */
- static ULONGEST
- remote_fileio_to_host_ulong (fio_ulong_t fnum)
- {
- return extract_unsigned_integer ((gdb_byte *) fnum, 8,
- BFD_ENDIAN_BIG);
- }
- /* Unpack an fio_mode_t. */
- static mode_t
- remote_fileio_to_host_mode (fio_mode_t fnum)
- {
- return remote_fileio_mode_to_host (remote_fileio_to_host_uint (fnum),
- 0);
- }
- /* Unpack an fio_time_t. */
- static time_t
- remote_fileio_to_host_time (fio_time_t fnum)
- {
- return remote_fileio_to_host_uint (fnum);
- }
- /* See remote-fileio.h. */
- void
- remote_fileio_to_host_stat (struct fio_stat *fst, struct stat *st)
- {
- memset (st, 0, sizeof (struct stat));
- st->st_dev = remote_fileio_to_host_uint (fst->fst_dev);
- st->st_ino = remote_fileio_to_host_uint (fst->fst_ino);
- st->st_mode = remote_fileio_to_host_mode (fst->fst_mode);
- st->st_nlink = remote_fileio_to_host_uint (fst->fst_nlink);
- st->st_uid = remote_fileio_to_host_uint (fst->fst_uid);
- st->st_gid = remote_fileio_to_host_uint (fst->fst_gid);
- st->st_rdev = remote_fileio_to_host_uint (fst->fst_rdev);
- st->st_size = remote_fileio_to_host_ulong (fst->fst_size);
- #ifdef HAVE_STRUCT_STAT_ST_BLKSIZE
- st->st_blksize = remote_fileio_to_host_ulong (fst->fst_blksize);
- #endif
- #if HAVE_STRUCT_STAT_ST_BLOCKS
- st->st_blocks = remote_fileio_to_host_ulong (fst->fst_blocks);
- #endif
- st->st_atime = remote_fileio_to_host_time (fst->fst_atime);
- st->st_mtime = remote_fileio_to_host_time (fst->fst_mtime);
- st->st_ctime = remote_fileio_to_host_time (fst->fst_ctime);
- }
- static void
- set_system_call_allowed (const 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 (const char *args, int from_tty)
- {
- if (args)
- error (_("Garbage after \"show remote "
- "system-call-allowed\" command: `%s'"), args);
- gdb_printf ("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)
- {
- 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);
- }
|