Subversion Repositories HelenOS-historic

Rev

Rev 1075 | Rev 1146 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1075 Rev 1130
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
#define STRING_SIZE     1024
34
 
35
 
35
typedef unsigned int ofw_arg_t;
36
typedef unsigned int ofw_arg_t;
36
typedef unsigned int ihandle;
37
typedef unsigned int ihandle;
37
typedef unsigned int phandle;
38
typedef unsigned int phandle;
38
 
39
 
39
/** OpenFirmware command structure
40
/** OpenFirmware command structure
40
 *
41
 *
41
 */
42
 */
42
typedef struct {
43
typedef struct {
43
    const char *service;          /**< Command name */
44
    const char *service;          /**< Command name */
44
    unsigned int nargs;           /**< Number of in arguments */
45
    unsigned int nargs;           /**< Number of in arguments */
45
    unsigned int nret;            /**< Number of out arguments */
46
    unsigned int nret;            /**< Number of out arguments */
46
    ofw_arg_t args[MAX_OFW_ARGS]; /**< List of arguments */
47
    ofw_arg_t args[MAX_OFW_ARGS]; /**< List of arguments */
47
} ofw_args_t;
48
} ofw_args_t;
48
 
49
 
49
typedef void (*ofw_entry)(ofw_args_t *);
50
typedef void (*ofw_entry)(ofw_args_t *);
50
 
51
 
51
 
52
 
52
ofw_entry ofw;
53
ofw_entry ofw;
53
 
54
 
54
phandle ofw_chosen;
55
phandle ofw_chosen;
-
 
56
phandle ofw_aliases;
55
ihandle ofw_mmu;
57
ihandle ofw_mmu;
56
ihandle ofw_stdout;
58
ihandle ofw_stdout;
57
 
59
 
58
 
60
 
59
static int ofw_call(const char *service, const int nargs, const int nret, ...)
61
static int ofw_call(const char *service, const int nargs, const int nret, ...)
60
{
62
{
61
    va_list list;
63
    va_list list;
62
    ofw_args_t args;
64
    ofw_args_t args;
63
    int i;
65
    int i;
64
   
66
   
65
    args.service = service;
67
    args.service = service;
66
    args.nargs = nargs;
68
    args.nargs = nargs;
67
    args.nret = nret;
69
    args.nret = nret;
68
   
70
   
69
    va_start(list, nret);
71
    va_start(list, nret);
70
    for (i = 0; i < nargs; i++)
72
    for (i = 0; i < nargs; i++)
71
        args.args[i] = va_arg(list, ofw_arg_t);
73
        args.args[i] = va_arg(list, ofw_arg_t);
72
    va_end(list);
74
    va_end(list);
73
   
75
   
74
    for (i = 0; i < nret; i++)
76
    for (i = 0; i < nret; i++)
75
        args.args[i + nargs] = 0;
77
        args.args[i + nargs] = 0;
76
   
78
   
77
    ofw(&args);
79
    ofw(&args);
78
   
80
   
79
    return args.args[nargs];
81
    return args.args[nargs];
80
}
82
}
81
 
83
 
82
 
84
 
83
static phandle ofw_find_device(const char *name)
85
static phandle ofw_find_device(const char *name)
84
{
86
{
85
    return ofw_call("finddevice", 1, 1, name);
87
    return ofw_call("finddevice", 1, 1, name);
86
}
88
}
87
 
89
 
88
 
90
 
89
static int ofw_get_property(const phandle device, const char *name, const void *buf, const int buflen)
91
static int ofw_get_property(const phandle device, const char *name, const void *buf, const int buflen)
90
{
92
{
91
    return ofw_call("getprop", 4, 1, device, name, buf, buflen);
93
    return ofw_call("getprop", 4, 1, device, name, buf, buflen);
92
}
94
}
93
 
95
 
94
static ihandle ofw_open(const char *name)
96
static ihandle ofw_open(const char *name)
95
{
97
{
96
    return ofw_call("open", 1, 1, name);
98
    return ofw_call("open", 1, 1, name);
97
}
99
}
98
 
100
 
99
 
101
 
100
void init(void)
102
void init(void)
101
{
103
{
102
    ofw_chosen = ofw_find_device("/chosen");
104
    ofw_chosen = ofw_find_device("/chosen");
103
    if (ofw_chosen == -1)
105
    if (ofw_chosen == -1)
104
        halt();
106
        halt();
105
   
107
   
106
    if (ofw_get_property(ofw_chosen, "stdout",  &ofw_stdout, sizeof(ofw_stdout)) <= 0) 
108
    if (ofw_get_property(ofw_chosen, "stdout",  &ofw_stdout, sizeof(ofw_stdout)) <= 0) 
107
        ofw_stdout = 0;
109
        ofw_stdout = 0;
108
   
110
   
-
 
111
    ofw_aliases = ofw_find_device("/aliases");
-
 
112
    if (ofw_aliases == -1) {
-
 
113
        puts("\nUnable to find /aliases device\n");
-
 
114
        halt();
-
 
115
    }
-
 
116
   
109
    ofw_mmu = ofw_open("/mmu");
117
    ofw_mmu = ofw_open("/mmu");
110
    if (ofw_mmu == -1) {
118
    if (ofw_mmu == -1) {
111
        puts("Unable to open /mmu node\n");
119
        puts("\nUnable to open /mmu node\n");
112
        halt();
120
        halt();
113
    }
121
    }
114
}
122
}
115
 
