Fake PAL Code for SKI.

This commit is contained in:
Doug Rabson 2001-09-29 11:40:32 +00:00
parent 7fe354ba91
commit 3ebae4bf00
Notes: svn2git 2020-12-20 02:59:44 +00:00
svn path=/head/; revision=84126

58
sys/ia64/ia64/pal_stub.s Normal file
View file

@ -0,0 +1,58 @@
/*-
* Copyright (c) 2001 Doug Rabson
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
* $FreeBSD$
*/
#include <machine/asm.h>
#include <assym.s>
/*
* Stub for running in simulation. Fakes the values from an SDV.
*/
ENTRY(ski_fake_pal, 0)
mov r8=-3 // default to return error
cmp.eq p6,p0=PAL_PTCE_INFO,r28
;;
(p6) mov r8=0
(p6) movl r9=0
(p6) movl r10=0x100000001
(p6) movl r11=0
;;
cmp.eq p6,p0=PAL_FREQ_RATIOS,r28
;;
(p6) mov r8=0
(p6) movl r9=0xb00000002 // proc 11/1
(p6) movl r10=0x100000001 // bus 1/1
(p6) movl r11=0xb00000002 // itc 11/1
;;
tbit.nz p6,p7=r28,8 // static or stacked?
;;
(p6) br.ret.sptk.few rp
(p7) br.cond.sptk.few rp
END(ski_fake_pal)