1 /* Remote File-I/O communications
3 Copyright 2003 Free Software Foundation, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
22 /* See the GDB User Guide for details of the GDB remote protocol. */
25 #include "gdb_string.h"
28 #include "gdb/fileio.h"
31 #include "remote-fileio.h"
36 #include <sys/cygwin.h> /* For cygwin_conv_to_full_posix_path. */
45 #define FIO_FD_INVALID -1
46 #define FIO_FD_CONSOLE_IN -2
47 #define FIO_FD_CONSOLE_OUT -3
49 static int remote_fio_system_call_allowed
= 0;
52 remote_fileio_init_fd_map (void)
56 if (!remote_fio_data
.fd_map
)
58 remote_fio_data
.fd_map
= (int *) xmalloc (10 * sizeof (int));
59 remote_fio_data
.fd_map_size
= 10;
60 remote_fio_data
.fd_map
[0] = FIO_FD_CONSOLE_IN
;
61 remote_fio_data
.fd_map
[1] = FIO_FD_CONSOLE_OUT
;
62 remote_fio_data
.fd_map
[2] = FIO_FD_CONSOLE_OUT
;
63 for (i
= 3; i
< 10; ++i
)
64 remote_fio_data
.fd_map
[i
] = FIO_FD_INVALID
;
70 remote_fileio_resize_fd_map (void)
72 if (!remote_fio_data
.fd_map
)
73 return remote_fileio_init_fd_map ();
74 remote_fio_data
.fd_map_size
+= 10;
75 remote_fio_data
.fd_map
=
76 (int *) xrealloc (remote_fio_data
.fd_map
,
77 remote_fio_data
.fd_map_size
* sizeof (int));
78 return remote_fio_data
.fd_map_size
- 10;
82 remote_fileio_next_free_fd (void)
86 for (i
= 0; i
< remote_fio_data
.fd_map_size
; ++i
)
87 if (remote_fio_data
.fd_map
[i
] == FIO_FD_INVALID
)
89 return remote_fileio_resize_fd_map ();
93 remote_fileio_fd_to_targetfd (int fd
)
95 int target_fd
= remote_fileio_next_free_fd ();
96 remote_fio_data
.fd_map
[target_fd
] = fd
;
101 remote_fileio_map_fd (int target_fd
)
103 remote_fileio_init_fd_map ();
104 if (target_fd
< 0 || target_fd
>= remote_fio_data
.fd_map_size
)
105 return FIO_FD_INVALID
;
106 return remote_fio_data
.fd_map
[target_fd
];
110 remote_fileio_close_target_fd (int target_fd
)
112 remote_fileio_init_fd_map ();
113 if (target_fd
>= 0 && target_fd
< remote_fio_data
.fd_map_size
)
114 remote_fio_data
.fd_map
[target_fd
] = FIO_FD_INVALID
;
118 remote_fileio_oflags_to_host (long flags
)
122 if (flags
& FILEIO_O_CREAT
)
124 if (flags
& FILEIO_O_EXCL
)
126 if (flags
& FILEIO_O_TRUNC
)
128 if (flags
& FILEIO_O_APPEND
)
130 if (flags
& FILEIO_O_RDONLY
)
132 if (flags
& FILEIO_O_WRONLY
)
134 if (flags
& FILEIO_O_RDWR
)
136 /* On systems supporting binary and text mode, always open files in
145 remote_fileio_mode_to_host (long mode
, int open_call
)
151 if (mode
& FILEIO_S_IFREG
)
153 if (mode
& FILEIO_S_IFDIR
)
155 if (mode
& FILEIO_S_IFCHR
)
158 if (mode
& FILEIO_S_IRUSR
)
160 if (mode
& FILEIO_S_IWUSR
)
162 if (mode
& FILEIO_S_IXUSR
)
164 if (mode
& FILEIO_S_IRGRP
)
166 if (mode
& FILEIO_S_IWGRP
)
168 if (mode
& FILEIO_S_IXGRP
)
170 if (mode
& FILEIO_S_IROTH
)
172 if (mode
& FILEIO_S_IWOTH
)
174 if (mode
& FILEIO_S_IXOTH
)
180 remote_fileio_mode_to_target (mode_t mode
)
185 tmode
|= FILEIO_S_IFREG
;
187 tmode
|= FILEIO_S_IFDIR
;
189 tmode
|= FILEIO_S_IFCHR
;
191 tmode
|= FILEIO_S_IRUSR
;
193 tmode
|= FILEIO_S_IWUSR
;
195 tmode
|= FILEIO_S_IXUSR
;
197 tmode
|= FILEIO_S_IRGRP
;
199 tmode
|= FILEIO_S_IWGRP
;
201 tmode
|= FILEIO_S_IXGRP
;
203 tmode
|= FILEIO_S_IROTH
;
205 tmode
|= FILEIO_S_IWOTH
;
207 tmode
|= FILEIO_S_IXOTH
;
212 remote_fileio_errno_to_target (int error
)
219 return FILEIO_ENOENT
;
227 return FILEIO_EACCES
;
229 return FILEIO_EFAULT
;
233 return FILEIO_EEXIST
;
235 return FILEIO_ENODEV
;
237 return FILEIO_ENOTDIR
;
239 return FILEIO_EISDIR
;
241 return FILEIO_EINVAL
;
243 return FILEIO_ENFILE
;
245 return FILEIO_EMFILE
;
249 return FILEIO_ENOSPC
;
251 return FILEIO_ESPIPE
;
255 return FILEIO_ENOSYS
;
257 return FILEIO_ENAMETOOLONG
;
259 return FILEIO_EUNKNOWN
;
263 remote_fileio_seek_flag_to_host (long num
, int *flag
)
269 case FILEIO_SEEK_SET
:
272 case FILEIO_SEEK_CUR
:
275 case FILEIO_SEEK_END
:
285 remote_fileio_extract_long (char **buf
, LONGEST
*retlong
)
290 if (!buf
|| !*buf
|| !**buf
|| !retlong
)
292 c
= strchr (*buf
, ',');
296 c
= strchr (*buf
, '\0');
297 while (strchr ("+-", **buf
))
303 for (*retlong
= 0; **buf
; ++*buf
)
306 if (**buf
>= '0' && **buf
<= '9')
307 *retlong
+= **buf
- '0';
308 else if (**buf
>= 'a' && **buf
<= 'f')
309 *retlong
+= **buf
- 'a' + 10;
310 else if (**buf
>= 'A' && **buf
<= 'F')
311 *retlong
+= **buf
- 'A' + 10;
321 remote_fileio_extract_int (char **buf
, long *retint
)
328 ret
= remote_fileio_extract_long (buf
, &retlong
);
330 *retint
= (long) retlong
;
335 remote_fileio_extract_ptr_w_len (char **buf
, CORE_ADDR
*ptrval
, int *length
)
340 if (!buf
|| !*buf
|| !**buf
|| !ptrval
|| !length
)
342 c
= strchr (*buf
, '/');
346 if (remote_fileio_extract_long (buf
, &retlong
))
348 *ptrval
= (CORE_ADDR
) retlong
;
350 if (remote_fileio_extract_long (buf
, &retlong
))
352 *length
= (int) retlong
;
356 /* Convert to big endian */
358 remote_fileio_to_be (LONGEST num
, char *buf
, int bytes
)
362 for (i
= 0; i
< bytes
; ++i
)
363 buf
[i
] = (num
>> (8 * (bytes
- i
- 1))) & 0xff;
367 remote_fileio_to_fio_uint (long num
, fio_uint_t fnum
)
369 remote_fileio_to_be ((LONGEST
) num
, (char *) fnum
, 4);
373 remote_fileio_to_fio_mode (mode_t num
, fio_mode_t fnum
)
375 remote_fileio_to_be (remote_fileio_mode_to_target(num
), (char *) fnum
, 4);
379 remote_fileio_to_fio_time (time_t num
, fio_time_t fnum
)
381 remote_fileio_to_be ((LONGEST
) num
, (char *) fnum
, 4);
385 remote_fileio_to_fio_long (LONGEST num
, fio_long_t fnum
)
387 remote_fileio_to_be (num
, (char *) fnum
, 8);
391 remote_fileio_to_fio_ulong (LONGEST num
, fio_ulong_t fnum
)
393 remote_fileio_to_be (num
, (char *) fnum
, 8);
397 remote_fileio_to_fio_stat (struct stat
*st
, struct fio_stat
*fst
)
399 /* `st_dev' is set in the calling function */
400 remote_fileio_to_fio_uint ((long) st
->st_ino
, fst
->fst_ino
);
401 remote_fileio_to_fio_mode (st
->st_mode
, fst
->fst_mode
);
402 remote_fileio_to_fio_uint ((long) st
->st_nlink
, fst
->fst_nlink
);
403 remote_fileio_to_fio_uint ((long) st
->st_uid
, fst
->fst_uid
);
404 remote_fileio_to_fio_uint ((long) st
->st_gid
, fst
->fst_gid
);
405 remote_fileio_to_fio_uint ((long) st
->st_rdev
, fst
->fst_rdev
);
406 remote_fileio_to_fio_ulong ((LONGEST
) st
->st_size
, fst
->fst_size
);
407 remote_fileio_to_fio_ulong ((LONGEST
) st
->st_blksize
, fst
->fst_blksize
);
408 #if HAVE_STRUCT_STAT_ST_BLOCKS
409 remote_fileio_to_fio_ulong ((LONGEST
) st
->st_blocks
, fst
->fst_blocks
);
411 /* FIXME: This is correct for DJGPP, but other systems that don't
412 have st_blocks, if any, might prefer 512 instead of st_blksize.
413 (eliz, 30-12-2003) */
414 remote_fileio_to_fio_ulong (((LONGEST
) st
->st_size
+ st
->st_blksize
- 1)
415 / (LONGEST
) st
->st_blksize
,
418 remote_fileio_to_fio_time (st
->st_atime
, fst
->fst_atime
);
419 remote_fileio_to_fio_time (st
->st_mtime
, fst
->fst_mtime
);
420 remote_fileio_to_fio_time (st
->st_ctime
, fst
->fst_ctime
);
424 remote_fileio_to_fio_timeval (struct timeval
*tv
, struct fio_timeval
*ftv
)
426 remote_fileio_to_fio_time (tv
->tv_sec
, ftv
->ftv_sec
);
427 remote_fileio_to_fio_long (tv
->tv_usec
, ftv
->ftv_usec
);
430 static int remote_fio_ctrl_c_flag
= 0;
431 static int remote_fio_no_longjmp
= 0;
433 #if defined (HAVE_SIGACTION) && defined (SA_RESTART)
434 static struct sigaction remote_fio_sa
;
435 static struct sigaction remote_fio_osa
;
437 static void (*remote_fio_ofunc
)(int);
441 remote_fileio_sig_init (void)
443 #if defined (HAVE_SIGACTION) && defined (SA_RESTART)
444 remote_fio_sa
.sa_handler
= SIG_IGN
;
445 sigemptyset (&remote_fio_sa
.sa_mask
);
446 remote_fio_sa
.sa_flags
= 0;
447 sigaction (SIGINT
, &remote_fio_sa
, &remote_fio_osa
);
449 remote_fio_ofunc
= signal (SIGINT
, SIG_IGN
);
454 remote_fileio_sig_set (void (*sigint_func
)(int))
456 #if defined (HAVE_SIGACTION) && defined (SA_RESTART)
457 remote_fio_sa
.sa_handler
= sigint_func
;
458 sigemptyset (&remote_fio_sa
.sa_mask
);
459 remote_fio_sa
.sa_flags
= 0;
460 sigaction (SIGINT
, &remote_fio_sa
, NULL
);
462 signal (SIGINT
, sigint_func
);
467 remote_fileio_sig_exit (void)
469 #if defined (HAVE_SIGACTION) && defined (SA_RESTART)
470 sigaction (SIGINT
, &remote_fio_osa
, NULL
);
472 signal (SIGINT
, remote_fio_ofunc
);
477 remote_fileio_ctrl_c_signal_handler (int signo
)
479 remote_fileio_sig_set (SIG_IGN
);
480 remote_fio_ctrl_c_flag
= 1;
481 if (!remote_fio_no_longjmp
)
482 throw_exception (RETURN_QUIT
);
483 remote_fileio_sig_set (remote_fileio_ctrl_c_signal_handler
);
487 remote_fileio_reply (int retcode
, int error
)
491 remote_fileio_sig_set (SIG_IGN
);
498 sprintf (buf
+ strlen (buf
), "%x", retcode
);
499 if (error
|| remote_fio_ctrl_c_flag
)
501 if (error
&& remote_fio_ctrl_c_flag
)
502 error
= FILEIO_EINTR
;
508 sprintf (buf
+ strlen (buf
), ",%x", error
);
509 if (remote_fio_ctrl_c_flag
)
512 remote_fileio_sig_set (remote_fileio_ctrl_c_signal_handler
);
517 remote_fileio_ioerror (void)
519 remote_fileio_reply (-1, FILEIO_EIO
);
523 remote_fileio_badfd (void)
525 remote_fileio_reply (-1, FILEIO_EBADF
);
529 remote_fileio_return_errno (int retcode
)
531 remote_fileio_reply (retcode
,
532 retcode
< 0 ? remote_fileio_errno_to_target (errno
) : 0);
536 remote_fileio_return_success (int retcode
)
538 remote_fileio_reply (retcode
, 0);
541 /* Wrapper function for remote_write_bytes() which has the disadvantage to
542 write only one packet, regardless of the requested number of bytes to
543 transfer. This wrapper calls remote_write_bytes() as often as needed. */
545 remote_fileio_write_bytes (CORE_ADDR memaddr
, char *myaddr
, int len
)
547 int ret
= 0, written
;
549 while (len
> 0 && (written
= remote_write_bytes (memaddr
, myaddr
, len
)) > 0)
560 remote_fileio_func_open (char *buf
)
563 int length
, retlength
;
570 /* 1. Parameter: Ptr to pathname / length incl. trailing zero */
571 if (remote_fileio_extract_ptr_w_len (&buf
, &ptrval
, &length
))
573 remote_fileio_ioerror ();
576 /* 2. Parameter: open flags */
577 if (remote_fileio_extract_int (&buf
, &num
))
579 remote_fileio_ioerror ();
582 flags
= remote_fileio_oflags_to_host (num
);
583 /* 3. Parameter: open mode */
584 if (remote_fileio_extract_int (&buf
, &num
))
586 remote_fileio_ioerror ();
589 mode
= remote_fileio_mode_to_host (num
, 1);
591 /* Request pathname using 'm' packet */
592 pathname
= alloca (length
);
593 retlength
= remote_read_bytes (ptrval
, pathname
, length
);
594 if (retlength
!= length
)
596 remote_fileio_ioerror ();
600 /* Check if pathname exists and is not a regular file or directory. If so,
601 return an appropriate error code. Same for trying to open directories
603 if (!stat (pathname
, &st
))
605 if (!S_ISREG (st
.st_mode
) && !S_ISDIR (st
.st_mode
))
607 remote_fileio_reply (-1, FILEIO_ENODEV
);
610 if (S_ISDIR (st
.st_mode
)
611 && ((flags
& O_WRONLY
) == O_WRONLY
|| (flags
& O_RDWR
) == O_RDWR
))
613 remote_fileio_reply (-1, FILEIO_EISDIR
);
618 remote_fio_no_longjmp
= 1;
619 fd
= open (pathname
, flags
, mode
);
622 remote_fileio_return_errno (-1);
626 fd
= remote_fileio_fd_to_targetfd (fd
);
627 remote_fileio_return_success (fd
);
631 remote_fileio_func_close (char *buf
)
636 /* Parameter: file descriptor */
637 if (remote_fileio_extract_int (&buf
, &num
))
639 remote_fileio_ioerror ();
642 fd
= remote_fileio_map_fd ((int) num
);
643 if (fd
== FIO_FD_INVALID
)
645 remote_fileio_badfd ();
649 remote_fio_no_longjmp
= 1;
650 if (fd
!= FIO_FD_CONSOLE_IN
&& fd
!= FIO_FD_CONSOLE_OUT
&& close (fd
))
651 remote_fileio_return_errno (-1);
652 remote_fileio_close_target_fd ((int) num
);
653 remote_fileio_return_success (0);
657 remote_fileio_func_read (char *buf
)
662 int fd
, ret
, retlength
;
665 off_t old_offset
, new_offset
;
667 /* 1. Parameter: file descriptor */
668 if (remote_fileio_extract_int (&buf
, &target_fd
))
670 remote_fileio_ioerror ();
673 fd
= remote_fileio_map_fd ((int) target_fd
);
674 if (fd
== FIO_FD_INVALID
)
676 remote_fileio_badfd ();
679 /* 2. Parameter: buffer pointer */
680 if (remote_fileio_extract_long (&buf
, &lnum
))
682 remote_fileio_ioerror ();
685 ptrval
= (CORE_ADDR
) lnum
;
686 /* 3. Parameter: buffer length */
687 if (remote_fileio_extract_int (&buf
, &num
))
689 remote_fileio_ioerror ();
692 length
= (size_t) num
;
696 case FIO_FD_CONSOLE_OUT
:
697 remote_fileio_badfd ();
699 case FIO_FD_CONSOLE_IN
:
701 static char *remaining_buf
= NULL
;
702 static int remaining_length
= 0;
704 buffer
= (char *) xmalloc (32768);
707 remote_fio_no_longjmp
= 1;
708 if (remaining_length
> length
)
710 memcpy (buffer
, remaining_buf
, length
);
711 memmove (remaining_buf
, remaining_buf
+ length
,
712 remaining_length
- length
);
713 remaining_length
-= length
;
718 memcpy (buffer
, remaining_buf
, remaining_length
);
719 xfree (remaining_buf
);
720 remaining_buf
= NULL
;
721 ret
= remaining_length
;
726 ret
= ui_file_read (gdb_stdtargin
, buffer
, 32767);
727 remote_fio_no_longjmp
= 1;
728 if (ret
> 0 && (size_t)ret
> length
)
730 remaining_buf
= (char *) xmalloc (ret
- length
);
731 remaining_length
= ret
- length
;
732 memcpy (remaining_buf
, buffer
+ length
, remaining_length
);
739 buffer
= (char *) xmalloc (length
);
740 /* POSIX defines EINTR behaviour of read in a weird way. It's allowed
741 for read() to return -1 even if "some" bytes have been read. It
742 has been corrected in SUSv2 but that doesn't help us much...
743 Therefore a complete solution must check how many bytes have been
744 read on EINTR to return a more reliable value to the target */
745 old_offset
= lseek (fd
, 0, SEEK_CUR
);
746 remote_fio_no_longjmp
= 1;
747 ret
= read (fd
, buffer
, length
);
748 if (ret
< 0 && errno
== EINTR
)
750 new_offset
= lseek (fd
, 0, SEEK_CUR
);
751 /* If some data has been read, return the number of bytes read.
752 The Ctrl-C flag is set in remote_fileio_reply() anyway */
753 if (old_offset
!= new_offset
)
754 ret
= new_offset
- old_offset
;
761 retlength
= remote_fileio_write_bytes (ptrval
, buffer
, ret
);
762 if (retlength
!= ret
)
763 ret
= -1; /* errno has been set to EIO in remote_fileio_write_bytes() */
767 remote_fileio_return_errno (-1);
769 remote_fileio_return_success (ret
);
775 remote_fileio_func_write (char *buf
)
780 int fd
, ret
, retlength
;
784 /* 1. Parameter: file descriptor */
785 if (remote_fileio_extract_int (&buf
, &target_fd
))
787 remote_fileio_ioerror ();
790 fd
= remote_fileio_map_fd ((int) target_fd
);
791 if (fd
== FIO_FD_INVALID
)
793 remote_fileio_badfd ();
796 /* 2. Parameter: buffer pointer */
797 if (remote_fileio_extract_long (&buf
, &lnum
))
799 remote_fileio_ioerror ();
802 ptrval
= (CORE_ADDR
) lnum
;
803 /* 3. Parameter: buffer length */
804 if (remote_fileio_extract_int (&buf
, &num
))
806 remote_fileio_ioerror ();
809 length
= (size_t) num
;
811 buffer
= (char *) xmalloc (length
);
812 retlength
= remote_read_bytes (ptrval
, buffer
, length
);
813 if (retlength
!= length
)
816 remote_fileio_ioerror ();
820 remote_fio_no_longjmp
= 1;
823 case FIO_FD_CONSOLE_IN
:
824 remote_fileio_badfd ();
826 case FIO_FD_CONSOLE_OUT
:
827 ui_file_write (target_fd
== 1 ? gdb_stdtarg
: gdb_stdtargerr
, buffer
,
829 gdb_flush (target_fd
== 1 ? gdb_stdtarg
: gdb_stdtargerr
);
833 ret
= write (fd
, buffer
, length
);
834 if (ret
< 0 && errno
== EACCES
)
835 errno
= EBADF
; /* Cygwin returns EACCESS when writing to a R/O file.*/
840 remote_fileio_return_errno (-1);
842 remote_fileio_return_success (ret
);
848 remote_fileio_func_lseek (char *buf
)
855 /* 1. Parameter: file descriptor */
856 if (remote_fileio_extract_int (&buf
, &num
))
858 remote_fileio_ioerror ();
861 fd
= remote_fileio_map_fd ((int) num
);
862 if (fd
== FIO_FD_INVALID
)
864 remote_fileio_badfd ();
867 else if (fd
== FIO_FD_CONSOLE_IN
|| fd
== FIO_FD_CONSOLE_OUT
)
869 remote_fileio_reply (-1, FILEIO_ESPIPE
);
873 /* 2. Parameter: offset */
874 if (remote_fileio_extract_long (&buf
, &lnum
))
876 remote_fileio_ioerror ();
879 offset
= (off_t
) lnum
;
880 /* 3. Parameter: flag */
881 if (remote_fileio_extract_int (&buf
, &num
))
883 remote_fileio_ioerror ();
886 if (remote_fileio_seek_flag_to_host (num
, &flag
))
888 remote_fileio_reply (-1, FILEIO_EINVAL
);
892 remote_fio_no_longjmp
= 1;
893 ret
= lseek (fd
, offset
, flag
);
895 if (ret
== (off_t
) -1)
896 remote_fileio_return_errno (-1);
898 remote_fileio_return_success (ret
);
902 remote_fileio_func_rename (char *buf
)
905 int length
, retlength
;
906 char *oldpath
, *newpath
;
908 struct stat ost
, nst
;
910 /* 1. Parameter: Ptr to oldpath / length incl. trailing zero */
911 if (remote_fileio_extract_ptr_w_len (&buf
, &ptrval
, &length
))
913 remote_fileio_ioerror ();
916 /* Request oldpath using 'm' packet */
917 oldpath
= alloca (length
);
918 retlength
= remote_read_bytes (ptrval
, oldpath
, length
);
919 if (retlength
!= length
)
921 remote_fileio_ioerror ();
924 /* 2. Parameter: Ptr to newpath / length incl. trailing zero */
925 if (remote_fileio_extract_ptr_w_len (&buf
, &ptrval
, &length
))
927 remote_fileio_ioerror ();
930 /* Request newpath using 'm' packet */
931 newpath
= alloca (length
);
932 retlength
= remote_read_bytes (ptrval
, newpath
, length
);
933 if (retlength
!= length
)
935 remote_fileio_ioerror ();
939 /* Only operate on regular files and directories */
940 of
= stat (oldpath
, &ost
);
941 nf
= stat (newpath
, &nst
);
942 if ((!of
&& !S_ISREG (ost
.st_mode
) && !S_ISDIR (ost
.st_mode
))
943 || (!nf
&& !S_ISREG (nst
.st_mode
) && !S_ISDIR (nst
.st_mode
)))
945 remote_fileio_reply (-1, FILEIO_EACCES
);
949 remote_fio_no_longjmp
= 1;
950 ret
= rename (oldpath
, newpath
);
954 /* Special case: newpath is a non-empty directory. Some systems
955 return ENOTEMPTY, some return EEXIST. We coerce that to be
957 if (errno
== ENOTEMPTY
)
960 /* Workaround some Cygwin problems with correct errnos. */
963 if (!of
&& !nf
&& S_ISDIR (nst
.st_mode
))
965 if (S_ISREG (ost
.st_mode
))
969 char oldfullpath
[PATH_MAX
+ 1];
970 char newfullpath
[PATH_MAX
+ 1];
973 cygwin_conv_to_full_posix_path (oldpath
, oldfullpath
);
974 cygwin_conv_to_full_posix_path (newpath
, newfullpath
);
975 len
= strlen (oldfullpath
);
976 if (newfullpath
[len
] == '/'
977 && !strncmp (oldfullpath
, newfullpath
, len
))
986 remote_fileio_return_errno (-1);
989 remote_fileio_return_success (ret
);
993 remote_fileio_func_unlink (char *buf
)
996 int length
, retlength
;
1001 /* Parameter: Ptr to pathname / length incl. trailing zero */
1002 if (remote_fileio_extract_ptr_w_len (&buf
, &ptrval
, &length
))
1004 remote_fileio_ioerror ();
1007 /* Request pathname using 'm' packet */
1008 pathname
= alloca (length
);
1009 retlength
= remote_read_bytes (ptrval
, pathname
, length
);
1010 if (retlength
!= length
)
1012 remote_fileio_ioerror ();
1016 /* Only operate on regular files (and directories, which allows to return
1017 the correct return code) */
1018 if (!stat (pathname
, &st
) && !S_ISREG (st
.st_mode
) && !S_ISDIR (st
.st_mode
))
1020 remote_fileio_reply (-1, FILEIO_ENODEV
);
1024 remote_fio_no_longjmp
= 1;
1025 ret
= unlink (pathname
);
1028 remote_fileio_return_errno (-1);
1030 remote_fileio_return_success (ret
);
1034 remote_fileio_func_stat (char *buf
)
1037 int ret
, length
, retlength
;
1041 struct fio_stat fst
;
1043 /* 1. Parameter: Ptr to pathname / length incl. trailing zero */
1044 if (remote_fileio_extract_ptr_w_len (&buf
, &ptrval
, &length
))
1046 remote_fileio_ioerror ();
1049 /* Request pathname using 'm' packet */
1050 pathname
= alloca (length
);
1051 retlength
= remote_read_bytes (ptrval
, pathname
, length
);
1052 if (retlength
!= length
)
1054 remote_fileio_ioerror ();
1058 /* 2. Parameter: Ptr to struct stat */
1059 if (remote_fileio_extract_long (&buf
, &lnum
))
1061 remote_fileio_ioerror ();
1064 ptrval
= (CORE_ADDR
) lnum
;
1066 remote_fio_no_longjmp
= 1;
1067 ret
= stat (pathname
, &st
);
1071 remote_fileio_return_errno (-1);
1074 /* Only operate on regular files and directories */
1075 if (!ret
&& !S_ISREG (st
.st_mode
) && !S_ISDIR (st
.st_mode
))
1077 remote_fileio_reply (-1, FILEIO_EACCES
);
1082 remote_fileio_to_fio_stat (&st
, &fst
);
1083 remote_fileio_to_fio_uint (0, fst
.fst_dev
);
1085 retlength
= remote_fileio_write_bytes (ptrval
, (char *) &fst
, sizeof fst
);
1086 if (retlength
!= sizeof fst
)
1088 remote_fileio_return_errno (-1);
1092 remote_fileio_return_success (ret
);
1096 remote_fileio_func_fstat (char *buf
)
1099 int fd
, ret
, retlength
;
1103 struct fio_stat fst
;
1106 /* 1. Parameter: file descriptor */
1107 if (remote_fileio_extract_int (&buf
, &target_fd
))
1109 remote_fileio_ioerror ();
1112 fd
= remote_fileio_map_fd ((int) target_fd
);
1113 if (fd
== FIO_FD_INVALID
)
1115 remote_fileio_badfd ();
1118 /* 2. Parameter: Ptr to struct stat */
1119 if (remote_fileio_extract_long (&buf
, &lnum
))
1121 remote_fileio_ioerror ();
1124 ptrval
= (CORE_ADDR
) lnum
;
1126 remote_fio_no_longjmp
= 1;
1127 if (fd
== FIO_FD_CONSOLE_IN
|| fd
== FIO_FD_CONSOLE_OUT
)
1129 remote_fileio_to_fio_uint (1, fst
.fst_dev
);
1130 st
.st_mode
= S_IFCHR
| (fd
== FIO_FD_CONSOLE_IN
? S_IRUSR
: S_IWUSR
);
1132 st
.st_uid
= getuid ();
1133 st
.st_gid
= getgid ();
1136 st
.st_blksize
= 512;
1137 #if HAVE_STRUCT_STAT_ST_BLOCKS
1140 if (!gettimeofday (&tv
, NULL
))
1141 st
.st_atime
= st
.st_mtime
= st
.st_ctime
= tv
.tv_sec
;
1143 st
.st_atime
= st
.st_mtime
= st
.st_ctime
= (time_t) 0;
1147 ret
= fstat (fd
, &st
);
1151 remote_fileio_return_errno (-1);
1156 remote_fileio_to_fio_stat (&st
, &fst
);
1158 retlength
= remote_fileio_write_bytes (ptrval
, (char *) &fst
, sizeof fst
);
1159 if (retlength
!= sizeof fst
)
1161 remote_fileio_return_errno (-1);
1165 remote_fileio_return_success (ret
);
1169 remote_fileio_func_gettimeofday (char *buf
)
1175 struct fio_timeval ftv
;
1177 /* 1. Parameter: struct timeval pointer */
1178 if (remote_fileio_extract_long (&buf
, &lnum
))
1180 remote_fileio_ioerror ();
1183 ptrval
= (CORE_ADDR
) lnum
;
1184 /* 2. Parameter: some pointer value... */
1185 if (remote_fileio_extract_long (&buf
, &lnum
))
1187 remote_fileio_ioerror ();
1190 /* ...which has to be NULL */
1193 remote_fileio_reply (-1, FILEIO_EINVAL
);
1197 remote_fio_no_longjmp
= 1;
1198 ret
= gettimeofday (&tv
, NULL
);
1202 remote_fileio_return_errno (-1);
1208 remote_fileio_to_fio_timeval (&tv
, &ftv
);
1210 retlength
= remote_fileio_write_bytes (ptrval
, (char *) &ftv
, sizeof ftv
);
1211 if (retlength
!= sizeof ftv
)
1213 remote_fileio_return_errno (-1);
1217 remote_fileio_return_success (ret
);
1221 remote_fileio_func_isatty (char *buf
)
1226 /* Parameter: file descriptor */
1227 if (remote_fileio_extract_int (&buf
, &target_fd
))
1229 remote_fileio_ioerror ();
1232 remote_fio_no_longjmp
= 1;
1233 fd
= remote_fileio_map_fd ((int) target_fd
);
1234 remote_fileio_return_success (fd
== FIO_FD_CONSOLE_IN
||
1235 fd
== FIO_FD_CONSOLE_OUT
? 1 : 0);
1239 remote_fileio_func_system (char *buf
)
1242 int ret
, length
, retlength
;
1245 /* Check if system(3) has been explicitely allowed using the
1246 `set remote system-call-allowed 1' command. If not, return
1248 if (!remote_fio_system_call_allowed
)
1250 remote_fileio_reply (-1, FILEIO_EPERM
);
1254 /* Parameter: Ptr to commandline / length incl. trailing zero */
1255 if (remote_fileio_extract_ptr_w_len (&buf
, &ptrval
, &length
))
1257 remote_fileio_ioerror ();
1260 /* Request commandline using 'm' packet */
1261 cmdline
= alloca (length
);
1262 retlength
= remote_read_bytes (ptrval
, cmdline
, length
);
1263 if (retlength
!= length
)
1265 remote_fileio_ioerror ();
1269 remote_fio_no_longjmp
= 1;
1270 ret
= system (cmdline
);
1273 remote_fileio_return_errno (-1);
1275 remote_fileio_return_success (WEXITSTATUS (ret
));
1280 void (*func
)(char *);
1281 } remote_fio_func_map
[] = {
1282 "open", remote_fileio_func_open
,
1283 "close", remote_fileio_func_close
,
1284 "read", remote_fileio_func_read
,
1285 "write", remote_fileio_func_write
,
1286 "lseek", remote_fileio_func_lseek
,
1287 "rename", remote_fileio_func_rename
,
1288 "unlink", remote_fileio_func_unlink
,
1289 "stat", remote_fileio_func_stat
,
1290 "fstat", remote_fileio_func_fstat
,
1291 "gettimeofday", remote_fileio_func_gettimeofday
,
1292 "isatty", remote_fileio_func_isatty
,
1293 "system", remote_fileio_func_system
,
1298 do_remote_fileio_request (struct ui_out
*uiout
, void *buf_arg
)
1300 char *buf
= buf_arg
;
1304 remote_fileio_sig_set (remote_fileio_ctrl_c_signal_handler
);
1306 c
= strchr (++buf
, ',');
1310 c
= strchr (buf
, '\0');
1311 for (idx
= 0; remote_fio_func_map
[idx
].name
; ++idx
)
1312 if (!strcmp (remote_fio_func_map
[idx
].name
, buf
))
1314 if (!remote_fio_func_map
[idx
].name
) /* ERROR: No such function. */
1315 return RETURN_ERROR
;
1316 remote_fio_func_map
[idx
].func (c
);
1321 remote_fileio_request (char *buf
)
1325 remote_fileio_sig_init ();
1327 remote_fio_ctrl_c_flag
= 0;
1328 remote_fio_no_longjmp
= 0;
1330 ex
= catch_exceptions (uiout
, do_remote_fileio_request
, (void *)buf
,
1331 NULL
, RETURN_MASK_ALL
);
1335 remote_fileio_reply (-1, FILEIO_ENOSYS
);
1338 remote_fileio_reply (-1, FILEIO_EINTR
);
1344 remote_fileio_sig_exit ();
1348 set_system_call_allowed (char *args
, int from_tty
)
1353 int val
= strtoul (args
, &arg_end
, 10);
1354 if (*args
&& *arg_end
== '\0')
1356 remote_fio_system_call_allowed
= !!val
;
1360 error ("Illegal argument for \"set remote system-call-allowed\" command");
1364 show_system_call_allowed (char *args
, int from_tty
)
1367 error ("Garbage after \"show remote system-call-allowed\" command: `%s'", args
);
1368 printf_unfiltered ("Calling host system(3) call from target is %sallowed\n",
1369 remote_fio_system_call_allowed
? "" : "not ");
1373 initialize_remote_fileio (struct cmd_list_element
*remote_set_cmdlist
,
1374 struct cmd_list_element
*remote_show_cmdlist
)
1376 add_cmd ("system-call-allowed", no_class
,
1377 set_system_call_allowed
,
1378 "Set if the host system(3) call is allowed for the target.\n",
1379 &remote_set_cmdlist
);
1380 add_cmd ("system-call-allowed", no_class
,
1381 show_system_call_allowed
,
1382 "Show if the host system(3) call is allowed for the target.\n",
1383 &remote_show_cmdlist
);