WebSVN – HelenOS – Diff – /trunk/boot/genarch/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 <ofwarch.h>
#include <printf.h>
#include <asm.h>
#include <types.h>
 
uintptr_t ofw_cif;
 
phandle ofw_chosen;
ihandle ofw_stdout;
phandle ofw_root;
ihandle ofw_mmu;
phandle ofw_memory;
phandle ofw_aliases;
 
void ofw_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_root = ofw_find_device("/");
    if (ofw_root == -1) {
        puts("\r\nError: Unable to find / device, halted.\r\n");
        halt();
    }
   
    if (ofw_get_property(ofw_chosen, "mmu",  &ofw_mmu, sizeof(ofw_mmu)) <= 0) {
        puts("\r\nError: Unable to get mmu property, halted.\r\n");
        halt();
    }
 
    ofw_memory = ofw_find_device("/memory");
    if (ofw_memory == -1) {
        puts("\r\nError: Unable to find /memory device, halted.\r\n");
        halt();
    }
   
    ofw_aliases = ofw_find_device("/aliases");
    if (ofw_aliases == -1) {
        puts("\r\nError: Unable to find /aliases device, halted.\r\n");
        halt();
    }
}
 
/** Perform a call to OpenFirmware client interface.
 *
 * @param service String identifying the service requested.
 * @param nargs Number of input arguments.
 * @param nret Number of output arguments. This includes the return value.
 * @param rets Buffer for output arguments or NULL. The buffer must accommodate nret - 1 items.
 *
 * @return Return value returned by the client interface.
 */
unsigned long ofw_call(const char *service, const int nargs, const int nret, ofw_arg_t *rets, ...)
{
    va_list list;
    ofw_args_t args;
    int i;
   
    args.service = (ofw_arg_t) service;
    args.nargs = nargs;
    args.nret = nret;
   
    va_start(list, rets);
    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;
   
    (void) ofw(&args);
 
    for (i = 1; i < nret; i++)
        rets[i - 1] = args.args[i + nargs];
 
    return args.args[nargs];
}
 
phandle ofw_find_device(const char *name)
{
    return ofw_call("finddevice", 1, 1, NULL, name);
}
 
int ofw_get_property(const phandle device, const char *name, void *buf, const int buflen)
{
    return ofw_call("getprop", 4, 1, NULL, device, name, buf, buflen);
}
 
int ofw_get_proplen(const phandle device, const char *name)
{
    return ofw_call("getproplen", 2, 1, NULL, device, name);
}
 
int ofw_next_property(const phandle device, char *previous, char *buf)
{
    return ofw_call("nextprop", 3, 1, NULL, device, previous, buf);
}
 
int ofw_package_to_path(const phandle device, char *buf, const int buflen)
{
    return ofw_call("package-to-path", 3, 1, NULL, device, buf, buflen);
}
 
unsigned int ofw_get_address_cells(const phandle device)
{
    unsigned int ret = 1;
   
    if (ofw_get_property(device, "#address-cells", &ret, sizeof(ret)) <= 0)
        if (ofw_get_property(ofw_root, "#address-cells", &ret, sizeof(ret)) <= 0)
            ret = OFW_ADDRESS_CELLS;
   
    return ret;
}
 
 
unsigned int ofw_get_size_cells(const phandle device)
{
    unsigned int ret;
   
    if (ofw_get_property(device, "#size-cells", &ret, sizeof(ret)) <= 0)
        if (ofw_get_property(ofw_root, "#size-cells", &ret, sizeof(ret)) <= 0)
            ret = OFW_SIZE_CELLS;
   
    return ret;
}
 
phandle ofw_get_child_node(const phandle node)
{
    return ofw_call("child", 1, 1, NULL, node);
}
 
phandle ofw_get_peer_node(const phandle node)
{
    return ofw_call("peer", 1, 1, NULL, node);
}
 
static ihandle ofw_open(const char *name)
{
    return ofw_call("open", 1, 1, NULL, name);
}
 
 
void ofw_write(const char *str, const int len)
{
    if (ofw_stdout == 0)
        return;
   
    ofw_call("write", 3, 1, NULL, ofw_stdout, str, len);
}
 
 
void *ofw_translate(const void *virt)
{
    ofw_arg_t result[4];
    int shift;
 
    if (ofw_call("call-method", 3, 5, result, "translate", ofw_mmu, virt) != 0) {
        puts("Error: MMU method translate() failed, halting.\n");
        halt();
    }
 
    if (ofw_translate_failed(result[0]))
        return NULL;
 
    if (sizeof(unative_t) == 8)
        shift = 32;
    else
        shift = 0;
 
    return (void *) ((result[2]<<shift)|result[3]);
}
 
