Subversion Repositories HelenOS-historic

Rev

Rev 606 | Rev 814 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
332 palkovsky 1
/*
2
 * Copyright (C) 2005 Ondrej Palkovsky
3
 * All rights reserved.
4
 *
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
7
 * are met:
8
 *
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - Redistributions in binary form must reproduce the above copyright
12
 *   notice, this list of conditions and the following disclaimer in the
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
15
 *   derived from this software without specific prior written permission.
16
 *
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
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
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
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
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 */
28
 
29
#include <arch/drivers/arc.h>
30
#include <arch/mm/page.h>
31
#include <print.h>
32
#include <arch.h>
33
#include <arch/byteorder.h>
573 palkovsky 34
#include <arch/mm/frame.h>
35
#include <mm/frame.h>
575 palkovsky 36
#include <interrupt.h>
605 palkovsky 37
#include <align.h>
606 palkovsky 38
#include <console/console.h>
332 palkovsky 39
 
40
/* This is a good joke, SGI HAS different types than NT bioses... */
41
/* Here is the SGI type */
42
static char *basetypes[] = {
43
    "ExceptionBlock",
44
    "SystemParameterBlock",
45
    "FreeContiguous",
46
    "FreeMemory",
47
    "BadMemory",
48
    "LoadedProgram",
49
    "FirmwareTemporary",
50
    "FirmwarePermanent"
51
};
52
 
344 palkovsky 53
static char *ctypes[] = {
54
    "ARC_type",
55
    "CPU_type",
56
    "FPU_type",
57
    "PrimaryICache",
58
    "PrimaryDCache",
59
    "SecondaryICache",
60
    "SecondaryDCache",
61
    "SecondaryCache",
62
    "Memory",
63
    "EISAAdapter",
64
    "TCAdapter",
65
    "SCSIAdapter",
66
    "DTIAdapter",
67
    "MultiFunctionAdapter",
68
    "DiskController",
69
    "TapeController",
70
    "CDROMController",
71
    "WORMController",
72
    "SerialController",
73
    "NetworkController",
74
    "DisplayController",
75
    "ParallelController",
76
    "PointerController",
77
    "KeyboardController",
78
    "AudioController",
79
    "OtherController",
80
    "DiskPeripheral",
81
    "FloppyDiskPeripheral",
82
    "TapePeripheral",
83
    "ModemPeripheral",
84
    "MonitorPeripheral",
85
    "PrinterPeripheral",
86
    "PointerPeripheral",
87
    "KeyboardPeripheral",
88
    "TerminalPeripheral",
89
    "OtherPeripheral",
90
    "LinePeripheral",
91
    "NetworkPeripheral"
92
    "OtherPeripheral",
93
    "XTalkAdapter",
94
    "PCIAdapter",
95
    "GIOAdapter",
96
    "TPUAdapter",
97
    "Anonymous"
98
};
99
 
332 palkovsky 100
static arc_sbp *sbp = (arc_sbp *)PA2KA(0x1000);
101
static arc_func_vector_t *arc_entry;
102
 
103
 
575 palkovsky 104
static void arc_putchar(char ch);
332 palkovsky 105
 
106
/** Return true if ARC is available */
107
int arc_enabled(void)
108
{
109
    return sbp != NULL;
110
}
111
 
344 palkovsky 112
static void arc_print_component(arc_component *c)
113
{
114
    int i;
115
 
116
    printf("%s: ",ctypes[c->type]);
117
    for (i=0;i < c->identifier_len;i++)
575 palkovsky 118
        arc_putchar(c->identifier[i]);
119
    arc_putchar('\n');
344 palkovsky 120
}
121
 
122
void arc_print_devices(void)
123
{
124
    arc_component *c,*next;
125
 
126
    if (!arc_enabled())
127
        return;
128
 
129
    c = arc_entry->getchild(NULL);
130
    while (c) {
131
        arc_print_component(c);
132
        next = arc_entry->getchild(c);
133
        while (!next) {
134
            next = arc_entry->getpeer(c);
135
            if (!next)
136
                c = arc_entry->getparent(c);
137
            if (!c)
138
                return;
139
        }
140
        c = next;
141
    }
142
}
143
 
332 palkovsky 144
void arc_print_memory_map(void)
145
{
146
    arc_memdescriptor_t *desc;
147
 
364 palkovsky 148
    if (!arc_enabled())
332 palkovsky 149
        return;
150
 
151
    printf("Memory map:\n");
152
 
153
    desc = arc_entry->getmemorydescriptor(NULL);
154
    while (desc) {
155
        printf("%s: %d (size: %dKB)\n",basetypes[desc->type],
573 palkovsky 156
               desc->basepage * ARC_FRAME,
157
               desc->basecount*ARC_FRAME/1024);
332 palkovsky 158
        desc = arc_entry->getmemorydescriptor(desc);
159
    }
160
}
161
 
