123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157 |
- /*
- * arch/alpha/boot/bootpz.c
- *
- * Copyright (C) 1997 Jay Estabrook
- *
- * This file is used for creating a compressed BOOTP file for the
- * Linux/AXP kernel
- *
- * based significantly on the arch/alpha/boot/main.c of Linus Torvalds
- * and the decompression code from MILO.
- */
- #include <linux/kernel.h>
- #include <linux/slab.h>
- #include <linux/string.h>
- #include <generated/utsrelease.h>
- #include <linux/mm.h>
- #include <asm/console.h>
- #include <asm/hwrpb.h>
- #include <asm/pgtable.h>
- #include <asm/io.h>
- #include <stdarg.h>
- #include "kzsize.h"
- /* FIXME FIXME FIXME */
- #define MALLOC_AREA_SIZE 0x200000 /* 2MB for now */
- /* FIXME FIXME FIXME */
- /*
- WARNING NOTE
- It is very possible that turning on additional messages may cause
- kernel image corruption due to stack usage to do the printing.
- */
- #undef DEBUG_CHECK_RANGE
- #undef DEBUG_ADDRESSES
- #undef DEBUG_LAST_STEPS
- extern unsigned long switch_to_osf_pal(unsigned long nr,
- struct pcb_struct * pcb_va, struct pcb_struct * pcb_pa,
- unsigned long *vptb);
- extern int decompress_kernel(void* destination, void *source,
- size_t ksize, size_t kzsize);
- extern void move_stack(unsigned long new_stack);
- struct hwrpb_struct *hwrpb = INIT_HWRPB;
- static struct pcb_struct pcb_va[1];
- /*
- * Find a physical address of a virtual object..
- *
- * This is easy using the virtual page table address.
- */
- #define VPTB ((unsigned long *) 0x200000000)
- static inline unsigned long
- find_pa(unsigned long address)
- {
- unsigned long result;
- result = VPTB[address >> 13];
- result >>= 32;
- result <<= 13;
- result |= address & 0x1fff;
- return result;
- }
- int
- check_range(unsigned long vstart, unsigned long vend,
- unsigned long kstart, unsigned long kend)
- {
- unsigned long vaddr, kaddr;
- #ifdef DEBUG_CHECK_RANGE
- srm_printk("check_range: V[0x%lx:0x%lx] K[0x%lx:0x%lx]\n",
- vstart, vend, kstart, kend);
- #endif
- /* do some range checking for detecting an overlap... */
- for (vaddr = vstart; vaddr <= vend; vaddr += PAGE_SIZE)
- {
- kaddr = (find_pa(vaddr) | PAGE_OFFSET);
- if (kaddr >= kstart && kaddr <= kend)
- {
- #ifdef DEBUG_CHECK_RANGE
- srm_printk("OVERLAP: vaddr 0x%lx kaddr 0x%lx"
- " [0x%lx:0x%lx]\n",
- vaddr, kaddr, kstart, kend);
- #endif
- return 1;
- }
- }
- return 0;
- }
- /*
- * This function moves into OSF/1 pal-code, and has a temporary
- * PCB for that. The kernel proper should replace this PCB with
- * the real one as soon as possible.
- *
- * The page table muckery in here depends on the fact that the boot
- * code has the L1 page table identity-map itself in the second PTE
- * in the L1 page table. Thus the L1-page is virtually addressable
- * itself (through three levels) at virtual address 0x200802000.
- */
- #define L1 ((unsigned long *) 0x200802000)
- void
- pal_init(void)
- {
- unsigned long i, rev;
- struct percpu_struct * percpu;
- struct pcb_struct * pcb_pa;
- /* Create the dummy PCB. */
- pcb_va->ksp = 0;
- pcb_va->usp = 0;
- pcb_va->ptbr = L1[1] >> 32;
- pcb_va->asn = 0;
- pcb_va->pcc = 0;
- pcb_va->unique = 0;
- pcb_va->flags = 1;
- pcb_va->res1 = 0;
- pcb_va->res2 = 0;
- pcb_pa = (struct pcb_struct *)find_pa((unsigned long)pcb_va);
- /*
- * a0 = 2 (OSF)
- * a1 = return address, but we give the asm the vaddr of the PCB
- * a2 = physical addr of PCB
- * a3 = new virtual page table pointer
- * a4 = KSP (but the asm sets it)
- */
- srm_printk("Switching to OSF PAL-code... ");
- i = switch_to_osf_pal(2, pcb_va, pcb_pa, VPTB);
- if (i) {
- srm_printk("failed, code %ld\n", i);
- __halt();
- }
- percpu = (struct percpu_struct *)
- (INIT_HWRPB->processor_offset + (unsigned long) INIT_HWRPB);
- rev = percpu->pal_revision = percpu->palcode_avail[2];
- srm_printk("OK (rev %lx)\n", rev);
- tbia(); /* do it directly in case we are SMP */
- }
|