[PARISC] remove unused pdc_iodc_printf function
[linux-2.6] / arch / sparc / prom / memory.c
1 /* $Id: memory.c,v 1.15 2000/01/29 01:09:12 anton Exp $
2  * memory.c: Prom routine for acquiring various bits of information
3  *           about RAM on the machine, both virtual and physical.
4  *
5  * Copyright (C) 1995 David S. Miller (davem@caip.rutgers.edu)
6  * Copyright (C) 1997 Michael A. Griffith (grif@acm.org)
7  */
8
9 #include <linux/kernel.h>
10 #include <linux/init.h>
11
12 #include <asm/openprom.h>
13 #include <asm/sun4prom.h>
14 #include <asm/oplib.h>
15
16 /* This routine, for consistency, returns the ram parameters in the
17  * V0 prom memory descriptor format.  I choose this format because I
18  * think it was the easiest to work with.  I feel the religious
19  * arguments now... ;)  Also, I return the linked lists sorted to
20  * prevent paging_init() upset stomach as I have not yet written
21  * the pepto-bismol kernel module yet.
22  */
23
24 struct linux_prom_registers prom_reg_memlist[64];
25 struct linux_prom_registers prom_reg_tmp[64];
26
27 struct linux_mlist_v0 prom_phys_total[64];
28 struct linux_mlist_v0 prom_prom_taken[64];
29 struct linux_mlist_v0 prom_phys_avail[64];
30
31 struct linux_mlist_v0 *prom_ptot_ptr = prom_phys_total;
32 struct linux_mlist_v0 *prom_ptak_ptr = prom_prom_taken;
33 struct linux_mlist_v0 *prom_pavl_ptr = prom_phys_avail;
34
35 struct linux_mem_v0 prom_memlist;
36
37
38 /* Internal Prom library routine to sort a linux_mlist_v0 memory
39  * list.  Used below in initialization.
40  */
41 static void __init
42 prom_sortmemlist(struct linux_mlist_v0 *thislist)
43 {
44         int swapi = 0;
45         int i, mitr, tmpsize;
46         char *tmpaddr;
47         char *lowest;
48
49         for(i=0; thislist[i].theres_more; i++) {
50                 lowest = thislist[i].start_adr;
51                 for(mitr = i+1; thislist[mitr-1].theres_more; mitr++)
52                         if(thislist[mitr].start_adr < lowest) {
53                                 lowest = thislist[mitr].start_adr;
54                                 swapi = mitr;
55                         }
56                 if(lowest == thislist[i].start_adr) continue;
57                 tmpaddr = thislist[swapi].start_adr;
58                 tmpsize = thislist[swapi].num_bytes;
59                 for(mitr = swapi; mitr > i; mitr--) {
60                         thislist[mitr].start_adr = thislist[mitr-1].start_adr;
61                         thislist[mitr].num_bytes = thislist[mitr-1].num_bytes;
62                 }
63                 thislist[i].start_adr = tmpaddr;
64                 thislist[i].num_bytes = tmpsize;
65         }
66
67         return;
68 }
69
70 /* Initialize the memory lists based upon the prom version. */
71 void __init prom_meminit(void)
72 {
73         int node = 0;
74         unsigned int iter, num_regs;
75         struct linux_mlist_v0 *mptr;  /* ptr for traversal */
76
77         switch(prom_vers) {
78         case PROM_V0:
79                 /* Nice, kind of easier to do in this case. */
80                 /* First, the total physical descriptors. */
81                 for(mptr = (*(romvec->pv_v0mem.v0_totphys)), iter=0;
82                     mptr; mptr=mptr->theres_more, iter++) {
83                         prom_phys_total[iter].start_adr = mptr->start_adr;
84                         prom_phys_total[iter].num_bytes = mptr->num_bytes;
85                         prom_phys_total[iter].theres_more = &prom_phys_total[iter+1];
86                 }
87                 prom_phys_total[iter-1].theres_more = NULL;
88                 /* Second, the total prom taken descriptors. */
89                 for(mptr = (*(romvec->pv_v0mem.v0_prommap)), iter=0;
90                     mptr; mptr=mptr->theres_more, iter++) {
91                         prom_prom_taken[iter].start_adr = mptr->start_adr;
92                         prom_prom_taken[iter].num_bytes = mptr->num_bytes;
93                         prom_prom_taken[iter].theres_more = &prom_prom_taken[iter+1];
94                 }
95                 prom_prom_taken[iter-1].theres_more = NULL;
96                 /* Last, the available physical descriptors. */
97                 for(mptr = (*(romvec->pv_v0mem.v0_available)), iter=0;
98                     mptr; mptr=mptr->theres_more, iter++) {
99                         prom_phys_avail[iter].start_adr = mptr->start_adr;
100                         prom_phys_avail[iter].num_bytes = mptr->num_bytes;
101                         prom_phys_avail[iter].theres_more = &prom_phys_avail[iter+1];
102                 }
103                 prom_phys_avail[iter-1].theres_more = NULL;
104                 /* Sort all the lists. */
105                 prom_sortmemlist(prom_phys_total);
106                 prom_sortmemlist(prom_prom_taken);
107                 prom_sortmemlist(prom_phys_avail);
108                 break;
109         case PROM_V2:
110         case PROM_V3:
111                 /* Grrr, have to traverse the prom device tree ;( */
112                 node = prom_getchild(prom_root_node);
113                 node = prom_searchsiblings(node, "memory");
114                 num_regs = prom_getproperty(node, "available",
115                                             (char *) prom_reg_memlist,
116                                             sizeof(prom_reg_memlist));
117                 num_regs = (num_regs/sizeof(struct linux_prom_registers));
118                 for(iter=0; iter<num_regs; iter++) {
119                         prom_phys_avail[iter].start_adr =
120                                 (char *) prom_reg_memlist[iter].phys_addr;
121                         prom_phys_avail[iter].num_bytes =
122                                 (unsigned long) prom_reg_memlist[iter].reg_size;
123                         prom_phys_avail[iter].theres_more =
124                                 &prom_phys_avail[iter+1];
125                 }
126                 prom_phys_avail[iter-1].theres_more = NULL;
127
128                 num_regs = prom_getproperty(node, "reg",
129                                             (char *) prom_reg_memlist,
130                                             sizeof(prom_reg_memlist));
131                 num_regs = (num_regs/sizeof(struct linux_prom_registers));
132                 for(iter=0; iter<num_regs; iter++) {
133                         prom_phys_total[iter].start_adr =
134                                 (char *) prom_reg_memlist[iter].phys_addr;
135                         prom_phys_total[iter].num_bytes =
136                                 (unsigned long) prom_reg_memlist[iter].reg_size;
137                         prom_phys_total[iter].theres_more =
138                                 &prom_phys_total[iter+1];
139                 }
140                 prom_phys_total[iter-1].theres_more = NULL;
141
142                 node = prom_getchild(prom_root_node);
143                 node = prom_searchsiblings(node, "virtual-memory");
144                 num_regs = prom_getproperty(node, "available",
145                                             (char *) prom_reg_memlist,
146                                             sizeof(prom_reg_memlist));
147                 num_regs = (num_regs/sizeof(struct linux_prom_registers));
148
149                 /* Convert available virtual areas to taken virtual
150                  * areas.  First sort, then convert.
151                  */
152                 for(iter=0; iter<num_regs; iter++) {
153                         prom_prom_taken[iter].start_adr =
154                                 (char *) prom_reg_memlist[iter].phys_addr;
155                         prom_prom_taken[iter].num_bytes =
156                                 (unsigned long) prom_reg_memlist[iter].reg_size;
157                         prom_prom_taken[iter].theres_more =
158                                 &prom_prom_taken[iter+1];
159                 }
160                 prom_prom_taken[iter-1].theres_more = NULL;
161
162                 prom_sortmemlist(prom_prom_taken);
163
164                 /* Finally, convert. */
165                 for(iter=0; iter<num_regs; iter++) {
166                         prom_prom_taken[iter].start_adr =
167                                 prom_prom_taken[iter].start_adr +
168                                         prom_prom_taken[iter].num_bytes;
169                         prom_prom_taken[iter].num_bytes =
170                                 prom_prom_taken[iter+1].start_adr -
171                                         prom_prom_taken[iter].start_adr;
172                 }
173                 prom_prom_taken[iter-1].num_bytes =
174                         0xffffffff - (unsigned long) prom_prom_taken[iter-1].start_adr;
175
176                 /* Sort the other two lists. */
177                 prom_sortmemlist(prom_phys_total);
178                 prom_sortmemlist(prom_phys_avail);
179                 break;
180
181         case PROM_SUN4:
182 #ifdef CONFIG_SUN4      
183                 /* how simple :) */
184                 prom_phys_total[0].start_adr = NULL;
185                 prom_phys_total[0].num_bytes = *(sun4_romvec->memorysize);
186                 prom_phys_total[0].theres_more = NULL;
187                 prom_prom_taken[0].start_adr = NULL; 
188                 prom_prom_taken[0].num_bytes = 0x0;
189                 prom_prom_taken[0].theres_more = NULL;
190                 prom_phys_avail[0].start_adr = NULL;
191                 prom_phys_avail[0].num_bytes = *(sun4_romvec->memoryavail);
192                 prom_phys_avail[0].theres_more = NULL;
193 #endif
194                 break;
195
196         default:
197                 break;
198         };
199
200         /* Link all the lists into the top-level descriptor. */
201         prom_memlist.v0_totphys=&prom_ptot_ptr;
202         prom_memlist.v0_prommap=&prom_ptak_ptr;
203         prom_memlist.v0_available=&prom_pavl_ptr;
204
205         return;
206 }
207
208 /* This returns a pointer to our libraries internal v0 format
209  * memory descriptor.
210  */
211 struct linux_mem_v0 *
212 prom_meminfo(void)
213 {
214         return &prom_memlist;
215 }