OSFpal.c revision 1.3 1 /* $NetBSD: OSFpal.c,v 1.3 1997/09/06 14:03:55 drochner Exp $ */
2
3 /*
4 * Copyright (c) 1994, 1996 Carnegie-Mellon University.
5 * All rights reserved.
6 *
7 * Author: Keith Bostic
8 *
9 * Permission to use, copy, modify and distribute this software and
10 * its documentation is hereby granted, provided that both the copyright
11 * notice and this permission notice appear in all copies of the
12 * software, derivative works or modified versions, and any portions
13 * thereof, and that both notices appear in supporting documentation.
14 *
15 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
16 * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
17 * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
18 *
19 * Carnegie Mellon requests users of this software to return to
20 *
21 * Software Distribution Coordinator or Software.Distribution (at) CS.CMU.EDU
22 * School of Computer Science
23 * Carnegie Mellon University
24 * Pittsburgh PA 15213-3890
25 *
26 * any improvements or extensions that they make and grant Carnegie the
27 * rights to redistribute these changes.
28 */
29
30 #include <sys/types.h>
31 #include <lib/libsa/stand.h>
32
33 #include <machine/prom.h>
34 #include <machine/rpb.h>
35
36 #include "common.h"
37
38 void
39 OSFpal()
40 {
41 struct rpb *r;
42 struct pcs *p;
43 int offset;
44
45 r = (struct rpb *)HWRPB_ADDR;
46 offset = r->rpb_pcs_size * cpu_number();
47 p = (struct pcs *)((u_int8_t *)r + r->rpb_pcs_off + offset);
48
49 printf("VMS PAL revision: 0x%lx\n",
50 p->pcs_palrevisions[PALvar_OpenVMS]);
51 printf("OSF PAL rev: 0x%lx\n", p->pcs_palrevisions[PALvar_OSF1]);
52 switch_palcode();
53 printf("Switch to OSF PAL code succeeded.\n");
54 }
55
56