Home | History | Annotate | Line # | Download | only in common
OSFpal.c revision 1.2 
      1  1.2  cgd /* $NetBSD: OSFpal.c,v 1.2 1997/04/06 08:40:56 cgd Exp $ */
      2  1.1  cgd 
      3  1.1  cgd /*
      4  1.1  cgd  * Copyright (c) 1994, 1996 Carnegie-Mellon University.
      5  1.1  cgd  * All rights reserved.
      6  1.1  cgd  *
      7  1.1  cgd  * Author: Keith Bostic
      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 #include <sys/types.h>
     31  1.1  cgd 
     32  1.1  cgd #include <machine/prom.h>
     33  1.1  cgd #include <machine/rpb.h>
     34  1.1  cgd 
     35  1.1  cgd void
     36  1.1  cgd OSFpal()
     37  1.1  cgd {
     38  1.1  cgd 	struct rpb *r;
     39  1.1  cgd 	struct ctb *t;
     40  1.1  cgd 	struct pcs *p;
     41  1.1  cgd 	long result;
     42  1.1  cgd 	int offset;
     43  1.1  cgd 
     44  1.1  cgd 	r = (struct rpb *)HWRPB_ADDR;
     45  1.1  cgd 	offset = r->rpb_pcs_size * cpu_number();
     46  1.1  cgd 	p = (struct pcs *)((u_int8_t *)r + r->rpb_pcs_off + offset);
     47  1.1  cgd 
     48  1.1  cgd 	printf("VMS PAL revision: 0x%lx\n",
     49  1.1  cgd 	    p->pcs_palrevisions[PALvar_OpenVMS]);
     50  1.1  cgd 	printf("OSF PAL rev: 0x%lx\n", p->pcs_palrevisions[PALvar_OSF1]);
     51  1.1  cgd 	(void)switch_palcode();
     52  1.1  cgd 	printf("Switch to OSF PAL code succeeded.\n");
     53  1.1  cgd }
     54  1.1  cgd 
     55