Home | History | Annotate | Line # | Download | only in tx
tx39.c revision 1.43 
      1 /*	$NetBSD: tx39.c,v 1.43 2011/02/26 12:07:45 tsutsui Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 1999, 2000 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by UCHIYAMA Yasushi.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 __KERNEL_RCSID(0, "$NetBSD: tx39.c,v 1.43 2011/02/26 12:07:45 tsutsui Exp $");
     34 
     35 #include "opt_vr41xx.h"
     36 #include "opt_tx39xx.h"
     37 #include "m38813c.h"
     38 #include "tc5165buf.h"
     39 
     40 #include <sys/param.h>
     41 #include <sys/systm.h>
     42 #include <sys/intr.h>
     43 
     44 #include <uvm/uvm_extern.h>
     45 
     46 #include <mips/cache.h>
     47 #include <mips/locore.h>
     48 
     49 #include <machine/bootinfo.h> /* bootinfo */
     50 #include <machine/sysconf.h>  /* platform */
     51 
     52 #include <machine/platid.h>
     53 #include <machine/platid_mask.h>
     54 
     55 #include <machine/bus.h>
     56 
     57 #include <hpcmips/tx/tx39biureg.h>
     58 #include <hpcmips/tx/tx39reg.h>
     59 #include <hpcmips/tx/tx39var.h>
     60 #ifdef TX391X
     61 #include <hpcmips/tx/tx3912videovar.h>
     62 #endif
     63 
     64 #include <sys/termios.h>
     65 #include <sys/ttydefaults.h>
     66 #include <hpcmips/tx/tx39uartvar.h>
     67 #ifndef CONSPEED
     68 #define CONSPEED TTYDEF_SPEED
     69 #endif
     70 
     71 /* console keyboard */
     72 #if NM38813C > 0
     73 #include <hpcmips/dev/m38813cvar.h>
     74 #endif
     75 #if NTC5165BUF > 0
     76 #include <hpcmips/dev/tc5165bufvar.h>
     77 #endif
     78 
     79 struct tx_chipset_tag tx_chipset;
     80 
     81 void	tx_init(void);
     82 #if defined(VR41XX) && defined(TX39XX)
     83 #define	TX_INTR	tx_intr
     84 #else
     85 #define	TX_INTR	cpu_intr	/* locore_mips3 directly call this */
     86 #endif
     87 
     88 extern void TX_INTR(int, vaddr_t, uint32_t);
     89 
     90 void	tx39clock_cpuspeed(int *, int *);
     91 
     92 /* TX39-specific initialization vector */
     93 void	tx_cons_init(void);
     94 void    tx_fb_init(void **);
     95 void    tx_mem_init(paddr_t);
     96 void	tx_find_dram(paddr_t, paddr_t);
     97 void	tx_reboot(int, char *);
     98 
     99 void
    100 tx_init(void)
    101 {
    102 	tx_chipset_tag_t tc;
    103 	int model, rev;
    104 	int cpuclock;
    105 
    106 	tc = tx_conf_get_tag();
    107 	/*
    108 	 * Platform Specific Function Hooks
    109 	 */
    110 	platform.cpu_intr	= TX_INTR;
    111 	platform.cpu_idle	= NULL; /* not implemented yet */
    112 	platform.cons_init	= tx_cons_init;
    113 	platform.fb_init	= tx_fb_init;
    114 	platform.mem_init	= tx_mem_init;
    115 	platform.reboot		= tx_reboot;
    116 
    117 
    118 	model = MIPS_PRID_REV(mips_options.mips_cpu_id);
    119 
    120 	switch (model) {
    121 	default:
    122 		/* Unknown TOSHIBA TX39-series */
    123 		sprintf(hpcmips_cpuname,
    124 		    "Unknown TOSHIBA TX39-series %x", model);
    125 		break;
    126 	case TMPR3912:
    127 		tx39clock_cpuspeed(&cpuclock, &cpuspeed);
    128 
    129 		sprintf(hpcmips_cpuname, "TOSHIBA TMPR3912 %d.%02d MHz",
    130 		    cpuclock / 1000000, (cpuclock % 1000000) / 10000);
    131 		tc->tc_chipset = __TX391X;
    132 		break;
    133 	case TMPR3922:
    134 		tx39clock_cpuspeed(&cpuclock, &cpuspeed);
    135 		rev = tx_conf_read(tc, TX3922_REVISION_REG);
    136 
    137 		sprintf(hpcmips_cpuname, "TOSHIBA TMPR3922 rev. %x.%x "
    138 		    "%d.%02d MHz", (rev >> 4) & 0xf, rev & 0xf,
    139 		    cpuclock / 1000000, (cpuclock % 1000000) / 10000);
    140 		tc->tc_chipset = __TX392X;
    141 		break;
    142 	}
    143 }
    144 
    145 void
    146 tx_fb_init(void **kernend)
    147 {
    148 #ifdef TX391X
    149 	paddr_t fb_end;
    150 
    151 	fb_end = MIPS_KSEG0_TO_PHYS(mem_clusters[0].start +
    152 	    mem_clusters[0].size - 1);
    153 	tx3912video_init(MIPS_KSEG0_TO_PHYS(*kernend), &fb_end);
    154 
    155 	/* Skip V-RAM area */
    156 	*kernend = (void *)MIPS_PHYS_TO_KSEG0(fb_end);
    157 #endif /* TX391X */
    158 #ifdef TX392X
    159 	/*
    160 	 *  Plum V-RAM isn't accessible until pmap_bootstrap,
    161 	 * at this time, frame buffer device is disabled.
    162 	 */
    163 	bootinfo->fb_addr = 0;
    164 #endif /* TX392X */
    165 }
    166 
    167 void
    168 tx_mem_init(paddr_t kernend)
    169 {
    170 
    171 	mem_clusters[0].start = 0;
    172 	mem_clusters[0].size = kernend;
    173 	mem_cluster_cnt = 1;
    174 	/* search DRAM bank 0 */
    175 	tx_find_dram(kernend, 0x02000000);
    176 
    177 	/* search DRAM bank 1 */
    178 	tx_find_dram(0x02000000, 0x04000000);
    179 }
    180 
    181 void
    182 tx_find_dram(paddr_t start, paddr_t end)
    183 {
    184 	char *page, *startaddr, *endaddr;
    185 	uint32_t magic0, magic1;
    186 #define MAGIC0		(*(volatile uint32_t *)(page + 0))
    187 #define MAGIC1		(*(volatile uint32_t *)(page + 4))
    188 
    189 	startaddr = (char *)MIPS_PHYS_TO_KSEG1(start);
    190 	endaddr = (char *)MIPS_PHYS_TO_KSEG1(end);
    191 
    192 	page = startaddr;
    193 	if (badaddr(page, 4))
    194 		return;
    195 
    196 	do {
    197 		magic0 = random();
    198 		magic1 = random();
    199 	} while (MAGIC0 == magic0 || MAGIC0 == magic1);
    200 
    201 	MAGIC0 = magic0;
    202 	MAGIC1 = magic1;
    203 	wbflush();
    204 
    205 	if (MAGIC0 != magic0 || MAGIC1 != magic1)
    206 		return;
    207 
    208 	for (page += PAGE_SIZE; page < endaddr; page += PAGE_SIZE) {
    209 		if (badaddr(page, 4))
    210 			return;
    211 		if (MAGIC0 == magic0 &&
    212 		    MAGIC1 == magic1) {
    213 			goto memend_found;
    214 		}
    215 	}
    216 
    217 	/* check for 32MByte memory */
    218 	page -= PAGE_SIZE;
    219 	MAGIC0 = magic0;
    220 	MAGIC1 = magic1;
    221 	wbflush();
    222 	if (MAGIC0 != magic0 || MAGIC1 != magic1)
    223 		return; /* no memory in this bank */
    224 
    225  memend_found:
    226 	mem_clusters[mem_cluster_cnt].start = start;
    227 	mem_clusters[mem_cluster_cnt].size = page - startaddr;
    228 
    229 	/* skip kernel area */
    230 	if (mem_cluster_cnt == 1)
    231 		mem_clusters[mem_cluster_cnt].size -= start;
    232 
    233 	mem_cluster_cnt++;
    234 #undef MAGIC0
    235 #undef MAGIC1
    236 }
    237 
    238 void
    239 tx_reboot(int howto, char *bootstr)
    240 {
    241 
    242 	goto *(uint32_t *)MIPS_RESET_EXC_VEC;
    243 }
    244 
    245 void
    246 tx_cons_init(void)
    247 {
    248 	int slot;
    249 #define CONSPLATIDMATCH(p)						\
    250 	platid_match(&platid, &platid_mask_MACH_##p)
    251 
    252 #ifdef SERIALCONSSLOT
    253 	slot = SERIALCONSSLOT;
    254 #else
    255 	slot = TX39_UARTA;
    256 #endif
    257 	if (bootinfo->bi_cnuse & BI_CNUSE_SERIAL) {
    258 		if(txcom_cnattach(slot, CONSPEED,
    259 		    (TTYDEF_CFLAG & ~(CSIZE | PARENB)) | CS8)) {
    260 			panic("tx_cons_init: can't attach serial console.");
    261 		}
    262 	} else {
    263 #if NM38813C > 0
    264 		if(CONSPLATIDMATCH(VICTOR_INTERLINK) &&
    265 		    m38813c_cnattach(TX39_SYSADDR_CARD1)) {
    266 			goto panic;
    267 		}
    268 #endif
    269 #if NTC5165BUF > 0
    270 		if(CONSPLATIDMATCH(COMPAQ_C) &&
    271 		    tc5165buf_cnattach(TX39_SYSADDR_CS3)) {
    272 			goto panic;
    273 		}
    274 
    275 		if(CONSPLATIDMATCH(SHARP_TELIOS) &&
    276 		    tc5165buf_cnattach(TX39_SYSADDR_CS1)) {
    277 			goto panic;
    278 		}
    279 
    280 		if(CONSPLATIDMATCH(SHARP_MOBILON) &&
    281 		    tc5165buf_cnattach(TX39_SYSADDR_MCS0)) {
    282 			goto panic;
    283 		}
    284 #endif
    285 	}
    286 
    287 	return;
    288  panic:
    289 	panic("tx_cons_init: can't init console");
    290 	/* NOTREACHED */
    291 }
    292 
    293 void
    294 tx_conf_register_intr(tx_chipset_tag_t t, void *intrt)
    295 {
    296 
    297 	KASSERT(t == &tx_chipset);
    298 	tx_chipset.tc_intrt = intrt;
    299 }
    300 
    301 void
    302 tx_conf_register_power(tx_chipset_tag_t t, void *powert)
    303 {
    304 
    305 	KASSERT(t == &tx_chipset);
    306 	tx_chipset.tc_powert = powert;
    307 }
    308 
    309 void
    310 tx_conf_register_clock(tx_chipset_tag_t t, void *clockt)
    311 {
    312 
    313 	KASSERT(t == &tx_chipset);
    314 	tx_chipset.tc_clockt = clockt;
    315 }
    316 
    317 void
    318 tx_conf_register_sound(tx_chipset_tag_t t, void *soundt)
    319 {
    320 
    321 	KASSERT(t == &tx_chipset);
    322 	tx_chipset.tc_soundt = soundt;
    323 }
    324 
    325 void
    326 tx_conf_register_video(tx_chipset_tag_t t, void *videot)
    327 {
    328 
    329 	KASSERT(t == &tx_chipset);
    330 	tx_chipset.tc_videot = videot;
    331 }
    332