test.old-imgmap.i486

C++ 编写的EROS RTOS

#
# Copyright (C) 1998, 1999, Jonathan S. Shapiro.
#
# This file is part of the EROS Operating System.
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2,
# or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#


#
# logtest domain test case.  This test case simply touches a boatload
# of pages.  It is designed to be run when the kernel object cache has
# been artificially constrained to limit the number of pages.
#
# The test is in two parts.  For page ageing, the logtest simply
# touches enough pages that a constrained kernel is forced to age.
# For node testing, we must add another domain -- the log test program
# is small enough that if ANY of it's nodes get aged out it will not
# make progress.  We therefore include a tick program so it has a
# competitor.
#
arch i486

domain logtest
program segment logtest = logtest
logtest.seg add page 0x20000	# for stack

logtest.dom pc = logtest.pc
logtest.dom sp = 0x21000
logtest.dom space = logtest.seg
logtest.dom priority = sched(8)   # normal

logtest.dom key reg 9 = misc(Console)
logtest.dom key reg 10 = misc(sleep)

print domain logtest.dom
print segment logtest.seg

domain tick
program segment tick = tick
tick.seg add page 0x20000	# for stack

tick.dom pc = tick.pc
tick.dom sp = 0x21000
tick.dom space = tick.seg
tick.dom priority = sched(8)   # normal

tick.dom key reg 9 = misc(Console)
tick.dom key reg 10 = misc(sleep)
tick.dom key reg 11 = misc(TimeOfDay)

print domain tick.dom
print segment tick.seg

domain migrator
program segment migrator = migrator
migrator.seg add page 0x20000

migrator.dom pc = migrator.pc
migrator.dom sp = 0x21000
migrator.dom space = migrator.seg
migrator.dom priority = sched(8)   # normal

migrator.dom key reg 8 = misc(Checkpoint)
migrator.dom key reg 9 = misc(Console)
migrator.dom key reg 10 = misc(sleep)
migrator.dom key reg 11 = misc(TimeOfDay)

print domain migrator.dom
print segment migrator.seg

run logtest.dom
run tick.dom
run migrator.dom