Merge branch '83xx' into for_paulus
[linux-2.6] / arch / mips / tx4927 / common / tx4927_setup.c
1 /*
2  * Author: MontaVista Software, Inc.
3  *         source@mvista.com
4  *
5  * Copyright 2001-2002 MontaVista Software Inc.
6  *
7  *  This program is free software; you can redistribute it and/or modify it
8  *  under the terms of the GNU General Public License as published by the
9  *  Free Software Foundation; either version 2 of the License, or (at your
10  *  option) any later version.
11  *
12  *  THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
13  *  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
14  *  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
15  *  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
16  *  INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
17  *  BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
18  *  OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
19  *  ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
20  *  TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
21  *  USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
22  *
23  *  You should have received a copy of the GNU General Public License along
24  *  with this program; if not, write to the Free Software Foundation, Inc.,
25  *  675 Mass Ave, Cambridge, MA 02139, USA.
26  */
27 #include <linux/errno.h>
28 #include <linux/init.h>
29 #include <linux/kernel_stat.h>
30 #include <linux/module.h>
31 #include <linux/signal.h>
32 #include <linux/sched.h>
33 #include <linux/types.h>
34 #include <linux/interrupt.h>
35 #include <linux/ioport.h>
36 #include <linux/timex.h>
37 #include <linux/slab.h>
38 #include <linux/random.h>
39 #include <linux/irq.h>
40 #include <linux/bitops.h>
41 #include <asm/bootinfo.h>
42 #include <asm/io.h>
43 #include <asm/irq.h>
44 #include <asm/mipsregs.h>
45 #include <asm/system.h>
46 #include <asm/time.h>
47 #include <asm/tx4927/tx4927.h>
48
49
50 #undef DEBUG
51
52 void __init tx4927_time_init(void);
53 void __init tx4927_timer_setup(struct irqaction *irq);
54 void dump_cp0(char *key);
55
56
57 void (*__wbflush) (void);
58
59 static void tx4927_write_buffer_flush(void)
60 {
61         __asm__ __volatile__
62             ("sync\n\t" "nop\n\t" "loop: bc0f loop\n\t" "nop\n\t");
63 }
64
65
66 void __init plat_mem_setup(void)
67 {
68         board_time_init = tx4927_time_init;
69         board_timer_setup = tx4927_timer_setup;
70         __wbflush = tx4927_write_buffer_flush;
71
72 #ifdef CONFIG_TOSHIBA_RBTX4927
73         {
74                 extern void toshiba_rbtx4927_setup(void);
75                 toshiba_rbtx4927_setup();
76         }
77 #endif
78 }
79
80 void __init tx4927_time_init(void)
81 {
82
83 #ifdef CONFIG_TOSHIBA_RBTX4927
84         {
85                 extern void toshiba_rbtx4927_time_init(void);
86                 toshiba_rbtx4927_time_init();
87         }
88 #endif
89
90         return;
91 }
92
93
94 void __init tx4927_timer_setup(struct irqaction *irq)
95 {
96         u32 count;
97         u32 c1;
98         u32 c2;
99
100         setup_irq(TX4927_IRQ_CPU_TIMER, irq);
101
102         /* to generate the first timer interrupt */
103         c1 = read_c0_count();
104         count = c1 + (mips_hpt_frequency / HZ);
105         write_c0_compare(count);
106         c2 = read_c0_count();
107
108 #ifdef CONFIG_TOSHIBA_RBTX4927
109         {
110                 extern void toshiba_rbtx4927_timer_setup(struct irqaction
111                                                          *irq);
112                 toshiba_rbtx4927_timer_setup(irq);
113         }
114 #endif
115
116         return;
117 }
118
119
120 #ifdef DEBUG
121 void print_cp0(char *key, int num, char *name, u32 val)
122 {
123         printk("%s cp0:%02d:%s=0x%08x\n", key, num, name, val);
124         return;
125 }
126
127 indent: Standard input:25: Error:Unexpected end of file
128
129 void
130 dump_cp0(char *key)
131 {
132         if (key == NULL)
133                 key = "";
134
135         print_cp0(key, 0, "INDEX   ", read_c0_index());
136         print_cp0(key, 2, "ENTRYLO1", read_c0_entrylo0());
137         print_cp0(key, 3, "ENTRYLO2", read_c0_entrylo1());
138         print_cp0(key, 4, "CONTEXT ", read_c0_context());
139         print_cp0(key, 5, "PAGEMASK", read_c0_pagemask());
140         print_cp0(key, 6, "WIRED   ", read_c0_wired());
141         //print_cp0(key, 8, "BADVADDR",  read_c0_badvaddr());
142         print_cp0(key, 9, "COUNT   ", read_c0_count());
143         print_cp0(key, 10, "ENTRYHI ", read_c0_entryhi());
144         print_cp0(key, 11, "COMPARE ", read_c0_compare());
145         print_cp0(key, 12, "STATUS  ", read_c0_status());
146         print_cp0(key, 13, "CAUSE   ", read_c0_cause() & 0xffff87ff);
147         print_cp0(key, 16, "CONFIG  ", read_c0_config());
148         return;
149 }
150
151 void print_pic(char *key, u32 reg, char *name)
152 {
153         printk("%s pic:0x%08x:%s=0x%08x\n", key, reg, name,
154                TX4927_RD(reg));
155         return;
156 }
157
158
159 void dump_pic(char *key)
160 {
161         if (key == NULL)
162                 key = "";
163
164         print_pic(key, 0xff1ff600, "IRDEN    ");
165         print_pic(key, 0xff1ff604, "IRDM0    ");
166         print_pic(key, 0xff1ff608, "IRDM1    ");
167
168         print_pic(key, 0xff1ff610, "IRLVL0   ");
169         print_pic(key, 0xff1ff614, "IRLVL1   ");
170         print_pic(key, 0xff1ff618, "IRLVL2   ");
171         print_pic(key, 0xff1ff61c, "IRLVL3   ");
172         print_pic(key, 0xff1ff620, "IRLVL4   ");
173         print_pic(key, 0xff1ff624, "IRLVL5   ");
174         print_pic(key, 0xff1ff628, "IRLVL6   ");
175         print_pic(key, 0xff1ff62c, "IRLVL7   ");
176
177         print_pic(key, 0xff1ff640, "IRMSK    ");
178         print_pic(key, 0xff1ff660, "IREDC    ");
179         print_pic(key, 0xff1ff680, "IRPND    ");
180         print_pic(key, 0xff1ff6a0, "IRCS     ");
181
182         print_pic(key, 0xff1ff514, "IRFLAG1  ");        /* don't read IRLAG0 -- it hangs system */
183
184         print_pic(key, 0xff1ff518, "IRPOL    ");
185         print_pic(key, 0xff1ff51c, "IRRCNT   ");
186         print_pic(key, 0xff1ff520, "IRMASKINT");
187         print_pic(key, 0xff1ff524, "IRMASKEXT");
188
189         return;
190 }
191
192
193 void print_addr(char *hdr, char *key, u32 addr)
194 {
195         printk("%s %s:0x%08x=0x%08x\n", hdr, key, addr, TX4927_RD(addr));
196         return;
197 }
198
199
200 void dump_180(char *key)
201 {
202         u32 i;
203
204         for (i = 0x80000180; i < 0x80000180 + 0x80; i += 4) {
205                 print_addr("180", key, i);
206         }
207         return;
208 }
209
210
211 void dump_eh0(char *key)
212 {
213         int i;
214         extern unsigned long exception_handlers[];
215
216         for (i = (int) exception_handlers;
217              i < (int) (exception_handlers + 20); i += 4) {
218                 print_addr("eh0", key, i);
219         }
220
221         return;
222 }
223
224 void pk0(void)
225 {
226         volatile u32 val;
227
228         __asm__ __volatile__("ori %0, $26, 0":"=r"(val)
229             );
230         printk("k0=[0x%08x]\n", val);
231 }
232 #endif