src/promemul/sh_ipl_g.c

/*
 *  Copyright (C) 2007  Anders Gavare.  All rights reserved.
 *
 *  Redistribution and use in source and binary forms, with or without
 *  modification, are permitted provided that the following conditions are met:
 *
 *  1. Redistributions of source code must retain the above copyright
 *     notice, this list of conditions and the following disclaimer.
 *  2. Redistributions in binary form must reproduce the above copyright  
 *     notice, this list of conditions and the following disclaimer in the 
 *     documentation and/or other materials provided with the distribution.
 *  3. The name of the author may not be used to endorse or promote products
 *     derived from this software without specific prior written permission.
 *
 *  THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 *  ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 *  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 *  ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE   
 *  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 *  DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 *  OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 *  HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 *  LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 *  OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 *  SUCH DAMAGE.
 *
 *
 *  $Id: sh_ipl_g.c,v 1.2 2007/03/16 18:47:26 debug Exp $
 *
 *  SH-IPL+G emulation; very basic, only what is needed to get OpenBSD/landisk
 *  booting. (SH-IPL+G stands for SuperH Initial Program Loader + GDB stub.)
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>

#include "cpu.h"
#include "cpu_sh.h"
#include "machine.h"
#include "memory.h"
#include "misc.h"
#include "net.h"


#ifdef ENABLE_SH

#include "sh4_exception.h"


/*
 *  sh_ipl_g_emul_init():
 */
void sh_ipl_g_emul_init(struct machine *machine)
{
        struct cpu *cpu = machine->cpus[0];

        cpu->cd.sh.vbr = 0x8c000000;
        store_16bit_word(cpu, 0x8c000100, SH_INVALID_INSTR);
        store_16bit_word(cpu, 0x8c000102, 0x002b);      /*  rte  */
        store_16bit_word(cpu, 0x8c000104, 0x0009);      /*  nop  */
}


/*
 *  sh_ipl_g_promcall():
 *
 *  SH-IPL+G PROM call emulation.
 */
static int sh_ipl_g_promcall(struct cpu *cpu)
{
        /*
         *  SH-IPL+G call numbers are in R0:
         *
         *  NOTE: r_bank[0], since this is in a trap handler!
         */
        switch (cpu->cd.sh.r_bank[0]) {

        case 4: /*  Get memory size.  */
                cpu->cd.sh.r_bank[0] = 64 * 1048576;
                /*  Note: cpu->machine->physical_ram_in_mb * 1048576
                    would be more correct, but physical_ram_in_mb is
                    set to 2 for landisk emulation...  */
                break;

        default:cpu_register_dump(cpu->machine, cpu, 1, 0);
                printf("\n");
                fatal("[ SH-IPL+G PROM emulation: unimplemented function 0x%"
                    PRIx32" ]\n", cpu->cd.sh.r_bank[0]);
                cpu->running = 0;
                return 0;
        }

        return 1;
}


/*
 *  sh_ipl_g_emul():
 */
int sh_ipl_g_emul(struct cpu *cpu)
{
        /*  SH-IPL+G calls are "trapa #63":  */
        if (cpu->cd.sh.expevt == EXPEVT_TRAPA &&
            cpu->cd.sh.tra == 0xfc) {
                return sh_ipl_g_promcall(cpu);
        } else {
                cpu_register_dump(cpu->machine, cpu, 1, 0);
                printf("\n");
                fatal("[ SH-IPL+G PROM emulation: expevt=0x%x, "
                    " tra=0x%x ]\n", (int)cpu->cd.sh.expevt,
                    (int)cpu->cd.sh.tra);
                cpu->running = 0;
                return 0;
        }
}

#endif  /*  ENABLE_SH  */

1	dpavlin	36	/*
2			* Copyright (C) 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			* $Id: sh_ipl_g.c,v 1.2 2007/03/16 18:47:26 debug Exp $
29			*
30			* SH-IPL+G emulation; very basic, only what is needed to get OpenBSD/landisk
31			* booting. (SH-IPL+G stands for SuperH Initial Program Loader + GDB stub.)
32			*/
33
34			#include <stdio.h>
35			#include <stdlib.h>
36			#include <string.h>
37			#include <sys/types.h>
38
39			#include "cpu.h"
40			#include "cpu_sh.h"
41			#include "machine.h"
42			#include "memory.h"
43			#include "misc.h"
44			#include "net.h"
45
46
47			#ifdef ENABLE_SH
48
49			#include "sh4_exception.h"
50
51
52			/*
53			* sh_ipl_g_emul_init():
54			*/
55			void sh_ipl_g_emul_init(struct machine *machine)
56			{
57			struct cpu *cpu = machine->cpus[0];
58
59			cpu->cd.sh.vbr = 0x8c000000;
60			store_16bit_word(cpu, 0x8c000100, SH_INVALID_INSTR);
61			store_16bit_word(cpu, 0x8c000102, 0x002b); /* rte */
62			store_16bit_word(cpu, 0x8c000104, 0x0009); /* nop */
63			}
64
65
66			/*
67			* sh_ipl_g_promcall():
68			*
69			* SH-IPL+G PROM call emulation.
70			*/
71			static int sh_ipl_g_promcall(struct cpu *cpu)
72			{
73			/*
74			* SH-IPL+G call numbers are in R0:
75			*
76			* NOTE: r_bank[0], since this is in a trap handler!
77			*/
78			switch (cpu->cd.sh.r_bank[0]) {
79
80			case 4: /* Get memory size. */
81			cpu->cd.sh.r_bank[0] = 64 * 1048576;
82			/* Note: cpu->machine->physical_ram_in_mb * 1048576
83			would be more correct, but physical_ram_in_mb is
84			set to 2 for landisk emulation... */
85			break;
86
87			default:cpu_register_dump(cpu->machine, cpu, 1, 0);
88			printf("\n");
89			fatal("[ SH-IPL+G PROM emulation: unimplemented function 0x%"
90			PRIx32" ]\n", cpu->cd.sh.r_bank[0]);
91			cpu->running = 0;
92			return 0;
93			}
94
95			return 1;
96			}
97
98
99			/*
100			* sh_ipl_g_emul():
101			*/
102			int sh_ipl_g_emul(struct cpu *cpu)
103			{
104			/* SH-IPL+G calls are "trapa #63": */
105			if (cpu->cd.sh.expevt == EXPEVT_TRAPA &&
106			cpu->cd.sh.tra == 0xfc) {
107			return sh_ipl_g_promcall(cpu);
108			} else {
109			cpu_register_dump(cpu->machine, cpu, 1, 0);
110			printf("\n");
111			fatal("[ SH-IPL+G PROM emulation: expevt=0x%x, "
112			" tra=0x%x ]\n", (int)cpu->cd.sh.expevt,
113			(int)cpu->cd.sh.tra);
114			cpu->running = 0;
115			return 0;
116			}
117			}
118
119			#endif /* ENABLE_SH */
120