Home | History | Annotate | Line # | Download | only in obs405
      1 /*	$NetBSD: obs600_machdep.c,v 1.17 2022/01/15 10:55:06 msaitoh Exp $	*/
      2 /*	Original: md_machdep.c,v 1.3 2005/01/24 18:47:37 shige Exp $	*/
      3 
      4 /*
      5  * Copyright 2001, 2002 Wasabi Systems, Inc.
      6  * All rights reserved.
      7  *
      8  * Written by Eduardo Horvath and Simon Burge for Wasabi Systems, Inc.
      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  * 3. All advertising materials mentioning features or use of this software
     19  *    must display the following acknowledgement:
     20  *      This product includes software developed for the NetBSD Project by
     21  *      Wasabi Systems, Inc.
     22  * 4. The name of Wasabi Systems, Inc. may not be used to endorse
     23  *    or promote products derived from this software without specific prior
     24  *    written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
     27  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL WASABI SYSTEMS, INC
     30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  * POSSIBILITY OF SUCH DAMAGE.
     37  */
     38 
     39 /*
     40  * Copyright (C) 1995, 1996 Wolfgang Solfrank.
     41  * Copyright (C) 1995, 1996 TooLs GmbH.
     42  * All rights reserved.
     43  *
     44  * Redistribution and use in source and binary forms, with or without
     45  * modification, are permitted provided that the following conditions
     46  * are met:
     47  * 1. Redistributions of source code must retain the above copyright
     48  *    notice, this list of conditions and the following disclaimer.
     49  * 2. Redistributions in binary form must reproduce the above copyright
     50  *    notice, this list of conditions and the following disclaimer in the
     51  *    documentation and/or other materials provided with the distribution.
     52  * 3. All advertising materials mentioning features or use of this software
     53  *    must display the following acknowledgement:
     54  *	This product includes software developed by TooLs GmbH.
     55  * 4. The name of TooLs GmbH may not be used to endorse or promote products
     56  *    derived from this software without specific prior written permission.
     57  *
     58  * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
     59  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     60  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     61  * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
     62  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
     63  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
     64  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
     65  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
     66  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
     67  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     68  */
     69 
     70 #include <sys/cdefs.h>
     71 __KERNEL_RCSID(0, "$NetBSD: obs600_machdep.c,v 1.17 2022/01/15 10:55:06 msaitoh Exp $");
     72 
     73 #include "opt_ddb.h"
     74 
     75 #include <sys/param.h>
     76 #include <sys/bus.h>
     77 #include <sys/device.h>
     78 #include <sys/errno.h>
     79 #include <sys/kernel.h>
     80 #include <sys/module.h>
     81 #include <sys/reboot.h>
     82 #include <sys/systm.h>
     83 
     84 #include <machine/obs600.h>
     85 
     86 #include <powerpc/spr.h>
     87 #include <powerpc/ibm4xx/spr.h>
     88 
     89 #include <powerpc/ibm4xx/amcc405ex.h>
     90 #include <powerpc/ibm4xx/cpu.h>
     91 #include <powerpc/ibm4xx/dcr4xx.h>
     92 #include <powerpc/ibm4xx/tlb.h>
     93 
     94 #include <powerpc/ibm4xx/dev/gpiicreg.h>
     95 #include <powerpc/ibm4xx/dev/opbvar.h>
     96 
     97 #include "com.h"
     98 #if (NCOM > 0)
     99 #include <sys/termios.h>
    100 #include <powerpc/ibm4xx/dev/comopbvar.h>
    101 #include <dev/ic/comreg.h>
    102 
    103 #ifndef CONADDR
    104 #define CONADDR		AMCC405EX_UART0_BASE
    105 #endif
    106 #ifndef CONSPEED
    107 #define CONSPEED	B115200
    108 #endif
    109 #ifndef CONMODE
    110 			/* 8N1 */
    111 #define CONMODE		((TTYDEF_CFLAG & ~(CSIZE | CSTOPB | PARENB)) | CS8)
    112 #endif
    113 #endif	/* NCOM */
    114 
    115 /*
    116  * XXXX:
    117  * It is very troublesome though we can calculate from various registers. X-<
    118  */
    119 #define OBS600_CPU_FREQ	(600 * 1000 * 1000)
    120 #define OBS600_MEM_SIZE	(1 * 1024 * 1024 * 1024)
    121 
    122 #define	TLB_PG_SIZE 	(16 * 1024 * 1024)
    123 
    124 void initppc(vaddr_t, vaddr_t, int, char *[], char *);
    125 static int read_eeprom(int, char *);
    126 
    127 
    128 void
    129 initppc(vaddr_t startkernel, vaddr_t endkernel, int argc, char *argv[],
    130 	char *argstr)
    131 {
    132 	vaddr_t va;
    133 	u_int memsize;
    134 
    135 	memsize = OBS600_MEM_SIZE;
    136 
    137 	/* Linear map kernel memory */
    138 	for (va = 0; va < endkernel; va += TLB_PG_SIZE)
    139 		ppc4xx_tlb_reserve(va, va, TLB_PG_SIZE, TLB_EX);
    140 
    141 	/*
    142 	 * Map console and I2C after RAM. (see pmap_tlbmiss())
    143 	 * All peripherals mapped on a page.
    144 	 */
    145 	ppc4xx_tlb_reserve(AMCC405EX_OPB_BASE, roundup(memsize, TLB_PG_SIZE),
    146 	    TLB_PG_SIZE, TLB_I | TLB_G);
    147 
    148 	/* Initialize AMCC 405EX CPU */
    149 	ibm40x_memsize_init(memsize, startkernel);
    150 	ibm4xx_init(startkernel, endkernel, pic_ext_intr);
    151 
    152 #ifdef DDB
    153 	if (boothowto & RB_KDB)
    154 		Debugger();
    155 #endif
    156 }
    157 
    158 void
    159 consinit(void)
    160 {
    161 
    162 #if (NCOM > 0)
    163 	com_opb_cnattach(OBS600_COM_FREQ, CONADDR, CONSPEED, CONMODE);
    164 #endif /* NCOM */
    165 }
    166 
    167 /*
    168  * Machine dependent startup code.
    169  */
    170 void
    171 cpu_startup(void)
    172 {
    173 	prop_number_t pn;
    174 	prop_data_t pd;
    175 	u_char *macaddr, *macaddr1;
    176 	static u_char buf[16];	/* MAC address x2 buffer */
    177 
    178 	/*
    179 	 * cpu common startup
    180 	 */
    181 	ibm4xx_cpu_startup("OpenBlockS600 AMCC PowerPC 405EX Board");
    182 
    183 	/*
    184 	 * Set up the board properties database.
    185 	 */
    186 	board_info_init();
    187 
    188 	pn = prop_number_create_integer(OBS600_CPU_FREQ);
    189 	KASSERT(pn != NULL);
    190 	if (prop_dictionary_set(board_properties, "processor-frequency", pn) ==
    191 	    false)
    192 		panic("setting processor-frequency");
    193 	prop_object_release(pn);
    194 
    195 	pn = prop_number_create_integer(OBS600_MEM_SIZE);
    196 	KASSERT(pn != NULL);
    197 	if (prop_dictionary_set(board_properties, "mem-size", pn) == false)
    198 		panic("setting mem-size");
    199 	prop_object_release(pn);
    200 
    201 	calc_delayconst(); /* required by read_eeprom() */
    202 
    203 #define ETHER_ADDR_LEN	6
    204 
    205 	read_eeprom(sizeof(buf), buf);
    206 	macaddr = &buf[0];
    207 	macaddr1 = &buf[8];
    208 
    209 	pd = prop_data_create_data_nocopy(macaddr, ETHER_ADDR_LEN);
    210 	KASSERT(pd != NULL);
    211 	if (prop_dictionary_set(board_properties, "emac0-mac-addr", pd) ==
    212 	    false)
    213 		panic("setting emac0-mac-addr");
    214 	prop_object_release(pd);
    215 	pd = prop_data_create_data_nocopy(macaddr1, ETHER_ADDR_LEN);
    216 	KASSERT(pd != NULL);
    217 	if (prop_dictionary_set(board_properties, "emac1-mac-addr", pd) ==
    218 	    false)
    219 		panic("setting emac1-mac-addr");
    220 	prop_object_release(pd);
    221 
    222 	/* emac0 connects to phy 2 and emac1 to phy 3 via RGMII. */
    223 	pn = prop_number_create_integer(2);
    224 	KASSERT(pn != NULL);
    225 	if (prop_dictionary_set(board_properties, "emac0-mii-phy", pn) == false)
    226 		panic("setting emac0-mii-phy");
    227 	prop_object_release(pn);
    228 	pn = prop_number_create_integer(3);
    229 	KASSERT(pn != NULL);
    230 	if (prop_dictionary_set(board_properties, "emac1-mii-phy", pn) == false)
    231 		panic("setting emac1-mii-phy");
    232 	prop_object_release(pn);
    233 
    234 	/*
    235 	 * Now that we have VM, malloc()s are OK in bus_space.
    236 	 */
    237 	bus_space_mallocok();
    238 
    239 	/*
    240 	 * no fake mapiodev
    241 	 */
    242 	fake_mapiodev = 0;
    243 
    244 	splraise(-1);
    245 }
    246 
    247 /*
    248  * Read EEPROM via I2C.  We don't use bus_space(9) here.  This is MD-part and,
    249  * don't support bus_space_unmap() to a space on reserved space? X-<
    250  *
    251  * XXXX: Also this function assume already initialized for I2C...
    252  */
    253 static int
    254 read_eeprom(int len, char *buf)
    255 {
    256 	volatile uint8_t *iic0;
    257 #define IIC0_READ(r)		(*(iic0 + (r)))
    258 #define IIC0_WRITE(r, v)	(*(iic0 + (r)) = (v))
    259 	uint8_t sts;
    260 	int cnt, i = 0;
    261 
    262 #define I2C_EEPROM_ADDR	0x52
    263 
    264 	if ((iic0 = ppc4xx_tlb_mapiodev(AMCC405EX_IIC0_BASE, IIC_NREG)) == NULL)
    265 		return ENOMEM; /* ??? */
    266 
    267 	/* Clear Stop Complete Bit */
    268 	IIC0_WRITE(IIC_STS, IIC_STS_SCMP);
    269 	/* Check init */
    270 	do {
    271 		/* Get status */
    272 		sts = IIC0_READ(IIC_STS);
    273 	} while ((sts & IIC_STS_PT));
    274 
    275 	IIC0_WRITE(IIC_MDCNTL,
    276 	    IIC0_READ(IIC_MDCNTL) | IIC_MDCNTL_FMDB | IIC_MDCNTL_FSDB);
    277 
    278 	/* 7-bit addressing */
    279 	IIC0_WRITE(IIC_HMADR, 0);
    280 	IIC0_WRITE(IIC_LMADR, I2C_EEPROM_ADDR << 1);
    281 
    282 	IIC0_WRITE(IIC_MDBUF, 0);
    283 	IIC0_WRITE(IIC_CNTL, IIC_CNTL_PT);
    284 	do {
    285 		/* Get status */
    286 		sts = IIC0_READ(IIC_STS);
    287 	} while ((sts & IIC_STS_PT) && !(sts & IIC_STS_ERR));
    288 
    289 	cnt = 0;
    290 	while (cnt < len) {
    291 		/* always read 4byte */
    292 		IIC0_WRITE(IIC_CNTL,
    293 		    IIC_CNTL_PT				|
    294 		    IIC_CNTL_RW				|
    295 		    ((cnt == 0) ? IIC_CNTL_RPST : 0)	|
    296 		    IIC_CNTL_TCT);
    297 		do {
    298 			/* Get status */
    299 			sts = IIC0_READ(IIC_STS);
    300 		} while ((sts & IIC_STS_PT) && !(sts & IIC_STS_ERR));
    301 
    302 		if ((sts & IIC_STS_PT) || (sts & IIC_STS_ERR))
    303 			break;
    304 		if (sts & IIC_STS_MDBS) {
    305 			delay(1);
    306 			/* read 4byte */
    307 			for (i = 0; i < 4 && cnt < len; i++, cnt++)
    308 				buf[cnt] = IIC0_READ(IIC_MDBUF);
    309 		}
    310 	}
    311 	for ( ; i < 4; i++)
    312 		(void) IIC0_READ(IIC_MDBUF);
    313 
    314 	return (cnt == len) ? 0 : EINVAL;
    315 }
    316