2 * m68k/ColdFire Semihosting syscall interface
4 * Copyright (c) 2005-2007 CodeSourcery.
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, see <http://www.gnu.org/licenses/>.
19 * The semihosting protocol implemented here is described in the
21 * https://sourceware.org/git/?p=newlib-cygwin.git;a=blob;f=libgloss/m68k/m68k-semi.txt;hb=HEAD
24 #include "qemu/osdep.h"
27 #include "gdbstub/syscalls.h"
28 #include "gdbstub/helpers.h"
29 #include "semihosting/syscalls.h"
30 #include "semihosting/uaccess.h"
31 #include "hw/boards.h"
35 #define HOSTED_INIT_SIM 1
37 #define HOSTED_CLOSE 3
39 #define HOSTED_WRITE 5
40 #define HOSTED_LSEEK 6
41 #define HOSTED_RENAME 7
42 #define HOSTED_UNLINK 8
44 #define HOSTED_FSTAT 10
45 #define HOSTED_GETTIMEOFDAY 11
46 #define HOSTED_ISATTY 12
47 #define HOSTED_SYSTEM 13
49 static int host_to_gdb_errno(int err
)
51 #define E(X) case E##X: return GDB_E##X
78 static void m68k_semi_u32_cb(CPUState
*cs
, uint64_t ret
, int err
)
80 M68kCPU
*cpu
= M68K_CPU(cs
);
81 CPUM68KState
*env
= &cpu
->env
;
83 target_ulong args
= env
->dregs
[1];
84 if (put_user_u32(ret
, args
) ||
85 put_user_u32(host_to_gdb_errno(err
), args
+ 4)) {
87 * The m68k semihosting ABI does not provide any way to report this
88 * error to the guest, so the best we can do is log it in qemu.
89 * It is always a guest error not to pass us a valid argument block.
91 qemu_log_mask(LOG_GUEST_ERROR
, "m68k-semihosting: return value "
92 "discarded because argument block not writable\n");
96 static void m68k_semi_u64_cb(CPUState
*cs
, uint64_t ret
, int err
)
98 M68kCPU
*cpu
= M68K_CPU(cs
);
99 CPUM68KState
*env
= &cpu
->env
;
101 target_ulong args
= env
->dregs
[1];
102 if (put_user_u32(ret
>> 32, args
) ||
103 put_user_u32(ret
, args
+ 4) ||
104 put_user_u32(host_to_gdb_errno(err
), args
+ 8)) {
105 /* No way to report this via m68k semihosting ABI; just log it */
106 qemu_log_mask(LOG_GUEST_ERROR
, "m68k-semihosting: return value "
107 "discarded because argument block not writable\n");
112 * Read the input value from the argument block; fail the semihosting
113 * call if the memory read fails.
115 #define GET_ARG(n) do { \
116 if (get_user_ual(arg ## n, args + (n) * 4)) { \
121 #define GET_ARG64(n) do { \
122 if (get_user_ual(arg ## n, args + (n) * 4)) { \
128 void do_m68k_semihosting(CPUM68KState
*env
, int nr
)
130 CPUState
*cs
= env_cpu(env
);
132 target_ulong arg0
, arg1
, arg2
, arg3
;
134 args
= env
->dregs
[1];
137 gdb_exit(env
->dregs
[0]);
145 semihost_sys_open(cs
, m68k_semi_u32_cb
, arg0
, arg1
, arg2
, arg3
);
150 semihost_sys_close(cs
, m68k_semi_u32_cb
, arg0
);
157 semihost_sys_read(cs
, m68k_semi_u32_cb
, arg0
, arg1
, arg2
);
164 semihost_sys_write(cs
, m68k_semi_u32_cb
, arg0
, arg1
, arg2
);
172 semihost_sys_lseek(cs
, m68k_semi_u64_cb
, arg0
,
173 deposit64(arg2
, 32, 32, arg1
), arg3
);
181 semihost_sys_rename(cs
, m68k_semi_u32_cb
, arg0
, arg1
, arg2
, arg3
);
187 semihost_sys_remove(cs
, m68k_semi_u32_cb
, arg0
, arg1
);
194 semihost_sys_stat(cs
, m68k_semi_u32_cb
, arg0
, arg1
, arg2
);
200 semihost_sys_fstat(cs
, m68k_semi_u32_cb
, arg0
, arg1
);
203 case HOSTED_GETTIMEOFDAY
:
206 semihost_sys_gettimeofday(cs
, m68k_semi_u32_cb
, arg0
, arg1
);
211 semihost_sys_isatty(cs
, m68k_semi_u32_cb
, arg0
);
217 semihost_sys_system(cs
, m68k_semi_u32_cb
, arg0
, arg1
);
220 case HOSTED_INIT_SIM
:
222 * FIXME: This is wrong for boards where RAM does not start at
225 env
->dregs
[1] = current_machine
->ram_size
;
226 env
->aregs
[7] = current_machine
->ram_size
;
230 cpu_abort(env_cpu(env
), "Unsupported semihosting syscall %d\n", nr
);
233 m68k_semi_u32_cb(cs
, -1, EFAULT
);
236 m68k_semi_u64_cb(cs
, -1, EFAULT
);