1 1.2 cgd /* $NetBSD: prom_disp.S,v 1.2 1997/04/06 08:41:00 cgd Exp $ */ 2 1.1 cgd 3 1.1 cgd /* 4 1.1 cgd * Copyright (c) 1994, 1995, 1996 Carnegie-Mellon University. 5 1.1 cgd * All rights reserved. 6 1.1 cgd * 7 1.1 cgd * Author: Chris G. Demetriou 8 1.1 cgd * 9 1.1 cgd * Permission to use, copy, modify and distribute this software and 10 1.1 cgd * its documentation is hereby granted, provided that both the copyright 11 1.1 cgd * notice and this permission notice appear in all copies of the 12 1.1 cgd * software, derivative works or modified versions, and any portions 13 1.1 cgd * thereof, and that both notices appear in supporting documentation. 14 1.1 cgd * 15 1.1 cgd * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS" 16 1.1 cgd * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND 17 1.1 cgd * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. 18 1.1 cgd * 19 1.1 cgd * Carnegie Mellon requests users of this software to return to 20 1.1 cgd * 21 1.1 cgd * Software Distribution Coordinator or Software.Distribution (at) CS.CMU.EDU 22 1.1 cgd * School of Computer Science 23 1.1 cgd * Carnegie Mellon University 24 1.1 cgd * Pittsburgh PA 15213-3890 25 1.1 cgd * 26 1.1 cgd * any improvements or extensions that they make and grant Carnegie the 27 1.1 cgd * rights to redistribute these changes. 28 1.1 cgd */ 29 1.1 cgd 30 1.1 cgd #ifndef _LOCORE 31 1.1 cgd #include "include/asm.h" 32 1.1 cgd #include "include/prom.h" 33 1.1 cgd #include "include/rpb.h" 34 1.1 cgd #endif 35 1.1 cgd 36 1.1 cgd .globl prom_dispatch_v 37 1.1 cgd .comm prom_dispatch_v,16 38 1.1 cgd 39 1.1 cgd .text 40 1.1 cgd .align 4 41 1.1 cgd 42 1.1 cgd /* 43 1.1 cgd * Dispatcher routine. Implements prom's calling machinery, saves our 44 1.1 cgd * callee-saved registers as required by C. 45 1.1 cgd */ 46 1.1 cgd #define D_RA (7*8) 47 1.1 cgd #define D_S0 (8*8) 48 1.1 cgd #define D_S1 (9*8) 49 1.1 cgd #define D_S2 (10*8) 50 1.1 cgd #define D_S3 (11*8) 51 1.1 cgd #define D_S4 (12*8) 52 1.1 cgd #define D_S5 (13*8) 53 1.1 cgd #define D_S6 (14*8) 54 1.1 cgd #define DISPATCH_FRAME_SIZE (15*8) 55 1.1 cgd #define DISPATCH_REGS IM_RA|IM_S0|IM_S1|IM_S2|IM_S3|IM_S4|IM_S5|IM_S6 56 1.1 cgd 57 1.1 cgd NESTED(prom_dispatch, 5, DISPATCH_FRAME_SIZE, ra, DISPATCH_REGS, 0) 58 1.1 cgd LDGP(pv) 59 1.1 cgd 60 1.1 cgd lda sp, -DISPATCH_FRAME_SIZE(sp) 61 1.1 cgd stq ra, D_RA(sp) 62 1.1 cgd stq s0, D_S0(sp) 63 1.1 cgd stq s1, D_S1(sp) 64 1.1 cgd stq s2, D_S2(sp) 65 1.1 cgd stq s3, D_S3(sp) 66 1.1 cgd stq s4, D_S4(sp) 67 1.1 cgd stq s5, D_S5(sp) 68 1.1 cgd stq s6, D_S6(sp) 69 1.1 cgd 70 1.1 cgd /* Lord have mercy because.. I would not. */ 71 1.1 cgd /* #define STUPID_PROM_IS_32_BITS */ 72 1.1 cgd #ifdef STUPID_PROM_IS_32_BITS 73 1.1 cgd ldah s0, 0x2000(zero) /* hack for hack */ 74 1.1 cgd lda s0, (0x2000-8)(s0) 75 1.1 cgd 76 1.1 cgd stq sp, 0(s0) 77 1.1 cgd or s0, zero, sp 78 1.1 cgd #endif /* STUPID_PROM_IS_32_BITS */ 79 1.1 cgd 80 1.1 cgd lda pv, prom_dispatch_v 81 1.1 cgd ldq v0, 0(pv) /* routine */ 82 1.1 cgd ldq pv, 8(pv) /* routine_arg */ 83 1.1 cgd 84 1.1 cgd jsr ra, (v0) 85 1.1 cgd 86 1.1 cgd #ifdef STUPID_PROM_IS_32_BITS 87 1.1 cgd ldah s0, 0x2000(zero) /* hack for hack */ 88 1.1 cgd lda s0, (0x2000-8)(s0) 89 1.1 cgd 90 1.1 cgd ldq sp, 0(s0) 91 1.1 cgd #endif /* STUPID_PROM_IS_32_BITS */ 92 1.1 cgd 93 1.1 cgd ldq ra, D_RA(sp) 94 1.1 cgd ldq s0, D_S0(sp) 95 1.1 cgd ldq s1, D_S1(sp) 96 1.1 cgd ldq s2, D_S2(sp) 97 1.1 cgd ldq s3, D_S3(sp) 98 1.1 cgd ldq s4, D_S4(sp) 99 1.1 cgd ldq s5, D_S5(sp) 100 1.1 cgd ldq s6, D_S6(sp) 101 1.1 cgd lda sp, DISPATCH_FRAME_SIZE(sp) 102 1.1 cgd RET 103 1.1 cgd END(prom_dispatch) 104 1.1 cgd 105 1.1 cgd #undef D_RA 106 1.1 cgd #undef D_S0 107 1.1 cgd #undef D_S1 108 1.1 cgd #undef D_S2 109 1.1 cgd #undef D_S3 110 1.1 cgd #undef D_S4 111 1.1 cgd #undef D_S5 112 1.1 cgd #undef D_S6 113 1.1 cgd #undef DISPATCH_FRAME_SIZE 114 1.1 cgd #undef DISPATCH_REGS 115