( 8 H ! ` x p " p # $ 0 @ p % ` p x @ A B ( H ` x p @ @ x x x@ @ @ A B C D @ @ @ @ xP x x 0 x @ x q q q q @ x@ x x P ? p 0 @ @ @ A 0 @ B B Z [0 [ \p ] ] LSun4c machines are not supported by OpenBIOS yet, freezing Sun4d machines are not supported by OpenBIOS yet, freezing Unhandled Exception 0x PC = 0x NPC = 0x Stopping execution nL n( nh n n od o8 op o o p0 { {l {( p p x q q4 ql | q q q r< rt r r s s0 sD sh s| s s s s t t$ tD 8 t t t t u u< u\ u| u u u u v$ vH vl v v v v v w w( wH wT w| w w w x | || |h |, |@ n y { n | x@ xd x x y$ y@ y\ yx y y y z o o, } } ~ z l | | l |8 8| |8 8|8 8 8| | 8 << <fBBf< } x<fff< ~ ?3?00p cccg < < > > <~ ~< fffff f { >a<ff< | ~~~ <~ ~< <~ ~< 0` `0 $f f$ <~ ~< << ff$ ll l ll >`< | 0f 8l8v v 0 000 0 0 f< <f ~ 0 ~ 0` 8l l8 8 ~ | 0f | < | <l | 8` | 000 | | | | ~ x 0 0 ~ ~ `0 0` | | x 8l ff|ff <f f< lfffl bhxhb bhxh` <f f: < < x flxlf ```bf | | ff|`` | | ff|lf <f0 f< ~~Z < | l8 l l8l fff< < 2f <00000< `0 < < 8l 0 x | v `|fff | | | v | | <f` `` v | `lvff 8 < ff< `flxl 8 < ffff | | ff|` v | v`` ~ | 00 006 v l8 l l8l ~ ~L 2~ p p p v 8l | | x v | | | x | v x | v 0 x | v 00x | v ~ ~ 8| | | | | 0 | | f 8 < | 8 < 0 8 < 8l 8l| 0 ~ ~ ~ >l | | | | | 0 | | x v `0 v ~ 8l l8 | ~ ~ 8ld `f ff<~ ~ < p 0x | v 8 < | | 0 v v fff v <ll> ~ 8ll8 | 0c> c l~3f c lz6j << 3f f3 f3f " " " " U U U U w w w w 6666 666 666 66 66666666666 66666 6666 666676666670? ?0766666 66666707666 66 666 6666 6666666? ?6666666 666 v v x llll `0` ~ p ffff| v ~ <ff< ~8l l8 8l ll >ff< ~ ~ ~ ~` 0`~`0 | ~ ~ 0 0 ~ 0 ~ p ~ v v 8ll8 l< l6666 x 0| <<<< p x L p P x 0 H P 4 p x x ` 0 H P p x 0 H 4 P p H p P , \ P ( 0 l ` ``bc p x , < 0 0 @ P ` p x h X H 8 x p x x h X H 8 x p x 0 ! !@#$%^&*()_+ QWERTYUIOP{} ASDFGHJKL:"| ZXCVBNM<>? 1234567890-= qwertyuiop[] asdfghjkl;'\ zxcvbnm,./ p x 0 h H H +\ p ) x )t 0 (` P + ( )L 8 )0 H ) ( X p 3 3 5( x L N N( ND Z4 ` [H ((((( AAAAAA BBBBBB 0123456789abcdefghijklmnopqrstuvwxyz 0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ This CPU is not supported yet, freezing. encode-int cache-line-size property cache-nlines encode-string ecache-parity? bfill? bcopy? cache-physical? encode+ reg mask_rev ttya screen keyboard Configuration device id %s version %d machine id %d Incompatible configuration device version, freezing (sparc32-dma-alloc) ['] (sparc32-dma-alloc) to (dma-alloc) (sparc32-dma-sync) ['] (sparc32-dma-sync) to (dma-sync) (sparc32-dma-map-in) ['] (sparc32-dma-map-in) to (dma-map-in) / find-device banner-name Unknown machine (ID %d), freezing! model name CPUs: %x x %s Unknown cpu (psr %lx), freezing! new-device device-name cpu device-type psr-implementation psr-version implementation version page-size dcache-line-size dcache-nlines dcache-associativity icache-line-size icache-nlines icache-associativity ecache-line-size ecache-nlines ecache-associativity ncaches mmu-nctx sparc-version cache-coherence? mid finish-device display input-device $setenv output-device kernel phys 0x%x virt 0x%x size 0x%x initrd phys 0x%x virt 0x%x size 0x%x /options boot-file floppy disk:a disk cdrom:d cdrom net boot-device platform-boot (arch-go) /chosen UUID: %02x%02x%02x%02x-%02x%02x-%02x%02x-%02x%02x-%02x%02x%02x%02x%02x%02x encode-bytes uuid panic: not enough physical memory on host system. panic: not enough virtual memory on host system. PREPOST-initializer initialize-of panic: no dictionary entry point. SPARCstation 5 SUNW,501-3059 SUNW,SPARCstation-5 SPARCstation Voyager SUNW,501-2581 SUNW,SPARCstation-Voyager SPARCstation LX SUNW,501-2031 SUNW,SPARCstation-LX SPARCstation 4 SUNW,501-2572 SUNW,SPARCstation-4 SPARCstation Classic SUNW,501-2326 SUNW,SPARCstation-Classic Tadpole S3 GX S3 Tadpole_S3GX SPARCstation 10 (1 X 390Z55) SUNW,S10,501-2365 SUNW,SPARCstation-10 SPARCstation 20 (1 X 390Z55) SUNW,S20,501-2324 SUNW,SPARCstation-20 SPARCsystem 600(1 X 390Z55) SUNW,SPARCsystem-600 FMI,MB86900 FMI,MB86904 FMI,MB86907 LSI,L64811 CY,CY7C601 CY,CY7C611 TI,TMS390Z55 TI,TMS390S10 Ross,RT625 Ross,RT620 BIT,B5010 MC,MN10501 Weitek,W8601 GR,LEON2 GR,LEON3 /memory find-package /virtual-memory encode-property active-package! pgmap@ pgmap! map-pages to sfsr@ to ignore-dfault stdin get-instance-path stdout bootpath bootargs pathres-resolve-aliases bootpath: %s open-dev ihandle>boot-device-handle drop to my-self get-my-property sd my-unit my-args sd(0,%d,%d):%c sd(0,%d,%d) SUNW,fdtwo fd() le le() available [sparc] Kernel already loaded load-state >ls.entry ! load-state >ls.entry @ switching to new context: Can't read Linux header Not a Linux kernel image HdrS This looks like a bootdisk image but not like Linux... Possible very old Linux Found Linux version %s (protocol %#x) (loadflags %#x) bzImage zImage or Image Setting up parameters at %#lx %016Lx - %016Lx ramtop=%#x ext_mem_k=%d, alt_mem_k=%d original command line: "%s" kernel command line at %#lx initrd Missing filename to initrd parameter initrd=%s mem Missing value for mem parameter Invalid mem option, ignored Garbage after mem=<size>, ignored mem=%Lu Kernel command line is too long; truncated to %d bytes kernel command line (%d bytes): "%s" offset=%#x addr=%#x size=%#x Loading kernel... Can't read kernel ok Can't open initrd: %s start=%#x end=%#x Initrd is too big to fit in memory Loading initrd... Can't read initrd pc=%#x Jumping to entry point... Returned with o0=%#x peer child get-package-property next-property type rebooting (%s) reboot failed abort, power off power off failed halt, power off close-dev read $call-method write seek instance-to-package eval obp-ticks vocabularies? #order vocabularies big little yes no OpenBIOS dictionary: version: %d cellsize: %d endianness: %s compression: %s relocation: %s checksum: %08x length: %08x last: %0x OpenBIOS Checksum invalid (%08x)! my-self Dictionary space overflow: dicthead=%08x dictlimit=%08x primitive words cannot be debugged Stepper keys: <space>/<enter> Up Down Trace Rstack Forth key ( Empty ) ( %x %p: %s R: ( ) outer-interpreter : %s [ Finished %s ] [ Up to %s ] [ Finished %s (Unable to go up, hit trampoline) ] image 0 state-valid ! Can't read a.out header Not a bootable a.out image load-base %s occupies [%#lx-%#lx] A.out file [%#lx-%#lx] doesn't fit into memory Loading a.out %s... Can't read program text segment (size 0x%lx) Can't read program data segment (size 0x%lx) Can't read program (size 0x%lx) Loaded %lu bytes entry point is %#lx load-state >ls.file-size ! aout load-state >ls.file-type ! load-state >ls.file-size @ -1 state-valid ! catch evaluate is-cfunc is-xt-cfunc is-noname-cfunc throw ihandle>phandle my-parent find-method call-package call-parent $call-parent open-package close-package set_property: NULL phandle set-property device-end active-package (find-dev) get-package-path iterate-tree-begin iterate-tree device_type parent is-open is-ibuf create-node call-method interpret client-call-iface %s %s failed with error %08x client-iface Unimplemented service %s ([%d] -- [%d]) Broken ELF boot notes Bootloader: %s Version: %s Image name: %s Boot notes too big expanding boot note size to %u calloc overflow: %u, %u Can't read ELF header Found ELF header at offset %d Not a bootable ELF image Can't read program header elfload: too many program headers (MAX_HEADERS) Segment %d [%#lx-%#lx] doesn't fit into memory Can't read note segment ELFBoot Image checksum: %#04x Loading %s segment %d addr:%#x file:%#x mem:%#x loading... Can't read program segment %d clearing... clearing checksum... Loaded %lu bytes Verify FAILED (image:%#04x vs computed:%#04x) elf-boot load-state >ls.file-type ! elf-boot load-state >ls.param ! elf load-state >ls.file-type ! entry point is %#x Not a valid ELF memory image ['] __context cell+ ! fw-cfg-read-file (init-program) (go) le-w! le-l! le-w@ le-l@ Evaluating FCode... byte-load Evaluating Forth... eval2 ofmem_set_property: NULL phandle Unable to allocate memory for memory range property! Unable to allocate memory for translations property! translations ofmem_claim_virt - out of space (failed request for %08x bytes) out of malloc memory (%x)! ofmem_claim_io - out of space (failed request for %08x bytes) ['] display-ih cell+ ['] frame-buffer-adr cell+ ['] openbios-video-width cell+ ['] openbios-video-height cell+ ['] depth-bits cell+ ['] line-bytes cell+ ['] color-palette cell+ to fb8-blitmask to fb8-fillrect to fb8-invertrect to (romfont) to (romfont-height) to (romfont-width) %u screen-#columns screen-#rows emit prepare print-prompt print-status terminate? 0 to terminate? open close cmdline +/packages/cmdline read-blocks write-blocks block-size max-transfer tell +/packages/deblocker dir execute disk-label: Unable to determine filesystem find-part-handler interpose find-filesystem %BOOT load load currently not implemented for ihandle %08x /packages/disk-label init-program +/packages/elf-loader nvram-store-configs 77777777777 invalid nvram partition length nvram-load-configs nvram error detected, zapping pram common create-failed set-defaults nvram size update-nvram register-partition-package sun-parts: Unable to determine filesystem left-parse-string ufs-file-system probe get-info +/packages/sun-parts close-deblocker open-deblocker full command not acceppted, status =%x full new command not acceppted, status =%d set_drive bad status block is-deblocker /aliases %s/%s dma-sync dma-map-out dma-map-in dma-free dma-alloc /iommu address map-in map-out /iommu/sbus probe-fcode? /iommu/sbus/ledma /iommu/sbus/ledma/le Probing SBus slot %d offset %ld active-package my-self open-dev to my-self %x,%lx 2dup probe-self-sbus to my-self active-package! power-management ranges SUNW,CS4231 serial intr interrupts audio alias encode-unit-scsi decode-unit-scsi UNKNOWN hd disk cd /iommu/sbus/espdma esp scsi scsi-options clock-frequency /iommu/sbus/espdma/esp /iommu/sbus/espdma/esp/sd@%d,0 %s%d sd(0,%d,0) sd(0,%d,0)@0,0 decode-unit encode-unit /obio MCC EMC SMC eccmemctl width mc-type slavioconfig eeprom mk48t08 idprom auxio power sparc32-power-off ' sparc32-power-off to power-off sparc32-reset-all ' sparc32-reset-all to reset-all counter interrupt escc_read: bad len, addr %p len %x zs slave mouse port-a-ignore-cd port-b-ignore-cd /obio/zs@0,%x /obio/zs@0,%x:a /obio/zs@0,%x:b ttyb Unembedded HFS+ Error register-fs-package dir method not implemented for grubfs filesystem File not found get-path get-fstype +/packages/grubfs-files ext2fs ufs iso9660 Not ufs %s: not a directory. reopen open-nwrom volume-name Propolice detected a stack smashing attack %x at function %s, freezing Propolice detected a stack smashing attack, freezing <NULL> ELFBoot OpenBIOS ELFBoot 1.1 ELFBoot
(semis) (lit) (do) (?do) , (loop) < (+loop) L dup ` 2dup p ?dup over 2over pick drop 2drop nip roll rot -rot swap 2swap 0 >r @ r> L r@ X depth d depth! t rdepth !rdepth! "+ #- $* %u* &mu/mod 'abs (negate )max *min +lshift ( ,rshift 8 ->>a H .and X /or h 0xor t 1invert 2d+ 3d- 4m* 5um* 6@ 7c@ 8w@ 9l@ :! ;+! <c! =w! >l! ( ?= 4 @> @ A< L Bu> X Cu< d Dsp@ p Emove Ffill G(emit) H(key?) I(key) Jexecute Khere Lhere! Mdobranch Ndo?branch Ounaligned-w@ , Punaligned-w! D Qunaligned-l@ \ Runaligned-l! t Sioc@ Tiow@ Uiol@ Vioc! Wiow! Xiol! Yi Zj [call \sys-debug ]$include ( ^$encode-file < _(debug T `(debug-off) d astate | forth-last ] latest ] base /c /w /l /n /x 1 2 , 3 < -1 L 0 \ my-self l decimal hex octal current last #order context < , vocabularies? T locals-end t locals-dict locals-dict-buf true false (immediate) 0 t 0 x 4 (compile-only) 0 t @ x 4 immediate L $ compile-only $ P flags? l immediate? 0 l 0 D compile-only? @ l @ D [ 4 p ] X ` allot t , c, align 0 l 0 l null-align t 4 p w, < 0 l , l, l 0 l 0 l 8 <> D (to) >body 0 < body> ( 0 < reveal L $ recursive p t recurse noop environment? no-environment? resolve-orig 4 (if) @ 0 p p (then) t D tmp-comp-depth tmp-comp-buf ^ setup-tmp-comp p D 0 , 0 x x execute-tmp-comp x D 0 D ` t p if ` 0 p p then D d else p p D D (begin) (again) X (until) p (while) (repeat) (resolve-dest) (resolve-begin) \ 0 (resolve-until) 0 d resolve-dest D @ P \ \ t t 0 D 0 $ 4 0 0 @ P p 0 begin \ 0 again t d until 0 0 d while d 0 p p D repeat D d leaves resolve-loop \ 0 , t 4 4 do 0 @ 0 p ?do @ @ p loop P 4 d +loop ( d 4 d unloop P \ \ \ P leave x | ?leave 0 | case p endcase p @ P d of , 0 P D \ endof l P \ exit \ bl bell bs carret $ linefeed 8 tuck P 4 3dup d @ @ @ clear p 3drop 2rot P P D \ \ D 2>r \ $ 4 P P P 2r> \ \ \ P 4 2r@ < \ \ \ P P P 4 u/mod h p 4 1+ 0 1- 0 2+ @ 2- @ 4+ even l bounds @ 4 << d < >> L 2* 0 < u2/ 0 L 2/ 0 \ not s>d t p \ dnegate p p D dabs 4 t p \ 0 8 um/mod X sm/rem P P \ h \ p \ 0 \ p \ 0 4 4 fm/mod t P p \ P p \ l 0 0 4 \ 4 \ */mod P \ */ /mod P \ mod / lwsplit t l 4 L l wbsplit t l 4 L l lbsplit \ 4 ` ` bwjoin l < 4 l x wljoin l < 4 l x bljoin $ 4 wbflip H t L l 4 l lwflip p t L l 4 l lbflip t L l t 4 l t /c* /w* D /l* ` /n* | ca+ H wa+ d la+ na+ ca1+ wa1+ $ la1+ @ na1+ \ aligned x l char+ ( cell+ | chars H cells cell <= $ P >= 4 \ 0= L p D 0<= d p 8 0< p \ 0<> p 0> p P 0>= p P u<= h u>= t within P P 4 \ P x between < 0 @ 2@ t t 4 2! t P \ <w@ t P 0 comp P p $ \ h @ \ t t 0 , \ 0 0 ` 4 | ( P $= 0 h off 4 on 4 blank erase $ p wbflips @ h 0 t , d lwflips ` h 0 8 d lbflips h 0 8 d catchframe catch P x P $ P $ \ $ \ \ p throw 4 0 @ $ \ $ \ 4 P \ \ start-mem end-mem free-list % init-mem $ t ( 4 p 4 smallest-free-block < p ( p p P P P \ t 0 h t P h @ 0 ( \ \ \ P P t P t ( \ \ \ alloc-mem t h 0 t t h 0 t P P 0 p t P 4 t t h 0 ( free-mem | h 0 t @ h 0 p ( \ t 0 ( t t P \ 0 t t 0 ( t t P D 0 < 4 P t P t D 0 @ t @ 4 h 0 ( @ \ \ 0 t P ( D 0 ( t 0 emit type h @ P debug-type h @ P source-id P ib #ib >in source /string h $ 4 pocketsize numpockets $ pockets < whichpocket T init-pockets p ( @ X pocket ( t X t 0 @ t span findchar 4 p 0 t D 0 8 D 0 t t | P D parse P t p \ 0 p \ \ $ 0 t t skipws \ t P 0 $ 8 0 0 parse-word @ D word P t h h \ t D 0 P ( ) \ L ", l h @ P (") \ t @ P handle-text 0 $ t @ L 4 t P p @ ( P \ s" " ." " 0 .( ) 0 count t pack X 4 p @ ( P lcc | t A Z x 0 upc t a z x 0 -trailing \ t 0 D 0 cr ` T debug-cr T (cr < space spaces p @ P #line 8 #out d lfa2name x \ t 0 l h 4 comp-nocase p 0 4 0 p | P 0 ` p 4 comp-word P 4 \ D 0 find-wordlist x P \ h t 0 | t D 0 \ P h 0 $ \ 4 \ $find 0 0 x 0 T @ p @ 4 X 0 | P $find1 x x 0 ' | h 0 : ['] T | h 0 : 0 find t \ | 0 $ 0 literal compile, T compile | \ t P [compile] X postpone | 0 8 t 0 4 X undefined word #instance instance #instance-base t 0 #instance-offs t 0 | instance-cfa? @ behavior $ t ( 0 D 0 4 | P | (ito) P 0 4 | P (to-xt) t ( 0 @ 4 0 0 to X is | 0 0 could not find key? key $ accept < h p 0 @ t T D 0 $ p | t 0 P expect T X handle-lit 0 8 @ D 0 char 0 0 Unexpected EOL. ascii X \ 0 [char] \ 0 control \ l 0 abort ` abort" , " words H $ \ 0 4 t t 0 capital-hex? pad $ todigit 8 t P 0 ( ( 0 0 <# d < t hold < t h 4 sign 0 - # h #s < \ @ x h 0 #> d < t h (.) t P p h \ u# 4 h u#s \ t h 0 u#> p (u.) P $ T . l s. u. p .r 4 \ 0 < u.r 4 p \ 0 < .d 4 .h h 4 .s < x t > p @ x P digit 4 t t A Z x 0 ( t 9 P 0 $ 0 4 p 4 @ 0 >number 0 \ t 0 t 4 h 0 P D \ 4 D 0 | numdelim? t . D 4 , D x $dnumber? p p D t h 0 p - D t P \ t 0 P 0 D h 0 \ p 0 0 @ . D 0 \ p x 0 \ 0 8 @ \ 0 0 $number p D 0 P 0 D 0 , @ D 0 d# 0 P 4 0 4 illegal number p \ 0 h# P 4 0 4 p illegal number p \ 0 o# 0 P 4 0 4 illegal number p \ 0 " t \ P 0 p " P h \ 0 ( D P l 0 ) h @ 4 0 X 4 0 4 < x @ 0 d | dump 4 0 p 0 t h h D 0 P P < p 0 t \ 0 . P d header t 0 X $ 0 D isn't unique. @ t $ x l h 0 p @ $ : 0 x :noname p p 0 x ; 0 $ p t \ constant P t active-package L instance, t t instance? t 0 value 0 P t variable 0 $ p p t $buffer: h 0 D l l t 4 p t buffer: (undefined-defer) d h @ undefined defer word (undefined-idefer) undefined idefer word defer 0 ( @ t alias L | 0 , $ 0 t 8 $ undefined word $create t create T X (does>) \ does> 0 struct field 2constant t init-tmp-comp L interactive? terminate? exit? h 0 forget 4 This word is obsolescent. X ( t t $ interpret p \ t 0 ( | 0 < t h x 0 T 4 0 4 : $ 0 x P 0 x 0 P 0 0 refill p print-status 0 t , ` D 0 0 Aborted. , D 0 0 Aborted. D 0 @ Stack Overflow. p D 0 @ t Stack Underflow. p 4 D 0 @ Return Stack Overflow. D 0 @ !$ Return Stack Underflow. D 0 8 !| undefined word. 4 D 0 8 ! out of memory. D 0 < " undefined method. D 0 8 "p no such device. @ t " Exception # p \ h 0 $ # ok #$ compiled status < print-prompt #@ #D x > outer-interpreter #` # # \ #d p 8 @ 0 save-source # \ P P P P P P restore-source $ \ \ \ \ \ \ P (evaluate) $` $ ` t $d evaluate $ $ 0 t D 4 D x 0 $ P $ \ P 4 $ eval % % init-builtin-terminal % @ ( t t $ p p include % T @ encode-file & X bye & & Farewell! p quit & @ # init-chain ' : initializer 'D 4 p 'H \ t 0 | initialize-forth '` @ % 'H \ t 0 t | initialize ' ' (\ OpenBIOS kernel started. '$ prstack (8 #prstack * prstack-push +( * +, 0 +, prstack-pop +D ` +, * +, >r + 0 P \ 4 +H P r> + 0 \ \ + 4 P r@ + 0 h \ + t +H 4 P #vocs ,8 vocabularies , 0 , search-wordlist , 0 0 wordlist - p get-order -d @ p @ , @ X P @ set-order - t ` D 0 0 t @ p @ X P order - - p @ D wordlist . P definitions: previous .P - - do-vocabulary . P - 4 \ 4 - discard / p @ P vocabulary /\ -h / also / - 4 - only / ` - / forth / /( findw / p @ p @ H \ X - 0 D | P get-current 0 set-current 0 definitions 0 X 0 forth-wordlist 0 #words 0 p $ \ 0 4 4 comp0 1 0 P \ 0 0 p strcmp 1d 0 0 0 0 p strchr 1 P \ t 0 < h D 0 \ 4 4 \ p cstrlen 2 t \ t 0 4 strdup 2 t 0 0 t P t t P 4 \ \ p p dict-strdup 2 t 4 @ 4 P P \ \ tmpstrcat 3@ t @ P P t P P 4 \ 4 \ \ \ tmpstrcpy 3 4 P P \ \ numtostr 4 4 $ \ 4 t \ 0 0 a P h 0 p \ \ 8 0 tohexstr 4L $ 4P toudecstr 5( $ 4P todecstr 5` 0 4 4 - 5d 5d parse-ints 5 $ @ $ \ $ @ 0 , 2 0 8 $ @ @ t $ $ p p D 4 0 p P \ \ t 0 \ 4 parse-2int 5 @ 5 parse-nhex 7 P 5 \ parse-hex 7 0 7$ rot13 7X t A M x 0 t N Z x 0 rot13-str 7t 2 h @ 7x P prep-wid 7 prep-dict 88 prep-here 8P - ([IF]) 8h \ \ t h 0 [IF] 1 h 0 0 [IFDEF] 1 h 0 0 [ELSE] 1 h 0 @ [THEN] 1 h 0 P \\ 1 h 0 T t [IF] 8| 0 0 \ 8 8 0 D 0 ` @ D 0 $ t 0 D 0 ( P D 0 t p 8 0 X [ELSE] 9 p 9 [THEN] :x : p 8< p 8T : [IFDEF] : 8< 0 $ 8< - t 0 p 9 [DEFINE] : 0 P P 8T h 0 @ 8T -h 8< 8l 8< 0 8l X 8l \ \ 0 [0] ;4 p [1] ; 0 builddate ; Sep 24 2024 19:56 version < 1.1 last-xt <H | $is-ibuf <l <p is-ibuf < p p < is-ivariable < $ <p is-xt-func < 0 0 t is-2xt-func = 0 4 t is-func-begin =\ 0 is-func-end = t split-before = p t P p @ @ @ @ D 0 | P \ @ D split-after = t P p @ @ @ @ D 0 | P t p P 0 h \ @ D left-split > p t P p @ @ @ @ D 0 | P \ @ t 0 D right-split ?L t P > t 0 $ h D 0 \ list-add ? p 4 \ t 0 list-get @T t 0 t | 64bit? @ >in.instance-data @ 0 >in.alloced-size @ 0 >in.device-node A 0 >in.my-parent A@ 0 >in.interposed A` 0 >in.my-unit A 0 >in.arguments A 0 $inst-node.size A ,>dn.isize A 0 >dn.parent A 0 >dn.child B 0 >dn.peer B0 0 >dn.properties BL 0 >dn.methods Bl 0 >dn.priv-methods B 0 >dn.#acells B 0 >dn.probe-addr B 0 >dn.itemplate B 0 $dev-node.size C P>prop.next C0 0 >prop.name CH 0 >prop.addr Cd 0 >prop.len C 0 prop-node.size C >ap.device-str C 0 active-package.size C fcode-sys-table D ?fcode-offset16 D fcode-spread D@ fcode-table D\ ?fcode-verbose Dx _fcode-debug? D fcode-headers? D fcode-stream-start D fcode-stream D fcode-end E fcode-c@ E$ fcode-push-state E< DD D` D| D D E E( E@ T fcode-pop-state E` E@ E( E D D D| D` DD fcode-ptr E D| 0 t $ 0 0 User FCODE# referenced. D$ fcode>xt F F$ fcode-num8 F E t D` E E@ fcode-num8-signed F F t l 0 x fcode-num16 G F F 4 fcode-num16-signed GT GX t l 0 x fcode-num32 G F F F F 4 D 4 L fcode# G F t 0 x 0 F 4 fcode-offset H DD 0 G G D 0 ( t (offset) fcode-string HL t F t h @ F P D 0 ( (const) fcode-header H F GX G D 0 Found FCode header: Format : 4 Checksum : Length : fcode! ID H D 0 ( t (fcode#) F$ instance-init J 4 \ t 0 t t ( 0 L @ P @ $ t new-token Jt p p J named-token K$ H D 0 p p J external-token KP H J b(;) K b(:) K 0 x b(buffer:) K t b(constant) K P t b(create) L( t b(defer) LP t b(field) L t b(value) L P t b(variable) M p t (is-user-word) M@ get-token Mt F t set-token M F$ b(lit) M G 0 b(') M H F 0 b(") N H 0 b(to) ND H F 0 0 offset16 Np DD bbranch N HP 0 d $ p p D b?branch N HP 0 0 d 0 p p b(<mark) OP 0 b(>resolve) O D d b(loop) O HP , b(+loop) O HP T b(do) P HP b(?do) P@ HP b(leave) P` b(case) P b(endcase) P 0 b(of) P HP p b(endof) P HP bigendian? P l!-be Q P h 4 0 t l L ` d l@-be QT p 4 h 0 4 x P alloc-tree Q t P 4 t \ p align-tree R @ no-active R< 0 , no active package. find-property RX Bp \ t 0 D t Ch 1h h 0 CL next-property R P h 4 h x 0 \ Bp , \ R t 0 t 0 CL 0 Ch t 2 get-package-property S0 R 0 ( t C 4 C get-inherited-property S \ 0 h t AD R 0 0 t C 4 C Ad get-my-property TD AD S decode-int T t 0 < t , P h 4 \ Q p my-#acells U 0 AD 0 B 0 X #address-cells S 0 @ U , 0 @ my-#scells U| 0 AD 0 B 0 @ #size-cells S 0 0 U 0 decode-string V4 t 0 h p $ 0 h 0 | P P , h @ P P P \ \ \ $ 4 \ 4 p p decode-bytes V h \ \ D decode-phys W U p @ $ U \ \ P P P P U p @ \ \ \ $ P P P encode-int W R h QX encode-string Xd h R h P 4 encode-bytes X h R h P 4 encode+ X encode-phys Y Xh U p @ Xh Y P sbus-intr>cpu Y, Y (sbus-intr>cpu) Yt No SBUS present on this machine. (property) Y P h R@ R 0 , \ $ h C C C R t CL t \ Bp \ t 0 CL P t R t P 4 \ h Ch h C \ C R@ property Y 0 AD t 0 Y R\ (delete-property) Z R 0 t CL 4 delete-property [@ 0 [D device-name [ X name Z device-type [ X device_type Z reg [ P Y0 \ Xh Y reg Z model \$ X model Z device-tree \\ external \ 0 B 0 private \ 0 8 P 1 h B h B P - \ B 0 active-package! \ t 0 , 1 B @ - B 0 1 t 0 - 0 new-device ]D R@ C4 R P t h B 0 D B4 \ t 0 BP h 4 h \ A h A -h h B -h h B h C h AD Ad h ]H \ \ (delete-device) ] P h B 0 T B4 \ t h 0 BP h BP 4 p \ \ delete-device ^ P \ h B4 t 0 ^ \ ^ finish-device _x t AD P Ad h B ]H name h S 0 h _| \ create-instance _ t A 8 0 p P t A h A h A p t B h Jx t B h Jx t C h A h h @ h Ad \ destroy-instance `d 0 t A t A to a@ X t D 0 ]H current-device a| ?my-self a t h 0 , no current instance. my-parent a a Ad ihandle>non-interposed-phandle bD \ t A 0 Ad AD instance-to-package b| t 0 b ihandle>phandle b AD peer c 0 BP \ child c$ 0 \ B4 find-method c\ B 0 call-package c P \ $call-method c t P AD c 0 \ c $call-parent d$ bH d( find-dev dx find-rel-dev d P ]H d \ ]H find-package d /packages d h 0 d h 0 open-package d `h t h 0 p P 2 h A open h d( 8 0 0 \ \ aD $open-package eT d 0 eX close-package e t close d( 8 0 aD my-address f, a AD B U h 4 p @ t 4 P my-space fx a AD B my-unit f a A U h 4 p @ t 4 P my-args g a A left-parse-string gp ?P map-low g f 4 map-in d| free-virtual g address T h 0 4 U $ D 0 address [ map-out d| package-stack-pos g package-stack h h0 h 0 h push-package h h P 0 @ #cannot push-package onto full stack g h h h 0 h ]H pop-package h h p D 0 @ #cannot pop-package from empty stack g h 0 h h h ]H _diag-switch? i (peek) j8 ]t jP cpeek jd jT wpeek j jT lpeek j jT (poke) j ] j cpoke j j wpoke k , j lpoke k0 8 j rb@ kP rw@ kp rl@ k rb! k rw! k rl! k rx@ k 0 , . M 0 . M rx! k 0 , / M 0 / M obp-ticks lL dummy-msecs l get-msecs l l 0 l l t l ms l l \ t l \ 0 alarm m4 user-abort mp fcode-revision m mac-address m display-status m memory-test-suite m mask n diagnostic-mode? n j< start0 n4 p D` N IH start1 nL 0 D` N IH start2 nt @ D` N IH start4 n D` N IH version1 n 0 D` IH end0 o E( end1 o( ferror oH undefined fcode# encountered. E( suspend-fcode o\ set-args o a x P decode-unit d| 8 0 c B \ x h P 0 t | P \ \ A 2 A (dma-alloc) o (dma-free) p M (dma-map-in) p (dma-map-out) p M (dma-sync) p interpose-ph q interpose-args q4 expand-alias qP /aliases d h 0 S 0 D t 0 pathres-resolve-aliases qt / 0 P / = : = qx 0 p @ 0 @ / > D : = D D \ 3 3 P D \ 3 \ 3 3 2 >si.path r 0 >si.arguments r 0 >si.unit_addr s 0 >si.node_name s0 0 >si.free_me sP 0 >si.unit_phys sp 0 (>si.unit_phys_len s 0 8>si.save-ihandle s 0 <>si.save-phandle s 0 @>si.top-ihandle s 0 D>si.top-opened t 0 H>si.child t@ 0 Lsinfo.size t\ Pmatch-nodename tx P h sT 1 h 0 \ h sT , 2 0 \ , ?P h sT \ 1 0 common-match t P h sT 0 ` name h t` S 0 ` t 0 h t h 0 \ (exact-match) uT P h uX h s 0 reg h t` S 0 h s $ 4 \ 0 0 ( h sT h 0 \ exact-match u u 8 0 (wildcard-match) v P h uX reg h t` S h 0 h s h sT x h 0 ` \ wildcard-match w, w0 8 0 def-decode-unit w 7\ get-decode-unit-xt x decode-unit c h 0 x find-child x, P h s4 t 0 x0 x P P x h \ 4 , p t h s h s P \ t 0 $ \ t ` P QX \ p h s v \ t 0 B4 \ 0 P t h t` h @ 0 \ t` BP v D 0 w p L g link-one xt P `h t h 0 g h t$ Ad t h t$ h s 2 A h s4 0 ( h s A d reg S h 0 ( , A 4 A p \ tD invoke-open z< open d( 8 0 h 0 g 4 tD handle-interposers { P \ q8 0 p q8 4 ]H p p h s4 qT h s h z@ A qT h { ]H l \ close-dev { \ t 0 t Ad 4 f0 path-res-cleanup | 0 t tD 0 $ t t$ 0 | H t t$ t t 0 Ad 4 0 aD 0 | t s t t ]H t st t| (path-resolution) } P h r r h st t 0 < / D 0 4 4 \ ]H h r p p h s4 p p h s p h t$ h 0 g 4 \ h r 0 H t 0 0 h z@ A h { h { ]H h r / ?P : ?P @ ?P h sT h s4 h s h r h sT % 2 D 0 L 4 4 h sT /packages d ]H h xx h xx 4 ]H t 0 h z@ 0 D 0 ( t A h { h { ]H \ path-resolution } t| P h t| p h r h s h t t h } 8 0 P \ } t g 0 0 \ open-dev 0 $ h 0 4 } execute-device-method D @ $ h 0 P d( 8 0 \ } find-device .. 1 h 0 @ t 0 B t h 0 ]H p $ h 0 4 } ]H (find-dev) X $ \ 8 0 4 ]H interpose q8 2 qT non-implemented T ?Non-implemented historical or pre-Open Firmware FCode occurred. adr-mask b(code) 4-byte-id convert , frame-buffer-busy? H poll-packet l return-buffer set-token-table set-table xmit-packet fcode-version firmware-version , processor-type L memmap h >physical | my-params intr driver group-code probe probe-virtual (romfont) 8 (romfont-width) T (romfont-height) t x x x p ? ? ? ? ? ? ? (romlogo-64x64) line# column# inverse? inverse-screen? #lines #columns , frame-buffer-adr D screen-height d screen-width window-top window-left char-height char-width fontbytes char-min char-num 4 font L foreground-color ` background-color color-palette 0 0 0 0 ' 0 ? 0 W 0 k 0 0 font-spacing depth-bits line-bytes display-ih openbios-video-height openbios-video-width D draw-character h reset-screen toggle-cursor erase-screen blink-screen invert-screen insert-characters $ delete-characters H insert-lines l delete-lines draw-logo fb-emit ` depth-bytes default-font X x p set-font 4 P 8 d >font h 8 P , d is-install \ open 0 ` t 0: write dup >r bounds do i c@ fb-emit loop r> ; % : draw-logo draw-logo ; % : restore reset-screen ; % is-remove \ close 0 t is-selftest \ selftest 0 t fb1-nonimplemented 8 2Monochrome framebuffer support is not implemented. fb1-draw-character fb1-reset-screen fb1-toggle-cursor fb1-erase-screen 8 fb1-blink-screen \ fb1-invert-screen fb1-insert-characters fb1-delete-characters fb1-insert-lines fb1-delete-lines fb1-slide-up < fb1-draw-logo \ fb1-install | fb8-blitmask fb8-fillrect fb8-invertrect fb8-line2addr h fb8-curpos2addr 4 fb8-copy-lines l 4 4 H P fb8-clear-lines p @ H fb8-draw-character h 4 0 4 fb8-reset-screen \ p p fb8-toggle-cursor < fb8-erase-screen 0 p p fb8-invert-screen ( p p fb8-blink-screen x | m8 | fb8-insert-characters H p p p 0 4 4 4 P P fb8-delete-characters H p p 4 p 0 4 4 4 P H 4 P fb8-insert-lines 0 4 fb8-delete-lines 0 0 t 0 4 4 fb8-draw-logo L D 4 h 4 D fb8-install 0 H H 0 p p p p $ p /chosen 0 ]H $ Xh display Z ]H ` , | ( L p P @ iso6429-1983-colors T 0 p p p 0 t @ 4 P p p 0 t l L 0 l L @ l color! | 0 P h p , (escseq) 8 (sequence) < (match-number) T D 0 P 0 0 p (esc-number) | P x P p X @ p @ t 4 0 4 4 ; D 0 p 4 | P x \ \ p @ (match-seq) @ X A D 0 T 0 0 0 0 p B D 0 H 0 0 ( 0 0 , C D 0 H 0 0 ( 0 H , < D D 0 H 0 0 ( 0 p E D 0 X 0 0 ( 0 0 , p l f D 0 @ @ D 0 D H , 0 , 0 D 0 8 p 0 , H p D 0 0 p p T H D 0 @ @ D 0 D H , 0 , 0 D 0 8 p 0 , H p D 0 0 p p < J D 0 < p @ H p 0 K D 0 , p @ H p L D 0 , 0 0 0 ` M D 0 0 0 0 D 0 0 @ D 0 0 0 0 D 0 0 L P D 0 0 0 0 D 0 0 p m D 0 ` 0 0 D 0 < D 0 p D 0 P p @ 0 ( h ( q D 0 T p @ 0 ( h ( < s D 0 p @ (term-emit) @ 0 @ D 0 4 p @ overflow in esc @ 0 D 0 | t [ D 0 $ X @ @ 0 p @ out of ESC 0 X @ @ @ p D 0 ` D 0 8 /screen ring-bell D 0 8 0 D 0 h t H D 0 0 l l @ D 0 x p 0 P 0 4 p 0 0 D 0 8 0 ` D 0 0 p p D 0 $ p D 0 , X 0 @ H P 0 d p 0 P 0 , p 0 0 t parent \ B int-property Xh D Z encode-property @ t h 0 $ null phandle P p P ]H Z \ ]H \ iterate-tree p h 0 \ t c` 0 c` t c( 0 c( \ B t 0 $ t c( 0 c( iterate-tree-begin \ iterate-device-type \ 0 t P device_type h S 0 p p t 0 1 h 0 \ \ x p link-nodes t \ 0 $ t B BP B4 \ t 0 BP t link-node p BP init-fcode-table alloc-fcode-table P @ D| D 0 , fcode-table at 0x D| T free-fcode-table t D| @ p D| (debug-feval) E 0 : 0 (compile) t F ( t [ 0x ] (feval) , \ H D 0 0 F t h x 0 E( 0 ` 0 ( ` p byte-load D 0 @ !byte-load: evaluating fcode at 0x P P Ed \ \ t 0 D 0 E@ t D E 0 D` DD x E( p p p p p p x P 8 0 0 byte-load: exception caught! fcode-debug? % 0 ` x h 0 L (byte-load: warning stack overflow, diff x h \ E undefined-fcode undefined fcode word. reserved-fcode reserved fcode word. ['], X n['], X 4 p 0 t P fcode-master-table o, M N NH N OT P P$ PD Pd P P l x < L \ , + + ,< h \ P D h t $ P 8 x @ t 4 $ h x D D ` d 8 , L t \ P , m | ( @ | h T $ $ L 4 4 ` p 0 @ P ( h ` O O K( KT K M MD L, LT L K L K Nt P P P @ h K | N % p M M T nP nx n n o` o 0 oL p f| f g Z Xh Y Y0 X X \( \` [ 7 < ] n8 m n n l m8 _ W h i X g Yx 0 H p ( L p h 8 l ` @ , | P < m [ gt d eX f0 c c d| bH c g d( e l P 0 mt Mx o 0 8 m T U V TH [ S j j j k k4 kT kt k k k k k d < c` c( S4 o g fcode-master-table-size d Tnreserved $ 4 0 4 P D$ D$ t p t h 4 @ (init-fcode-table) < D$ D| D| , 0 d h N OpenBiosTeam,OpenBIOS l name M M #address-cells open close decode-unit 7\ encode-unit 5, , 0 8 aliases name open close , & | 8 $ ( 8 \ openprom X H , name BootROM h P device_type OpenFirmware 3 t model relative-addressing supports-bootinfo [X boot-syntax selftest OpenBIOS selftest... succeeded open close X , | 8 options [< name , T D H 8 chosen p d L name l stdin stdout , H # < builtin name open close $ , H 4 console name open close write t P h @ P \ read t P h @ P \ __context saved-context x | ctrace .registers .fregisters >ls.entry 0 >ls.file-size 0 >ls.file-type 0 >ls.param @ 0 load-state.size \ load-state 0 state-valid file-size !load-size load-size elf-boot elf 4 bootinfo H xcoff ` pe t aout fcode forth bootcode prep init-program (init-program) | 0 0 Unable to locate (init-program)! (find-bootdevice) ?P t h 0 boot-device | ?P \ t 0 t Trying ... 0 | D p ?P | D t h 0 $ boot-file | X /chosen 0 bootargs Y ihandle>boot-device-handle P p \ \ t Ad t P 0 T t A h 0 , h 0 4 \ t 0 ` $load t h 0 t P load-base % 4 t c load c 0 4 c 8 !Cannot find load for this package h selected-partition-args TH h 0 V D h 0 p t A P P t P A h get-instance-path | 0 \ \ \ A 4 get-instance-path | 0 X /chosen 0 bootpath Y \ | load T dir T , > t h 0 8 Unable to locate device $ $ @ dir d( 8 0 4 Cannot find dir for this package | go h 0 H 3No valid state has been set by load or init-program (arch-go) | 0 (go) | 0 dis +dis .bp +bp -bp --bp bpoff step steps hop , hops @ gos T till h return | .breakpoint .step .instruction .adr sym sym>value value>sym headerless 4 headers L apply d (.s x x p @ x P x 0 < showstack #D noshowstack #D dl $ .calls H $sift \ sifting p patch (patch) debug | p D 0 < #could not locate word for debugging h stepping tracing 8 debug-off P resume h 0 (see-indent) (see-cr) < indent+ indent- (see-colon) t : ( \ t t 0 t 0 D 0 , if D 0 , then T \ D 0 , begin t D 0 ( again D 0 ( until D 0 @ while @ 8 D 0 < repeat @ D 0 @ ( lit ) h# 0 t D 0 ` " t 4 @ 4 " ( ; (see) D t 0 D 0 H | P D 0 P constant t ( = D 0 T variable t ( = D 0 d defer t ( is ( 0 primword 4 ( see X devalias x nvalias $nvalias nvunalias $nvunalias dev \ cd device-end ( p ]H select-dev D t h 0 0 failed opening parent. t c ]H unselect-dev d | H p begin-package h ] o end-package _ ?active-package < t h 0 ( no active device def-encode-unit d 5, get-encode-unit-xt B encode-unit c h 0 get-nodename name S 0 <noname> pnodename < t @ t reg S 0 P p P t ]H x P P W \ \ $ P P \ \ @ 3 P D \ 3 4 \ ]H \ inodename P c @ P x P g \ \ x P 0 , 4 0 \ P \ h 0 4 reg c S 0 0 c x P P g \ \ $ P P \ \ 4 @ 3 D 3 gt t 0 0 : 3 D 3 \ get-package-path h 0 p p t B h 0 / P p p @ \ \ t B t P 0 , 3 / 3 \ 4 get-instance-path d h 0 p p t c B h 0 / P p p @ \ \ t Ad t P 0 P t A h 0 ( 3 / 3 \ 4 get-instance-interposed-path L h 0 p p t c B h 0 / P p p @ \ \ t Ad t P 0 \ t P 3 \ A 0 /% / 3 \ 4 pwd h h h ls x h B4 \ t 0 , t t BP .p-string? 0 p 4 P p \ t 0 t h h 0 4 4 @ t 8 4 P x 0 \ 4 p h \ $ h 0 ( " " 4 \ 0 P t h 0 0 t 2 { p $ 4 \ 0 d t 0 , $ t 2 " " } .p-int? t 0 U $ 4 t 0 t \ 0 0.r \ p 4 0 @ @ P h .p-bytes? -- t : 4 P t , p \ P 0 , t h @ P 0 ... \ 0 (.property) ( t h 0 <empty> 0 ` 0 , 0 <unimplemented type> .p-reg $ P P $ 4 t \ \ h @ t h 0 @ < 0 t P l h 0 @ h 0 4 P P 0 < t P T .p-translations-#pacells / d 0 P #address-cells S 0 0 U 0 0 .p-translations-#cells U P .p-translations-cols D H U t V8 @ .p-translations t P P x \ \ $ P P H t \ \ h @ P @ ( D 0 @ < P 0 t P l h 0 @ t h 0 4 @ P 0 < t P ( p @ P (.property-by-name) reg 1 h $ assigned-addresses 1 h x 0 U V8 D @ memory 1 h 0 @ available 1 h 0 U V8 D /chosen d 0 mmu S h 0 U c D 0 | available 1 h 0 U V8 0 D translations 1 h 0 D .properties @ h t P 0 p p \ h S4 0 p t $ \ t P 0 S D | \ print-dev t t h t device_type S 0 0 ( V ) show-sub-devs B4 \ t 0 t p BP show-all-devs l / \ h p ]H show-devs / \ T \ h p ]H probe-fcode? probe-all P >cf.name h 0 >cf.default 0 >cf.check-xt 0 >cf.exec-xt 0 >cf.next 0 config-info.size config-root <find-config < @ \ 0 L $ 1 h 0 p is-config-word X t X t /options d 0 , S 0 p ` 0 p ` t 0 t t 0 p p new-config \ 0 ( p p @ \ 3D $ t $ p @ t @ t P \ t config-default $ t 0 3D no-conf-def x p ` exec-str-conf check-str-conf str-config P h h \ | exec-int-conf 7\ check-int-conf h int-config P l h h \ | exec-secmode-conf command 1 h 0 0 full 1 h 0 @ p check-secmode-conf none 1 h 0 command 1 h 0 full 1 h 0 secmode-config P h h \ | exec-bool-conf true 1 h 0 false 1 h 0 TRUE 1 h 0 FALSE 1 h 0 7\ check-bool-conf p true 1 h 0 false 1 h 0 TRUE 1 h 0 true FALSE 1 h 0 false bool-config P P t h T h \ | $setenv < \ 0 X P D \ h 0 ( Invalid value. D D D X D /options d t setenv t 0 T p p t h 0 ( Invalid value. D printenv D T /options \ ]H (set-default) t t 0 set-default T \ 0 , No such parameter. set-defaults ` @ \ 0 t nodefault-bytes nvram-load-configs \ t 0 L t 2 $ = ?P 8 0 (nvram-store-one) @ 4 P \ 0 \ 4 \ 4 P $ P \ \ (make-configstr) P \ S 0 p p t 0 D = D 3 3 p 4 nvram-store-configs P @ /options d h 0 P @ \ 0 0 h P T \ @ p \ auto-boot? T t auto-boot? trueboot-command ( boot-command bootboot-file , boot-file 8diag-switch? p T t 8diag-switch? ` |false diag-device |diag-device diag-file diag-file fcode-debug? L T t fcode-debug? < Xfalse nvramrc Xnvramrc oem-banner? $ T t oem-banner? false oem-banner , oem-banner 8oem-logo? p T t 8oem-logo? ` |false oem-logo |oem-logo use-nvramrc? D T t use-nvramrc? false input-device L input-device 4 Xkeyboardoutput-device Xoutput-device screen screen-#columns @ l screen-#columns 80 screen-#rows D l screen-#rows 0 P24 selftest-#megs l Pselftest-#megs | 0 security-mode security-mode pci-probe-mask , x l pci-probe-mask <-1 default-mac-address | T t <default-mac-address h false skip-netboot? ( T t skip-netboot? false scroll-lock 0 x T t scroll-lock <trueload-base | l <load-base h 4000tpe-link-test? T t tpe-link-test? truettya-mode X ttya-mode 9600,8,n,1,-ttya-ignore-cd d T t ttya-ignore-cd H ttruettya-rts-dtr-off T t tttya-rts-dtr-off false ttyb-mode P ttyb-mode 9600,8,n,1,-ttyb-ignore-cd \ T t ttyb-ignore-cd @ ltruettyb-rts-dtr-off T t lttyb-rts-dtr-off false boot-screen boot-screen boot-script L boot-script < Xuse-generic? T t Xuse-generic? false boot-device , boot-device diskboot-args 0 boot-args <release-load-area d callback $callback sync (help-generic) ?Enter 'help command-name' or 'help category-name' for more help 3(Use ONLY the first word of a category description) $Examples: help select -or- help line Categories: * boot (Load and execute a client program) diag (Diagnostic routines) (help-diag) ;test <device> Run the selftest method for specified device Atest-all Execute test for all devices using selftest method (help-boot) X =boot [<device-specifier>:<device-arguments>] [boot-arguments] Examples: Cboot Default boot (values specified in nvram variables) ,boot disk1:a Boot from disk1 partition a &boot hd:1,\boot\vmlinuz root=/dev/hda1 help T t h 0 diag , 0 \ boot , 0 No help available for stdout \ stdin 0 input D d h 0 @ Input device not found. read c h 0 , has no read method. h 0 4 Opening failed. $ t install-abort d( 8 0 H 0 8 t remove-abort d( 8 0 | H /chosen d 0 ( P H Xh stdin \ Y / d 0 0 P H P X stdin-path \ Y output X d h 0 @ Output device not found. write c h 0 0 has no write method. h 0 4 Opening failed. $ 4 0 | 4 /chosen d 0 ( P 4 Xh stdout \ Y / d 0 0 P 4 P X stdout-path \ Y io | \ io-char 8 io-out-char \ io-key? x ` ` 0 ` 0 read H d( 0 D io-key \ 0 ` ` ` io-emit 4 0 , | | 0 write 4 d( CONSOLE-IN-list 0 CONSOLE-OUT-list CONSOLE-IN-initializer @X CONSOLE-OUT-initializer @X install-console /aliases d 0 x P screen d 0 D p display 0 h X screen h Y \ \ \ @ 0 0 4 0 \ @ 0 0 H 0 4 0 4 H 0 8 ` ` ( @ 4 screen builtin-logo t builtin-banner suppress-banner? < ` p p p < built on <L Welcome to OpenBIOS v 3 3 3 suppress-banner 0 d banner 4 h 0 t c device_type S 0 p p display 1 0 t c draw-logo c 0 | 4 P P p 0 D 0 $ @ @ \ \ c \ \ 0 d @ reset-all no-reset-all ,reset-all is not available on this platform. reset power-off 0 no-power-off ,power-off is not available on this platform. nvedit , nvstore | nvquit nvrecover nvrun password security-password security-#badlogins $test 0 Testing device : d 0 X self-test c 0 no self-test method. no such device. test D T H test-sub-devs B4 \ t 0 ( t h H t @ BP test-all < / \ T \ h @ ]H boot T boot-file | X /chosen 0 bootargs Y platform-boot | 0 $find-package-method d h 0 c h 0 p call-parent bH c [active-package], ?mmissing c 0 is-open 8 open < 0 $ = close < 0 p $ = is-relay x P \ c h 0 $ = c = is-call-parent = t @ d| = (open-deblocker) \ deblocker d 0 p p eX p 4 is-deblocker deblocker d h 0 P deblocker < open-deblocker = t = close-deblocker = t f0 = \ read seek write tell addr | 0 ( busdevfn 8 l 4 l P x 4 x config-command h t $ P l 4 x x pci-c@ P l pci-w@ ! @ l pci-l@ !D pci-c! ! $ P l pci-w! ! $ @ l pci-l! ! $ dump-pci-device "4 @ : . t [ l P h p !H / h @ !H ] \ p 0 h 0 : p 0 t x ! t h l h P P T , 5 O $L $8 $< # $ packages $\ $@ name open close $l PREPOST-list "x \ POST-list $ SYSTEM-list $ )4DIAG-list $ [ PREPOST-initializer $ $ @X POST-initializer % $ @X SYSTEM-initializer %< $ @X DIAG-initializer %h $ @X initialize-of % ' $ \ @ 0 $ \ @ 0 $ \ @ 0 8 0 % d h 0 l 8 $ \ @ 0 0 % # ciface-ph % & , 'D ', '0 & 3 ) client-services 'T '4 name callback-function ?phandle 'p t h 0 NULL phandle ` ?ihandle ' t h 0 $ NULL ihandle ci-strcpy ' P $ t h , 4 P 0 p 4 \ memory-ih ( mmu-ih (x ( /chosen \ mmu S h 0 U ( memory S h 0 U (| H 6 ( safetype ( < t 2 t \ 0 BAD > phandle-exists? )H 4 p \ 0 0 D 0 $ test t 2 & c 0 p ` peer *4 c( child *t c` parent * getproplen * 2 4 ' S 0 ` getprop * t ` D 0 ` h 0 ` 2 4 ' S 0 ` P 4 \ t P , \ nextprop + P t h 0 p t 2 t 0 @ h S 0 ( \ p 4 ` \ S4 0 t $ ( 0 p 4 p setprop + P P P P 4 X \ t 2 \ Y \ finddevice ,x t 2 d h 0 ` instance-to-package , ' b package-to-path - t h 0 ` P 4 \ h ( canon -, t 2 d 0 -0 ` instance-to-path -p t h 0 ` P 4 \ P ( instance-to-interposed-path - t h 0 ` P 4 \ l ( call-method . t h 0 ( call of null method ` t P t 2 ' d( 8 t 0 L call-method h t 2 : exception t \ open .` t 2 close /0 | read /P P 4 \ t c read c 0 4 c ` write /h P 4 \ t c write c 0 4 c ` seek / t c seek c 0 4 c ` claim 0$ $ 4 & cif-claim c 0 ` release 0t 4 & cif-release c 0 ` boot 0 BOOT enter 1$ ENTER chain 1H CHAIN interpret 1p t 2 % 8 t 0 P interpret: exception t caught p set-callback 1 't 4 't milliseconds 2( l start-cpu 2X Start CPU unimplemented exit 2t EXIT (exit) | 0 # test-method 2 4 t 2 t ) D 0 ` c h 0 ` p client-iface & & c h 0 ` 8 0 L 'Unexpected client interface exception: p client-call-iface 3 & c h 0 ` p set-property 4 P D X D \ t is-cfunc 4\ X is-noname-cfunc 4 p p 4 <p is-xt-cfunc 4 = 0 4 = create-node 4 / ? d 0 ]H ( t 0 5\ \ ]H ] [ _ ]H , # 7 6, 6 6 5 6 cmdline 6< 6$ name 5 eX 0 cmdline d( $ cmdline is missing! 6H 6L # \ 6 prepare 6 p , # 7p 7\ 7` 7 : disk-label 7 7d name part-handlers fs-handlers 7 find-part-handler 7 P 7 \ @ 0 @ h 0 | \ \ p find-filesystem 7 P 7 \ @ 0 P h P 0 | \ $ \ p register-part-handler 8\ t probe c h 0 0 Missing probe method! 7 @X register-fs-handler 8 t probe c h 0 0 Missing probe method! 7 @X dma-alloc 9 dma-alloc d| dma-free : dma-free d| dma-map-in :8 dma-map-in d| dma-map-out :d dma-map-out d| dma-sync : dma-sync d| initialise-partition-package 5X dma-alloc ` dma-free ` dma-map-in ` dma-map-out ` dma-sync ` initialise-fs-package ; dma-alloc ` dma-free ` dma-map-in ` dma-map-out ` dma-sync ` register-partition-package ; register-part-handler disk-label 0 4 ; , [disk-label] internal error register-fs-package <4 register-fs-handler disk-label 0 4 ; , [misc-files] internal error decode-unit-sbus < @ 7$ encode-unit-sbus = 4 5, , 3 P 5, \ 3 sbus-unit>addr = ranges c S h 0 \ 4 p 4 D p $ @ p 0 U $ P P D 0 \ \ P @ D 0 , W D D p ` W U t h 0 < p map-in-sbus > P > 0 h map-in d| \ map-out-sbus ? map-out d| probe-self-sbus ?h p T = 8 0 ? t j 0 t D 4 D x 0 8 ] P o \ t 0 _ ` T 8 Invalid FCode start byte ?l decode-unit-scsi ? @ 7$ encode-unit-scsi @ 4 5, , 3 P 5, \ 3 %g0 @ p %g1 CH %g2 C` %g3 C %g4 C %g5 C $ %g6 D ( %g7 D( , %psr DP %wim Dx %pc D P set-pc D P .globals D %psr: D| %wim: D %pc: D %g0: CL %g1: Cd %g2: C %g3: C %g4: C %g5: D %g6: D, %g7: DT %o0 E 0 %o1 F 4 %o2 F 8 %o3 F < %o4 G @ %o5 G( D %o6 GP H %o7 Gx L %l0 G P %l1 G T %l2 G X %l3 H \ %l4 H@ ` %l5 Hh d %l6 H h %l7 H l %i0 H p %i1 I t %i2 I0 x %i3 IX | %i4 I %i5 I %i6 I %i7 I .locals J %o0: F %o1: F %o2: F %o3: G %o4: G, %o5: GT %o6: G| %o7: G %l0: G %l1: G %l2: H %l3: HD %l4: Hl %l5: H %l6: H %l7: H %i0: I %i1: I4 %i2: I\ %i3: I %i4: I %i5: I %i6: I %i7: J$ .registers JL E JP sparc32-dma-free Mp sparc32-dma-map-out M q M M M #size-cells sun4m N N M compatible ! N, N clock-frequency encode-unit = decode-unit NL = dma-sync Nl q dma-alloc N p dma-free N p dma-map-in N p dma-map-out N p , O Ol O\ O` O O memory O| Od name open close O , P\ P P P O PP virtual-memory P( P name open close P8 , Q Y P P P P\ Q iommu P P P name P P P #address-cells Q Q P #size-cells Q< Q, Q page-size QL Q8 cache-coherence? open close Qh encode-unit Q = decode-unit Q = , P\ T R, R R Q T sbus RT R< R$ name hierarchical Rt Rd RD device_type R R Rp #address-cells R R R #size-cells D? R R R clock-frequency S R R slot-address-bits ? S S burst-sizes open close S( encode-unit S@ = decode-unit S\ = map-in S| ? map-out S ?l dma-alloc S dma-alloc d| dma-free S dma-free d| dma-map-in S dma-map-in d| dma-map-out T( dma-map-out d| dma-sync T\ dma-sync d| , Q VP U T U T V0 espdma U U name encode-unit = decode-unit U4 = dma-alloc UT dma-alloc d| dma-free Up dma-free d| dma-map-in U dma-map-in d| dma-map-out U dma-map-out d| dma-sync V dma-sync d| , Q X V V V VP W ledma V V V name ? V V burst-sizes encode-unit = decode-unit V = dma-alloc W dma-alloc d| dma-free W4 dma-free d| dma-map-in Wd dma-map-in d| dma-map-out W dma-map-out d| dma-sync W dma-sync d| , VP Xp Xd Xh X Y le X X Xl name network X X X device_type X X X busmaster-regval & X X intr dma-alloc dma-alloc d| dma-free Y dma-free d| dma-map-in Y0 dma-map-in d| dma-map-out Y\ dma-map-out d| dma-sync Y dma-sync d| , Z@ Z0 Z4 Y [$ obio Zh ZP Z8 name hierarchical Z Zx ZX device_type Z Z Z #address-cells Z Z #size-cells open close Z encode-unit Z = decode-unit [ = disk [L [4 boot-from [h aligned-allocator p & Type 'help' for detailed information [ make-openable [ d 0 0 \ 0 t ]H | preopen [ [ /chosen \ 0 Xh D Z \0 \ \ memory /memory \4 mmu /virtual-memory \4 \ rmap@ M p obmem ] p sfsr@ ]$ ignore-dfault ]< ]\ ]@ ` ]` p ]` ]@ h 0 ]p ]@ ` ]` p ]` ]@ h # #L # 1$ 1( 4 $ , t
.shstrtab .text .rodata .data .bss .gnu.attributes
(semis) (lit) (do) (?do) , (loop) < (+loop) L dup ` 2dup p ?dup over 2over pick drop 2drop nip roll rot -rot swap 2swap 0 >r @ r> L r@ X depth d depth! t rdepth !rdepth! "+ #- $* %u* &mu/mod 'abs (negate )max *min +lshift ( ,rshift 8 ->>a H .and X /or h 0xor t 1invert 2d+ 3d- 4m* 5um* 6@ 7c@ 8w@ 9l@ :! ;+! <c! =w! >l! ( ?= 4 @> @ A< L Bu> X Cu< d Dsp@ p Emove Ffill G(emit) H(key?) I(key) Jexecute Khere Lhere! Mdobranch Ndo?branch Ounaligned-w@ , Punaligned-w! D Qunaligned-l@ \ Runaligned-l! t Sioc@ Tiow@ Uiol@ Vioc! Wiow! Xiol! Yi Zj [call \sys-debug ]$include ( ^$encode-file < _(debug T `(debug-off) d astate | forth-last ] latest ] base /c /w /l /n /x 1 2 , 3 < -1 L 0 \ my-self l decimal hex octal current last #order context < , vocabularies? T locals-end t locals-dict locals-dict-buf true false (immediate) 0 t 0 x 4 (compile-only) 0 t @ x 4 immediate L $ compile-only $ P flags? l immediate? 0 l 0 D compile-only? @ l @ D [ 4 p ] X ` allot t , c, align 0 l 0 l null-align t 4 p w, < 0 l , l, l 0 l 0 l 8 <> D (to) >body 0 < body> ( 0 < reveal L $ recursive p t recurse noop environment? no-environment? resolve-orig 4 (if) @ 0 p p (then) t D tmp-comp-depth tmp-comp-buf ^ setup-tmp-comp p D 0 , 0 x x execute-tmp-comp x D 0 D ` t p if ` 0 p p then D d else p p D D (begin) (again) X (until) p (while) (repeat) (resolve-dest) (resolve-begin) \ 0 (resolve-until) 0 d resolve-dest D @ P \ \ t t 0 D 0 $ 4 0 0 @ P p 0 begin \ 0 again t d until 0 0 d while d 0 p p D repeat D d leaves resolve-loop \ 0 , t 4 4 do 0 @ 0 p ?do @ @ p loop P 4 d +loop ( d 4 d unloop P \ \ \ P leave x | ?leave 0 | case p endcase p @ P d of , 0 P D \ endof l P \ exit \ bl bell bs carret $ linefeed 8 tuck P 4 3dup d @ @ @ clear p 3drop 2rot P P D \ \ D 2>r \ $ 4 P P P 2r> \ \ \ P 4 2r@ < \ \ \ P P P 4 u/mod h p 4 1+ 0 1- 0 2+ @ 2- @ 4+ even l bounds @ 4 << d < >> L 2* 0 < u2/ 0 L 2/ 0 \ not s>d t p \ dnegate p p D dabs 4 t p \ 0 8 um/mod X sm/rem P P \ h \ p \ 0 \ p \ 0 4 4 fm/mod t P p \ P p \ l 0 0 4 \ 4 \ */mod P \ */ /mod P \ mod / lwsplit t l 4 L l wbsplit t l 4 L l lbsplit \ 4 ` ` bwjoin l < 4 l x wljoin l < 4 l x bljoin $ 4 wbflip H t L l 4 l lwflip p t L l 4 l lbflip t L l t 4 l t /c* /w* D /l* ` /n* | ca+ H wa+ d la+ na+ ca1+ wa1+ $ la1+ @ na1+ \ aligned x l char+ ( cell+ | chars H cells cell <= $ P >= 4 \ 0= L p D 0<= d p 8 0< p \ 0<> p 0> p P 0>= p P u<= h u>= t within P P 4 \ P x between < 0 @ 2@ t t 4 2! t P \ <w@ t P 0 comp P p $ \ h @ \ t t 0 , \ 0 0 ` 4 | ( P $= 0 h off 4 on 4 blank erase $ p wbflips @ h 0 t , d lwflips ` h 0 8 d lbflips h 0 8 d catchframe catch P x P $ P $ \ $ \ \ p throw 4 0 @ $ \ $ \ 4 P \ \ start-mem end-mem free-list % init-mem $ t ( 4 p 4 smallest-free-block < p ( p p P P P \ t 0 h t P h @ 0 ( \ \ \ P P t P t ( \ \ \ alloc-mem t h 0 t t h 0 t P P 0 p t P 4 t t h 0 ( free-mem | h 0 t @ h 0 p ( \ t 0 ( t t P \ 0 t t 0 ( t t P D 0 < 4 P t P t D 0 @ t @ 4 h 0 ( @ \ \ 0 t P ( D 0 ( t 0 emit type h @ P debug-type h @ P source-id P ib #ib >in source /string h $ 4 pocketsize numpockets $ pockets < whichpocket T init-pockets p ( @ X pocket ( t X t 0 @ t span findchar 4 p 0 t D 0 8 D 0 t t | P D parse P t p \ 0 p \ \ $ 0 t t skipws \ t P 0 $ 8 0 0 parse-word @ D word P t h h \ t D 0 P ( ) \ L ", l h @ P (") \ t @ P handle-text 0 $ t @ L 4 t P p @ ( P \ s" " ." " 0 .( ) 0 count t pack X 4 p @ ( P lcc | t A Z x 0 upc t a z x 0 -trailing \ t 0 D 0 cr ` T debug-cr T (cr < space spaces p @ P #line 8 #out d lfa2name x \ t 0 l h 4 comp-nocase p 0 4 0 p | P 0 ` p 4 comp-word P 4 \ D 0 find-wordlist x P \ h t 0 | t D 0 \ P h 0 $ \ 4 \ $find 0 0 x 0 T @ p @ 4 X 0 | P $find1 x x 0 ' | h 0 : ['] T | h 0 : 0 find t \ | 0 $ 0 literal compile, T compile | \ t P [compile] X postpone | 0 8 t 0 4 X undefined word #instance instance #instance-base t 0 #instance-offs t 0 | instance-cfa? @ behavior $ t ( 0 D 0 4 | P | (ito) P 0 4 | P (to-xt) t ( 0 @ 4 0 0 to X is | 0 0 could not find key? key $ accept < h p 0 @ t T D 0 $ p | t 0 P expect T X handle-lit 0 8 @ D 0 char 0 0 Unexpected EOL. ascii X \ 0 [char] \ 0 control \ l 0 abort ` abort" , " words H $ \ 0 4 t t 0 capital-hex? pad $ todigit 8 t P 0 ( ( 0 0 <# d < t hold < t h 4 sign 0 - # h #s < \ @ x h 0 #> d < t h (.) t P p h \ u# 4 h u#s \ t h 0 u#> p (u.) P $ T . l s. u. p .r 4 \ 0 < u.r 4 p \ 0 < .d 4 .h h 4 .s < x t > p @ x P digit 4 t t A Z x 0 ( t 9 P 0 $ 0 4 p 4 @ 0 >number 0 \ t 0 t 4 h 0 P D \ 4 D 0 | numdelim? t . D 4 , D x $dnumber? p p D t h 0 p - D t P \ t 0 P 0 D h 0 \ p 0 0 @ . D 0 \ p x 0 \ 0 8 @ \ 0 0 $number p D 0 P 0 D 0 , @ D 0 d# 0 P 4 0 4 illegal number p \ 0 h# P 4 0 4 p illegal number p \ 0 o# 0 P 4 0 4 illegal number p \ 0 " t \ P 0 p " P h \ 0 ( D P l 0 ) h @ 4 0 X 4 0 4 < x @ 0 d | dump 4 0 p 0 t h h D 0 P P < p 0 t \ 0 . P d header t 0 X $ 0 D isn't unique. @ t $ x l h 0 p @ $ : 0 x :noname p p 0 x ; 0 $ p t \ constant P t active-package L instance, t t instance? t 0 value 0 P t variable 0 $ p p t $buffer: h 0 D l l t 4 p t buffer: (undefined-defer) d h @ undefined defer word (undefined-idefer) undefined idefer word defer 0 ( @ t alias L | 0 , $ 0 t 8 $ undefined word $create t create T X (does>) \ does> 0 struct field 2constant t init-tmp-comp L interactive? terminate? exit? h 0 forget 4 This word is obsolescent. X ( t t $ interpret p \ t 0 ( | 0 < t h x 0 T 4 0 4 : $ 0 x P 0 x 0 P 0 0 refill p print-status 0 t , ` D 0 0 Aborted. , D 0 0 Aborted. D 0 @ Stack Overflow. p D 0 @ t Stack Underflow. p 4 D 0 @ Return Stack Overflow. D 0 @ !$ Return Stack Underflow. D 0 8 !| undefined word. 4 D 0 8 ! out of memory. D 0 < " undefined method. D 0 8 "p no such device. @ t " Exception # p \ h 0 $ # ok #$ compiled status < print-prompt #@ #D x > outer-interpreter #` # # \ #d p 8 @ 0 save-source # \ P P P P P P restore-source $ \ \ \ \ \ \ P (evaluate) $` $ ` t $d evaluate $ $ 0 t D 4 D x 0 $ P $ \ P 4 $ eval % % init-builtin-terminal % @ ( t t $ p p include % T @ encode-file & X bye & & Farewell! p quit & @ # init-chain ' : initializer 'D 4 p 'H \ t 0 | initialize-forth '` @ % 'H \ t 0 t | initialize ' ' (\ OpenBIOS kernel started. '$ prstack (8 #prstack * prstack-push +( * +, 0 +, prstack-pop +D ` +, * +, >r + 0 P \ 4 +H P r> + 0 \ \ + 4 P r@ + 0 h \ + t +H 4 P #vocs ,8 vocabularies , 0 , search-wordlist , 0 0 wordlist - p get-order -d @ p @ , @ X P @ set-order - t ` D 0 0 t @ p @ X P order - - p @ D wordlist . P definitions: previous .P - - do-vocabulary . P - 4 \ 4 - discard / p @ P vocabulary /\ -h / also / - 4 - only / ` - / forth / /( findw / p @ p @ H \ X - 0 D | P get-current 0 set-current 0 definitions 0 X 0 forth-wordlist 0 #words 0 p $ \ 0 4 4 comp0 1 0 P \ 0 0 p strcmp 1d 0 0 0 0 p strchr 1 P \ t 0 < h D 0 \ 4 4 \ p cstrlen 2 t \ t 0 4 strdup 2 t 0 0 t P t t P 4 \ \ p p dict-strdup 2 t 4 @ 4 P P \ \ tmpstrcat 3@ t @ P P t P P 4 \ 4 \ \ \ tmpstrcpy 3 4 P P \ \ numtostr 4 4 $ \ 4 t \ 0 0 a P h 0 p \ \ 8 0 tohexstr 4L $ 4P toudecstr 5( $ 4P todecstr 5` 0 4 4 - 5d 5d parse-ints 5 $ @ $ \ $ @ 0 , 2 0 8 $ @ @ t $ $ p p D 4 0 p P \ \ t 0 \ 4 parse-2int 5 @ 5 parse-nhex 7 P 5 \ parse-hex 7 0 7$ rot13 7X t A M x 0 t N Z x 0 rot13-str 7t 2 h @ 7x P prep-wid 7 prep-dict 88 prep-here 8P - ([IF]) 8h \ \ t h 0 [IF] 1 h 0 0 [IFDEF] 1 h 0 0 [ELSE] 1 h 0 @ [THEN] 1 h 0 P \\ 1 h 0 T t [IF] 8| 0 0 \ 8 8 0 D 0 ` @ D 0 $ t 0 D 0 ( P D 0 t p 8 0 X [ELSE] 9 p 9 [THEN] :x : p 8< p 8T : [IFDEF] : 8< 0 $ 8< - t 0 p 9 [DEFINE] : 0 P P 8T h 0 @ 8T -h 8< 8l 8< 0 8l X 8l \ \ 0 [0] ;4 p [1] ; 0 builddate ; Sep 24 2024 19:56 version < 1.1 last-xt <H | $is-ibuf <l <p is-ibuf < p p < is-ivariable < $ <p is-xt-func < 0 0 t is-2xt-func = 0 4 t is-func-begin =\ 0 is-func-end = t split-before = p t P p @ @ @ @ D 0 | P \ @ D split-after = t P p @ @ @ @ D 0 | P t p P 0 h \ @ D left-split > p t P p @ @ @ @ D 0 | P \ @ t 0 D right-split ?L t P > t 0 $ h D 0 \ list-add ? p 4 \ t 0 list-get @T t 0 t | 64bit? @ >in.instance-data @ 0 >in.alloced-size @ 0 >in.device-node A 0 >in.my-parent A@ 0 >in.interposed A` 0 >in.my-unit A 0 >in.arguments A 0 $inst-node.size A ,>dn.isize A 0 >dn.parent A 0 >dn.child B 0 >dn.peer B0 0 >dn.properties BL 0 >dn.methods Bl 0 >dn.priv-methods B 0 >dn.#acells B 0 >dn.probe-addr B 0 >dn.itemplate B 0 $dev-node.size C P>prop.next C0 0 >prop.name CH 0 >prop.addr Cd 0 >prop.len C 0 prop-node.size C >ap.device-str C 0 active-package.size C fcode-sys-table D ?fcode-offset16 D fcode-spread D@ fcode-table D\ ?fcode-verbose Dx _fcode-debug? D fcode-headers? D fcode-stream-start D fcode-stream D fcode-end E fcode-c@ E$ fcode-push-state E< DD D` D| D D E E( E@ T fcode-pop-state E` E@ E( E D D D| D` DD fcode-ptr E D| 0 t $ 0 0 User FCODE# referenced. D$ fcode>xt F F$ fcode-num8 F E t D` E E@ fcode-num8-signed F F t l 0 x fcode-num16 G F F 4 fcode-num16-signed GT GX t l 0 x fcode-num32 G F F F F 4 D 4 L fcode# G F t 0 x 0 F 4 fcode-offset H DD 0 G G D 0 ( t (offset) fcode-string HL t F t h @ F P D 0 ( (const) fcode-header H F GX G D 0 Found FCode header: Format : 4 Checksum : Length : fcode! ID H D 0 ( t (fcode#) F$ instance-init J 4 \ t 0 t t ( 0 L @ P @ $ t new-token Jt p p J named-token K$ H D 0 p p J external-token KP H J b(;) K b(:) K 0 x b(buffer:) K t b(constant) K P t b(create) L( t b(defer) LP t b(field) L t b(value) L P t b(variable) M p t (is-user-word) M@ get-token Mt F t set-token M F$ b(lit) M G 0 b(') M H F 0 b(") N H 0 b(to) ND H F 0 0 offset16 Np DD bbranch N HP 0 d $ p p D b?branch N HP 0 0 d 0 p p b(<mark) OP 0 b(>resolve) O D d b(loop) O HP , b(+loop) O HP T b(do) P HP b(?do) P@ HP b(leave) P` b(case) P b(endcase) P 0 b(of) P HP p b(endof) P HP bigendian? P l!-be Q P h 4 0 t l L ` d l@-be QT p 4 h 0 4 x P alloc-tree Q t P 4 t \ p align-tree R @ no-active R< 0 , no active package. find-property RX Bp \ t 0 D t Ch 1h h 0 CL next-property R P h 4 h x 0 \ Bp , \ R t 0 t 0 CL 0 Ch t 2 get-package-property S0 R 0 ( t C 4 C get-inherited-property S \ 0 h t AD R 0 0 t C 4 C Ad get-my-property TD AD S decode-int T t 0 < t , P h 4 \ Q p my-#acells U 0 AD 0 B 0 X #address-cells S 0 @ U , 0 @ my-#scells U| 0 AD 0 B 0 @ #size-cells S 0 0 U 0 decode-string V4 t 0 h p $ 0 h 0 | P P , h @ P P P \ \ \ $ 4 \ 4 p p decode-bytes V h \ \ D decode-phys W U p @ $ U \ \ P P P P U p @ \ \ \ $ P P P encode-int W R h QX encode-string Xd h R h P 4 encode-bytes X h R h P 4 encode+ X encode-phys Y Xh U p @ Xh Y P sbus-intr>cpu Y, Y (sbus-intr>cpu) Yt No SBUS present on this machine. (property) Y P h R@ R 0 , \ $ h C C C R t CL t \ Bp \ t 0 CL P t R t P 4 \ h Ch h C \ C R@ property Y 0 AD t 0 Y R\ (delete-property) Z R 0 t CL 4 delete-property [@ 0 [D device-name [ X name Z device-type [ X device_type Z reg [ P Y0 \ Xh Y reg Z model \$ X model Z device-tree \\ external \ 0 B 0 private \ 0 8 P 1 h B h B P - \ B 0 active-package! \ t 0 , 1 B @ - B 0 1 t 0 - 0 new-device ]D R@ C4 R P t h B 0 D B4 \ t 0 BP h 4 h \ A h A -h h B -h h B h C h AD Ad h ]H \ \ (delete-device) ] P h B 0 T B4 \ t h 0 BP h BP 4 p \ \ delete-device ^ P \ h B4 t 0 ^ \ ^ finish-device _x t AD P Ad h B ]H name h S 0 h _| \ create-instance _ t A 8 0 p P t A h A h A p t B h Jx t B h Jx t C h A h h @ h Ad \ destroy-instance `d 0 t A t A to a@ X t D 0 ]H current-device a| ?my-self a t h 0 , no current instance. my-parent a a Ad ihandle>non-interposed-phandle bD \ t A 0 Ad AD instance-to-package b| t 0 b ihandle>phandle b AD peer c 0 BP \ child c$ 0 \ B4 find-method c\ B 0 call-package c P \ $call-method c t P AD c 0 \ c $call-parent d$ bH d( find-dev dx find-rel-dev d P ]H d \ ]H find-package d /packages d h 0 d h 0 open-package d `h t h 0 p P 2 h A open h d( 8 0 0 \ \ aD $open-package eT d 0 eX close-package e t close d( 8 0 aD my-address f, a AD B U h 4 p @ t 4 P my-space fx a AD B my-unit f a A U h 4 p @ t 4 P my-args g a A left-parse-string gp ?P map-low g f 4 map-in d| free-virtual g address T h 0 4 U $ D 0 address [ map-out d| package-stack-pos g package-stack h h0 h 0 h push-package h h P 0 @ #cannot push-package onto full stack g h h h 0 h ]H pop-package h h p D 0 @ #cannot pop-package from empty stack g h 0 h h h ]H _diag-switch? i (peek) j8 ]t jP cpeek jd jT wpeek j jT lpeek j jT (poke) j ] j cpoke j j wpoke k , j lpoke k0 8 j rb@ kP rw@ kp rl@ k rb! k rw! k rl! k rx@ k 0 , . M 0 . M rx! k 0 , / M 0 / M obp-ticks lL dummy-msecs l get-msecs l l 0 l l t l ms l l \ t l \ 0 alarm m4 user-abort mp fcode-revision m mac-address m display-status m memory-test-suite m mask n diagnostic-mode? n j< start0 n4 p D` N IH start1 nL 0 D` N IH start2 nt @ D` N IH start4 n D` N IH version1 n 0 D` IH end0 o E( end1 o( ferror oH undefined fcode# encountered. E( suspend-fcode o\ set-args o a x P decode-unit d| 8 0 c B \ x h P 0 t | P \ \ A 2 A (dma-alloc) o (dma-free) p M (dma-map-in) p (dma-map-out) p M (dma-sync) p interpose-ph q interpose-args q4 expand-alias qP /aliases d h 0 S 0 D t 0 pathres-resolve-aliases qt / 0 P / = : = qx 0 p @ 0 @ / > D : = D D \ 3 3 P D \ 3 \ 3 3 2 >si.path r 0 >si.arguments r 0 >si.unit_addr s 0 >si.node_name s0 0 >si.free_me sP 0 >si.unit_phys sp 0 (>si.unit_phys_len s 0 8>si.save-ihandle s 0 <>si.save-phandle s 0 @>si.top-ihandle s 0 D>si.top-opened t 0 H>si.child t@ 0 Lsinfo.size t\ Pmatch-nodename tx P h sT 1 h 0 \ h sT , 2 0 \ , ?P h sT \ 1 0 common-match t P h sT 0 ` name h t` S 0 ` t 0 h t h 0 \ (exact-match) uT P h uX h s 0 reg h t` S 0 h s $ 4 \ 0 0 ( h sT h 0 \ exact-match u u 8 0 (wildcard-match) v P h uX reg h t` S h 0 h s h sT x h 0 ` \ wildcard-match w, w0 8 0 def-decode-unit w 7\ get-decode-unit-xt x decode-unit c h 0 x find-child x, P h s4 t 0 x0 x P P x h \ 4 , p t h s h s P \ t 0 $ \ t ` P QX \ p h s v \ t 0 B4 \ 0 P t h t` h @ 0 \ t` BP v D 0 w p L g link-one xt P `h t h 0 g h t$ Ad t h t$ h s 2 A h s4 0 ( h s A d reg S h 0 ( , A 4 A p \ tD invoke-open z< open d( 8 0 h 0 g 4 tD handle-interposers { P \ q8 0 p q8 4 ]H p p h s4 qT h s h z@ A qT h { ]H l \ close-dev { \ t 0 t Ad 4 f0 path-res-cleanup | 0 t tD 0 $ t t$ 0 | H t t$ t t 0 Ad 4 0 aD 0 | t s t t ]H t st t| (path-resolution) } P h r r h st t 0 < / D 0 4 4 \ ]H h r p p h s4 p p h s p h t$ h 0 g 4 \ h r 0 H t 0 0 h z@ A h { h { ]H h r / ?P : ?P @ ?P h sT h s4 h s h r h sT % 2 D 0 L 4 4 h sT /packages d ]H h xx h xx 4 ]H t 0 h z@ 0 D 0 ( t A h { h { ]H \ path-resolution } t| P h t| p h r h s h t t h } 8 0 P \ } t g 0 0 \ open-dev 0 $ h 0 4 } execute-device-method D @ $ h 0 P d( 8 0 \ } find-device .. 1 h 0 @ t 0 B t h 0 ]H p $ h 0 4 } ]H (find-dev) X $ \ 8 0 4 ]H interpose q8 2 qT non-implemented T ?Non-implemented historical or pre-Open Firmware FCode occurred. adr-mask b(code) 4-byte-id convert , frame-buffer-busy? H poll-packet l return-buffer set-token-table set-table xmit-packet fcode-version firmware-version , processor-type L memmap h >physical | my-params intr driver group-code probe probe-virtual (romfont) 8 (romfont-width) T (romfont-height) t x x x p ? ? ? ? ? ? ? (romlogo-64x64) line# column# inverse? inverse-screen? #lines #columns , frame-buffer-adr D screen-height d screen-width window-top window-left char-height char-width fontbytes char-min char-num 4 font L foreground-color ` background-color color-palette 0 0 0 0 ' 0 ? 0 W 0 k 0 0 font-spacing depth-bits line-bytes display-ih openbios-video-height openbios-video-width D draw-character h reset-screen toggle-cursor erase-screen blink-screen invert-screen insert-characters $ delete-characters H insert-lines l delete-lines draw-logo fb-emit ` depth-bytes default-font X x p set-font 4 P 8 d >font h 8 P , d is-install \ open 0 ` t 0: write dup >r bounds do i c@ fb-emit loop r> ; % : draw-logo draw-logo ; % : restore reset-screen ; % is-remove \ close 0 t is-selftest \ selftest 0 t fb1-nonimplemented 8 2Monochrome framebuffer support is not implemented. fb1-draw-character fb1-reset-screen fb1-toggle-cursor fb1-erase-screen 8 fb1-blink-screen \ fb1-invert-screen fb1-insert-characters fb1-delete-characters fb1-insert-lines fb1-delete-lines fb1-slide-up < fb1-draw-logo \ fb1-install | fb8-blitmask fb8-fillrect fb8-invertrect fb8-line2addr h fb8-curpos2addr 4 fb8-copy-lines l 4 4 H P fb8-clear-lines p @ H fb8-draw-character h 4 0 4 fb8-reset-screen \ p p fb8-toggle-cursor < fb8-erase-screen 0 p p fb8-invert-screen ( p p fb8-blink-screen x | m8 | fb8-insert-characters H p p p 0 4 4 4 P P fb8-delete-characters H p p 4 p 0 4 4 4 P H 4 P fb8-insert-lines 0 4 fb8-delete-lines 0 0 t 0 4 4 fb8-draw-logo L D 4 h 4 D fb8-install 0 H H 0 p p p p $ p /chosen 0 ]H $ Xh display Z ]H ` , | ( L p P @ iso6429-1983-colors T 0 p p p 0 t @ 4 P p p 0 t l L 0 l L @ l color! | 0 P h p , (escseq) 8 (sequence) < (match-number) T D 0 P 0 0 p (esc-number) | P x P p X @ p @ t 4 0 4 4 ; D 0 p 4 | P x \ \ p @ (match-seq) @ X A D 0 T 0 0 0 0 p B D 0 H 0 0 ( 0 0 , C D 0 H 0 0 ( 0 H , < D D 0 H 0 0 ( 0 p E D 0 X 0 0 ( 0 0 , p l f D 0 @ @ D 0 D H , 0 , 0 D 0 8 p 0 , H p D 0 0 p p T H D 0 @ @ D 0 D H , 0 , 0 D 0 8 p 0 , H p D 0 0 p p < J D 0 < p @ H p 0 K D 0 , p @ H p L D 0 , 0 0 0 ` M D 0 0 0 0 D 0 0 @ D 0 0 0 0 D 0 0 L P D 0 0 0 0 D 0 0 p m D 0 ` 0 0 D 0 < D 0 p D 0 P p @ 0 ( h ( q D 0 T p @ 0 ( h ( < s D 0 p @ (term-emit) @ 0 @ D 0 4 p @ overflow in esc @ 0 D 0 | t [ D 0 $ X @ @ 0 p @ out of ESC 0 X @ @ @ p D 0 ` D 0 8 /screen ring-bell D 0 8 0 D 0 h t H D 0 0 l l @ D 0 x p 0 P 0 4 p 0 0 D 0 8 0 ` D 0 0 p p D 0 $ p D 0 , X 0 @ H P 0 d p 0 P 0 , p 0 0 t parent \ B int-property Xh D Z encode-property @ t h 0 $ null phandle P p P ]H Z \ ]H \ iterate-tree p h 0 \ t c` 0 c` t c( 0 c( \ B t 0 $ t c( 0 c( iterate-tree-begin \ iterate-device-type \ 0 t P device_type h S 0 p p t 0 1 h 0 \ \ x p link-nodes t \ 0 $ t B BP B4 \ t 0 BP t link-node p BP init-fcode-table alloc-fcode-table P @ D| D 0 , fcode-table at 0x D| T free-fcode-table t D| @ p D| (debug-feval) E 0 : 0 (compile) t F ( t [ 0x ] (feval) , \ H D 0 0 F t h x 0 E( 0 ` 0 ( ` p byte-load D 0 @ !byte-load: evaluating fcode at 0x P P Ed \ \ t 0 D 0 E@ t D E 0 D` DD x E( p p p p p p x P 8 0 0 byte-load: exception caught! fcode-debug? % 0 ` x h 0 L (byte-load: warning stack overflow, diff x h \ E undefined-fcode undefined fcode word. reserved-fcode reserved fcode word. ['], X n['], X 4 p 0 t P fcode-master-table o, M N NH N OT P P$ PD Pd P P l x < L \ , + + ,< h \ P D h t $ P 8 x @ t 4 $ h x D D ` d 8 , L t \ P , m | ( @ | h T $ $ L 4 4 ` p 0 @ P ( h ` O O K( KT K M MD L, LT L K L K Nt P P P @ h K | N % p M M T nP nx n n o` o 0 oL p f| f g Z Xh Y Y0 X X \( \` [ 7 < ] n8 m n n l m8 _ W h i X g Yx 0 H p ( L p h 8 l ` @ , | P < m [ gt d eX f0 c c d| bH c g d( e l P 0 mt Mx o 0 8 m T U V TH [ S j j j k k4 kT kt k k k k k d < c` c( S4 o g fcode-master-table-size d Tnreserved $ 4 0 4 P D$ D$ t p t h 4 @ (init-fcode-table) < D$ D| D| , 0 d h N OpenBiosTeam,OpenBIOS l name M M #address-cells open close decode-unit 7\ encode-unit 5, , 0 8 aliases name open close , & | 8 $ ( 8 \ openprom X H , name BootROM h P device_type OpenFirmware 3 t model relative-addressing supports-bootinfo [X boot-syntax selftest OpenBIOS selftest... succeeded open close X , | 8 options [< name , T D H 8 chosen p d L name l stdin stdout , H # < builtin name open close $ , H 4 console name open close write t P h @ P \ read t P h @ P \ __context saved-context x | ctrace .registers .fregisters >ls.entry 0 >ls.file-size 0 >ls.file-type 0 >ls.param @ 0 load-state.size \ load-state 0 state-valid file-size !load-size load-size elf-boot elf 4 bootinfo H xcoff ` pe t aout fcode forth bootcode prep init-program (init-program) | 0 0 Unable to locate (init-program)! (find-bootdevice) ?P t h 0 boot-device | ?P \ t 0 t Trying ... 0 | D p ?P | D t h 0 $ boot-file | X /chosen 0 bootargs Y ihandle>boot-device-handle P p \ \ t Ad t P 0 T t A h 0 , h 0 4 \ t 0 ` $load t h 0 t P load-base % 4 t c load c 0 4 c 8 !Cannot find load for this package h selected-partition-args TH h 0 V D h 0 p t A P P t P A h get-instance-path | 0 \ \ \ A 4 get-instance-path | 0 X /chosen 0 bootpath Y \ | load T dir T , > t h 0 8 Unable to locate device $ $ @ dir d( 8 0 4 Cannot find dir for this package | go h 0 H 3No valid state has been set by load or init-program (arch-go) | 0 (go) | 0 dis +dis .bp +bp -bp --bp bpoff step steps hop , hops @ gos T till h return | .breakpoint .step .instruction .adr sym sym>value value>sym headerless 4 headers L apply d (.s x x p @ x P x 0 < showstack #D noshowstack #D dl $ .calls H $sift \ sifting p patch (patch) debug | p D 0 < #could not locate word for debugging h stepping tracing 8 debug-off P resume h 0 (see-indent) (see-cr) < indent+ indent- (see-colon) t : ( \ t t 0 t 0 D 0 , if D 0 , then T \ D 0 , begin t D 0 ( again D 0 ( until D 0 @ while @ 8 D 0 < repeat @ D 0 @ ( lit ) h# 0 t D 0 ` " t 4 @ 4 " ( ; (see) D t 0 D 0 H | P D 0 P constant t ( = D 0 T variable t ( = D 0 d defer t ( is ( 0 primword 4 ( see X devalias x nvalias $nvalias nvunalias $nvunalias dev \ cd device-end ( p ]H select-dev D t h 0 0 failed opening parent. t c ]H unselect-dev d | H p begin-package h ] o end-package _ ?active-package < t h 0 ( no active device def-encode-unit d 5, get-encode-unit-xt B encode-unit c h 0 get-nodename name S 0 <noname> pnodename < t @ t reg S 0 P p P t ]H x P P W \ \ $ P P \ \ @ 3 P D \ 3 4 \ ]H \ inodename P c @ P x P g \ \ x P 0 , 4 0 \ P \ h 0 4 reg c S 0 0 c x P P g \ \ $ P P \ \ 4 @ 3 D 3 gt t 0 0 : 3 D 3 \ get-package-path h 0 p p t B h 0 / P p p @ \ \ t B t P 0 , 3 / 3 \ 4 get-instance-path d h 0 p p t c B h 0 / P p p @ \ \ t Ad t P 0 P t A h 0 ( 3 / 3 \ 4 get-instance-interposed-path L h 0 p p t c B h 0 / P p p @ \ \ t Ad t P 0 \ t P 3 \ A 0 /% / 3 \ 4 pwd h h h ls x h B4 \ t 0 , t t BP .p-string? 0 p 4 P p \ t 0 t h h 0 4 4 @ t 8 4 P x 0 \ 4 p h \ $ h 0 ( " " 4 \ 0 P t h 0 0 t 2 { p $ 4 \ 0 d t 0 , $ t 2 " " } .p-int? t 0 U $ 4 t 0 t \ 0 0.r \ p 4 0 @ @ P h .p-bytes? -- t : 4 P t , p \ P 0 , t h @ P 0 ... \ 0 (.property) ( t h 0 <empty> 0 ` 0 , 0 <unimplemented type> .p-reg $ P P $ 4 t \ \ h @ t h 0 @ < 0 t P l h 0 @ h 0 4 P P 0 < t P T .p-translations-#pacells / d 0 P #address-cells S 0 0 U 0 0 .p-translations-#cells U P .p-translations-cols D H U t V8 @ .p-translations t P P x \ \ $ P P H t \ \ h @ P @ ( D 0 @ < P 0 t P l h 0 @ t h 0 4 @ P 0 < t P ( p @ P (.property-by-name) reg 1 h $ assigned-addresses 1 h x 0 U V8 D @ memory 1 h 0 @ available 1 h 0 U V8 D /chosen d 0 mmu S h 0 U c D 0 | available 1 h 0 U V8 0 D translations 1 h 0 D .properties @ h t P 0 p p \ h S4 0 p t $ \ t P 0 S D | \ print-dev t t h t device_type S 0 0 ( V ) show-sub-devs B4 \ t 0 t p BP show-all-devs l / \ h p ]H show-devs / \ T \ h p ]H probe-fcode? probe-all P >cf.name h 0 >cf.default 0 >cf.check-xt 0 >cf.exec-xt 0 >cf.next 0 config-info.size config-root <find-config < @ \ 0 L $ 1 h 0 p is-config-word X t X t /options d 0 , S 0 p ` 0 p ` t 0 t t 0 p p new-config \ 0 ( p p @ \ 3D $ t $ p @ t @ t P \ t config-default $ t 0 3D no-conf-def x p ` exec-str-conf check-str-conf str-config P h h \ | exec-int-conf 7\ check-int-conf h int-config P l h h \ | exec-secmode-conf command 1 h 0 0 full 1 h 0 @ p check-secmode-conf none 1 h 0 command 1 h 0 full 1 h 0 secmode-config P h h \ | exec-bool-conf true 1 h 0 false 1 h 0 TRUE 1 h 0 FALSE 1 h 0 7\ check-bool-conf p true 1 h 0 false 1 h 0 TRUE 1 h 0 true FALSE 1 h 0 false bool-config P P t h T h \ | $setenv < \ 0 X P D \ h 0 ( Invalid value. D D D X D /options d t setenv t 0 T p p t h 0 ( Invalid value. D printenv D T /options \ ]H (set-default) t t 0 set-default T \ 0 , No such parameter. set-defaults ` @ \ 0 t nodefault-bytes nvram-load-configs \ t 0 L t 2 $ = ?P 8 0 (nvram-store-one) @ 4 P \ 0 \ 4 \ 4 P $ P \ \ (make-configstr) P \ S 0 p p t 0 D = D 3 3 p 4 nvram-store-configs P @ /options d h 0 P @ \ 0 0 h P T \ @ p \ auto-boot? T t auto-boot? trueboot-command ( boot-command bootboot-file , boot-file 8diag-switch? p T t 8diag-switch? ` |false diag-device |diag-device diag-file diag-file fcode-debug? L T t fcode-debug? < Xfalse nvramrc Xnvramrc oem-banner? $ T t oem-banner? false oem-banner , oem-banner 8oem-logo? p T t 8oem-logo? ` |false oem-logo |oem-logo use-nvramrc? D T t use-nvramrc? false input-device L input-device 4 Xkeyboardoutput-device Xoutput-device screen screen-#columns @ l screen-#columns 80 screen-#rows D l screen-#rows 0 P24 selftest-#megs l Pselftest-#megs | 0 security-mode security-mode pci-probe-mask , x l pci-probe-mask <-1 default-mac-address | T t <default-mac-address h false skip-netboot? ( T t skip-netboot? false scroll-lock 0 x T t scroll-lock <trueload-base | l <load-base h 4000tpe-link-test? T t tpe-link-test? truettya-mode X ttya-mode 9600,8,n,1,-ttya-ignore-cd d T t ttya-ignore-cd H ttruettya-rts-dtr-off T t tttya-rts-dtr-off false ttyb-mode P ttyb-mode 9600,8,n,1,-ttyb-ignore-cd \ T t ttyb-ignore-cd @ ltruettyb-rts-dtr-off T t lttyb-rts-dtr-off false boot-screen boot-screen boot-script L boot-script < Xuse-generic? T t Xuse-generic? false boot-device , boot-device diskboot-args 0 boot-args <release-load-area d callback $callback sync (help-generic) ?Enter 'help command-name' or 'help category-name' for more help 3(Use ONLY the first word of a category description) $Examples: help select -or- help line Categories: * boot (Load and execute a client program) diag (Diagnostic routines) (help-diag) ;test <device> Run the selftest method for specified device Atest-all Execute test for all devices using selftest method (help-boot) X =boot [<device-specifier>:<device-arguments>] [boot-arguments] Examples: Cboot Default boot (values specified in nvram variables) ,boot disk1:a Boot from disk1 partition a &boot hd:1,\boot\vmlinuz root=/dev/hda1 help T t h 0 diag , 0 \ boot , 0 No help available for stdout \ stdin 0 input D d h 0 @ Input device not found. read c h 0 , has no read method. h 0 4 Opening failed. $ t install-abort d( 8 0 H 0 8 t remove-abort d( 8 0 | H /chosen d 0 ( P H Xh stdin \ Y / d 0 0 P H P X stdin-path \ Y output X d h 0 @ Output device not found. write c h 0 0 has no write method. h 0 4 Opening failed. $ 4 0 | 4 /chosen d 0 ( P 4 Xh stdout \ Y / d 0 0 P 4 P X stdout-path \ Y io | \ io-char 8 io-out-char \ io-key? x ` ` 0 ` 0 read H d( 0 D io-key \ 0 ` ` ` io-emit 4 0 , | | 0 write 4 d( CONSOLE-IN-list 0 CONSOLE-OUT-list CONSOLE-IN-initializer @X CONSOLE-OUT-initializer @X install-console /aliases d 0 x P screen d 0 D p display 0 h X screen h Y \ \ \ @ 0 0 4 0 \ @ 0 0 H 0 4 0 4 H 0 8 ` ` ( @ 4 screen builtin-logo t builtin-banner suppress-banner? < ` p p p < built on <L Welcome to OpenBIOS v 3 3 3 suppress-banner 0 d banner 4 h 0 t c device_type S 0 p p display 1 0 t c draw-logo c 0 | 4 P P p 0 D 0 $ @ @ \ \ c \ \ 0 d @ reset-all no-reset-all ,reset-all is not available on this platform. reset power-off 0 no-power-off ,power-off is not available on this platform. nvedit , nvstore | nvquit nvrecover nvrun password security-password security-#badlogins $test 0 Testing device : d 0 X self-test c 0 no self-test method. no such device. test D T H test-sub-devs B4 \ t 0 ( t h H t @ BP test-all < / \ T \ h @ ]H boot T boot-file | X /chosen 0 bootargs Y platform-boot | 0 $find-package-method d h 0 c h 0 p call-parent bH c [active-package], ?mmissing c 0 is-open 8 open < 0 $ = close < 0 p $ = is-relay x P \ c h 0 $ = c = is-call-parent = t @ d| = (open-deblocker) \ deblocker d 0 p p eX p 4 is-deblocker deblocker d h 0 P deblocker < open-deblocker = t = close-deblocker = t f0 = \ read seek write tell addr | 0 ( busdevfn 8 l 4 l P x 4 x config-command h t $ P l 4 x x pci-c@ P l pci-w@ ! @ l pci-l@ !D pci-c! ! $ P l pci-w! ! $ @ l pci-l! ! $ dump-pci-device "4 @ : . t [ l P h p !H / h @ !H ] \ p 0 h 0 : p 0 t x ! t h l h P P T , 5 O $L $8 $< # $ packages $\ $@ name open close $l PREPOST-list "x \ POST-list $ SYSTEM-list $ )4DIAG-list $ [ PREPOST-initializer $ $ @X POST-initializer % $ @X SYSTEM-initializer %< $ @X DIAG-initializer %h $ @X initialize-of % ' $ \ @ 0 $ \ @ 0 $ \ @ 0 8 0 % d h 0 l 8 $ \ @ 0 0 % # ciface-ph % & , 'D ', '0 & 3 ) client-services 'T '4 name callback-function ?phandle 'p t h 0 NULL phandle ` ?ihandle ' t h 0 $ NULL ihandle ci-strcpy ' P $ t h , 4 P 0 p 4 \ memory-ih ( mmu-ih (x ( /chosen \ mmu S h 0 U ( memory S h 0 U (| H 6 ( safetype ( < t 2 t \ 0 BAD > phandle-exists? )H 4 p \ 0 0 D 0 $ test t 2 & c 0 p ` peer *4 c( child *t c` parent * getproplen * 2 4 ' S 0 ` getprop * t ` D 0 ` h 0 ` 2 4 ' S 0 ` P 4 \ t P , \ nextprop + P t h 0 p t 2 t 0 @ h S 0 ( \ p 4 ` \ S4 0 t $ ( 0 p 4 p setprop + P P P P 4 X \ t 2 \ Y \ finddevice ,x t 2 d h 0 ` instance-to-package , ' b package-to-path - t h 0 ` P 4 \ h ( canon -, t 2 d 0 -0 ` instance-to-path -p t h 0 ` P 4 \ P ( instance-to-interposed-path - t h 0 ` P 4 \ l ( call-method . t h 0 ( call of null method ` t P t 2 ' d( 8 t 0 L call-method h t 2 : exception t \ open .` t 2 close /0 | read /P P 4 \ t c read c 0 4 c ` write /h P 4 \ t c write c 0 4 c ` seek / t c seek c 0 4 c ` claim 0$ $ 4 & cif-claim c 0 ` release 0t 4 & cif-release c 0 ` boot 0 BOOT enter 1$ ENTER chain 1H CHAIN interpret 1p t 2 % 8 t 0 P interpret: exception t caught p set-callback 1 't 4 't milliseconds 2( l start-cpu 2X Start CPU unimplemented exit 2t EXIT (exit) | 0 # test-method 2 4 t 2 t ) D 0 ` c h 0 ` p client-iface & & c h 0 ` 8 0 L 'Unexpected client interface exception: p client-call-iface 3 & c h 0 ` p set-property 4 P D X D \ t is-cfunc 4\ X is-noname-cfunc 4 p p 4 <p is-xt-cfunc 4 = 0 4 = create-node 4 / ? d 0 ]H ( t 0 5\ \ ]H ] [ _ ]H , # 7 6, 6 6 5 6 cmdline 6< 6$ name 5 eX 0 cmdline d( $ cmdline is missing! 6H 6L # \ 6 prepare 6 p , # 7p 7\ 7` 7 : disk-label 7 7d name part-handlers fs-handlers 7 find-part-handler 7 P 7 \ @ 0 @ h 0 | \ \ p find-filesystem 7 P 7 \ @ 0 P h P 0 | \ $ \ p register-part-handler 8\ t probe c h 0 0 Missing probe method! 7 @X register-fs-handler 8 t probe c h 0 0 Missing probe method! 7 @X dma-alloc 9 dma-alloc d| dma-free : dma-free d| dma-map-in :8 dma-map-in d| dma-map-out :d dma-map-out d| dma-sync : dma-sync d| initialise-partition-package 5X dma-alloc ` dma-free ` dma-map-in ` dma-map-out ` dma-sync ` initialise-fs-package ; dma-alloc ` dma-free ` dma-map-in ` dma-map-out ` dma-sync ` register-partition-package ; register-part-handler disk-label 0 4 ; , [disk-label] internal error register-fs-package <4 register-fs-handler disk-label 0 4 ; , [misc-files] internal error decode-unit-sbus < @ 7$ encode-unit-sbus = 4 5, , 3 P 5, \ 3 sbus-unit>addr = ranges c S h 0 \ 4 p 4 D p $ @ p 0 U $ P P D 0 \ \ P @ D 0 , W D D p ` W U t h 0 < p map-in-sbus > P > 0 h map-in d| \ map-out-sbus ? map-out d| probe-self-sbus ?h p T = 8 0 ? t j 0 t D 4 D x 0 8 ] P o \ t 0 _ ` T 8 Invalid FCode start byte ?l decode-unit-scsi ? @ 7$ encode-unit-scsi @ 4 5, , 3 P 5, \ 3 %g0 @ p %g1 CH %g2 C` %g3 C %g4 C %g5 C $ %g6 D ( %g7 D( , %psr DP %wim Dx %pc D P set-pc D P .globals D %psr: D| %wim: D %pc: D %g0: CL %g1: Cd %g2: C %g3: C %g4: C %g5: D %g6: D, %g7: DT %o0 E 0 %o1 F 4 %o2 F 8 %o3 F < %o4 G @ %o5 G( D %o6 GP H %o7 Gx L %l0 G P %l1 G T %l2 G X %l3 H \ %l4 H@ ` %l5 Hh d %l6 H h %l7 H l %i0 H p %i1 I t %i2 I0 x %i3 IX | %i4 I %i5 I %i6 I %i7 I .locals J %o0: F %o1: F %o2: F %o3: G %o4: G, %o5: GT %o6: G| %o7: G %l0: G %l1: G %l2: H %l3: HD %l4: Hl %l5: H %l6: H %l7: H %i0: I %i1: I4 %i2: I\ %i3: I %i4: I %i5: I %i6: I %i7: J$ .registers JL E JP sparc32-dma-free Mp sparc32-dma-map-out M q M M M #size-cells sun4m N N M compatible ! N, N clock-frequency encode-unit = decode-unit NL = dma-sync Nl q dma-alloc N p dma-free N p dma-map-in N p dma-map-out N p , O Ol O\ O` O O memory O| Od name open close O , P\ P P P O PP virtual-memory P( P name open close P8 , Q Y P P P P\ Q iommu P P P name P P P #address-cells Q Q P #size-cells Q< Q, Q page-size QL Q8 cache-coherence? open close Qh encode-unit Q = decode-unit Q = , P\ T R, R R Q T sbus RT R< R$ name hierarchical Rt Rd RD device_type R R Rp #address-cells R R R #size-cells D? R R R clock-frequency S R R slot-address-bits ? S S burst-sizes open close S( encode-unit S@ = decode-unit S\ = map-in S| ? map-out S ?l dma-alloc S dma-alloc d| dma-free S dma-free d| dma-map-in S dma-map-in d| dma-map-out T( dma-map-out d| dma-sync T\ dma-sync d| , Q VP U T U T V0 espdma U U name encode-unit = decode-unit U4 = dma-alloc UT dma-alloc d| dma-free Up dma-free d| dma-map-in U dma-map-in d| dma-map-out U dma-map-out d| dma-sync V dma-sync d| , Q X V V V VP W ledma V V V name ? V V burst-sizes encode-unit = decode-unit V = dma-alloc W dma-alloc d| dma-free W4 dma-free d| dma-map-in Wd dma-map-in d| dma-map-out W dma-map-out d| dma-sync W dma-sync d| , VP Xp Xd Xh X Y le X X Xl name network X X X device_type X X X busmaster-regval & X X intr dma-alloc dma-alloc d| dma-free Y dma-free d| dma-map-in Y0 dma-map-in d| dma-map-out Y\ dma-map-out d| dma-sync Y dma-sync d| , Z@ Z0 Z4 Y [$ obio Zh ZP Z8 name hierarchical Z Zx ZX device_type Z Z Z #address-cells Z Z #size-cells open close Z encode-unit Z = decode-unit [ = disk [L [4 boot-from [h aligned-allocator p & Type 'help' for detailed information [ make-openable [ d 0 0 \ 0 t ]H | preopen [ [ /chosen \ 0 Xh D Z \0 \ \ memory /memory \4 mmu /virtual-memory \4 \ rmap@ M p obmem ] p sfsr@ ]$ ignore-dfault ]< ]\ ]@ ` ]` p ]` ]@ h 0 ]p ]@ ` ]` p ]` ]@ h # #L # 1$ 1( 4 $ , t
.shstrtab .text .rodata .data .bss .gnu.attributes