/[gxemul]/trunk/src/useremul/useremul_netbsd.c
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /trunk/src/useremul/useremul_netbsd.c

Parent Directory Parent Directory | Revision Log Revision Log

Revision 44 - (hide annotations)
Mon Oct 8 16:22:56 2007 UTC (16 years, 8 months ago) by dpavlin
File MIME type: text/plain
File size: 6100 byte(s) 
++ trunk/HISTORY	(local)
$Id: HISTORY,v 1.1632 2007/09/11 21:46:35 debug Exp $
20070616	Implementing the MIPS32/64 revision 2 "ror" instruction.
20070617	Adding a struct for each physpage which keeps track of which
		ranges within that page (base offset, length) that are
		continuously translatable. When running with native code
		generation enabled (-b), a range is added after each read-
		ahead loop.
		Experimenting with using the physical program counter sample
		data (implemented 20070608) together with the "translatable
		range" information, to figure out which physical address ranges
		would be worth translating to native code (if the number of
		samples falling within a range is above a certain threshold).
20070618	Adding automagic building of .index comment files for
		src/file/, src/promemul/, src src/useremul/ as well.
		Adding a "has been translated" bit to the ranges, so that only
		not-yet-translated ranges will be sampled.
20070619	Moving src/cpu.c and src/memory_rw.c into src/cpus/,
		src/device.c into src/devices/, and src/machine.c into
		src/machines/.
		Creating a skeleton cc/ld native backend module; beginning on
		the function which will detect cc command line, etc.
20070620	Continuing on the native code generation infrastructure.
20070621	Moving src/x11.c and src/console.c into a new src/console/
		subdir (for everything that is console or framebuffer related).
		Moving src/symbol*.c into a new src/symbol/, which should
		contain anything that is symbol handling related.
20070624	Making the program counter sampling threshold a "settings
		variable" (sampling_threshold), i.e. it can now be changed
		during runtime.
		Switching the RELEASE notes format from plain text to HTML.
		If the TMPDIR environment variable is set, it is used instead
		of "/tmp" for temporary files.
		Continuing on the cc/ld backend: simple .c code is generated,
		the compiler and linker are called, etc.
		Adding detection of host architecture to the configure script
		(again), and adding icache invalidation support (only
		implemented for Alpha hosts so far).
20070625	Simplifying the program counter sampling mechanism.
20070626	Removing the cc/ld native code generation stuff, program
		counter sampling, etc; it would not have worked well in the
		general case.
20070627	Removing everything related to native code generation.
20070629	Removing the (practically unusable) support for multiple
		emulations. (The single emulation allowed now still supports
		multiple simultaneous machines, as before.)
		Beginning on PCCTWO and M88K interrupts.
20070723	Adding a dummy skeleton for emulation of M32R processors.
20070901	Fixing a warning found by "gcc version 4.3.0 20070817
		(experimental)" on amd64.
20070905	Removing some more traces of the old "multiple emulations"
		code.
		Also looking in /usr/local/include and /usr/local/lib for
		X11 libs, when running configure.
20070909	Minor updates to the guest OS install instructions, in
		preparation for the NetBSD 4.0 release.
