Virtualization/openbios
1
0
Fork 0
mirror of https://gitlab.com/qemu-project/openbios.git synced 2024-02-13 08:34:06 +08:00
Code Issues Projects Releases Wiki Activity

When "load" is used, correctly set bootpath and bootargs.

Browse Source 
Signed-off-by: Laurent Vivier <Laurent@Vivier.eu>


git-svn-id: svn://coreboot.org/openbios/trunk/openbios-devel@583 f158a5a8-5612-0410-a976-696ce0be7e32
This commit is contained in:
Laurent Vivier
2009-09-20 19:32:30 +00:00
committed by Laurent Vivier
parent ebf7e3f6da
commit 1f31d2f057
1 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
forth/debugging/client.fs
View File

@@ -276,16 +276,19 @@ variable xcoff-entry
then
;
: encode-bootpath ( str len -- )
\ FIXME: need to extract bootargs from bootpath and set it in /chosen
: (encode-bootpath) ( "{params}<cr>" -- bootpath-str bootpath-len)
bl parse 2dup
" /chosen" (find-dev) if
" bootpath" rot (property)
then
linefeed parse
" /chosen" (find-dev) if
" bootargs" rot (property)
then
;
: load ( "{params}<cr>" -- )
linefeed parse ( str len )
2dup encode-bootpath
(encode-bootpath)
open-dev ( ihandle )
dup 0= if
drop