void *ofw_claim(const void *virt, const int len)
{
    ofw_arg_t retaddr;
    int shift;
 
    if (ofw_call("call-method", 5, 2, &retaddr, "claim", ofw_mmu, 0, len, virt) != 0) {
        puts("Error: MMU method claim() failed, halting.\n");
        halt();
    }
 
    return (void *) retaddr;
}
 
int ofw_map(const void *phys, const void *virt, const int size, const int mode)
{
    uintptr_t phys_hi, phys_lo;
 
    if (sizeof(unative_t) == 8) {
        int shift = 32;
        phys_hi = (uintptr_t) phys >> shift;
        phys_lo = (uintptr_t) phys & 0xffffffff;
    } else {
        phys_hi = 0;
        phys_lo = (uintptr_t) phys;
    }
 
    return ofw_call("call-method", 7, 1, NULL, "map", ofw_mmu, mode, size, virt,
        phys_hi, phys_lo);
}
 
/** Save OpenFirmware physical memory map.
 *
 * @param map Memory map structure where the map will be saved.
 *
 * @return Zero on failure, non-zero on success.
 */
int ofw_memmap(memmap_t *map)
{
    unsigned int ac = ofw_get_address_cells(ofw_memory);
    unsigned int sc = ofw_get_size_cells(ofw_memory);
 
    uint32_t buf[((ac + sc) * MEMMAP_MAX_RECORDS)];
    int ret = ofw_get_property(ofw_memory, "reg", buf, sizeof(buf));
    if (ret <= 0)       /* ret is the number of written bytes */
        return false;
 
    int pos;
    map->total = 0;
    map->count = 0;
    for (pos = 0; (pos < ret / sizeof(uint32_t)) && (map->count <
        MEMMAP_MAX_RECORDS); pos += ac + sc) {
        void * start = (void *) ((uintptr_t) buf[pos + ac - 1]);
        unsigned int size = buf[pos + ac + sc - 1];
       
        if (size > 0) {
            map->zones[map->count].start = start;
            map->zones[map->count].size = size;
            map->count++;
            map->total += size;
        }
    }
   
    return true;
}
 
 
int ofw_screen(screen_t *screen)
{
    char device_name[BUF_SIZE];
    uint32_t virtaddr;
   
    if (ofw_get_property(ofw_aliases, "screen", device_name, sizeof(device_name)) <= 0)
        return false;
   
    phandle device = ofw_find_device(device_name);
    if (device == -1)
        return false;
   
    if (ofw_get_property(device, "address", &virtaddr, sizeof(virtaddr)) <= 0)
        return false;
 
    screen->addr = (void *) ((uintptr_t) virtaddr);
 
    if (ofw_get_property(device, "width", &screen->width, sizeof(screen->width)) <= 0)
        return false;
   
    if (ofw_get_property(device, "height", &screen->height, sizeof(screen->height)) <= 0)
        return false;
   
    if (ofw_get_property(device, "depth", &screen->bpp, sizeof(screen->bpp)) <= 0)
        return false;
   
    if (ofw_get_property(device, "linebytes", &screen->scanline, sizeof(screen->scanline)) <= 0)
        return false;
   
    return true;
}
 
 
void ofw_quiesce(void)
{
    ofw_call("quiesce", 0, 0, NULL);
}
 

