Subject: Re: [PATCH] Fixup for Amigas with memory at 0x200000
To: None <port-amiga@netbsd.org>
From: Ignatios Souvatzis <is@netbsd.org>
List: port-amiga
Date: 01/10/2003 22:23:56
--pWyiEgJYm5f9v55/
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable
Hi,
here's my version of the patch, which reorders the DRACO section to be
unsplit, making the code better readable IMO.
Index: amiga_init.c
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /cvsroot/src/sys/arch/amiga/amiga/amiga_init.c,v
retrieving revision 1.77.4.1
diff -u -r1.77.4.1 amiga_init.c
--- amiga_init.c 2002/06/05 09:38:01 1.77.4.1
+++ amiga_init.c 2003/01/10 21:19:11
@@ -117,6 +117,8 @@
int use_z2_mem =3D 1; /* XXX */
=20
u_long boot_fphystart, boot_fphysize, boot_cphysize;
+static u_int start_c_fphystart;
+static u_int start_c_pstart;
=20
static u_long boot_flags;
=20
@@ -136,7 +138,7 @@
extern void kernel_reload(char *, u_long, u_long, u_long, u_long,
u_long, u_long, u_long, u_long, u_long, u_long);
extern void etext(void);
-void start_c_cleanup(void);
+void start_c_finish(void);
=20
void *
chipmem_steal(long amount)
@@ -212,13 +214,9 @@
u_int Sysptmap_pa;
register st_entry_t sg_proto, *sg, *esg;
register pt_entry_t pg_proto, *pg;
- u_int tc, end_loaded, ncd, i;
+ u_int end_loaded, ncd, i;
struct boot_memlist *ml;
u_int loadbase =3D 0; /* XXXXXXXXXXXXXXXXXXXXXXXXXXXX */
- u_int *shadow_pt =3D 0; /* XXXXXXXXXXXXXXXXXXXXXXXXXXXX */
-#ifdef P5PPC68KBOARD
- struct cfdev *cdp, *ecdp;
-#endif
=20
#ifdef DEBUG_KERNEL_START
/* XXX this only is valid if Altais is in slot 0 */
@@ -383,14 +381,6 @@
#endif
ptextra =3D NCHIPMEMPG + NCIAPG + NZTWOROMPG + RELOC(NZTWOMEMPG, u_int) +
btoc(RELOC(ZBUSAVAIL, u_int)) + NPCMCIAPG;
- /*
- * if kernel shadow mapping will overlap any initial mapping
- * of Zorro I/O space or the page table map, we need to
- * adjust things to remove the overlap.
- */
- if (loadbase !=3D 0) {
- /* What to do, what to do? */
- }
=20
ptsize =3D (RELOC(Sysptsize, u_int) +
howmany(ptextra, NPTEPG)) << PGSHIFT;
@@ -447,9 +437,6 @@
*/
i =3D ((ptsize >> PGSHIFT) + 1) * (NPTEPG / SG4_LEV3SIZE);
sg =3D &((u_int *)(RELOC(Sysseg_pa, u_int)))[SG4_LEV1SIZE];
- if (loadbase !=3D 0)
- /* start of next L2 table */
- shadow_pt =3D &sg[roundup(i, SG4_LEV2SIZE)];
esg =3D &sg[i];
sg_proto =3D ptpa | SG_U | SG_RW | SG_V;
while (sg < esg) {
@@ -471,44 +458,6 @@
*sg++ =3D sg_proto;
sg_proto +=3D (SG4_LEV2SIZE * sizeof(st_entry_t));
}
- if (loadbase !=3D 0) {
- sg =3D (u_int *)RELOC(Sysseg_pa, u_int);
- if (sg[loadbase >> SG4_SHIFT1] =3D=3D 0) {
- /* allocate another level 2 table */
- sg[loadbase >> SG4_SHIFT1] =3D
- (u_int)shadow_pt | SG_U | SG_RW | SG_V;
- shadow_pt =3D NULL;
- RELOC(protostfree, u_int) =3D
- RELOC(protostfree, u_int) << 1;
- }
- sg =3D (u_int *)(sg[loadbase >> SG4_SHIFT1] & SG4_ADDR1);
- if (sg[(loadbase & SG4_MASK2) >> SG4_SHIFT2] =3D=3D 0) {
- /* no page table exists, need to allocate it */
- sg_proto =3D pstart | SG_U | SG_RW | SG_V;
- sg =3D &sg[(loadbase & SG4_MASK2) >> SG4_SHIFT2];
- sg =3D (u_int *)((int)sg & ~(NBPG / SG4_LEV3SIZE - 1));
- esg =3D &sg[NPTEPG / SG4_LEV3SIZE];
- while (sg < esg) {
- *sg++ =3D sg_proto;
- sg_proto +=3D SG4_LEV3SIZE * sizeof (st_entry_t);
- }
- pg =3D (u_int *) pstart;
- esg =3D (u_int *)&pg[NPTEPG];
- while (pg < esg)
- *pg++ =3D PG_NV;
- pstart +=3D NBPG;
- vstart +=3D NBPG;
- avail -=3D NBPG;
- /* ptmap??? */
- }
- sg =3D (u_int *)RELOC(Sysseg_pa, u_int);
- sg =3D (u_int *)(sg[loadbase >> SG4_SHIFT1] & SG4_ADDR1);
- shadow_pt =3D
- ((u_int *)(sg[(loadbase & SG4_MASK2) >> SG4_SHIFT2]
- & SG4_ADDR1)) +
- ((loadbase & SG4_MASK3) >> SG4_SHIFT3); /* XXX is */
-
- }
/*
* Initialize Sysptmap
*/
@@ -552,28 +501,6 @@
*sg++ =3D SG_NV;
*pg++ =3D PG_NV;
}
-
- if (loadbase !=3D 0) {
- sg =3D (u_int *)RELOC(Sysseg_pa, u_int);
- if (sg[loadbase >> SG_ISHIFT] =3D=3D 0) {
- /* no page table exists, need to allocate it */
- sg[loadbase >> SG_ISHIFT] =3D
- pstart | SG_RW | SG_V;
- pg =3D (u_int *)Sysptmap_pa;
- pg[loadbase >> SG_ISHIFT] =3D
- pstart | PG_RW | PG_CI | PG_V;
- pg =3D (u_int *) pstart;
- esg =3D (u_int *)&pg[NPTEPG];
- while (pg < esg)
- *pg++ =3D PG_NV;
- pstart +=3D NBPG;
- vstart +=3D NBPG;
- avail -=3D NBPG;
- }
- shadow_pt =3D
- ((u_int *)(sg[loadbase >> SG_ISHIFT] & 0xffffff00))
- + ((loadbase & SG_PMASK) >> SG_PSHIFT);
- }
}
=20
/*
@@ -689,23 +616,6 @@
}
=20
/*
- * Initial any "shadow" mapping of the kernel
- */
- if (loadbase !=3D 0 && shadow_pt !=3D 0) {
- RELOC(amigashdwaddr, vaddr_t) =3D (u_int)shadow_pt - loadbase;
- RELOC(namigashdwpg, u_int) =3D (vstart + USPACE) >> PGSHIFT;
- pg_proto =3D fphystart | PG_RO | PG_V;
- pg =3D shadow_pt;
- *pg++ =3D PG_NV; /* Make page 0 invalid */
- pg_proto +=3D NBPG;
- for (i =3D NBPG; i < (u_int)etext; i +=3D NBPG, pg_proto +=3D NBPG)
- *pg++ =3D pg_proto;
- pg_proto =3D (pg_proto & PG_FRAME) | PG_RW | PG_V;
- for (; i < vstart + USPACE; i +=3D NBPG, pg_proto +=3D NBPG)
- *pg++ =3D pg_proto;
- }
-
- /*
*[ following page tables MAY be allocated to ZORRO3 space,
* but they're then later mapped in autoconf.c ]
*/
@@ -839,9 +749,6 @@
/*
* movel Sysseg_pa,a0;
* movec a0,SRP;
- * pflusha;
- * movel #$0xc000,d0;
- * movec d0,TC
*/
=20
if (id & AMIGA_68060) {
@@ -864,9 +771,6 @@
} else
((volatile struct Custom *)0xdff000)->color[0] =3D 0xA70; /* ORANGE */
#endif
-
- asm volatile ("movel #0xc000,%%d0; .word 0x4e7b,0x0003"
- : : :"d0" );
} else
#endif
{
@@ -877,14 +781,20 @@
*/
(RELOC(protorp[0], u_int)) =3D 0x80000202;
asm volatile ("pmove %0@,%%srp":: "a" (&RELOC(protorp, u_int)));
- /*
- * setup and load TC register.
- * enable_cpr, enable_srp, pagesize=3D8k,
- * A =3D 8 bits, B =3D 11 bits
- */
- tc =3D 0x82d08b00;
- asm volatile ("pmove %0@,%%tc" : : "a" (&tc));
}
+
+ RELOC(start_c_fphystart, u_int) =3D fphystart;
+ RELOC(start_c_pstart, u_int) =3D pstart;
+}
+
+void
+start_c_finish()
+{
+ extern u_int32_t delaydivisor;
+#ifdef P5PPC68KBOARD
+ struct cfdev *cdp, *ecdp;
+#endif
+
#ifdef DEBUG_KERNEL_START
#ifdef DRACO
if ((id >> 24) =3D=3D 0x7D) { /* mapping on, is_draco() is valid */
@@ -903,8 +813,8 @@
((volatile struct Custom *)CUSTOMADDR)->color[0] =3D 0x0a0; /* GREEN */
#endif
=20
- bzero ((u_char *)proc0paddr, USPACE); /* XXXXXXXXXXXXXXXXXXXXX */
- pmap_bootstrap(pstart, fphystart); /* XXXXXXXXXXXXXXXXXXXXXXx*/
+ bzero ((u_char *)proc0paddr, USPACE);
+ pmap_bootstrap(start_c_pstart, start_c_fphystart);
=20
/*
* to make life easier in locore.s, set these addresses explicitly
@@ -937,8 +847,10 @@
z2mem_start =3D ZTWOMEMADDR;
}
=20
+#if 0
i =3D *(int *)proc0paddr;
*(volatile int *)proc0paddr =3D i;
+#endif
=20
/*
* disable all interupts but enable allow them to be enabled
@@ -1014,24 +926,6 @@
}
}
#endif
-}
-
-void
-start_c_cleanup()
-{
- u_int *sg, *esg;
- extern u_int32_t delaydivisor;
-
- /*
- * remove shadow mapping of kernel?
- */
- if (amigashdwaddr =3D=3D 0)
- return;
- sg =3D (u_int *) amigashdwaddr;
- esg =3D (u_int *)&sg[namigashdwpg];
- while (sg < esg)
- *sg++ =3D PG_NV;
-
/*
* preliminary delay divisor value
*/
Index: locore.s
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /cvsroot/src/sys/arch/amiga/amiga/locore.s,v
retrieving revision 1.131
diff -u -r1.131 locore.s
--- locore.s 2002/02/13 16:34:05 1.131
+++ locore.s 2003/01/10 21:19:11
@@ -918,16 +918,69 @@
movc %d0,%sfc | as source
movc %d0,%dfc | and destination of transfers
=20
-/* let the C function initialize everything and enable the MMU */
+/* let the C function initialize everything */
RELOC(start_c, %a0)
jbsr %a0@
addl #28,%sp
+
+#ifdef DRACO
+ RELOC(machineid,%a0)
+ cmpb #0x7d,%a0@
+ jne LAmiga_enable_MMU
+
+ lea %pc@(0),%a0
+ movl %a0,%d0
+ andl #0xff000000,%d0
+ orl #0x0000c044,%d0 | 16 MB, ro,cache inhibited
+ .word 0x4e7b,0x0004 | movc %d0,%itt0
+ .word 0xf518 | pflusha
+ movl #0xc000,%d0 | enable MMU
+ .word 0x4e7b, 0x0003 | movec %d0,%tc
+ jmp Lcleanitt0:l
+Lcleanitt0:
+ movq #0,%d0
+ .word 0x4e7b,0x0004 | movc %d0,%itt0
+ bra LMMUenable_end:l
+
+LAmiga_enable_MMU:
+#endif /* DRACO */
+
+/* Copy just the code to enable the MMU into chip memory */
+ lea LMMUenable_start,%a0
+ movl #LMMUenable_start:l,%a1
+ lea LMMUenable_end,%a2
+Lcopy_MMU_enabler:
+ movl %a0@+,%a1@+
+ cmpl %a0,%a2
+ jgt Lcopy_MMU_enabler
+
+ jmp LMMUenable_start:l
+
+LMMUenable_start:
+
+/* enable the MMU */
+#if defined(M68040) || defined(M68060)
+ RELOC(mmutype, %a0)
+ cmpl #MMU_68040,%a0@
+ jne Lenable030
+ .word 0xf518 | pflusha
+ movl #0xc000,%d0
+ .word 0x4e7b, 0x0003 | movec %d0,%tc
jmp Lunshadow:l
+#endif /* M68040 || M68060 */
+/* ENABLE, SRP_ENABLE, 8K pages, 8bit A-level, 11bit B-level */
+Ltc: .long 0x82d08b00
+Lenable030:
+ lea Ltc,%a0
+ pmove %a0@,%tc
+ jmp Lunshadow:l
+
+LMMUenable_end:
=20
Lunshadow:
=20
lea _ASM_LABEL(tmpstk),%sp | give ourselves a temporary stack
- jbsr _C_LABEL(start_c_cleanup)
+ jbsr _C_LABEL(start_c_finish)
=20
/* set kernel stack, user SP, and initial pcb */
movl _C_LABEL(proc0paddr),%a1 | proc0 kernel stack
--=20
seal your e-mail: http://www.gnupg.org/
--pWyiEgJYm5f9v55/
Content-Type: application/pgp-signature
Content-Disposition: inline
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.1 (NetBSD)
iD8DBQE+HznqPCRcZ/VMtk4RAvh9AJsGVLlCSD5sEEAOs60mYcf3MXbcHgCgk8uK
/x2wwCypE79PSkXgG2puaI4=
=xh+l
-----END PGP SIGNATURE-----
--pWyiEgJYm5f9v55/--