WebSVN – HelenOS-historic – Diff – /boot/trunk/arch/ppc32/loader/ofw.c


/*
 * Copyright (C) 2005 Martin Decky
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - 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.
 * - 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 ``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 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.
 */
 
#include "ofw.h"
#include "asm.h"
#include "printf.h"
 
#define MAX_OFW_ARGS    10
 
typedef unsigned int ofw_arg_t;
typedef unsigned int ihandle;
typedef unsigned int phandle;
 
/** OpenFirmware command structure
 *
 */
typedef struct {
    const char *service;          /**< Command name */
    unsigned int nargs;           /**< Number of in arguments */
    unsigned int nret;            /**< Number of out arguments */
    ofw_arg_t args[MAX_OFW_ARGS]; /**< List of arguments */
} ofw_args_t;
 
typedef void (*ofw_entry)(ofw_args_t *);
 
 
ofw_entry ofw;
 
phandle ofw_chosen;
ihandle ofw_mmu;
ihandle ofw_stdout;
 
 
static int ofw_call(const char *service, const int nargs, const int nret, ...)
{
    va_list list;
    ofw_args_t args;
    int i;
   
    args.service = service;
    args.nargs = nargs;
    args.nret = nret;
   
    va_start(list, nret);
    for (i = 0; i < nargs; i++)
        args.args[i] = va_arg(list, ofw_arg_t);
    va_end(list);
   
    for (i = 0; i < nret; i++)
        args.args[i + nargs] = 0;
   
    ofw(&args);
   
    return args.args[nargs];
}
 
 
static phandle ofw_find_device(const char *name)
{
    return ofw_call("finddevice", 1, 1, name);
}
 
 
static int ofw_get_property(const phandle device, const char *name, const void *buf, const int buflen)
{
    return ofw_call("getprop", 4, 1, device, name, buf, buflen);
}
 
static ihandle ofw_open(const char *name)
{
    return ofw_call("open", 1, 1, name);
}
 
 
void init(void)
{
    ofw_chosen = ofw_find_device("/chosen");
    if (ofw_chosen == -1)
        halt();
   
    if (ofw_get_property(ofw_chosen, "stdout",  &ofw_stdout, sizeof(ofw_stdout)) <= 0) 
        ofw_stdout = 0;
   
    ofw_mmu = ofw_open("/mmu");
    if (ofw_mmu == -1) {
        puts("Unable to open /mmu node\n");
        halt();
    }
}
 
 
 
 
 
 
 
 
void ofw_write(const char *str, const int len)
{
    if (ofw_stdout == 0)
        return;
   
    ofw_call("write", 3, 1, ofw_stdout, str, len);
}
 
 
void *ofw_translate(const void *virt)
{
    return (void *) ofw_call("call-method", 7, 1, "translate", ofw_mmu, virt, 0, 0, 0, 0);
}
 
 
 
 
 
 
 
 
int ofw_memmap(memmap_t *map)
{
    int i;
    int ret;
 
    phandle handle = ofw_find_device("/memory");
    if (handle == -1)
        return false;
   
    ret = ofw_get_property(handle, "reg", &map->zones, sizeof(map->zones));
    if (ret == -1)
        return false;
   
    map->total = 0;
    map->count = 0;
    for (i = 0; i < MEMMAP_MAX_RECORDS; i++) {
        if (map->zones[i].size == 0)
            break;
        map->count++;
        map->total += map->zones[i].size;
    }
}
 