Rev 2048	Rev 2071
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 <ofwarch.h>	30	#include <ofwarch.h>
31	#include <printf.h>	31	#include <printf.h>
32	#include <asm.h>	32	#include <asm.h>
33	#include <types.h>	33	#include <types.h>
34		34
35	uintptr_t ofw_cif;	35	uintptr_t ofw_cif;
36		36
37	phandle ofw_chosen;	37	phandle ofw_chosen;
38	ihandle ofw_stdout;	38	ihandle ofw_stdout;
39	phandle ofw_root;	39	phandle ofw_root;
40	ihandle ofw_mmu;	40	ihandle ofw_mmu;
41	phandle ofw_memory;	41	phandle ofw_memory;
42	phandle ofw_aliases;	42	phandle ofw_aliases;
43		43
44	void ofw_init(void)	44	void ofw_init(void)
45	{	45	{
46	ofw_chosen = ofw_find_device("/chosen");	46	ofw_chosen = ofw_find_device("/chosen");
47	if (ofw_chosen == -1)	47	if (ofw_chosen == -1)
48	halt();	48	halt();
49		49
50	if (ofw_get_property(ofw_chosen, "stdout", &ofw_stdout, sizeof(ofw_stdout)) <= 0)	50	if (ofw_get_property(ofw_chosen, "stdout", &ofw_stdout, sizeof(ofw_stdout)) <= 0)
51	ofw_stdout = 0;	51	ofw_stdout = 0;
52		52
53	ofw_root = ofw_find_device("/");	53	ofw_root = ofw_find_device("/");
54	if (ofw_root == -1) {	54	if (ofw_root == -1) {
55	puts("\r\nError: Unable to find / device, halted.\r\n");	55	puts("\r\nError: Unable to find / device, halted.\r\n");
56	halt();	56	halt();
57	}	57	}
58		58
59	if (ofw_get_property(ofw_chosen, "mmu", &ofw_mmu, sizeof(ofw_mmu)) <= 0) {	59	if (ofw_get_property(ofw_chosen, "mmu", &ofw_mmu, sizeof(ofw_mmu)) <= 0) {
60	puts("\r\nError: Unable to get mmu property, halted.\r\n");	60	puts("\r\nError: Unable to get mmu property, halted.\r\n");
61	halt();	61	halt();
62	}	62	}
63		63
64	ofw_memory = ofw_find_device("/memory");	64	ofw_memory = ofw_find_device("/memory");
65	if (ofw_memory == -1) {	65	if (ofw_memory == -1) {
66	puts("\r\nError: Unable to find /memory device, halted.\r\n");	66	puts("\r\nError: Unable to find /memory device, halted.\r\n");
67	halt();	67	halt();
68	}	68	}
69		69
70	ofw_aliases = ofw_find_device("/aliases");	70	ofw_aliases = ofw_find_device("/aliases");
71	if (ofw_aliases == -1) {	71	if (ofw_aliases == -1) {
72	puts("\r\nError: Unable to find /aliases device, halted.\r\n");	72	puts("\r\nError: Unable to find /aliases device, halted.\r\n");
73	halt();	73	halt();
74	}	74	}
75	}	75	}
76		76
77	/** Perform a call to OpenFirmware client interface.	77	/** Perform a call to OpenFirmware client interface.
78	*	78	*
79	* @param service String identifying the service requested.	79	* @param service String identifying the service requested.
80	* @param nargs Number of input arguments.	80	* @param nargs Number of input arguments.
81	* @param nret Number of output arguments. This includes the return value.	81	* @param nret Number of output arguments. This includes the return value.
82	* @param rets Buffer for output arguments or NULL. The buffer must accommodate nret - 1 items.	82	* @param rets Buffer for output arguments or NULL. The buffer must accommodate nret - 1 items.
83	*	83	*
84	* @return Return value returned by the client interface.	84	* @return Return value returned by the client interface.
85	*/	85	*/
86	unsigned long ofw_call(const char service, const int nargs, const int nret, ofw_arg_t rets, ...)	86	unsigned long ofw_call(const char service, const int nargs, const int nret, ofw_arg_t rets, ...)
87	{	87	{
88	va_list list;	88	va_list list;
89	ofw_args_t args;	89	ofw_args_t args;
90	int i;	90	int i;
91		91
92	args.service = (ofw_arg_t) service;	92	args.service = (ofw_arg_t) service;
93	args.nargs = nargs;	93	args.nargs = nargs;
94	args.nret = nret;	94	args.nret = nret;
95		95
96	va_start(list, rets);	96	va_start(list, rets);
97	for (i = 0; i < nargs; i++)	97	for (i = 0; i < nargs; i++)
98	args.args[i] = va_arg(list, ofw_arg_t);	98	args.args[i] = va_arg(list, ofw_arg_t);
99	va_end(list);	99	va_end(list);
100		100
101	for (i = 0; i < nret; i++)	101	for (i = 0; i < nret; i++)
102	args.args[i + nargs] = 0;	102	args.args[i + nargs] = 0;
103		103
104	(void) ofw(&args);	104	(void) ofw(&args);
105		105
106	for (i = 1; i < nret; i++)	106	for (i = 1; i < nret; i++)
107	rets[i - 1] = args.args[i + nargs];	107	rets[i - 1] = args.args[i + nargs];
108		108
109	return args.args[nargs];	109	return args.args[nargs];
110	}	110	}
111		111
112	phandle ofw_find_device(const char *name)	112	phandle ofw_find_device(const char *name)
113	{	113	{
114	return ofw_call("finddevice", 1, 1, NULL, name);	114	return ofw_call("finddevice", 1, 1, NULL, name);
115	}	115	}
116		116
117	int ofw_get_property(const phandle device, const char name, void buf, const int buflen)	117	int ofw_get_property(const phandle device, const char name, void buf, const int buflen)
118	{	118	{
119	return ofw_call("getprop", 4, 1, NULL, device, name, buf, buflen);	119	return ofw_call("getprop", 4, 1, NULL, device, name, buf, buflen);
120	}	120	}
121		121
122	int ofw_get_proplen(const phandle device, const char *name)	122	int ofw_get_proplen(const phandle device, const char *name)
123	{	123	{
124	return ofw_call("getproplen", 2, 1, NULL, device, name);	124	return ofw_call("getproplen", 2, 1, NULL, device, name);
125	}	125	}
126		126
127	int ofw_next_property(const phandle device, char previous, char buf)	127	int ofw_next_property(const phandle device, char previous, char buf)
128	{	128	{
129	return ofw_call("nextprop", 3, 1, NULL, device, previous, buf);	129	return ofw_call("nextprop", 3, 1, NULL, device, previous, buf);
130	}	130	}
131		131
132	int ofw_package_to_path(const phandle device, char *buf, const int buflen)	132	int ofw_package_to_path(const phandle device, char *buf, const int buflen)
133	{	133	{
134	return ofw_call("package-to-path", 3, 1, NULL, device, buf, buflen);	134	return ofw_call("package-to-path", 3, 1, NULL, device, buf, buflen);
135	}	135	}
136		136
137	unsigned int ofw_get_address_cells(const phandle device)	137	unsigned int ofw_get_address_cells(const phandle device)
138	{	138	{
139	unsigned int ret = 1;	139	unsigned int ret = 1;
140		140
141	if (ofw_get_property(device, "#address-cells", &ret, sizeof(ret)) <= 0)	141	if (ofw_get_property(device, "#address-cells", &ret, sizeof(ret)) <= 0)
142	if (ofw_get_property(ofw_root, "#address-cells", &ret, sizeof(ret)) <= 0)	142	if (ofw_get_property(ofw_root, "#address-cells", &ret, sizeof(ret)) <= 0)
143	ret = OFW_ADDRESS_CELLS;	143	ret = OFW_ADDRESS_CELLS;
144		144
145	return ret;	145	return ret;
146	}	146	}
147		147
148		148
149	unsigned int ofw_get_size_cells(const phandle device)	149	unsigned int ofw_get_size_cells(const phandle device)
150	{	150	{
151	unsigned int ret;	151	unsigned int ret;
152		152
153	if (ofw_get_property(device, "#size-cells", &ret, sizeof(ret)) <= 0)	153	if (ofw_get_property(device, "#size-cells", &ret, sizeof(ret)) <= 0)
154	if (ofw_get_property(ofw_root, "#size-cells", &ret, sizeof(ret)) <= 0)	154	if (ofw_get_property(ofw_root, "#size-cells", &ret, sizeof(ret)) <= 0)
155	ret = OFW_SIZE_CELLS;	155	ret = OFW_SIZE_CELLS;
156		156
157	return ret;	157	return ret;
158	}	158	}
159		159
160	phandle ofw_get_child_node(const phandle node)	160	phandle ofw_get_child_node(const phandle node)
161	{	161	{
162	return ofw_call("child", 1, 1, NULL, node);	162	return ofw_call("child", 1, 1, NULL, node);
163	}	163	}
164		164
165	phandle ofw_get_peer_node(const phandle node)	165	phandle ofw_get_peer_node(const phandle node)
166	{	166	{
167	return ofw_call("peer", 1, 1, NULL, node);	167	return ofw_call("peer", 1, 1, NULL, node);
168	}	168	}
169		169
170	static ihandle ofw_open(const char *name)	170	static ihandle ofw_open(const char *name)
171	{	171	{
172	return ofw_call("open", 1, 1, NULL, name);	172	return ofw_call("open", 1, 1, NULL, name);
173	}	173	}
174		174
175		175
176	void ofw_write(const char *str, const int len)	176	void ofw_write(const char *str, const int len)
177	{	177	{
178	if (ofw_stdout == 0)	178	if (ofw_stdout == 0)
179	return;	179	return;
180		180
181	ofw_call("write", 3, 1, NULL, ofw_stdout, str, len);	181	ofw_call("write", 3, 1, NULL, ofw_stdout, str, len);
182	}	182	}
183		183
184		184
185	void ofw_translate(const void virt)	185	void ofw_translate(const void virt)
186	{	186	{
187	ofw_arg_t result[4];	187	ofw_arg_t result[4];
188	int shift;	188	int shift;
189		189
190	if (ofw_call("call-method", 3, 5, result, "translate", ofw_mmu, virt) != 0) {	190	if (ofw_call("call-method", 3, 5, result, "translate", ofw_mmu, virt) != 0) {
191	puts("Error: MMU method translate() failed, halting.\n");	191	puts("Error: MMU method translate() failed, halting.\n");
192	halt();	192	halt();
193	}	193	}
194		194
195	if (ofw_translate_failed(result[0]))	195	if (ofw_translate_failed(result[0]))
196	return NULL;	196	return NULL;
197		197
198	if (sizeof(unative_t) == 8)	198	if (sizeof(unative_t) == 8)
199	shift = 32;	199	shift = 32;
200	else	200	else
201	shift = 0;	201	shift = 0;
202		202
203	return (void *) ((result[2]<<shift)\|result[3]);	203	return (void *) ((result[2]<<shift)\|result[3]);
204	}	204	}
205		205
206	void ofw_claim(const void virt, const int len)	206	void ofw_claim(const void virt, const int len)
207	{	207	{
208	ofw_arg_t retaddr;	208	ofw_arg_t retaddr;
209	int shift;	209	int shift;
210		210
211	if (ofw_call("call-method", 5, 2, &retaddr, "claim", ofw_mmu, 0, len, virt) != 0) {	211	if (ofw_call("call-method", 5, 2, &retaddr, "claim", ofw_mmu, 0, len, virt) != 0) {
212	puts("Error: MMU method claim() failed, halting.\n");	212	puts("Error: MMU method claim() failed, halting.\n");
213	halt();	213	halt();
214	}	214	}
215		215
216	return (void *) retaddr;	216	return (void *) retaddr;
217	}	217	}
218		218
219	int ofw_map(const void phys, const void virt, const int size, const int mode)	219	int ofw_map(const void phys, const void virt, const int size, const int mode)
220	{	220	{
221	uintptr_t phys_hi, phys_lo;	221	uintptr_t phys_hi, phys_lo;
222		222
223	if (sizeof(unative_t) == 8) {	223	if (sizeof(unative_t) == 8) {
224	int shift = 32;	224	int shift = 32;
225	phys_hi = (uintptr_t) phys >> shift;	225	phys_hi = (uintptr_t) phys >> shift;
226	phys_lo = (uintptr_t) phys & 0xffffffff;	226	phys_lo = (uintptr_t) phys & 0xffffffff;
227	} else {	227	} else {
228	phys_hi = 0;	228	phys_hi = 0;
229	phys_lo = (uintptr_t) phys;	229	phys_lo = (uintptr_t) phys;
230	}	230	}
231		231
232	return ofw_call("call-method", 7, 1, NULL, "map", ofw_mmu, mode, size, virt,	232	return ofw_call("call-method", 7, 1, NULL, "map", ofw_mmu, mode, size, virt,
233	phys_hi, phys_lo);	233	phys_hi, phys_lo);
234	}	234	}
235		235
236	/** Save OpenFirmware physical memory map.	236	/** Save OpenFirmware physical memory map.
237	*	237	*
238	* @param map Memory map structure where the map will be saved.	238	* @param map Memory map structure where the map will be saved.
239	*	239	*
240	* @return Zero on failure, non-zero on success.	240	* @return Zero on failure, non-zero on success.
241	*/	241	*/
242	int ofw_memmap(memmap_t *map)	242	int ofw_memmap(memmap_t *map)
243	{	243	{
244	unsigned int ac = ofw_get_address_cells(ofw_memory);	244	unsigned int ac = ofw_get_address_cells(ofw_memory);
245	unsigned int sc = ofw_get_size_cells(ofw_memory);	245	unsigned int sc = ofw_get_size_cells(ofw_memory);
246		246
247	uint32_t buf[((ac + sc) * MEMMAP_MAX_RECORDS)];	247	uint32_t buf[((ac + sc) * MEMMAP_MAX_RECORDS)];
248	int ret = ofw_get_property(ofw_memory, "reg", buf, sizeof(buf));	248	int ret = ofw_get_property(ofw_memory, "reg", buf, sizeof(buf));
249	if (ret <= 0) /* ret is the number of written bytes */	249	if (ret <= 0) /* ret is the number of written bytes */
250	return false;	250	return false;
251		251
252	int pos;	252	int pos;
253	map->total = 0;	253	map->total = 0;
254	map->count = 0;	254	map->count = 0;
255	for (pos = 0; (pos < ret / sizeof(uint32_t)) && (map->count <	255	for (pos = 0; (pos < ret / sizeof(uint32_t)) && (map->count <
256	MEMMAP_MAX_RECORDS); pos += ac + sc) {	256	MEMMAP_MAX_RECORDS); pos += ac + sc) {
257	void * start = (void *) ((uintptr_t) buf[pos + ac - 1]);	257	void * start = (void *) ((uintptr_t) buf[pos + ac - 1]);
258	unsigned int size = buf[pos + ac + sc - 1];	258	unsigned int size = buf[pos + ac + sc - 1];
259		259
260	if (size > 0) {	260	if (size > 0) {
261	map->zones[map->count].start = start;	261	map->zones[map->count].start = start;
262	map->zones[map->count].size = size;	262	map->zones[map->count].size = size;
263	map->count++;	263	map->count++;
264	map->total += size;	264	map->total += size;
265	}	265	}
266	}	266	}
267		267
268	return true;	268	return true;
269	}	269	}
270		270
271		271
272	int ofw_screen(screen_t *screen)	272	int ofw_screen(screen_t *screen)
273	{	273	{
274	char device_name[BUF_SIZE];	274	char device_name[BUF_SIZE];
275	uint32_t virtaddr;	275	uint32_t virtaddr;
276		276
277	if (ofw_get_property(ofw_aliases, "screen", device_name, sizeof(device_name)) <= 0)	277	if (ofw_get_property(ofw_aliases, "screen", device_name, sizeof(device_name)) <= 0)
278	return false;	278	return false;
279		279
280	phandle device = ofw_find_device(device_name);	280	phandle device = ofw_find_device(device_name);
281	if (device == -1)	281	if (device == -1)
282	return false;	282	return false;
283		283
284	if (ofw_get_property(device, "address", &virtaddr, sizeof(virtaddr)) <= 0)	284	if (ofw_get_property(device, "address", &virtaddr, sizeof(virtaddr)) <= 0)
285	return false;	285	return false;
286		286
287	screen->addr = (void *) ((uintptr_t) virtaddr);	287	screen->addr = (void *) ((uintptr_t) virtaddr);
288		288
289	if (ofw_get_property(device, "width", &screen->width, sizeof(screen->width)) <= 0)	289	if (ofw_get_property(device, "width", &screen->width, sizeof(screen->width)) <= 0)
290	return false;	290	return false;
291		291
292	if (ofw_get_property(device, "height", &screen->height, sizeof(screen->height)) <= 0)	292	if (ofw_get_property(device, "height", &screen->height, sizeof(screen->height)) <= 0)
293	return false;	293	return false;
294		294
295	if (ofw_get_property(device, "depth", &screen->bpp, sizeof(screen->bpp)) <= 0)	295	if (ofw_get_property(device, "depth", &screen->bpp, sizeof(screen->bpp)) <= 0)
296	return false;	296	return false;
297		297
298	if (ofw_get_property(device, "linebytes", &screen->scanline, sizeof(screen->scanline)) <= 0)	298	if (ofw_get_property(device, "linebytes", &screen->scanline, sizeof(screen->scanline)) <= 0)
299	return false;	299	return false;
300		300
301	return true;	301	return true;
302	}	302	}
303		303
304		304
305	void ofw_quiesce(void)	305	void ofw_quiesce(void)
306	{	306	{
307	ofw_call("quiesce", 0, 0, NULL);	307	ofw_call("quiesce", 0, 0, NULL);
308	}	308	}
309		309

Subversion Repositories HelenOS

(root)/trunk/boot/genarch/ofw.c – Rev 2048 → 2071