20070918	More testing of NetBSD 4.0 RC1.
1 dpavlin 42 /*
2     * Copyright (C) 2004-2007 Anders Gavare. All rights reserved.
3     *
4     * Redistribution and use in source and binary forms, with or without
5     * modification, are permitted provided that the following conditions are met:
6     *
7     * 1. Redistributions of source code must retain the above copyright
8     * notice, this list of conditions and the following disclaimer.
9     * 2. Redistributions in binary form must reproduce the above copyright
10     * notice, this list of conditions and the following disclaimer in the
11     * documentation and/or other materials provided with the distribution.
12     * 3. The name of the author may not be used to endorse or promote products
13     * derived from this software without specific prior written permission.
14     *
15     * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16     * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17     * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18     * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19     * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20     * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21     * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22     * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23     * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24     * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25     * SUCH DAMAGE.
26     *
27     *
28 dpavlin 44 * $Id: useremul_netbsd.c,v 1.4 2007/06/17 23:32:20 debug Exp $
29 dpavlin 42 *
30 dpavlin 44 * COMMENT: NetBSD userland (syscall) emulation implementation
31 dpavlin 42 */
32    
33     #include <stdio.h>
34     #include <stdlib.h>
35     #include <string.h>
36    
37     #include "cpu.h"
38     #include "machine.h"
39     #include "memory.h"
40     #include "useremul.h"
41    
42     #include "errno_netbsd.h"
43     #include "syscall_netbsd.h"
44    
45    
46     /*
47     * useremul_netbsd_setup():
48     *
49     * Set up an emulated userland environment suitable for running NetBSD
50     * binaries.
51     */
52     void useremul_netbsd_setup(struct cpu *cpu, int argc, char **host_argv)
53     {
54     uint64_t stack_top = 0x7fff0000;
55     uint64_t stacksize = 8 * 1048576;
56     uint64_t stack_margin = 16384;
57     uint64_t cur_argv;
58     int i, i2;
59     int envc = 1;
60    
61     switch (cpu->machine->arch) {
62     case ARCH_MIPS:
63     /* See netbsd/sys/src/arch/mips/mips_machdep.c:setregs() */
64     cpu->cd.mips.gpr[MIPS_GPR_A0] = stack_top - stack_margin;
65     cpu->cd.mips.gpr[MIPS_GPR_T9] = cpu->pc;
66    
67     /* The userland stack: */
68     cpu->cd.mips.gpr[MIPS_GPR_SP] = stack_top - stack_margin;
69     add_symbol_name(&cpu->machine->symbol_context,
70     stack_top - stacksize, stacksize, "userstack", 0, 0);
71    
72     /* Stack contents: (TODO: is this correct?) */
73     store_32bit_word(cpu, stack_top - stack_margin, argc);
74    
75     cur_argv = stack_top - stack_margin + 128 + (argc + envc)
76     * sizeof(uint32_t);
77     for (i=0; i<argc; i++) {
78     debug("adding argv[%i]: '%s'\n", i, host_argv[i]);
79    
80     store_32bit_word(cpu, stack_top - stack_margin +
81     4 + i*sizeof(uint32_t), cur_argv);
82     store_string(cpu, cur_argv, host_argv[i]);
83     cur_argv += strlen(host_argv[i]) + 1;
84     }
85    
86     /* Store a NULL value between the args and the environment
87     strings: */
88     store_32bit_word(cpu, stack_top - stack_margin +
89     4 + i*sizeof(uint32_t), 0); i++;
90    
91     /* TODO: get environment strings from somewhere */
92    
93     /* Store all environment strings: */
94     for (i2 = 0; i2 < envc; i2 ++) {
95     store_32bit_word(cpu, stack_top - stack_margin + 4
96     + (i+i2)*sizeof(uint32_t), cur_argv);
97     store_string(cpu, cur_argv, "DISPLAY=localhost:0.0");
98     cur_argv += strlen("DISPLAY=localhost:0.0") + 1;
99     }
100     break;
101    
102     default:
103     fatal("useremul_netbsd_setup(): unimplemented arch\n");
104     exit(1);
105     }
106     }
107    
108    
109     /*
110     * useremul_netbsd():
111     *
112     * NetBSD syscall emulation.
113     */
114     void useremul_netbsd(struct cpu *cpu, uint32_t code)
115     {
116     int syscall_nr = -1, error_flag = 0, result_high_set = 0;
117     uint64_t arg0=0,arg1=0,arg2=0,arg3=0,stack0=0,stack1=0,stack2=0;
118     int64_t result = 0;
119    
120    
121     /*
122     * Retrieve syscall arguments (in registers and/or the stack):
123     */
124    
125     switch (cpu->machine->arch) {
126    
127     case ARCH_MIPS:
128     syscall_nr = cpu->cd.mips.gpr[MIPS_GPR_V0];
129     if (syscall_nr == NETBSD_SYS___syscall) {
130     syscall_nr = cpu->cd.mips.gpr[MIPS_GPR_A0] +
131     (cpu->cd.mips.gpr[MIPS_GPR_A1] << 32);
132     arg0 = cpu->cd.mips.gpr[MIPS_GPR_A2];
133     arg1 = cpu->cd.mips.gpr[MIPS_GPR_A3];
134    
135     /* TODO: stack arguments? Are these correct? */
136     arg2 = load_32bit_word(cpu,
137     cpu->cd.mips.gpr[MIPS_GPR_SP] + 8);
138     arg3 = load_32bit_word(cpu,
139     cpu->cd.mips.gpr[MIPS_GPR_SP] + 16);
140     stack0 = load_32bit_word(cpu,
141     cpu->cd.mips.gpr[MIPS_GPR_SP] + 24);
142     stack1 = load_32bit_word(cpu,
143     cpu->cd.mips.gpr[MIPS_GPR_SP] + 32);
144     stack2 = load_32bit_word(cpu,
145     cpu->cd.mips.gpr[MIPS_GPR_SP] + 40);
146     } else {
147     arg0 = cpu->cd.mips.gpr[MIPS_GPR_A0];
148     arg1 = cpu->cd.mips.gpr[MIPS_GPR_A1];
149     arg2 = cpu->cd.mips.gpr[MIPS_GPR_A2];
150     arg3 = cpu->cd.mips.gpr[MIPS_GPR_A3];
151    
152     /* TODO: stack arguments? Are these correct? */
153     stack0 = load_32bit_word(cpu,
154     cpu->cd.mips.gpr[MIPS_GPR_SP] + 4);
155     stack1 = load_32bit_word(cpu,
156     cpu->cd.mips.gpr[MIPS_GPR_SP] + 8);
157     stack2 = load_32bit_word(cpu,
158     cpu->cd.mips.gpr[MIPS_GPR_SP] + 12);
159     }
160     break;
161     }
162    
163    
164     /*
165     * Handle the syscall:
166     */
167    
168     switch (syscall_nr) {
169    
170     case NETBSD_SYS_exit:
171     useremul_syscall_exit(cpu, arg0);
172     break;
173    
174     case NETBSD_SYS_sync:
175     useremul_syscall_sync(cpu);
176     break;
177    
178     default:
179     fatal("[ UNIMPLEMENTED NetBSD syscall nr %i ]\n", syscall_nr);
180     error_flag = 1; result = NETBSD_ENOSYS;
181    
182     /* For now, let's abort execution: */
183     cpu->running = 0;
184     }
185    
186    
187     /*
188     * Return:
189     */
190    
191     switch (cpu->machine->arch) {
192    
193     case ARCH_MIPS:
194     /*
195     * NetBSD/mips return values:
196     *
197     * a3 is 0 if the syscall was ok, otherwise 1.
198     * v0 (and sometimes v1) contain the result value.
199     */
200     cpu->cd.mips.gpr[MIPS_GPR_A3] = error_flag;
201     if (error_flag)
202     cpu->cd.mips.gpr[MIPS_GPR_V0] = (int32_t)result;
203    
204     if (result_high_set)
205     cpu->cd.mips.gpr[MIPS_GPR_V1] = (int32_t)(result >> 32);
206     break;
207     }
208     }
209    
  ViewVC Help
Powered by ViewVC 1.1.26