162
/** Print charactor to console */
575 palkovsky 163
static void arc_putchar(char ch)
332 palkovsky 164
{
165
    __u32 cnt;
413 jermar 166
    ipl_t ipl;
332 palkovsky 167
 
168
    /* TODO: Should be spinlock? */
413 jermar 169
    ipl = interrupts_disable();
332 palkovsky 170
    arc_entry->write(1, &ch, 1, &cnt);
413 jermar 171
    interrupts_restore(ipl);
332 palkovsky 172
 
173
}
567 palkovsky 174
 
575 palkovsky 175
/** Initialize ARC structure
176
 *
177
 * @return 0 - ARC OK, -1 - ARC does not exist
178
 */
179
int arc_init(void)
180
{
181
    if (sbp->signature != ARC_MAGIC) {
182
        sbp = NULL;
183
        return -1;
184
    }
185
    arc_entry = sbp->firmwarevector;
186
 
187
    arc_putchar('A');
188
    arc_putchar('R');
189
    arc_putchar('C');
190
    arc_putchar('\n');
191
}
192
 
577 palkovsky 193
static bool kbd_polling_enabled;
575 palkovsky 194
static chardev_t console;
195
 
567 palkovsky 196
/** Try to get character, return character or -1 if not available */
575 palkovsky 197
static void arc_keyboard_poll(void)
567 palkovsky 198
{
199
    char ch;
200
    __u32 count;
201
    long result;
575 palkovsky 202
 
203
    if (! kbd_polling_enabled)
204
        return;
567 palkovsky 205
 
206
    if (arc_entry->getreadstatus(0))
575 palkovsky 207
        return;
567 palkovsky 208
    result = arc_entry->read(0, &ch, 1, &count);
209
    if (result || count!=1) {
575 palkovsky 210
        return;
567 palkovsky 211
    }
212
    if (ch == '\r')
575 palkovsky 213
        ch = '\n';
588 palkovsky 214
    if (ch == 0x7f)
215
        ch = '\b';
216
 
575 palkovsky 217
    chardev_push_character(&console, ch);
567 palkovsky 218
}
573 palkovsky 219
 
610 palkovsky 220
static char arc_read(chardev_t *dev)
221
{
222
    char ch;
223
    __u32 count;
224
    long result;
225
 
226
    result = arc_entry->read(0, &ch, 1, &count);
227
    if (result || count!=1) {
228
        printf("Error reading from ARC keyboard.\n");
229
        cpu_halt();
230
    }
231
    if (ch == '\r')
232
        return '\n';
233
    if (ch == 0x7f)
234
        return '\b';
235
    return ch;
236
}
237
 
575 palkovsky 238
static void arc_write(chardev_t *dev, const char ch)
239
{
240
    arc_putchar(ch);
241
}
242
 
243
static void arc_enable(chardev_t *dev)
244
{
577 palkovsky 245
    kbd_polling_enabled = true;
575 palkovsky 246
}
247
 
248
static void arc_disable(chardev_t *dev)
249
{
577 palkovsky 250
    kbd_polling_enabled = false;
575 palkovsky 251
}
252
 
253
static chardev_operations_t arc_ops = {
254
    .resume = arc_enable,
255
    .suspend = arc_disable,
610 palkovsky 256
    .write = arc_write,
257
    .read = arc_read
575 palkovsky 258
};
259
 
260
iroutine old_timer;
261
/** Do polling on timer interrupt */
262
static void timer_replace(int n, void *stack)
263
{
264
    arc_keyboard_poll();
265
    old_timer(n, stack);
266
    arc_keyboard_poll();
267
}
268
 
606 palkovsky 269
void arc_console(void)
575 palkovsky 270
{
577 palkovsky 271
    kbd_polling_enabled = true;
575 palkovsky 272
 
273
    chardev_initialize("arc_console", &console, &arc_ops);
590 palkovsky 274
    old_timer = int_register(TIMER_IRQ, "arc_kb_poll", timer_replace);
606 palkovsky 275
    stdin = &console;
276
    stdout = &console;
575 palkovsky 277
}
278
 
573 palkovsky 279
/* Initialize frame zones from ARC firmware.
280
 * In the future we may use even the FirmwareTemporary regions,
281
 * currently we use the FreeMemory (what about the LoadedProgram?)
282
 */
283
void arc_frame_init(void)
284
{
285
    arc_memdescriptor_t *desc;
286
    int total = 0;
605 palkovsky 287
    __address base;
288
    size_t basesize;
289
    unsigned int i,j;
573 palkovsky 290
 
291
    desc = arc_entry->getmemorydescriptor(NULL);
292
    while (desc) {
293
        if (desc->type == FreeMemory ||
294
            desc->type == FreeContiguous) {
605 palkovsky 295
            base = desc->basepage*ARC_FRAME;
296
            basesize = desc->basecount*ARC_FRAME;
297
 
298
            if (base % FRAME_SIZE ) {
299
                basesize -= FRAME_SIZE - (base % FRAME_SIZE);
300
                base = ALIGN_UP(base, FRAME_SIZE);
301
            }
302
            basesize = ALIGN_DOWN(basesize, FRAME_SIZE);
303
 
304
            total += basesize;
305
            zone_create_in_region(base, basesize);
573 palkovsky 306
        }
307
        desc = arc_entry->getmemorydescriptor(desc);
308
    }
309
 
310
    config.memory_size = total;
311
}
312