Author: mcayland
Date: Sun Jul 11 20:57:19 2010
New Revision: 817
URL: http://tracker.coreboot.org/trac/openbios/changeset/817
Log:
Switch dir over to use the new static filesystem dir methods.
Signed-off-by: Mark Cave-Ayland <mark.cave-ayland(a)siriusit.co.uk>
Modified:
trunk/openbios-devel/forth/debugging/client.fs
trunk/openbios-devel/forth/lib/split.fs
trunk/openbios-devel/fs/grubfs/grubfs_fs.c
Modified: trunk/openbios-devel/forth/debugging/client.fs
==============================================================================
--- trunk/openbios-devel/forth/debugging/client.fs Sat Jul 10 15:11:22 2010 (r816)
+++ trunk/openbios-devel/forth/debugging/client.fs Sun Jul 11 20:57:19 2010 (r817)
@@ -91,11 +91,12 @@
: dir ( "{paths}<cr>" -- )
linefeed parse
+ split-path-device
open-dev dup 0= if
drop
exit
then
- dup
+ -rot 2 pick
" dir" rot ['] $call-method catch
if
3drop
Modified: trunk/openbios-devel/forth/lib/split.fs
==============================================================================
--- trunk/openbios-devel/forth/lib/split.fs Sat Jul 10 15:11:22 2010 (r816)
+++ trunk/openbios-devel/forth/lib/split.fs Sun Jul 11 20:57:19 2010 (r817)
@@ -47,3 +47,24 @@
c@ r@ = if 1- then then
r> drop
;
+
+\ split <param-text> into separate path and device strings
+: split-path-device ( str len -- pathstr len devstr len )
+ ascii , left-split 2 pick 0= if
+ \ No comma - so either <dev>:<id> or <dev>:<id><path>
+ 2dup ascii \ strchr 0= if
+ \ No backslash so just <dev> or <dev>:<id>
+ s" " 2swap \ ( pathstr len devstr len )
+ else
+ \ Contains backslash, must be a <dev>:<id><path>
+ ascii : left-split \ ( pathstr len devstr len )
+ then
+
+ \ Remove RHS split (unused)
+ 4 roll drop
+ 4 roll drop
+ else
+ \ Contains comma so split is already correct
+ then
+;
+
Modified: trunk/openbios-devel/fs/grubfs/grubfs_fs.c
==============================================================================
--- trunk/openbios-devel/fs/grubfs/grubfs_fs.c Sat Jul 10 15:11:22 2010 (r816)
+++ trunk/openbios-devel/fs/grubfs/grubfs_fs.c Sun Jul 11 20:57:19 2010 (r817)
@@ -358,7 +358,7 @@
/* static method, ( pathstr len ihandle -- ) */
static void
-grubfs_files_dir( grubfs_info_t *mi )
+grubfs_files_dir( grubfs_info_t *dummy )
{
forth_printf("dir method not implemented for grubfs filesystem\n");
POP();
Hi all,
Having struggled to get hold of an old Debian ISO for SPARC32 testing,
I'm wondering would it be worth setting up a download area on
www.openfirmware.info for storing ISOs for OpenBIOS testing? We could
then setup a new page on the wiki which links to each ISO grouped by
platform (which would act as a rough regression checklist for patches).
Thoughts?
ATB,
Mark.
--
Mark Cave-Ayland - Senior Technical Architect
PostgreSQL - PostGIS
Sirius Corporation plc - control through freedom
http://www.siriusit.co.uk
t: +44 870 608 0063
Sirius Labs: http://www.siriusit.co.uk/labs