Merge master.kernel.org:/pub/scm/linux/kernel/git/roland/infiniband
[sfrench/cifs-2.6.git] / arch / sparc / prom / sun4prom.c
1 /*
2  * Copyright (C) 1996 The Australian National University.
3  * Copyright (C) 1996 Fujitsu Laboratories Limited
4  * Copyright (C) 1997 Michael A. Griffith (grif@acm.org)
5  * Copyright (C) 1997 Sun Weenie (ko@ko.reno.nv.us)
6  * Copyright (C) 1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
7  * 
8  * This software may be distributed under the terms of the Gnu
9  * Public License version 2 or later
10  *
11  * fake a really simple Sun prom for the SUN4
12  */
13
14 #include <linux/kernel.h>
15 #include <linux/string.h>
16 #include <asm/oplib.h>
17 #include <asm/idprom.h> 
18 #include <asm/machines.h> 
19 #include <asm/sun4prom.h>
20 #include <asm/asi.h>
21 #include <asm/contregs.h>
22 #include <linux/init.h>
23
24 static struct linux_romvec sun4romvec;
25 static struct idprom sun4_idprom;
26
27 struct property {
28         char *name;
29         char *value;
30         int length;
31 };
32
33 struct node {
34         int level;
35         struct property *properties;
36 };
37
38 struct property null_properties = { NULL, NULL, -1 };
39
40 struct property root_properties[] = {
41         {"device_type", "cpu", 4},
42         {"idprom", (char *)&sun4_idprom, sizeof(struct idprom)},
43         {NULL, NULL, -1}
44 };
45
46 struct node nodes[] = {
47         { 0, &null_properties }, 
48         { 0, root_properties },
49         { -1,&null_properties }
50 };
51
52
53 static int no_nextnode(int node)
54 {
55         if (nodes[node].level == nodes[node+1].level)
56                 return node+1;
57         return -1;
58 }
59
60 static int no_child(int node)
61 {
62         if (nodes[node].level == nodes[node+1].level-1)
63                 return node+1;
64         return -1;
65 }
66
67 static struct property *find_property(int node,char *name)
68 {
69         struct property *prop = &nodes[node].properties[0];
70         while (prop && prop->name) {
71                 if (strcmp(prop->name,name) == 0) return prop;
72                 prop++;
73         }
74         return NULL;
75 }
76
77 static int no_proplen(int node,char *name)
78 {
79         struct property *prop = find_property(node,name);
80         if (prop) return prop->length;
81         return -1;
82 }
83
84 static int no_getprop(int node,char *name,char *value)
85 {
86         struct property *prop = find_property(node,name);
87         if (prop) {
88                 memcpy(value,prop->value,prop->length);
89                 return 1;
90         }
91         return -1;
92 }
93
94 static int no_setprop(int node,char *name,char *value,int len)
95 {
96         return -1;
97 }
98
99 static char *no_nextprop(int node,char *name)
100 {
101         struct property *prop = find_property(node,name);
102         if (prop) return prop[1].name;
103         return NULL;
104 }
105
106 static struct linux_nodeops sun4_nodeops = {
107         no_nextnode,
108         no_child,
109         no_proplen,
110         no_getprop,
111         no_setprop,
112         no_nextprop
113 };
114         
115 static int synch_hook;
116
117 struct linux_romvec * __init sun4_prom_init(void)
118 {
119         int i;
120         unsigned char x;
121         char *p;
122                                 
123         p = (char *)&sun4_idprom;
124         for (i = 0; i < sizeof(sun4_idprom); i++) {
125                 __asm__ __volatile__ ("lduba [%1] %2, %0" : "=r" (x) :
126                                       "r" (AC_IDPROM + i), "i" (ASI_CONTROL));
127                 *p++ = x;
128         }
129
130         memset(&sun4romvec,0,sizeof(sun4romvec));
131
132         sun4_romvec = (linux_sun4_romvec *) SUN4_PROM_VECTOR;
133
134         sun4romvec.pv_romvers = 40;
135         sun4romvec.pv_nodeops = &sun4_nodeops;
136         sun4romvec.pv_reboot = sun4_romvec->reboot;
137         sun4romvec.pv_abort = sun4_romvec->abortentry;
138         sun4romvec.pv_halt = sun4_romvec->exittomon;
139         sun4romvec.pv_synchook = (void (**)(void))&synch_hook;
140         sun4romvec.pv_setctxt = sun4_romvec->setcxsegmap;
141         sun4romvec.pv_v0bootargs = sun4_romvec->bootParam;
142         sun4romvec.pv_nbgetchar = sun4_romvec->mayget;
143         sun4romvec.pv_nbputchar = sun4_romvec->mayput;
144         sun4romvec.pv_stdin = sun4_romvec->insource;
145         sun4romvec.pv_stdout = sun4_romvec->outsink;
146         
147         /*
148          * We turn on the LEDs to let folks without monitors or
149          * terminals know we booted.   Nothing too fancy now.  They
150          * are all on, except for LED 5, which blinks.   When we
151          * have more time, we can teach the penguin to say "By your
152          * command" or "Activating turbo boost, Michael". :-)
153          */
154         sun4_romvec->setLEDs(NULL);
155         
156         printk("PROMLIB: Old Sun4 boot PROM monitor %s, romvec version %d\n",
157                 sun4_romvec->monid,
158                 sun4_romvec->romvecversion);
159
160         return &sun4romvec;
161 }