Subversion Repositories HelenOS-historic

Rev

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

Rev 1702 Rev 1777
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
 /** @addtogroup genarch   
29
/** @addtogroup genarch
30
 * @{
30
 * @{
31
 */
31
 */
32
/** @file
32
/** @file
33
 */
33
 */
34
 
34
 
35
#include <genarch/ofw/ofw.h>
35
#include <genarch/ofw/ofw.h>
36
#include <arch/asm.h>
36
#include <arch/asm.h>
37
#include <stdarg.h>
37
#include <stdarg.h>
38
#include <cpu.h>
38
#include <cpu.h>
39
#include <arch/types.h>
39
#include <arch/types.h>
40
 
40
 
41
ofw_entry ofw;
41
ofw_entry ofw;
42
 
42
 
43
phandle ofw_chosen;
43
phandle ofw_chosen;
44
ihandle ofw_stdin;
44
ihandle ofw_stdin;
45
ihandle ofw_stdout;
45
ihandle ofw_stdout;
46
 
46
 
47
void ofw_init(void)
47
void ofw_init(void)
48
{
48
{
49
    ofw_chosen = ofw_find_device("/chosen");
49
    ofw_chosen = ofw_find_device("/chosen");
50
    if (ofw_chosen == -1)
50
    if (ofw_chosen == -1)
51
        ofw_done();
51
        ofw_done();
52
   
52
   
53
    if (ofw_get_property(ofw_chosen, "stdin",  &ofw_stdin, sizeof(ofw_stdin)) <= 0)
53
    if (ofw_get_property(ofw_chosen, "stdin",  &ofw_stdin, sizeof(ofw_stdin)) <= 0)
54
        ofw_stdin = 0;
54
        ofw_stdin = 0;
55
       
55
       
56
    if (ofw_get_property(ofw_chosen, "stdout",  &ofw_stdout, sizeof(ofw_stdout)) <= 0)
56
    if (ofw_get_property(ofw_chosen, "stdout",  &ofw_stdout, sizeof(ofw_stdout)) <= 0)
57
        ofw_stdout = 0;
57
        ofw_stdout = 0;
58
}
58
}
59
 
59
 
60
void ofw_done(void)
60
void ofw_done(void)
61
{
61
{
62
    (void) ofw_call("exit", 0, 0);
62
    (void) ofw_call("exit", 0, 0);
63
    cpu_halt();
63
    cpu_halt();
64
}
64
}
65
 
65
 
66
__native ofw_call(const char *service, const int nargs, const int nret, ...)
66
__native ofw_call(const char *service, const int nargs, const int nret, ...)
67
{
67
{
68
    va_list list;
68
    va_list list;
69
    ofw_args_t args;
69
    ofw_args_t args;
70
    int i;
70
    int i;
71
   
71
   
72
    args.service = service;
72
    args.service = service;
73
    args.nargs = nargs;
73
    args.nargs = nargs;
74
    args.nret = nret;
74
    args.nret = nret;
75
   
75
   
76
    va_start(list, nret);
76
    va_start(list, nret);
77
    for (i = 0; i < nargs; i++)
77
    for (i = 0; i < nargs; i++)
78
        args.args[i] = va_arg(list, ofw_arg_t);
78
        args.args[i] = va_arg(list, ofw_arg_t);
79
    va_end(list);
79
    va_end(list);
80
   
80
   
81
    for (i = 0; i < nret; i++)
81
    for (i = 0; i < nret; i++)
82
        args.args[i + nargs] = 0;
82
        args.args[i + nargs] = 0;
83
   
83
   
84
    ofw(&args);
84
    ofw(&args);
85
   
85
   
86
    return args.args[nargs];
86
    return args.args[nargs];
87
}
87
}
88
 
88
 
89
void ofw_putchar(const char ch)
89
void ofw_putchar(const char ch)
90
{
90
{
91
    if (ofw_stdout == 0)
91
    if (ofw_stdout == 0)
92
        return;
92
        return;
93
   
93
   
94
    (void) ofw_call("write", 3, 1, ofw_stdout, &ch, 1);
94
    (void) ofw_call("write", 3, 1, ofw_stdout, &ch, 1);
95
}
95
}
96
 
96
 
97
/** Read character from OFW's input.
97
/** Read character from OFW's input.
98
 *
98
 *
99
 * This call is non-blocking.
99
 * This call is non-blocking.
100
 *
100
 *
101
 * @return 0 if no character was read, character read otherwise.
101
 * @return 0 if no character was read, character read otherwise.
102
 */
102
 */
103
char ofw_getchar(void)
103
char ofw_getchar(void)
104
{
104
{
105
    char ch;
105
    char ch;
106
 
106
 
107
    if (ofw_stdin == 0)
107
    if (ofw_stdin == 0)
108
        return 0;
108
        return 0;
109
   
109
   
110
    if (ofw_call("read", 3, 1, ofw_stdin, &ch, 1) == 1)
110
    if (ofw_call("read", 3, 1, ofw_stdin, &ch, 1) == 1)
111
        return ch;
111
        return ch;
112
    else
112
    else
113
        return 0;
113
        return 0;
114
}
114
}
115
 
115
 
116
phandle ofw_find_device(const char *name)
116
phandle ofw_find_device(const char *name)
117
{
117
{
118
    return (phandle) ofw_call("finddevice", 1, 1, name);
118
    return (phandle) ofw_call("finddevice", 1, 1, name);
119
}
119
}
120
 
120
 
121
int ofw_get_property(const phandle device, const char *name, void *buf, const int buflen)
121
int ofw_get_property(const phandle device, const char *name, void *buf, const int buflen)
122
{
122
{
123
    return (int) ofw_call("getprop", 4, 1, device, name, buf, buflen);
123
    return (int) ofw_call("getprop", 4, 1, device, name, buf, buflen);
124
}
124
}
125
 
125
 
126
void *ofw_claim(const void *addr, const int size, const int align)
126
void *ofw_claim(const void *addr, const int size, const int align)
127
{
127
{
128
    return (void *) ofw_call("claim", 3, 1, addr, size, align);
128
    return (void *) ofw_call("claim", 3, 1, addr, size, align);
129
}
129
}
130
 
130
 
131
 /** @}
131
/** @}
132
 */
132
 */
133
 
-
 
134
 
133