Rev 964	Rev 1058
1	/*	1	/*
2	* Copyright (C) 2005 Martin Decky	2	* Copyright (C) 2005 Martin Decky
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	13	* documentation and/or other materials provided with the distribution.
14	* - The name of the author may not be used to endorse or promote products	14	* - The name of the author may not be used to endorse or promote products
15	* derived from this software without specific prior written permission.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	*/	27	*/
28		28
29	#include "ofw.h"	29	#include "ofw.h"
-		30	#include "asm.h"
30	#include "printf.h"	31	#include "printf.h"
31		32
32	#define MAX_OFW_ARGS 10	33	#define MAX_OFW_ARGS 10
33		34
34	typedef unsigned int ofw_arg_t;	35	typedef unsigned int ofw_arg_t;
35	typedef unsigned int ihandle;	36	typedef unsigned int ihandle;
36	typedef unsigned int phandle;	37	typedef unsigned int phandle;
37		38
38	/** OpenFirmware command structure	39	/** OpenFirmware command structure
39	*	40	*
40	*/	41	*/
41	typedef struct {	42	typedef struct {
42	const char service; /< Command name /	43	const char service; /< Command name /
43	unsigned int nargs; /*< Number of in arguments /	44	unsigned int nargs; /*< Number of in arguments /
44	unsigned int nret; /*< Number of out arguments /	45	unsigned int nret; /*< Number of out arguments /
45	ofw_arg_t args[MAX_OFW_ARGS]; /*< List of arguments /	46	ofw_arg_t args[MAX_OFW_ARGS]; /*< List of arguments /
46	} ofw_args_t;	47	} ofw_args_t;
47		48
48	typedef void (ofw_entry)(ofw_args_t );	49	typedef void (ofw_entry)(ofw_args_t );
49		50
50		51
51	ofw_entry ofw;	52	ofw_entry ofw;
52		53
53	phandle ofw_chosen;	54	phandle ofw_chosen;
54	ihandle ofw_mmu;	55	ihandle ofw_mmu;
55	ihandle ofw_stdout;	56	ihandle ofw_stdout;
56		57
57		58
58	static int ofw_call(const char *service, const int nargs, const int nret, ...)	59	static int ofw_call(const char *service, const int nargs, const int nret, ...)
59	{	60	{
60	va_list list;	61	va_list list;
61	ofw_args_t args;	62	ofw_args_t args;
62	int i;	63	int i;
63		64
64	args.service = service;	65	args.service = service;
65	args.nargs = nargs;	66	args.nargs = nargs;
66	args.nret = nret;	67	args.nret = nret;
67		68
68	va_start(list, nret);	69	va_start(list, nret);
69	for (i = 0; i < nargs; i++)	70	for (i = 0; i < nargs; i++)
70	args.args[i] = va_arg(list, ofw_arg_t);	71	args.args[i] = va_arg(list, ofw_arg_t);
71	va_end(list);	72	va_end(list);
72		73
73	for (i = 0; i < nret; i++)	74	for (i = 0; i < nret; i++)
74	args.args[i + nargs] = 0;	75	args.args[i + nargs] = 0;
75		76
76	ofw(&args);	77	ofw(&args);
77		78
78	return args.args[nargs];	79	return args.args[nargs];
79	}	80	}
80		81
81		82
82	static phandle ofw_find_device(const char *name)	83	static phandle ofw_find_device(const char *name)
83	{	84	{
84	return ofw_call("finddevice", 1, 1, name);	85	return ofw_call("finddevice", 1, 1, name);
85	}	86	}
86		87
87		88
88	static int ofw_get_property(const phandle device, const char name, const void buf, const int buflen)	89	static int ofw_get_property(const phandle device, const char name, const void buf, const int buflen)
89	{	90	{
90	return ofw_call("getprop", 4, 1, device, name, buf, buflen);	91	return ofw_call("getprop", 4, 1, device, name, buf, buflen);
91	}	92	}
92		93
93	static ihandle ofw_open(const char *name)	94	static ihandle ofw_open(const char *name)
94	{	95	{
95	return ofw_call("open", 1, 1, name);	96	return ofw_call("open", 1, 1, name);
96	}	97	}
97		98
98		99
99	void init(void)	100	void init(void)
100	{	101	{
101	ofw_chosen = ofw_find_device("/chosen");	102	ofw_chosen = ofw_find_device("/chosen");
102	if (ofw_chosen == -1)	103	if (ofw_chosen == -1)
103	halt();	104	halt();
104		105
105	if (ofw_get_property(ofw_chosen, "stdout", &ofw_stdout, sizeof(ofw_stdout)) <= 0)	106	if (ofw_get_property(ofw_chosen, "stdout", &ofw_stdout, sizeof(ofw_stdout)) <= 0)
106	ofw_stdout = 0;	107	ofw_stdout = 0;
107		108
108	ofw_mmu = ofw_open("/mmu");	109	ofw_mmu = ofw_open("/mmu");
109	if (ofw_mmu == -1) {	110	if (ofw_mmu == -1) {
110	puts("Unable to open /mmu node\n");	111	puts("Unable to open /mmu node\n");
111	halt();	112	halt();
112	}	113	}
113	}	114	}
114		115
115		116
116	void halt(void)	-
117	{	-
118	ofw_call("exit", 0, 0);	-
119	}	-
120		-
121		-
122	void ofw_write(const char *str, const int len)	117	void ofw_write(const char *str, const int len)
123	{	118	{
124	if (ofw_stdout == 0)	119	if (ofw_stdout == 0)
125	return;	120	return;
126		121
127	ofw_call("write", 3, 1, ofw_stdout, str, len);	122	ofw_call("write", 3, 1, ofw_stdout, str, len);
128	}	123	}
129		124
130		125
131	void ofw_translate(const void virt)	126	void ofw_translate(const void virt)
132	{	127	{
133	return (void *) ofw_call("call-method", 7, 1, "translate", ofw_mmu, virt, 0, 0, 0, 0);	128	return (void *) ofw_call("call-method", 7, 1, "translate", ofw_mmu, virt, 0, 0, 0, 0);
134	}	129	}
135		-
136		-
137	int ofw_map(const void phys, const void virt, const int size, const int mode)	-
138	{	-
139	return ofw_call("call-method", 6, 1, "map", ofw_mmu, mode, size, virt, phys);	-
140	}	-
141		130
142		131
143	int ofw_memmap(memmap_t *map)	132	int ofw_memmap(memmap_t *map)
144	{	133	{
145	int i;	134	int i;
146	int ret;	135	int ret;
147		136
148	phandle handle = ofw_find_device("/memory");	137	phandle handle = ofw_find_device("/memory");
149	if (handle == -1)	138	if (handle == -1)
150	return false;	139	return false;
151		140
152	ret = ofw_get_property(handle, "reg", &map->zones, sizeof(map->zones));	141	ret = ofw_get_property(handle, "reg", &map->zones, sizeof(map->zones));
153	if (ret == -1)	142	if (ret == -1)
154	return false;	143	return false;
155		144
156	map->total = 0;	145	map->total = 0;
157	map->count = 0;	146	map->count = 0;
158	for (i = 0; i < MEMMAP_MAX_RECORDS; i++) {	147	for (i = 0; i < MEMMAP_MAX_RECORDS; i++) {
159	if (map->zones[i].size == 0)	148	if (map->zones[i].size == 0)
160	break;	149	break;
161	map->count++;	150	map->count++;
162	map->total += map->zones[i].size;	151	map->total += map->zones[i].size;
163	}	152	}
164	}	153	}
165		154

Subversion Repositories HelenOS-historic

(root)/boot/trunk/arch/ppc32/loader/ofw.c – Rev 964 → 1058