123
 
116
 
124
 
117
void ofw_write(const char *str, const int len)
125
void ofw_write(const char *str, const int len)
118
{
126
{
119
    if (ofw_stdout == 0)
127
    if (ofw_stdout == 0)
120
        return;
128
        return;
121
   
129
   
122
    ofw_call("write", 3, 1, ofw_stdout, str, len);
130
    ofw_call("write", 3, 1, ofw_stdout, str, len);
123
}
131
}
124
 
132
 
125
 
133
 
126
void *ofw_translate(const void *virt)
134
void *ofw_translate(const void *virt)
127
{
135
{
128
    return (void *) ofw_call("call-method", 7, 1, "translate", ofw_mmu, virt, 0, 0, 0, 0);
136
    return (void *) ofw_call("call-method", 7, 1, "translate", ofw_mmu, virt, 0, 0, 0, 0);
129
}
137
}
130
 
138
 
131
 
139
 
132
int ofw_map(const void *phys, const void *virt, const int size, const int mode)
140
int ofw_map(const void *phys, const void *virt, const int size, const int mode)
133
{
141
{
134
    return ofw_call("call-method", 6, 1, "map", ofw_mmu, mode, size, virt, phys);
142
    return ofw_call("call-method", 6, 1, "map", ofw_mmu, mode, size, virt, phys);
135
}
143
}
136
 
144
 
137
 
145
 
138
int ofw_memmap(memmap_t *map)
146
int ofw_memmap(memmap_t *map)
139
{
147
{
140
    int i;
148
    int i;
141
    int ret;
149
    int ret;
142
 
150
 
143
    phandle handle = ofw_find_device("/memory");
151
    phandle handle = ofw_find_device("/memory");
144
    if (handle == -1)
152
    if (handle == -1)
145
        return false;
153
        return false;
146
   
154
   
147
    ret = ofw_get_property(handle, "reg", &map->zones, sizeof(map->zones));
155
    ret = ofw_get_property(handle, "reg", &map->zones, sizeof(map->zones));
148
    if (ret == -1)
156
    if (ret == -1)
149
        return false;
157
        return false;
150
   
158
   
151
    map->total = 0;
159
    map->total = 0;
152
    map->count = 0;
160
    map->count = 0;
153
    for (i = 0; i < MEMMAP_MAX_RECORDS; i++) {
161
    for (i = 0; i < MEMMAP_MAX_RECORDS; i++) {
154
        if (map->zones[i].size == 0)
162
        if (map->zones[i].size == 0)
155
            break;
163
            break;
156
        map->count++;
164
        map->count++;
157
        map->total += map->zones[i].size;
165
        map->total += map->zones[i].size;
158
    }
166
    }
159
}
167
}
-
 
168
 
-
 
169
 
-
 
170
int ofw_screen(screen_t *screen)
-
 
171
{
-
 
172
    char device_name[STRING_SIZE];
-
 
173
   
-
 
174
    if (ofw_get_property(ofw_aliases, "screen", device_name, STRING_SIZE) <= 0)
-
 
175
        return false;
-
 
176
   
-
 
177
    phandle device = ofw_find_device(device_name);
-
 
178
    if (device == -1)
-
 
179
        return false;
-
 
180
   
-
 
181
    if (ofw_get_property(device, "address", &screen->addr, sizeof(screen->addr)) <= 0)
-
 
182
        return false;
-
 
183
   
-
 
184
    if (ofw_get_property(device, "width", &screen->width, sizeof(screen->width)) <= 0)
-
 
185
        return false;
-
 
186
   
-
 
187
    if (ofw_get_property(device, "height", &screen->height, sizeof(screen->height)) <= 0)
-
 
188
        return false;
-
 
189
   
-
 
190
    if (ofw_get_property(device, "depth", &screen->bpp, sizeof(screen->bpp)) <= 0)
-
 
191
        return false;
-
 
192
   
-
 
193
    if (ofw_get_property(device, "linebytes", &screen->scanline, sizeof(screen->scanline)) <= 0)
-
 
194
        return false;
-
 
195
   
-
 
196
    return true;
-
 
197
}
160
 
198