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_map(const void *phys, const void *virt, const int size, const int mode)
{
    return ofw_call("call-method", 6, 1, "map", ofw_mmu, mode, size, virt, phys);
}
 
 
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 1058	Rev 1075
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 "asm.h"
31	#include "printf.h"	31	#include "printf.h"
32		32
33	#define MAX_OFW_ARGS 10	33	#define MAX_OFW_ARGS 10
34		34
35	typedef unsigned int ofw_arg_t;	35	typedef unsigned int ofw_arg_t;
36	typedef unsigned int ihandle;	36	typedef unsigned int ihandle;
37	typedef unsigned int phandle;	37	typedef unsigned int phandle;
38		38
39	/** OpenFirmware command structure	39	/** OpenFirmware command structure
40	*	40	*
41	*/	41	*/
42	typedef struct {	42	typedef struct {
43	const char service; /< Command name /	43	const char service; /< Command name /
44	unsigned int nargs; /*< Number of in arguments /	44	unsigned int nargs; /*< Number of in arguments /
45	unsigned int nret; /*< Number of out arguments /	45	unsigned int nret; /*< Number of out arguments /
46	ofw_arg_t args[MAX_OFW_ARGS]; /*< List of arguments /	46	ofw_arg_t args[MAX_OFW_ARGS]; /*< List of arguments /
47	} ofw_args_t;	47	} ofw_args_t;
48		48
49	typedef void (ofw_entry)(ofw_args_t );	49	typedef void (ofw_entry)(ofw_args_t );
50		50
51		51
52	ofw_entry ofw;	52	ofw_entry ofw;
53		53
54	phandle ofw_chosen;	54	phandle ofw_chosen;
55	ihandle ofw_mmu;	55	ihandle ofw_mmu;
56	ihandle ofw_stdout;	56	ihandle ofw_stdout;
57		57
58		58
59	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, ...)
60	{	60	{
61	va_list list;	61	va_list list;
62	ofw_args_t args;	62	ofw_args_t args;
63	int i;	63	int i;
64		64
65	args.service = service;	65	args.service = service;
66	args.nargs = nargs;	66	args.nargs = nargs;
67	args.nret = nret;	67	args.nret = nret;
68		68
69	va_start(list, nret);	69	va_start(list, nret);
70	for (i = 0; i < nargs; i++)	70	for (i = 0; i < nargs; i++)
71	args.args[i] = va_arg(list, ofw_arg_t);	71	args.args[i] = va_arg(list, ofw_arg_t);
72	va_end(list);	72	va_end(list);
73		73
74	for (i = 0; i < nret; i++)	74	for (i = 0; i < nret; i++)
75	args.args[i + nargs] = 0;	75	args.args[i + nargs] = 0;
76		76
77	ofw(&args);	77	ofw(&args);
78		78
79	return args.args[nargs];	79	return args.args[nargs];
80	}	80	}
81		81
82		82
83	static phandle ofw_find_device(const char *name)	83	static phandle ofw_find_device(const char *name)
84	{	84	{
85	return ofw_call("finddevice", 1, 1, name);	85	return ofw_call("finddevice", 1, 1, name);
86	}	86	}
87		87
88		88
89	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)
90	{	90	{
91	return ofw_call("getprop", 4, 1, device, name, buf, buflen);	91	return ofw_call("getprop", 4, 1, device, name, buf, buflen);
92	}	92	}
93		93
94	static ihandle ofw_open(const char *name)	94	static ihandle ofw_open(const char *name)
95	{	95	{
96	return ofw_call("open", 1, 1, name);	96	return ofw_call("open", 1, 1, name);
97	}	97	}
98		98
99		99
100	void init(void)	100	void init(void)
101	{	101	{
102	ofw_chosen = ofw_find_device("/chosen");	102	ofw_chosen = ofw_find_device("/chosen");
103	if (ofw_chosen == -1)	103	if (ofw_chosen == -1)
104	halt();	104	halt();
105		105
106	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)
107	ofw_stdout = 0;	107	ofw_stdout = 0;
108		108
109	ofw_mmu = ofw_open("/mmu");	109	ofw_mmu = ofw_open("/mmu");
110	if (ofw_mmu == -1) {	110	if (ofw_mmu == -1) {
111	puts("Unable to open /mmu node\n");	111	puts("Unable to open /mmu node\n");
112	halt();	112	halt();
113	}	113	}
114	}	114	}
115		115
116		116
117	void ofw_write(const char *str, const int len)	117	void ofw_write(const char *str, const int len)
118	{	118	{
119	if (ofw_stdout == 0)	119	if (ofw_stdout == 0)
120	return;	120	return;
121		121
122	ofw_call("write", 3, 1, ofw_stdout, str, len);	122	ofw_call("write", 3, 1, ofw_stdout, str, len);
123	}	123	}
124		124
125		125
126	void ofw_translate(const void virt)	126	void ofw_translate(const void virt)
127	{	127	{
128	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);
129	}	129	}
130		130
131		131
-		132	int ofw_map(const void phys, const void virt, const int size, const int mode)
-		133	{
-		134	return ofw_call("call-method", 6, 1, "map", ofw_mmu, mode, size, virt, phys);
-		135	}
-		136
-		137
132	int ofw_memmap(memmap_t *map)	138	int ofw_memmap(memmap_t *map)
133	{	139	{
134	int i;	140	int i;
135	int ret;	141	int ret;
136		142
137	phandle handle = ofw_find_device("/memory");	143	phandle handle = ofw_find_device("/memory");
138	if (handle == -1)	144	if (handle == -1)
139	return false;	145	return false;
140		146
141	ret = ofw_get_property(handle, "reg", &map->zones, sizeof(map->zones));	147	ret = ofw_get_property(handle, "reg", &map->zones, sizeof(map->zones));
142	if (ret == -1)	148	if (ret == -1)
143	return false;	149	return false;
144		150
145	map->total = 0;	151	map->total = 0;
146	map->count = 0;	152	map->count = 0;
147	for (i = 0; i < MEMMAP_MAX_RECORDS; i++) {	153	for (i = 0; i < MEMMAP_MAX_RECORDS; i++) {
148	if (map->zones[i].size == 0)	154	if (map->zones[i].size == 0)
149	break;	155	break;
150	map->count++;	156	map->count++;
151	map->total += map->zones[i].size;	157	map->total += map->zones[i].size;
152	}	158	}
153	}	159	}
154		160

Subversion Repositories HelenOS-historic

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