Home | History | Annotate | Line # | Download | only in libsa
sun3.c revision 1.4.14.1
      1  1.4.14.1      kent /*	$NetBSD: sun3.c,v 1.4.14.1 2005/04/29 11:28:27 kent Exp $	*/
      2       1.1  fredette 
      3       1.1  fredette /*-
      4       1.1  fredette  * Copyright (c) 1998 The NetBSD Foundation, Inc.
      5       1.1  fredette  * All rights reserved.
      6       1.1  fredette  *
      7       1.1  fredette  * This code is derived from software contributed to The NetBSD Foundation
      8       1.1  fredette  * by Gordon W. Ross.
      9       1.1  fredette  *
     10       1.1  fredette  * Redistribution and use in source and binary forms, with or without
     11       1.1  fredette  * modification, are permitted provided that the following conditions
     12       1.1  fredette  * are met:
     13       1.1  fredette  * 1. Redistributions of source code must retain the above copyright
     14       1.1  fredette  *    notice, this list of conditions and the following disclaimer.
     15       1.1  fredette  * 2. Redistributions in binary form must reproduce the above copyright
     16       1.1  fredette  *    notice, this list of conditions and the following disclaimer in the
     17       1.1  fredette  *    documentation and/or other materials provided with the distribution.
     18       1.1  fredette  * 3. All advertising materials mentioning features or use of this software
     19       1.1  fredette  *    must display the following acknowledgement:
     20       1.1  fredette  *        This product includes software developed by the NetBSD
     21       1.1  fredette  *        Foundation, Inc. and its contributors.
     22       1.1  fredette  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23       1.1  fredette  *    contributors may be used to endorse or promote products derived
     24       1.1  fredette  *    from this software without specific prior written permission.
     25       1.1  fredette  *
     26       1.1  fredette  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27       1.1  fredette  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28       1.1  fredette  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29       1.1  fredette  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30       1.1  fredette  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31       1.1  fredette  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32       1.1  fredette  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33       1.1  fredette  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34       1.1  fredette  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35       1.1  fredette  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36       1.1  fredette  * POSSIBILITY OF SUCH DAMAGE.
     37       1.1  fredette  */
     38       1.1  fredette 
     39       1.1  fredette /*
     40       1.1  fredette  * Standalone functions specific to the Sun3.
     41       1.1  fredette  */
     42       1.1  fredette 
     43       1.1  fredette #define _SUN3_ XXX
     44       1.1  fredette 
     45       1.1  fredette /* Need to avoid conflicts on these: */
     46       1.1  fredette #define get_pte sun3_get_pte
     47       1.1  fredette #define set_pte sun3_set_pte
     48       1.1  fredette #define get_segmap sun3_get_segmap
     49       1.1  fredette #define set_segmap sun3_set_segmap
     50       1.3   nathanw 
     51       1.3   nathanw /*
     52       1.3   nathanw  * We need to get the sun3 NBSG definition, even if we're
     53       1.3   nathanw  * building this with a different sun68k target.
     54       1.3   nathanw  */
     55       1.3   nathanw #include <arch/sun3/include/param.h>
     56       1.1  fredette 
     57       1.1  fredette #include <sys/param.h>
     58       1.1  fredette #include <machine/idprom.h>
     59       1.1  fredette #include <machine/mon.h>
     60       1.1  fredette 
     61       1.1  fredette #include <arch/sun3/include/pte3.h>
     62       1.1  fredette #include <arch/sun3/sun3/control.h>
     63       1.1  fredette #include <arch/sun3/sun3/vme.h>
     64       1.1  fredette 
     65       1.1  fredette #include <stand.h>
     66       1.1  fredette 
     67       1.1  fredette #include "libsa.h"
     68       1.1  fredette #include "dvma.h"
     69       1.1  fredette #include "saio.h"	/* enum MAPTYPES */
     70       1.1  fredette 
     71       1.1  fredette #define OBIO_MASK 0xFFFFFF
     72       1.1  fredette 
     73  1.4.14.1      kent u_int	get_pte(vaddr_t);
     74  1.4.14.1      kent void	set_pte(vaddr_t, u_int);
     75  1.4.14.1      kent char *	dvma3_alloc(int);
     76  1.4.14.1      kent void	dvma3_free(char *, int);
     77  1.4.14.1      kent char *	dvma3_mapin(char *, int);
     78  1.4.14.1      kent void	dvma3_mapout(char *, int);
     79  1.4.14.1      kent char *	dev3_mapin(int, u_long, int);
     80       1.1  fredette 
     81       1.1  fredette struct mapinfo {
     82       1.1  fredette 	int maptype;
     83       1.1  fredette 	int pgtype;
     84       1.1  fredette 	u_int base;
     85       1.1  fredette 	u_int mask;
     86       1.1  fredette };
     87       1.1  fredette 
     88       1.1  fredette struct mapinfo
     89       1.1  fredette sun3_mapinfo[MAP__NTYPES] = {
     90       1.1  fredette 	/* On-board memory, I/O */
     91       1.1  fredette 	{ MAP_MAINMEM,   PGT_OBMEM,   0,          ~0 },
     92       1.1  fredette 	{ MAP_OBIO,      PGT_OBIO,    0,          OBIO_MASK },
     93       1.1  fredette 	/* Multibus adapter (A24,A16) */
     94       1.1  fredette 	{ MAP_MBMEM,     PGT_VME_D16, VME24_BASE, VME24_MASK },
     95       1.1  fredette 	{ MAP_MBIO,      PGT_VME_D16, VME16_BASE, VME16_MASK },
     96       1.1  fredette 	/* VME A16 */
     97       1.1  fredette 	{ MAP_VME16A16D, PGT_VME_D16, VME16_BASE, VME16_MASK },
     98       1.1  fredette 	{ MAP_VME16A32D, PGT_VME_D32, VME16_BASE, VME16_MASK },
     99       1.1  fredette 	/* VME A24 */
    100       1.1  fredette 	{ MAP_VME24A16D, PGT_VME_D16, VME24_BASE, VME24_MASK },
    101       1.1  fredette 	{ MAP_VME24A32D, PGT_VME_D32, VME24_BASE, VME24_MASK },
    102       1.1  fredette 	/* VME A32 */
    103       1.1  fredette 	{ MAP_VME32A16D, PGT_VME_D16, VME32_BASE, VME32_MASK },
    104       1.1  fredette 	{ MAP_VME32A32D, PGT_VME_D32, VME32_BASE, VME32_MASK },
    105       1.1  fredette };
    106       1.1  fredette 
    107       1.1  fredette /* The virtual address we will use for PROM device mappings. */
    108       1.1  fredette int sun3_devmap = SUN3_MONSHORTSEG;
    109       1.1  fredette 
    110       1.1  fredette char *
    111  1.4.14.1      kent dev3_mapin(int maptype, u_long physaddr, int length)
    112       1.1  fredette {
    113       1.1  fredette 	u_int i, pa, pte, pgva, va;
    114       1.1  fredette 
    115       1.1  fredette 	if ((sun3_devmap + length) > SUN3_MONSHORTPAGE)
    116       1.4    provos 		panic("dev3_mapin: length=%d", length);
    117       1.1  fredette 
    118       1.1  fredette 	for (i = 0; i < MAP__NTYPES; i++)
    119       1.1  fredette 		if (sun3_mapinfo[i].maptype == maptype)
    120       1.1  fredette 			goto found;
    121       1.1  fredette 	panic("dev3_mapin: bad maptype");
    122       1.1  fredette found:
    123       1.1  fredette 
    124       1.1  fredette 	if (physaddr & ~(sun3_mapinfo[i].mask))
    125       1.1  fredette 		panic("dev3_mapin: bad address");
    126       1.1  fredette 	pa = sun3_mapinfo[i].base += physaddr;
    127       1.1  fredette 
    128  1.4.14.1      kent 	pte = PA_PGNUM(pa) | PG_PERM | sun3_mapinfo[i].pgtype;
    129       1.1  fredette 
    130       1.1  fredette 	va = pgva = sun3_devmap;
    131       1.1  fredette 	do {
    132       1.1  fredette 		set_pte(pgva, pte);
    133       1.1  fredette 		pgva += NBPG;
    134       1.1  fredette 		pte += 1;
    135       1.1  fredette 		length -= NBPG;
    136       1.1  fredette 	} while (length > 0);
    137       1.1  fredette 	sun3_devmap = pgva;
    138       1.1  fredette 	va += (physaddr & PGOFSET);
    139       1.1  fredette 
    140       1.1  fredette #ifdef	DEBUG_PROM
    141       1.1  fredette 	if (debug)
    142       1.1  fredette 		printf("dev3_mapin: va=0x%x pte=0x%x\n",
    143       1.1  fredette 			   va, get_pte(va));
    144       1.1  fredette #endif
    145       1.1  fredette 	return ((char*)va);
    146       1.1  fredette }
    147       1.1  fredette 
    148       1.1  fredette /*****************************************************************
    149       1.1  fredette  * DVMA support
    150       1.1  fredette  */
    151       1.1  fredette 
    152       1.1  fredette /*
    153       1.1  fredette  * The easiest way to deal with the need for DVMA mappings is to
    154       1.1  fredette  * create a DVMA alias mapping of the entire address range used by
    155       1.1  fredette  * the boot program.  That way, dvma_mapin can just compute the
    156       1.1  fredette  * DVMA alias address, and dvma_mapout does nothing.
    157       1.1  fredette  *
    158       1.1  fredette  * Note that this assumes that standalone programs will do I/O
    159       1.1  fredette  * operations only within range (SA_MIN_VA .. SA_MAX_VA) checked.
    160       1.1  fredette  */
    161       1.1  fredette 
    162       1.1  fredette #define	DVMA_BASE 0xFFf00000
    163       1.1  fredette #define DVMA_MAPLEN  0xE0000	/* 1 MB - 128K (save MONSHORTSEG) */
    164       1.1  fredette 
    165       1.1  fredette #define SA_MIN_VA	0x200000
    166       1.1  fredette #define SA_MAX_VA	(SA_MIN_VA + DVMA_MAPLEN)
    167       1.1  fredette 
    168       1.1  fredette /* This points to the end of the free DVMA space. */
    169       1.1  fredette u_int dvma3_end = DVMA_BASE + DVMA_MAPLEN;
    170       1.1  fredette 
    171  1.4.14.1      kent void
    172  1.4.14.1      kent dvma3_init(void)
    173       1.1  fredette {
    174       1.1  fredette 	int segva, dmava, sme;
    175       1.1  fredette 
    176       1.1  fredette 	segva = SA_MIN_VA;
    177       1.1  fredette 	dmava = DVMA_BASE;
    178       1.1  fredette 
    179       1.1  fredette 	while (segva < SA_MAX_VA) {
    180       1.1  fredette 		sme = get_segmap(segva);
    181       1.1  fredette 		set_segmap(dmava, sme);
    182       1.1  fredette 		segva += NBSG;
    183       1.1  fredette 		dmava += NBSG;
    184       1.1  fredette 	}
    185       1.1  fredette }
    186       1.1  fredette 
    187       1.1  fredette /* Convert a local address to a DVMA address. */
    188       1.1  fredette char *
    189       1.1  fredette dvma3_mapin(char *addr, int len)
    190       1.1  fredette {
    191       1.1  fredette 	int va = (int)addr;
    192       1.1  fredette 
    193       1.1  fredette 	/* Make sure the address is in the DVMA map. */
    194       1.1  fredette 	if ((va < SA_MIN_VA) || (va >= SA_MAX_VA))
    195       1.1  fredette 		panic("dvma3_mapin");
    196       1.1  fredette 
    197       1.1  fredette 	va -= SA_MIN_VA;
    198       1.1  fredette 	va += DVMA_BASE;
    199       1.1  fredette 
    200       1.1  fredette 	return ((char *) va);
    201       1.1  fredette }
    202       1.1  fredette 
    203       1.1  fredette /* Destroy a DVMA address alias. */
    204       1.1  fredette void
    205       1.1  fredette dvma3_mapout(char *addr, int len)
    206       1.1  fredette {
    207       1.1  fredette 	int va = (int)addr;
    208       1.1  fredette 
    209       1.1  fredette 	/* Make sure the address is in the DVMA map. */
    210       1.1  fredette 	if ((va < DVMA_BASE) || (va >= (DVMA_BASE + DVMA_MAPLEN)))
    211       1.1  fredette 		panic("dvma3_mapout");
    212       1.1  fredette }
    213       1.1  fredette 
    214       1.1  fredette char *
    215       1.1  fredette dvma3_alloc(int len)
    216       1.1  fredette {
    217       1.1  fredette 	len = m68k_round_page(len);
    218       1.1  fredette 	dvma3_end -= len;
    219       1.1  fredette 	return((char*)dvma3_end);
    220       1.1  fredette }
    221       1.1  fredette 
    222       1.1  fredette void
    223       1.1  fredette dvma3_free(char *dvma, int len)
    224       1.1  fredette {
    225       1.1  fredette 	/* not worth the trouble */
    226       1.1  fredette }
    227       1.1  fredette 
    228       1.1  fredette /*****************************************************************
    229       1.1  fredette  * Control space stuff...
    230       1.1  fredette  */
    231       1.1  fredette 
    232       1.1  fredette u_int
    233  1.4.14.1      kent get_pte(vaddr_t va)
    234       1.1  fredette {
    235       1.1  fredette 	va = CONTROL_ADDR_BUILD(PGMAP_BASE, va);
    236       1.1  fredette 	return (get_control_word(va));
    237       1.1  fredette }
    238       1.1  fredette 
    239       1.1  fredette void
    240  1.4.14.1      kent set_pte(vaddr_t va, u_int pte)
    241       1.1  fredette {
    242       1.1  fredette 	va = CONTROL_ADDR_BUILD(PGMAP_BASE, va);
    243       1.1  fredette 	set_control_word(va, pte);
    244       1.1  fredette }
    245       1.1  fredette 
    246       1.1  fredette int
    247  1.4.14.1      kent get_segmap(vaddr_t va)
    248       1.1  fredette {
    249       1.1  fredette 	va = CONTROL_ADDR_BUILD(SEGMAP_BASE, va);
    250       1.1  fredette 	return (get_control_byte(va));
    251       1.1  fredette }
    252       1.1  fredette 
    253       1.1  fredette void
    254  1.4.14.1      kent set_segmap(vaddr_t va, int sme)
    255       1.1  fredette {
    256       1.1  fredette 	va = CONTROL_ADDR_BUILD(SEGMAP_BASE, va);
    257       1.1  fredette 	set_control_byte(va, sme);
    258       1.1  fredette }
    259       1.1  fredette 
    260       1.1  fredette /*
    261       1.1  fredette  * Copy the IDPROM contents into the passed buffer.
    262       1.1  fredette  * The caller (idprom.c) will do the checksum.
    263       1.1  fredette  */
    264       1.1  fredette void
    265       1.1  fredette sun3_getidprom(u_char *dst)
    266       1.1  fredette {
    267       1.2  fredette 	vaddr_t src;	/* control space address */
    268       1.1  fredette 	int len, x;
    269       1.1  fredette 
    270       1.1  fredette 	src = IDPROM_BASE;
    271       1.1  fredette 	len = sizeof(struct idprom);
    272       1.1  fredette 	do {
    273       1.1  fredette 		x = get_control_byte(src++);
    274       1.1  fredette 		*dst++ = x;
    275       1.1  fredette 	} while (--len > 0);
    276       1.1  fredette }
    277       1.1  fredette 
    278       1.1  fredette /*****************************************************************
    279       1.1  fredette  * Init our function pointers, etc.
    280       1.1  fredette  */
    281       1.1  fredette 
    282  1.4.14.1      kent void
    283  1.4.14.1      kent sun3_init(void)
    284       1.1  fredette {
    285       1.1  fredette 
    286       1.1  fredette 	/* Set the function pointers. */
    287       1.1  fredette 	dev_mapin_p   = dev3_mapin;
    288       1.1  fredette 	dvma_alloc_p  = dvma3_alloc;
    289       1.1  fredette 	dvma_free_p   = dvma3_free;
    290       1.1  fredette 	dvma_mapin_p  = dvma3_mapin;
    291       1.1  fredette 	dvma_mapout_p = dvma3_mapout;
    292       1.1  fredette 
    293       1.1  fredette 	/* Prepare DVMA segment. */
    294       1.1  fredette 	dvma3_init();
    295       1.1  fredette }
    296