[OpenBIOS] r297 - openbios-devel/drivers
svn at openbios.org
svn at openbios.org
Sat Dec 20 19:38:04 CET 2008
Author: blueswirl
Date: 2008-12-20 19:38:04 +0100 (Sat, 20 Dec 2008)
New Revision: 297
Removed:
openbios-devel/drivers/ide.fs
Log:
Delete drivers/ide.fs, should have been deleted in r292
Deleted: openbios-devel/drivers/ide.fs
===================================================================
--- openbios-devel/drivers/ide.fs 2008-12-20 18:36:23 UTC (rev 296)
+++ openbios-devel/drivers/ide.fs 2008-12-20 18:38:04 UTC (rev 297)
@@ -1,69 +0,0 @@
-
-dev /pci
-
-[IFDEF] CONFIG_DRIVER_IDE
-
-\ simple isa bus node
-new-device
- " isa" device-name
- " isa" device-type
- 2 encode-int " #address-cells" property
- 1 encode-int " #size-cells" property
-
- external
- : open true ;
- : close ;
-
-finish-device
-
-: ?devalias ( alias-str alias-len device-str device-len --
- \ alias-str alias-len false | true )
- active-package >r
- " /aliases" find-device
- \ 2dup ." Checking " type
- 2dup find-dev if \ check if device exists
- drop
- 2over find-dev if \ do we already have an alias?
- \ ." alias exists" cr
- drop 2drop false
- else
- \ ." device exists" cr
- encode-string
- 2swap property
- true
- then
- else
- \ ." device doesn't exist" cr
- 2drop false
- then
- r> active-package!
- ;
-
-:noname
- " hd"
- " /pci/isa/ide0/disk at 0" ?devalias not if
- " /pci/isa/ide0/disk at 1" ?devalias not if
- " /pci/isa/ide1/disk at 0" ?devalias not if
- " /pci/isa/ide1/disk at 1" ?devalias not if
- 2drop ." No disk found." cr
- then
- then
- then
- then
-
- " cdrom"
- " /pci/isa/ide0/cdrom at 0" ?devalias not if
- " /pci/isa/ide0/cdrom at 1" ?devalias not if
- " /pci/isa/ide1/cdrom at 0" ?devalias not if
- " /pci/isa/ide1/cdrom at 1" ?devalias not if
- 2drop ." No cdrom found" cr
- then
- then
- then
- then
-; SYSTEM-initializer
-
-
-[THEN]
-
-device-end
More information about the OpenBIOS
mailing list