summaryrefslogtreecommitdiffstats
path: root/qemu/roms/SLOF/slof/fs/generic-disk.fs
diff options
context:
space:
mode:
authorRajithaY <rajithax.yerrumsetty@intel.com>2017-04-25 03:31:15 -0700
committerRajitha Yerrumchetty <rajithax.yerrumsetty@intel.com>2017-05-22 06:48:08 +0000
commitbb756eebdac6fd24e8919e2c43f7d2c8c4091f59 (patch)
treeca11e03542edf2d8f631efeca5e1626d211107e3 /qemu/roms/SLOF/slof/fs/generic-disk.fs
parenta14b48d18a9ed03ec191cf16b162206998a895ce (diff)
Adding qemu as a submodule of KVMFORNFV
This Patch includes the changes to add qemu as a submodule to kvmfornfv repo and make use of the updated latest qemu for the execution of all testcase Change-Id: I1280af507a857675c7f81d30c95255635667bdd7 Signed-off-by:RajithaY<rajithax.yerrumsetty@intel.com>
Diffstat (limited to 'qemu/roms/SLOF/slof/fs/generic-disk.fs')
-rw-r--r--qemu/roms/SLOF/slof/fs/generic-disk.fs68
1 files changed, 0 insertions, 68 deletions
diff --git a/qemu/roms/SLOF/slof/fs/generic-disk.fs b/qemu/roms/SLOF/slof/fs/generic-disk.fs
deleted file mode 100644
index 0543c890e..000000000
--- a/qemu/roms/SLOF/slof/fs/generic-disk.fs
+++ /dev/null
@@ -1,68 +0,0 @@
-\ *****************************************************************************
-\ * Copyright (c) 2004, 2008 IBM Corporation
-\ * All rights reserved.
-\ * This program and the accompanying materials
-\ * are made available under the terms of the BSD License
-\ * which accompanies this distribution, and is available at
-\ * http://www.opensource.org/licenses/bsd-license.php
-\ *
-\ * Contributors:
-\ * IBM Corporation - initial implementation
-\ ****************************************************************************/
-
-
-\ Generic disk support
-
-\ Input:
-\ name of device ( e.g. "disk", "cdrom", ... )
-\ dev#
-
-\ Needs from parent in device tree:
-\ dev-read-blocks ( addr block# #blocks phys.lo ... phys.hi -- #read )
-\ block-size
-\ max-transfer
-
-\ Provides:
-\ open ( -- okay? )
-\ close ( -- )
-\ read ( addr len -- actual )
-\ seek ( pos.lo pos.hi -- status )
-\ read-blocks ( addr block# #blocks -- #read )
-\ Uses:
-\ disk-label package interpose for partition and file systems support
-\ deblocker package for byte read support
-
-( str len phys.lo ... phys.hi -- )
-new-device set-unit ( str len )
- 2dup device-name
- s" 0 pci-alias-" 2swap $cat evaluate
- s" block" device-type
-
-\ Requiered interface for deblocker
-
- s" block-size" $call-parent CONSTANT block-size
- s" max-transfer" $call-parent CONSTANT max-transfer
-
-: read-blocks ( addr block# #blocks -- #read )
- my-unit s" dev-read-blocks" $call-parent
-;
-
-INSTANCE VARIABLE deblocker
-
-: open ( -- okay? )
- 0 0 s" deblocker" $open-package dup deblocker ! dup IF
- s" disk-label" find-package IF
- my-args rot interpose
- THEN
- THEN 0<> ;
-
-: close ( -- )
- deblocker @ close-package ;
-
-: seek ( pos.lo pos.hi -- status )
- s" seek" deblocker @ $call-method ;
-
-: read ( addr len -- actual )
- s" read" deblocker @ $call-method ;
-
-finish-device