OpenBIOS

openbios@openbios.org

4284 discussions

[PATCH v4] arch/ppc/qemu: Add a node for the other (empty) PCI bus to the device tree
by BALATON Zoltan 30 Jun '18

30 Jun '18

QEMU emulates two of the three PCI buses found on real hardware because some clients seem to need both and fail with only one present, but OpenBIOS only handles a single PCI bus and initialises and puts in the device tree only one of these: the second one which is where devices are connected and also marks it bus 0. However, clients getting info from the device tree may not know about this and thinking there is only one PCI bus they erroneously use the address of the first bus to access PCI config registers for devices on the second bus which silently fails as these requests will go to the other empty bus emulated and return invalid values. Devices mapped via MMIO still appear to work but they may not be correctly initialised and some cards are not detected because of this. Until support for multiple PCI buses is implemented add an empty node in the device tree for the uninitialised bus to let clients know about it. This is still not entirely correct as bus-range property does not match real hardware but this fixes detecting PCI devices (such as USB) under MorphOS and may also fix enabling the bus master bit needed with some network cards and allow the workarund for this to be reverted. Signed-off-by: BALATON Zoltan <balaton(a)eik.bme.hu> --- v4: Rebased to latest master v3: See: https://mail.coreboot.org/pipermail/openbios/2017-January/009867.html arch/ppc/qemu/init.c | 43 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) diff --git a/arch/ppc/qemu/init.c b/arch/ppc/qemu/init.c index af15682..d362b0e 100644 --- a/arch/ppc/qemu/init.c +++ b/arch/ppc/qemu/init.c @@ -716,6 +716,48 @@ static void kvm_of_init(void) fword("finish-device"); } +static void empty_pci_bus_init(void) +{ + if (machine_id == ARCH_MAC99) { + /* Add empty node for first pci bus */ + /* Remove this when pci driver is fixed to handle multiple buses */ + activate_device("/"); + fword("new-device"); + push_str("pci"); + fword("device-name"); + push_str("pci"); + fword("device-type"); + PUSH(0xf0000000); + fword("encode-int"); + PUSH(0x02000000); + fword("encode-int"); + fword("encode+"); + push_str("reg"); + fword("property"); + PUSH(3); + fword("encode-int"); + push_str("#address-cells"); + fword("property"); + PUSH(2); + fword("encode-int"); + push_str("#size-cells"); + fword("property"); + PUSH(1); + fword("encode-int"); + push_str("#interrupt-cells"); + fword("property"); + PUSH(0); + fword("encode-int"); + PUSH(0); + fword("encode-int"); + fword("encode+"); + push_str("bus-range"); + fword("property"); + fword("finish-device"); + device_end(); + } +} + /* * filll ( addr bytes quad -- ) */ @@ -857,6 +899,7 @@ arch_of_init(void) feval("['] ppc-dma-sync to (dma-sync)"); #ifdef CONFIG_DRIVER_PCI + empty_pci_bus_init(); ob_pci_init(); #endif -- 2.7.6

2 4

[PATCH 0/5] mac99 PMU patches
by Mark Cave-Ayland 17 Jun '18

17 Jun '18

Here is a reworked version of Ben's mac99 PMU patches for OpenBIOS along with a minor fix for the keyboard alias. The main difference between Ben's version and this version are that instead of defining a new mac99p machine, the aim is to keep using the existing mac99 machine and then switch it over to use PMU by default once the remaining issues with USB and timers have been fixed. Signed-off-by: Mark Cave-Ayland <mark.cave-ayland(a)ilande.co.uk> Mark Cave-Ayland (5): ppc: add fw_cfg interface for passing VIA/ADB configuration from QEMU ppc: add GPIO devices to the device tree when PMU hardware detected adb: set compatible property differently if PMU is present ppc: add PMU driver usbhid: fix up keyboard alias for USB keyboards arch/ppc/qemu/init.c | 28 +- drivers/adb_bus.c | 8 +- drivers/adb_bus.h | 5 + drivers/build.xml | 1 + drivers/macio.c | 80 +++++- drivers/pci.c | 18 ++ drivers/pmu.c | 625 +++++++++++++++++++++++++++++++++++++++++++ drivers/pmu.h | 17 ++ drivers/usbhid.c | 2 +- include/arch/common/fw_cfg.h | 1 + include/drivers/drivers.h | 10 + 11 files changed, 785 insertions(+), 10 deletions(-) create mode 100644 drivers/pmu.c create mode 100644 drivers/pmu.h -- 2.11.0

2 8

[PATCH 00/11] PReP support for QEMU 40p machine
by Mark Cave-Ayland 08 Jun '18

08 Jun '18

The current PReP firmware provided with OpenBIOS is OpenHackWare which provides a basic set of OpenFirmware interfaces but does this without providing any kind of Forth implementation which limits its usefulness and compatibility. Whilst the project has allowed QEMU PReP development to continue to date, it is sadly now abandonware with no patches for over 4 years, and with no-one willing to take on maintenance it is now time for a different approach. This patchset adds PReP support for the QEMU 40p machine allowing it to start booting NetBSD and the sandalfoot Linux zImage. The main features required for this are support for the LSI SCSI controller, resdidual data and PReP boot partitions. In order to test these patches you'll need a recent QEMU with the following patches applied: https://lists.gnu.org/archive/html/qemu-devel/2018-05/msg05480.html https://lists.gnu.org/archive/html/qemu-devel/2018-05/msg05964.html Next you'll need an updated openbios-ppc binary, and for those without access to a cross-compiler setup I've uploaded the resulting binary to https://www.ilande.co.uk/tmp/qemu/openbios-ppc.prep. To boot the sandalfoot zImage from http://www.juneau-lug.org/zImage.initrd.sandalfoot you can do: qemu-system-ppc -M 40p -bios openbios-ppc.prep -cdrom zImage.initrd.sandalfoot -boot d Note that it seems to get stuck trying to initialise the LSI SCSI controller, presumably due to a bug in the existing QEMU emulation. NetBSD works much better and in fact boots all the way to userspace: qemu-system-pcc -M 40p -bios openbios-ppc.prep -cdrom NetBSD-7.1.2-prep.iso -boot d -nographic In terms of functionality I think this patchset is just about there: there are a few questions around device names but hopefully someone with real PReP experience can point me in the right direction. Finally I've added various people on CC who have expressed interest in PReP and/or OpenHackWare in the past: if this is no longer of any interest to you, do let me know and I'll drop your email address from future versions. Signed-off-by: Mark Cave-Ayland <mark.cave-ayland(a)ilande.co.uk> Mark Cave-Ayland (11): pc_kbd: ensure that we properly reset the 8042 controller and keyboard device pci: rename i82378 keyboard device from 8042 to keyboard pci: add AMD PCNET information to PCI database bootcode_load: ensure LOADER_NOT_SUPPORT is returned if no bootcode is present ppc: add PReP support to dma-map-in pci: add driver for LSI 53C810 SCSI controller ppc: add PReP residual data block ppc: use proper context when pre-loading kernels pc-parts: allow successful detection of PReP boot partitions libopenbios: add PReP boot partition loader for PPC prep: disable VBE extensions when executing client program arch/ppc/qemu/context.c | 129 ++++++- arch/ppc/qemu/context.h | 1 + arch/ppc/qemu/init.c | 34 ++ arch/ppc/qemu/kernel.h | 1 - arch/ppc/qemu/main.c | 11 +- arch/ppc/qemu/switch.S | 43 --- arch/ppc/qemu/tree.fs | 5 - config/examples/ppc_config.xml | 2 + drivers/build.xml | 1 + drivers/lsi.c | 770 ++++++++++++++++++++++++++++++++++++++++ drivers/pc_kbd.c | 22 +- drivers/pci.c | 21 +- drivers/pci_database.c | 14 + drivers/pci_database.h | 1 + drivers/vga.fs | 11 + forth/debugging/client.fs | 1 + include/arch/ppc/residual.h | 116 ++++++ include/drivers/drivers.h | 4 + include/drivers/pci.h | 6 + include/libopenbios/prep_load.h | 24 ++ libopenbios/bootcode_load.c | 2 + libopenbios/build.xml | 1 + libopenbios/initprogram.c | 8 + libopenbios/load.c | 11 + libopenbios/prep_load.c | 106 ++++++ packages/pc-parts.c | 10 + 26 files changed, 1300 insertions(+), 55 deletions(-) create mode 100644 drivers/lsi.c create mode 100644 include/arch/ppc/residual.h create mode 100644 include/libopenbios/prep_load.h create mode 100644 libopenbios/prep_load.c -- 2.11.0

2 14

[PATCH 00/15] Implement dma-* words
by Mark Cave-Ayland 26 May '18

26 May '18

This patchset is something I've been working on for a while and started off with the aim of getting rid of the "dma-alloc" console warnings whilst booting *BSD images on PPC, but ended up as a full implementation for SPARC32/SPARC64 and PPC. The patchset is fairly straightfoward: the first few patches rework the SPARC32 DVMA functions to make them usable from Forth, whilst patch 8 adds a missing D-cache flush for PPC which could certainly do with another set of eyes. The remainder of the patches add PPC and SPARC64 support before adding in the complete "dma-*" $call-parent chains to enable devices to call the DMA functions as indicated in the IEEE-1275 specification and various FCode examples found around the net. Finally the last 2 patches switch the esp SCSI driver over to use the IEEE-1275 Forth words instead of calling the low-level C functions directly. Signed-off-by: Mark Cave-Ayland <mark.cave-ayland(a)ilande.co.uk> Mark Cave-Ayland (15): dma: add defers for the dma-* words SPARC32: rename dvma_alloc()'s ba variable to iova SPARC32: allocate contiguous physical memory for DVMA SPARC32: implement dvma_map_in() for DMA IOVA to phys translation SPARC32: move pgtsrmmu.h from arch/sparc32 to include/arch/sparc32 SPARC32: implement dvma_sync() function for synchronising DMA memory SPARC32: implement dma-* words PPC: add flush_dcache_range() to start.S PPC: implement dma-* words SPARC64: implement dma-* words macio: add missing REGISTER_NODE for New World macio devices pci: add dma-* call-parent chain to all PCI devices and bridges sbus: add dma-* call-parent chain to all PCI devices and bridges esp: switch creation of esp device over to use new-device esp: switch over to using dma-alloc/dma-map-in arch/ppc/qemu/init.c | 35 +++++++ arch/ppc/qemu/kernel.h | 1 + arch/ppc/qemu/start.S | 21 ++++ arch/ppc/qemu/tree.fs | 40 ++++++++ arch/sparc32/lib.c | 2 +- arch/sparc32/ofmem_sparc32.c | 2 +- arch/sparc32/openbios.c | 47 ++++++++- arch/sparc32/tree.fs | 56 +++++++++++ arch/sparc64/openbios.c | 40 ++++++++ arch/sparc64/tree.fs | 47 +++++++++ drivers/esp.c | 159 ++++++++++++++++++++---------- drivers/ide.c | 40 ++++++++ drivers/iommu.c | 95 +++++++++++++++--- drivers/macio.c | 36 +++++++ drivers/pci.c | 40 ++++++++ forth/device/other.fs | 8 +- forth/device/table.fs | 2 +- forth/util/util.fs | 9 ++ {arch => include/arch}/sparc32/pgtsrmmu.h | 0 include/drivers/drivers.h | 4 +- packages/disk-label.fs | 39 ++++++++ 21 files changed, 646 insertions(+), 77 deletions(-) rename {arch => include/arch}/sparc32/pgtsrmmu.h (100%) -- 2.11.0

1 16

[PATCH] pci: fix OHCI driver PCI address
by Mark Cave-Ayland 22 May '18

22 May '18

Commit a1c2e4f "Add USB OHCI + HID driver" hardcoded the high order bit of the PCI address to that used on PPC machines instead of using the correct PCI_ADDR() macro. Signed-off-by: Mark Cave-Ayland <mark.cave-ayland(a)ilande.co.uk> --- drivers/pci.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/drivers/pci.c b/drivers/pci.c index 295be7e..7085a3a 100644 --- a/drivers/pci.c +++ b/drivers/pci.c @@ -1111,7 +1111,10 @@ int i82378_config_cb(const pci_config_t *config) int usb_ohci_config_cb(const pci_config_t *config) { #ifdef CONFIG_DRIVER_USB - ob_usb_ohci_init(config->path, 0x80000000 | config->dev); + pci_addr addr = PCI_ADDR( + PCI_BUS(config->dev), PCI_DEV(config->dev), PCI_FN(config->dev)); + + ob_usb_ohci_init(config->path, addr); #endif return 0; } -- 2.11.0

2 2

[PATCH 0/2] ppc: minor fixups
by Mark Cave-Ayland 19 May '18

19 May '18

Here are a couple of minor fixups which have been kicking around my OpenBIOS git repository for a little while. Signed-off-by: Mark Cave-Ayland <mark.cave-ayland(a)ilande.co.uk> Mark Cave-Ayland (2): ppc: don't hardcode the system bus frequency macio: set correct UniNorth device revision arch/ppc/qemu/init.c | 4 ++-- drivers/macio.c | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) -- 2.11.0

1 3

Re: [OpenBIOS] Back at it again( PCI Passthrough )
by Jd Lyons 10 May '18

10 May '18

> On May 10, 2018, at 8:52 AM, Jd Lyons <lyons_dj(a)yahoo.com> wrote: > > > >> On May 10, 2018, at 6:46 AM, Jd Lyons via OpenBIOS <openbios(a)openbios.org <mailto:openbios@openbios.org>> wrote: >> >> >> : execute-tmp-comp ( ffffffff 1 0 ffffffff 0 0 ffffffff fff41a48 0 0 0 0 0 0 ffffffff )<—— We should be seeing fff5723c 0 here? >>> On May 10, 2018, at 6:33 AM, Jd Lyons <lyons_dj(a)yahoo.com <mailto:lyons_dj@yahoo.com>> wrote: >>> >>> >> >> -- >> OpenBIOS http://openbios.org/ <http://openbios.org/> >> Mailinglist: http://lists.openbios.org/mailman/listinfo <http://lists.openbios.org/mailman/listinfo> >> Free your System - May the Forth be with you > > Here is how SLOF seems to deal with the code I’m hangin on: > > Tho, I don’t know if it tells us anything useful. > > 14051: [ 14] b?branch 0 0 2 1 7e783de0 > 14054: [ 11] b(') 0 0 2 1 7e783de0 7e78e740 > 14057: [ c3] b(to) 0 0 2 1 7e783de0 > 1405a: [ b2] b(>resolve) > 7e7848a0 : ?compile-mode ( 0 0 2 1 7e783de0 ) | > 7e783398 : STATE ( 0 0 2 1 7e783de0 ) | > 7e7833a0 : @ ( 0 0 2 1 7e783de0 7dc0e6f0 ) | > 7e7833a8 : SEMICOLON ( 0 0 2 1 7e783de0 0 ) | > 7e7848a8 : 0BRANCH ( 0 0 2 1 7e783de0 0 ) | > 7e7848c0 : SEMICOLON ( 0 0 2 1 7e783de0 ) | 0 0 2 1 7e783de0 > 1405b: [ b2] b(>resolve) > 7e7848a0 : ?compile-mode ( 0 0 2 1 7e783de0 ) | > 7e783398 : STATE ( 0 0 2 1 7e783de0 ) | > 7e7833a0 : @ ( 0 0 2 1 7e783de0 7dc0e6f0 ) | > 7e7833a8 : SEMICOLON ( 0 0 2 1 7e783de0 0 ) | > 7e7848a8 : 0BRANCH ( 0 0 2 1 7e783de0 0 ) | > 7e7848c0 : SEMICOLON ( 0 0 2 1 7e783de0 ) | 0 0 2 1 7e783de0 > 1405d: [ddf] xddf 0 0 2 1 7e783de0 > 1405f: [e04] xe04 0 0 2 1 7e783de0 > 14061: [e38] xe38 0 0 2 1 7e783de0 > 14063: [e06] xe06 0 0 2 1 7e783de0 > 14065: [ce5] xce5 0 0 2 1 7e783de0 > 14067: [db0] xdb0 0 0 2 1 7e783de0 > 14069: [e07] xe07 0 0 2 1 7e783de0 > 1406b: [e1a] xe1a 0 0 2 1 7e783de0 > 1406d: [c5b] xc5b 0 0 2 1 7e783de0 > 1406f: [e28] xe28 0 0 2 1 7e783de0 > 14071: [e20] xe20 0 0 2 1 7e783de0 > 14073: [dfa] xdfa 0 0 2 1 7e783de0 > 14075: [e37] xe37 0 0 2 1 7e783de0 > 14077: [e2c] xe2c 0 0 2 1 7e783de0 > 14079: [e2d] xe2d 0 0 2 1 7e783de0 > 1407a: [ 12] b(") 0 0 2 1 7e783de0 1407c b > 14088: [201] device-name 0 0 2 1 7e783de0 > 14089: [ a6] 1 0 0 2 1 7e783de0 1 > 1408b: [111] encode-int 0 0 2 1 7e783de0 7e7d4788 4 > 1408c: [ 12] b(") 0 0 2 1 7e783de0 7e7d4788 4 1408e e > 1409d: [110] property 0 0 2 1 7e783de0 > 1409e: [ a5] 0 0 0 2 1 7e783de0 0 > 140a0: [111] encode-int 0 0 2 1 7e783de0 7e7d47d0 4 > 140a1: [ 12] b(") 0 0 2 1 7e783de0 7e7d47d0 4 140a3 b > 140af: [110] property 0 0 2 1 7e783de0 > 140b1: [9c7] x9c7 0 0 2 1 7e783de0 > 140b3: [93d] x93d 0 0 2 1 7e783de0 43 > 140b4: [ 10] b(lit) 0 0 2 1 7e783de0 43 35 > 140b9: [ 42] >= 0 0 2 1 7e783de0 -1 > 140ba: [ 14] b?branch 0 0 2 1 7e783de0 > 140bd: [ a6] 1 0 0 2 1 7e783de0 1 > 140bf: [933] x933 0 0 2 1 7e783de0 1 5 > 140c0: [ 27] LSHIFT 0 0 2 1 7e783de0 20 > 140c2: [935] x935 0 0 2 1 7e783de0 20 2cf > 140c3: [ 24] OR 0 0 2 1 7e783de0 2ef > 140c4: [ c3] b(to) 0 0 2 1 7e783de0 > 140c7: [ b2] b(>resolve) > 7e7848a0 : ?compile-mode ( 0 0 2 1 7e783de0 ) | > 7e783398 : STATE ( 0 0 2 1 7e783de0 ) | > 7e7833a0 : @ ( 0 0 2 1 7e783de0 7dc0e6f0 ) | > 7e7833a8 : SEMICOLON ( 0 0 2 1 7e783de0 0 ) | > 7e7848a8 : 0BRANCH ( 0 0 2 1 7e783de0 0 ) | > 7e7848c0 : SEMICOLON ( 0 0 2 1 7e783de0 ) | 0 0 2 1 7e783de0 > 140c9: [941] x941 0 0 2 1 7e783de0 50 > 140ca: [ 10] b(lit) 0 0 2 1 7e783de0 50 10 > 140cf: [ 27] LSHIFT 0 0 2 1 7e783de0 500000 > 140d1: [935] x935 0 0 2 1 7e783de0 500000 2ef > 140d2: [ 24] OR 0 0 2 1 7e783de0 5002ef > 140d4: [111] encode-int 0 0 2 1 7e783de0 7e7d4860 4 > 140d5: [ 12] b(") 0 0 2 1 7e783de0 7e7d4860 4 140d7 d > 140e5: [110] property 0 0 2 1 7e783de0 > 140e6: [ a6] 1 0 0 2 1 7e783de0 1 > 140e8: [111] encode-int 0 0 2 1 7e783de0 7e7d48a8 4 > 140e9: [ 12] b(") 0 0 2 1 7e783de0 7e7d48a8 4 140eb a > 140f6: [110] property 0 0 2 1 7e783de0 > 140f7: [ a5] 0 0 0 2 1 7e783de0 0 > 140f8: [ a5] 0 0 0 2 1 7e783de0 0 0 > 140fa: [e2e] xe2e 0 0 2 1 7e783de0 7e7d48f0 14 > 140fc: [9bc] x9bc 0 0 2 1 7e783de0 7e7d48f0 14 2000010 > 140fe: [9c3] x9c3 0 0 2 1 7e783de0 7e7d48f0 14 2000010 -ff000000 > 14100: [e2e] xe2e 0 0 2 1 7e783de0 7e7d48f0 14 7e7d4904 14 > 14102: [112] encode+ 0 0 2 1 7e783de0 7e7d48f0 28 > 14104: [9c0] x9c0 0 0 2 1 7e783de0 7e7d48f0 28 200001c > 14106: [9c6] x9c6 0 0 2 1 7e783de0 7e7d48f0 28 200001c -ff000000 > 14108: [e2e] xe2e 0 0 2 1 7e783de0 7e7d48f0 28 7e7d4918 14 > 1410a: [112] encode+ 0 0 2 1 7e783de0 7e7d48f0 3c > 1410c: [9be] x9be 0 0 2 1 7e783de0 7e7d48f0 3c 42000014 > 1410e: [9c4] x9c4 0 0 2 1 7e783de0 7e7d48f0 3c 42000014 -f0000000 > 14110: [e2e] xe2e 0 0 2 1 7e783de0 7e7d48f0 3c 7e7d492c 14 > 14112: [112] encode+ 0 0 2 1 7e783de0 7e7d48f0 50 > 14114: [9bf] x9bf 0 0 2 1 7e783de0 7e7d48f0 50 2000030 > 14116: [9c5] x9c5 0 0 2 1 7e783de0 7e7d48f0 50 2000030 -ffff0000 > 14118: [e2e] xe2e 0 0 2 1 7e783de0 7e7d48f0 50 7e7d4940 14 > 1411a: [112] encode+ 0 0 2 1 7e783de0 7e7d48f0 64 > 1411b: [ 12] b(") 0 0 2 1 7e783de0 7e7d48f0 64 1411d 3 > 14121: [110] property 0 0 2 1 7e783de0 > 14122: [ a6] 1 0 0 2 1 7e783de0 1 > 14124: [111] encode-int 0 0 2 1 7e783de0 7e7d4990 4 > 14125: [ 12] b(") 0 0 2 1 7e783de0 7e7d4990 4 14127 e > 14136: [110] property 0 0 2 1 7e783de0 > 14137: [ a5] 0 0 0 2 1 7e783de0 0 > 14139: [111] encode-int 0 0 2 1 7e783de0 7e7d49d8 4 > 1413a: [ 12] b(") 0 0 2 1 7e783de0 7e7d49d8 4 1413c b > 14148: [110] property 0 0 2 1 7e783de0 > 14149: [ 12] b(") 0 0 2 1 7e783de0 1414b 1a > 14165: [ cd] EVALUATE 0 0 2 1 7e783de0 > 14167: [c7c] xc7c 0 0 2 1 7e783de0 10000000 > 14168: [ 47] DUP 0 0 2 1 7e783de0 10000000 10000000 > 1416a: [111] encode-int 0 0 2 1 7e783de0 10000000 7e7d4a50 4 > 1416b: [ 4a] ROT 0 0 2 1 7e783de0 7e7d4a50 4 10000000 > 1416d: [111] encode-int 0 0 2 1 7e783de0 7e7d4a50 4 7e7d4a54 4 > 1416f: [112] encode+ 0 0 2 1 7e783de0 7e7d4a50 8 > 14170: [ 12] b(") 0 0 2 1 7e783de0 7e7d4a50 8 14172 c > 1417f: [110] property 0 0 2 1 7e783de0 > 14180: [ a5] 0 0 0 2 1 7e783de0 0 > 14181: [ c3] b(to) 0 0 2 1 7e783de0 > 14185: [951] x951 0 0 2 1 7e783de0 2 > 14186: [ a5] 0 0 0 2 1 7e783de0 2 0 > 14187: [ 18] b(?do) 0 0 2 1 7e783de0 2 0 0 7dc5f110 > 1418a: [ 19] 0 0 2 1 7e783de0 2 0 0 7dc5f110 > 1418c: [a41] 0 0 2 1 7e783de0 2 0 0 7dc5f110 > 1418e: [a4a] 0 0 2 1 7e783de0 2 0 0 7dc5f110 > 14190: [8ea] 0 0 2 1 7e783de0 2 0 0 7dc5f110 > 14191: [ 3d] 0 0 2 1 7e783de0 2 0 0 7dc5f110 > 14192: [ 14] b?branch 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 > 14195: [ 19] 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 > 14196: [ c3] b(to) 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 > 14199: [ 1b] b(leave) 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 > 1419a: [ b2] b(>resolve) > 7e7848a0 : ?compile-mode ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 ) | > 7e783398 : STATE ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 ) | > 7e7833a0 : @ ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 7dc0e6f0 ) | > 7e7833a8 : SEMICOLON ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 2 ) | > 7e7848a8 : 0BRANCH ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 2 ) | > 7e7848b8 : THEN ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 ) | > 7dc0ee60 : ?COMP ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 ) | > 7dc0e780 : STATE ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 ) | > 7dc0e788 : @ ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 7dc0e6f0 ) | > 7dc0e790 : 0BRANCH ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 2 ) | > 7dc0e7a0 : EXIT ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 ) | > 7dc0ee68 : RESOLVE-ORIG ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 ) | > 7dc0ed60 : HERE ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 ) | > 7dc0ed68 : OVER ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 7dc5f180 ) | > 7dc0ed70 : CELL+ ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 7dc5f180 7dc5f148 ) | > 7dc09f40 : NA1+ ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 7dc5f180 7dc5f148 ) | > 7dc09ee8 : /N ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 7dc5f180 7dc5f148 ) | > 7dc09ef0 : + ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 7dc5f180 7dc5f148 8 ) | > 7dc09ef8 : SEMICOLON ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 7dc5f180 7dc5f150 ) | > 7dc09f48 : SEMICOLON ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 7dc5f180 7dc5f150 ) | > 7dc0ed78 : - ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 7dc5f180 7dc5f150 ) | > 7dc0ed80 : SWAP ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc5f148 30 ) | > 7dc0ed88 : ! ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 30 7dc5f148 ) | > 7dc0ed90 : SEMICOLON ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 ) | > 7dc0ee70 : -COMP ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 ) | > 7dc0ecb8 : -1 ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 ) | > 7dc0ecc0 : STATE ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 -1 ) | > 7dc0ecc8 : +! ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 -1 7dc0e6f0 ) | > 7dc0bcc8 : TUCK ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 -1 7dc0e6f0 ) | > 7dc0a178 : SWAP ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 -1 7dc0e6f0 ) | > 7dc0a180 : OVER ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc0e6f0 -1 ) | > 7dc0a188 : SEMICOLON ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc0e6f0 -1 7dc0e6f0 ) | > 7dc0bcd0 : @ ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc0e6f0 -1 7dc0e6f0 ) | > 7dc0bcd8 : + ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc0e6f0 -1 2 ) | > 7dc0bce0 : SWAP ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc0e6f0 1 ) | > 7dc0bce8 : ! ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 1 7dc0e6f0 ) | > 7dc0bcf0 : SEMICOLON ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 ) | > 7dc0ecd0 : STATE ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 ) | > 7dc0ecd8 : @ ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 7dc0e6f0 ) | > 7dc0ece0 : 0BRANCH ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 1 ) | > 7dc0ecf0 : EXIT ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 ) | > 7dc0ee78 : SEMICOLON ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 ) | > 7e7848c0 : SEMICOLON ( 0 0 2 1 7e783de0 2 0 0 7dc5f110 ) | 0 0 2 1 7e783de0 2 0 0 7dc5f110 > 1419b: [ 15] b(loop) 0 0 2 1 7e783de0 > 1419f: [946] x946 0 0 2 1 7e783de0 2 > 141a0: [ 38] 0> 0 0 2 1 7e783de0 -1 > 141a1: [ 14] b?branch 0 0 2 1 7e783de0 > 141a5: [952] x952 0 0 2 1 7e783de0 0 > 141a7: [a41] xa41 0 0 2 1 7e783de0 > 141a9: [11f] new-device 0 0 2 1 7e783de0 > 141ab: [e32] xe32 0 0 2 1 7e783de0 > 141ac: [ b5] new-token 0 0 2 1 7e783de0 > 141af: [ b7] b(:) 0 0 2 1 7e783de0 > 141b1: [952] 0 0 2 1 7e783de0 > 141b3: [a41] 0 0 2 1 7e783de0 > 141b5: [df1] 0 0 2 1 7e783de0 > 141b6: [ c3] b(to) 0 0 2 1 7e783de0 > 141b9: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 141ba: [ b5] new-token 0 0 2 1 7e783de0 > 141bd: [ b7] b(:) 0 0 2 1 7e783de0 > 141bf: [952] 0 0 2 1 7e783de0 > 141c1: [a41] 0 0 2 1 7e783de0 > 141c3: [df2] 0 0 2 1 7e783de0 > 141c4: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 141c5: [ b6] named-token 0 0 2 1 7e783de0 > 141d1: [ b7] b(:) 0 0 2 1 7e783de0 > 141d3: [dcb] 0 0 2 1 7e783de0 > 141d4: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 141d5: [ b6] named-token 0 0 2 1 7e783de0 > 141e3: [ b7] b(:) 0 0 2 1 7e783de0 > 141e5: [dcc] 0 0 2 1 7e783de0 > 141e6: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 141e7: [ ca] external-token 0 0 2 1 7e783de0 > 141f3: [ b7] b(:) 0 0 2 1 7e783de0 > 141f5: [952] 0 0 2 1 7e783de0 > 141f7: [a41] 0 0 2 1 7e783de0 > 141f9: [dca] 0 0 2 1 7e783de0 > 141fa: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 141fb: [ ca] external-token 0 0 2 1 7e783de0 > 1420d: [ b7] b(:) 0 0 2 1 7e783de0 > 1420f: [952] 0 0 2 1 7e783de0 > 14211: [a41] 0 0 2 1 7e783de0 > 14213: [dd5] 0 0 2 1 7e783de0 > 14214: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 14215: [ ca] external-token 0 0 2 1 7e783de0 > 14227: [ b7] b(:) 0 0 2 1 7e783de0 > 14229: [952] 0 0 2 1 7e783de0 > 1422b: [a41] 0 0 2 1 7e783de0 > 1422d: [dd7] 0 0 2 1 7e783de0 > 1422e: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 1422f: [ ca] external-token 0 0 2 1 7e783de0 > 14241: [ b7] b(:) 0 0 2 1 7e783de0 > 14243: [952] 0 0 2 1 7e783de0 > 14245: [a41] 0 0 2 1 7e783de0 > 14247: [dd6] 0 0 2 1 7e783de0 > 14248: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 14249: [ ca] external-token 0 0 2 1 7e783de0 > 14253: [ b7] b(:) 0 0 2 1 7e783de0 > 14255: [952] 0 0 2 1 7e783de0 > 14257: [a41] 0 0 2 1 7e783de0 > 14259: [cf7] 0 0 2 1 7e783de0 > 1425a: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 1425b: [ ca] external-token 0 0 2 1 7e783de0 > 14265: [ b7] b(:) 0 0 2 1 7e783de0 > 14267: [952] 0 0 2 1 7e783de0 > 14269: [a41] 0 0 2 1 7e783de0 > 1426b: [cf9] 0 0 2 1 7e783de0 > 1426c: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 1426d: [ ca] external-token 0 0 2 1 7e783de0 > 1427b: [ b7] b(:) 0 0 2 1 7e783de0 > 1427d: [952] 0 0 2 1 7e783de0 > 1427f: [a41] 0 0 2 1 7e783de0 > 14281: [cf3] 0 0 2 1 7e783de0 > 14282: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 14283: [ ca] external-token 0 0 2 1 7e783de0 > 14291: [ b7] b(:) 0 0 2 1 7e783de0 > 14293: [952] 0 0 2 1 7e783de0 > 14295: [a41] 0 0 2 1 7e783de0 > 14297: [cf5] 0 0 2 1 7e783de0 > 14298: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 14299: [ ca] external-token 0 0 2 1 7e783de0 > 142a7: [ b7] b(:) 0 0 2 1 7e783de0 > 142a9: [b70] 0 0 2 1 7e783de0 > 142ab: [b71] 0 0 2 1 7e783de0 > 142ac: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 142ad: [ ca] external-token 0 0 2 1 7e783de0 > 142bf: [ b7] b(:) 0 0 2 1 7e783de0 > 142c1: [952] 0 0 2 1 7e783de0 > 142c3: [a41] 0 0 2 1 7e783de0 > 142c5: [df3] 0 0 2 1 7e783de0 > 142c6: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 142c7: [ ca] external-token 0 0 2 1 7e783de0 > 142d8: [ b7] b(:) 0 0 2 1 7e783de0 > 142da: [952] 0 0 2 1 7e783de0 > 142dc: [a41] 0 0 2 1 7e783de0 > 142de: [df4] 0 0 2 1 7e783de0 > 142df: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 142e0: [ ca] external-token 0 0 2 1 7e783de0 > 142f2: [ b7] b(:) 0 0 2 1 7e783de0 > 142f4: [952] 0 0 2 1 7e783de0 > 142f6: [a41] 0 0 2 1 7e783de0 > 142f8: [df5] 0 0 2 1 7e783de0 > 142f9: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 142fb: [95f] x95f 0 0 2 1 7e783de0 0 > 142fc: [ a6] 1 0 0 2 1 7e783de0 0 1 > 142fe: [952] x952 0 0 2 1 7e783de0 0 1 0 > 142ff: [ 27] LSHIFT 0 0 2 1 7e783de0 0 1 > 14300: [ 23] AND 0 0 2 1 7e783de0 0 > 14301: [ 35] 0<> 0 0 2 1 7e783de0 0 > 14302: [ 14] b?branch 0 0 2 1 7e783de0 > 14345: [ 11] b(') 0 0 2 1 7e783de0 7e7d4d68 > 14349: [11c] is-install 0 0 2 1 7e783de0 > 1434a: [ 11] b(') 0 0 2 1 7e783de0 7e7d4dc0 > 1434e: [11d] is-remove 0 0 2 1 7e783de0 > 14350: [127] finish-device 0 0 2 1 7e783de0 > 14351: [ b2] b(>resolve) > 7e7848a0 : ?compile-mode ( 0 0 2 1 7e783de0 ) | > 7e783398 : STATE ( 0 0 2 1 7e783de0 ) | > 7e7833a0 : @ ( 0 0 2 1 7e783de0 7dc0e6f0 ) | > 7e7833a8 : SEMICOLON ( 0 0 2 1 7e783de0 0 ) | > 7e7848a8 : 0BRANCH ( 0 0 2 1 7e783de0 0 ) | > 7e7848c0 : SEMICOLON ( 0 0 2 1 7e783de0 ) | 0 0 2 1 7e783de0 > 14353: [946] x946 0 0 2 1 7e783de0 2 > 14354: [ a6] 1 0 0 2 1 7e783de0 2 1 > 14355: [ 3b] > 0 0 2 1 7e783de0 -1 > 14356: [ 14] b?branch 0 0 2 1 7e783de0 > 14359: [ a4] -1 0 0 2 1 7e783de0 -1 > 1435b: [951] x951 0 0 2 1 7e783de0 -1 2 > 1435c: [ a5] 0 0 0 2 1 7e783de0 -1 2 0 > 1435d: [ 18] b(?do) 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 > 14360: [ 19] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 > 14362: [952] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 > 14363: [ 3d] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 > 14364: [ 14] b?branch 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 14367: [ 47] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 14368: [ a4] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 14369: [ 3c] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 1436a: [ 14] b?branch 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 > 1436d: [ 46] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 > 1436e: [ 19] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 > 1436f: [ b2] b(>resolve) > 7e7848a0 : ?compile-mode ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 ) | > 7e783398 : STATE ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 ) | > 7e7833a0 : @ ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 7dc0e6f0 ) | > 7e7833a8 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 3 ) | > 7e7848a8 : 0BRANCH ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 3 ) | > 7e7848b8 : THEN ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 ) | > 7dc0ee60 : ?COMP ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 ) | > 7dc0e780 : STATE ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 ) | > 7dc0e788 : @ ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 7dc0e6f0 ) | > 7dc0e790 : 0BRANCH ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 3 ) | > 7dc0e7a0 : EXIT ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 ) | > 7dc0ee68 : RESOLVE-ORIG ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 ) | > 7dc0ed60 : HERE ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 ) | > 7dc0ed68 : OVER ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 7dc5f178 ) | > 7dc0ed70 : CELL+ ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 7dc5f178 7dc5f160 ) | > 7dc09f40 : NA1+ ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 7dc5f178 7dc5f160 ) | > 7dc09ee8 : /N ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 7dc5f178 7dc5f160 ) | > 7dc09ef0 : + ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 7dc5f178 7dc5f160 8 ) | > 7dc09ef8 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 7dc5f178 7dc5f168 ) | > 7dc09f48 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 7dc5f178 7dc5f168 ) | > 7dc0ed78 : - ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 7dc5f178 7dc5f168 ) | > 7dc0ed80 : SWAP ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f160 10 ) | > 7dc0ed88 : ! ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 10 7dc5f160 ) | > 7dc0ed90 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7dc0ee70 : -COMP ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7dc0ecb8 : -1 ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7dc0ecc0 : STATE ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 -1 ) | > 7dc0ecc8 : +! ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 -1 7dc0e6f0 ) | > 7dc0bcc8 : TUCK ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 -1 7dc0e6f0 ) | > 7dc0a178 : SWAP ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 -1 7dc0e6f0 ) | > 7dc0a180 : OVER ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc0e6f0 -1 ) | > 7dc0a188 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc0e6f0 -1 7dc0e6f0 ) | > 7dc0bcd0 : @ ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc0e6f0 -1 7dc0e6f0 ) | > 7dc0bcd8 : + ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc0e6f0 -1 3 ) | > 7dc0bce0 : SWAP ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc0e6f0 2 ) | > 7dc0bce8 : ! ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 2 7dc0e6f0 ) | > 7dc0bcf0 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7dc0ecd0 : STATE ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7dc0ecd8 : @ ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc0e6f0 ) | > 7dc0ece0 : 0BRANCH ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 2 ) | > 7dc0ecf0 : EXIT ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7dc0ee78 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7e7848c0 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 14370: [ 19] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 14372: [a41] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 14374: [a4a] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 14376: [8ea] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 14377: [ 3d] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 14378: [ 14] b?branch 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 > 1437b: [ 46] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 > 1437c: [ 19] 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 > 1437d: [ 1b] b(leave) 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 > 1437e: [ b2] b(>resolve) > 7e7848a0 : ?compile-mode ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 ) | > 7e783398 : STATE ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 ) | > 7e7833a0 : @ ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 7dc0e6f0 ) | > 7e7833a8 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 3 ) | > 7e7848a8 : 0BRANCH ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 3 ) | > 7e7848b8 : THEN ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 ) | > 7dc0ee60 : ?COMP ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 ) | > 7dc0e780 : STATE ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 ) | > 7dc0e788 : @ ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 7dc0e6f0 ) | > 7dc0e790 : 0BRANCH ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 3 ) | > 7dc0e7a0 : EXIT ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 ) | > 7dc0ee68 : RESOLVE-ORIG ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 ) | > 7dc0ed60 : HERE ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 ) | > 7dc0ed68 : OVER ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 7dc5f1d0 ) | > 7dc0ed70 : CELL+ ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 7dc5f1d0 7dc5f1a8 ) | > 7dc09f40 : NA1+ ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 7dc5f1d0 7dc5f1a8 ) | > 7dc09ee8 : /N ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 7dc5f1d0 7dc5f1a8 ) | > 7dc09ef0 : + ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 7dc5f1d0 7dc5f1a8 8 ) | > 7dc09ef8 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 7dc5f1d0 7dc5f1b0 ) | > 7dc09f48 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 7dc5f1d0 7dc5f1b0 ) | > 7dc0ed78 : - ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 7dc5f1d0 7dc5f1b0 ) | > 7dc0ed80 : SWAP ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 7dc5f1a8 20 ) | > 7dc0ed88 : ! ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 20 7dc5f1a8 ) | > 7dc0ed90 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7dc0ee70 : -COMP ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7dc0ee78 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7e7848c0 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 > 1437f: [ b2] b(>resolve) > 7e7848a0 : ?compile-mode ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7e7848a8 : 0BRANCH ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 2 ) | > 7e7848b8 : THEN ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 7dc5f138 ) | > 7e7848c0 : SEMICOLON ( 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 ) | 0 0 2 1 7e783de0 -1 2 0 0 7dc5f110 > 14380: [ 15] b(loop) 0 0 2 1 7e783de0 1 > 14383: [ 47] DUP 0 0 2 1 7e783de0 1 1 > 14384: [ c3] b(to) 0 0 2 1 7e783de0 1 > 14388: [a41] xa41 0 0 2 1 7e783de0 > 1438a: [11f] new-device 0 0 2 1 7e783de0 > 1438c: [e32] xe32 0 0 2 1 7e783de0 > 1438d: [ b5] new-token 0 0 2 1 7e783de0 > 14390: [ b7] b(:) 0 0 2 1 7e783de0 > 14392: [953] 0 0 2 1 7e783de0 > 14394: [a41] 0 0 2 1 7e783de0 > 14396: [df1] 0 0 2 1 7e783de0 > 14397: [ c3] b(to) 0 0 2 1 7e783de0 > 1439a: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 1439b: [ b5] new-token 0 0 2 1 7e783de0 > 1439e: [ b7] b(:) 0 0 2 1 7e783de0 > 143a0: [953] 0 0 2 1 7e783de0 > 143a2: [a41] 0 0 2 1 7e783de0 > 143a4: [df2] 0 0 2 1 7e783de0 > 143a5: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 143a6: [ b6] named-token 0 0 2 1 7e783de0 > 143b2: [ b7] b(:) 0 0 2 1 7e783de0 > 143b4: [dcb] 0 0 2 1 7e783de0 > 143b5: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 143b6: [ b6] named-token 0 0 2 1 7e783de0 > 143c4: [ b7] b(:) 0 0 2 1 7e783de0 > 143c6: [dcc] 0 0 2 1 7e783de0 > 143c7: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 143c8: [ ca] external-token 0 0 2 1 7e783de0 > 143d4: [ b7] b(:) 0 0 2 1 7e783de0 > 143d6: [953] 0 0 2 1 7e783de0 > 143d8: [a41] 0 0 2 1 7e783de0 > 143da: [dca] 0 0 2 1 7e783de0 > 143db: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 143dc: [ ca] external-token 0 0 2 1 7e783de0 > 143ee: [ b7] b(:) 0 0 2 1 7e783de0 > 143f0: [953] 0 0 2 1 7e783de0 > 143f2: [a41] 0 0 2 1 7e783de0 > 143f4: [dd5] 0 0 2 1 7e783de0 > 143f5: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 143f6: [ ca] external-token 0 0 2 1 7e783de0 > 14408: [ b7] b(:) 0 0 2 1 7e783de0 > 1440a: [953] 0 0 2 1 7e783de0 > 1440c: [a41] 0 0 2 1 7e783de0 > 1440e: [dd7] 0 0 2 1 7e783de0 > 1440f: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 14410: [ ca] external-token 0 0 2 1 7e783de0 > 14422: [ b7] b(:) 0 0 2 1 7e783de0 > 14424: [953] 0 0 2 1 7e783de0 > 14426: [a41] 0 0 2 1 7e783de0 > 14428: [dd6] 0 0 2 1 7e783de0 > 14429: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 1442a: [ ca] external-token 0 0 2 1 7e783de0 > 14434: [ b7] b(:) 0 0 2 1 7e783de0 > 14436: [953] 0 0 2 1 7e783de0 > 14438: [a41] 0 0 2 1 7e783de0 > 1443a: [cf7] 0 0 2 1 7e783de0 > 1443b: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 1443c: [ ca] external-token 0 0 2 1 7e783de0 > 14446: [ b7] b(:) 0 0 2 1 7e783de0 > 14448: [953] 0 0 2 1 7e783de0 > 1444a: [a41] 0 0 2 1 7e783de0 > 1444c: [cf9] 0 0 2 1 7e783de0 > 1444d: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 1444e: [ ca] external-token 0 0 2 1 7e783de0 > 1445c: [ b7] b(:) 0 0 2 1 7e783de0 > 1445e: [953] 0 0 2 1 7e783de0 > 14460: [a41] 0 0 2 1 7e783de0 > 14462: [cf3] 0 0 2 1 7e783de0 > 14463: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 14464: [ ca] external-token 0 0 2 1 7e783de0 > 14472: [ b7] b(:) 0 0 2 1 7e783de0 > 14474: [953] 0 0 2 1 7e783de0 > 14476: [a41] 0 0 2 1 7e783de0 > 14478: [cf5] 0 0 2 1 7e783de0 > 14479: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 1447a: [ ca] external-token 0 0 2 1 7e783de0 > 14488: [ b7] b(:) 0 0 2 1 7e783de0 > 1448a: [b70] 0 0 2 1 7e783de0 > 1448c: [b71] 0 0 2 1 7e783de0 > 1448d: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 1448e: [ ca] external-token 0 0 2 1 7e783de0 > 144a0: [ b7] b(:) 0 0 2 1 7e783de0 > 144a2: [953] 0 0 2 1 7e783de0 > 144a4: [a41] 0 0 2 1 7e783de0 > 144a6: [df3] 0 0 2 1 7e783de0 > 144a7: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 144a8: [ ca] external-token 0 0 2 1 7e783de0 > 144b9: [ b7] b(:) 0 0 2 1 7e783de0 > 144bb: [953] 0 0 2 1 7e783de0 > 144bd: [a41] 0 0 2 1 7e783de0 > 144bf: [df4] 0 0 2 1 7e783de0 > 144c0: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 144c1: [ ca] external-token 0 0 2 1 7e783de0 > 144d3: [ b7] b(:) 0 0 2 1 7e783de0 > 144d5: [953] 0 0 2 1 7e783de0 > 144d7: [a41] 0 0 2 1 7e783de0 > 144d9: [df5] 0 0 2 1 7e783de0 > 144da: [ c2] fc-locals-b(;) 0 0 2 1 7e783de0 > 144dc: [95f] x95f 0 0 2 1 7e783de0 0 > 144dd: [ a6] 1 0 0 2 1 7e783de0 0 1 > 144df: [953] x953 0 0 2 1 7e783de0 0 1 1 > 144e0: [ 27] LSHIFT 0 0 2 1 7e783de0 0 2 > 144e1: [ 23] AND 0 0 2 1 7e783de0 0 > 144e2: [ 35] 0<> 0 0 2 1 7e783de0 0 > 144e3: [ 14] b?branch 0 0 2 1 7e783de0 > 14526: [ 11] b(') 0 0 2 1 7e783de0 7e7d55a8 > 1452a: [11c] is-install 0 0 2 1 7e783de0 > 1452b: [ 11] b(') 0 0 2 1 7e783de0 7e7d5600 > 1452f: [11d] is-remove 0 0 2 1 7e783de0 > 14531: [127] finish-device 0 0 2 1 7e783de0 > 14532: [ b2] b(>resolve) > 7e7848a0 : ?compile-mode ( 0 0 2 1 7e783de0 ) | > 7e7848a8 : 0BRANCH ( 0 0 2 1 7e783de0 0 ) | > 7e7848c0 : SEMICOLON ( 0 0 2 1 7e783de0 ) | 0 0 2 1 7e783de0 > 14534: [11f] new-device 0 0 2 1 7e783de0 > 14535: [ 12] b(") 0 0 2 1 7e783de0 14537 d > 14545: [201] device-name 0 0 2 1 7e783de0 > 14546: [ 12] b(") 0 0 2 1 7e783de0 14548 12 > 1455b: [114] encode-string 0 0 2 1 7e783de0 7e7d5be0 13 > 1455c: [ 12] b(") 0 0 2 1 7e783de0 7e7d5be0 13 1455e a > 14569: [110] property 0 0 2 1 7e783de0 > 1456a: [ a7] 2 0 0 2 1 7e783de0 2 > 1456c: [111] encode-int 0 0 2 1 7e783de0 7e7d5c38 4 > 1456d: [ 12] b(") 0 0 2 1 7e783de0 7e7d5c38 4 1456f 17 > 14587: [110] property 0 0 2 1 7e783de0 > 14588: [ a7] 2 0 0 2 1 7e783de0 2 > 1458a: [111] encode-int 0 0 2 1 7e783de0 7e7d5c90 4 > 1458b: [ 12] b(") 0 0 2 1 7e783de0 7e7d5c90 4 1458d 15 > 145a3: [110] property 0 0 2 1 7e783de0 > 145a5: [951] x951 0 0 2 1 7e783de0 2 > 145a7: [111] encode-int 0 0 2 1 7e783de0 7e7d5ce0 4 > 145a8: [ 12] b(") 0 0 2 1 7e783de0 7e7d5ce0 4 145aa 3 > 145ae: [110] property 0 0 2 1 7e783de0 > 145af: [ a6] 1 0 0 2 1 7e783de0 1 > 145b1: [111] encode-int 0 0 2 1 7e783de0 7e7d5d20 4 > 145b2: [ 12] b(") 0 0 2 1 7e783de0 7e7d5d20 4 145b4 e > 145c3: [110] property 0 0 2 1 7e783de0 > 145c4: [ a5] 0 0 0 2 1 7e783de0 0 > 145c6: [111] encode-int 0 0 2 1 7e783de0 7e7d5d68 4 > 145c7: [ 12] b(") 0 0 2 1 7e783de0 7e7d5d68 4 145c9 b > 145d5: [110] property 0 0 2 1 7e783de0 > 145d7: [11f] new-device 0 0 2 1 7e783de0 > 145d8: [ 12] b(") 0 0 2 1 7e783de0 145da 15 > 145f0: [201] device-name 0 0 2 1 7e783de0 > 145f1: [ 12] b(") 0 0 2 1 7e783de0 145f3 b > 145ff: [11a] device-type 0 0 2 1 7e783de0 > 14600: [ 12] b(") 0 0 2 1 7e783de0 14602 9 > 1460c: [114] encode-string 0 0 2 1 7e783de0 7e7d5ed0 a > 1460d: [ 12] b(") 0 0 2 1 7e783de0 7e7d5ed0 a 1460f 8 > 14618: [110] property 0 0 2 1 7e783de0 > 1461a: [20a] my-parent 0 0 2 1 7e783de0 7e42a000 > 1461c: [20b] ihandle>phandle 0 0 2 1 7e783de0 7e7d5b30 > 1461d: [ 10] b(lit) 0 0 2 1 7e783de0 7e7d5b30 8 > 14622: [ 27] LSHIFT 0 0 2 1 7e783de0 7e7d5b3000 > 14624: [111] encode-int 0 0 2 1 7e783de0 7e7d5f20 4 > 14625: [ 12] b(") 0 0 2 1 7e783de0 7e7d5f20 4 14627 9 > 14631: [110] property 0 0 2 1 7e783de0 > 14632: [ a5] 0 0 0 2 1 7e783de0 0 > 14634: [111] encode-int 0 0 2 1 7e783de0 7e7d5f68 4 > 14635: [ 12] b(") 0 0 2 1 7e783de0 7e7d5f68 4 14637 3 > 1463b: [110] property 0 0 2 1 7e783de0 > 1463c: [ a7] 2 0 0 2 1 7e783de0 2 > 1463e: [111] encode-int 0 0 2 1 7e783de0 7e7d5fa8 4 > 1463f: [ 12] b(") 0 0 2 1 7e783de0 7e7d5fa8 4 14641 7 > 14649: [110] property 0 0 2 1 7e783de0 > 1464a: [ 10] b(lit) 0 0 2 1 7e783de0 ff000002 > 14650: [111] encode-int 0 0 2 1 7e783de0 7e7d5ff0 4 > 14651: [ 12] b(") 0 0 2 1 7e783de0 7e7d5ff0 4 14653 4 > 14658: [110] property 0 0 2 1 7e783de0 > 14659: [ 10] b(lit) 0 0 2 1 7e783de0 550000 > 1465f: [111] encode-int 0 0 2 1 7e783de0 7e7d6030 4 > 14660: [ 12] b(") 0 0 2 1 7e783de0 7e7d6030 4 14662 c > 1466f: [110] property 0 0 2 1 7e783de0 > 14670: [ 10] b(lit) 0 0 2 1 7e783de0 1e > 14676: [111] encode-int 0 0 2 1 7e783de0 7e7d6078 4 > 14677: [ a5] 0 0 0 2 1 7e783de0 7e7d6078 4 0 > 14679: [111] encode-int 0 0 2 1 7e783de0 7e7d6078 4 7e7d607c 4 > 1467b: [112] encode+ 0 0 2 1 7e783de0 7e7d6078 8 > 1467c: [ 12] b(") 0 0 2 1 7e783de0 7e7d6078 8 1467e e > 1468d: [110] property 0 0 2 1 7e783de0 > 1468f: [127] finish-device 0 0 2 1 7e783de0 > 14691: [127] finish-device 0 0 2 1 7e783de0 > 14693: [de0] xde0 0 0 2 1 7e783de0 > 14694: [ 0] end0 0 0 2 1 7e783de0 > restored fcode@ 7e783de0 > restored fcode-spread 1 > restored fcode-offset 2 > restored fcode-end 0 > restored ip 0 > ok > 0 > >

1 0

Re: [OpenBIOS] Back at it again( PCI Passthrough )
by Jd Lyons 08 May '18

08 May '18

If you’ll note, the one thing that jumps out at me, in the 6602.txt( openbios ), abort is called 50 times, yet it doesn’t appear at all in the 6600.txt( SLOF ). This may have something to do with the fact that SLOF reaches the end of the Fcode without error. > On May 8, 2018, at 3:41 AM, Jd Lyons <lyons_dj(a)yahoo.com> wrote: > > Not sure if this is what you’re asking for, but the verbose output of both Openbios and SLOF executing the option rom. > > <6600.txt> > <6602.txt> > > >> On May 6, 2018, at 8:12 PM, Joe van Tunen <joevt(a)shaw.ca <mailto:joevt@shaw.ca>> wrote: >> >> Can you send the full output directly to me or post a link? >> > > > >> Can you check the value of "here" before byte-load and after the exception to see how much dictionary space was used? > > Not sure how to check the value of here?

1 0

Re: [OpenBIOS] Back at it again( PCI Passthrough )
by Jd Lyons 07 May '18

07 May '18

Ok,I got a little excited, [ddf] vs [dff]. Sometimes I’m easily confused. > On May 7, 2018, at 10:54 AM, Joe van Tunen <joevt(a)shaw.ca> wrote: > > > > On 5/7/18, 4:56 AM, "Segher Boessenkool" <segher(a)kernel.crashing.org> wrote: > > On Mon, May 07, 2018 at 07:33:04AM -0400, Jd Lyons wrote: >> Ok, I think the reason for the exception with [dff] is I don’t have an active device tree node. So, “ /pci/@x” open-dev to my-self works on Apple’s implementation of OF, but Openbios and SLOF deal with things a little different. >> >> s” /pci/@x” select-dev >> >> That works in SLOF, otherwise SLOF throws an exception with [dff] and tells us there is no active device tree node. > > You should use begin-package and new-device or the like. See the Open > Firmware specification glossary entries for those words and byte-load . > >> Doesn’t anyone know how I can view the active device tree node? > > my-self ihandle>phandle ( -- phandle) and do some stuff with that, > or just use pwd . > > > Segher > > > > Is there a reason this thread isn't going to the openbios mailing list? > > Do you mean [dff] or [ddf]? Wasn't the evidence pointing to [ddf]? > > [ddf] calls the parent's map-in function a few times. The "PCI Bus Binding to Open Firmware" document mentions a bug with map-in which existed in Apple's original Open Firmware implementation. Do QEMU and the Quicksilver G4 both have a correctly implemented map-in function? > > What is the maximum dictionary space allowed by QEMU's OpenBIOS? If the maximum is reached, does it grow or does an exception occur? It's probably not likely that the nvidia fcode is exceeding this limit, but it would be good to have a method to confirm this. > > >

1 0

Re: [OpenBIOS] Back at it again( PCI Passthrough )
by Jd Lyons 07 May '18

07 May '18

Sorry, that wan me forgeting to include the list. > On May 7, 2018, at 10:54 AM, Joe van Tunen <joevt(a)shaw.ca> wrote: > > > > On 5/7/18, 4:56 AM, "Segher Boessenkool" <segher(a)kernel.crashing.org> wrote: > > On Mon, May 07, 2018 at 07:33:04AM -0400, Jd Lyons wrote: >> Ok, I think the reason for the exception with [dff] is I don’t have an active device tree node. So, “ /pci/@x” open-dev to my-self works on Apple’s implementation of OF, but Openbios and SLOF deal with things a little different. >> >> s” /pci/@x” select-dev >> >> That works in SLOF, otherwise SLOF throws an exception with [dff] and tells us there is no active device tree node. > > You should use begin-package and new-device or the like. See the Open > Firmware specification glossary entries for those words and byte-load . > >> Doesn’t anyone know how I can view the active device tree node? > > my-self ihandle>phandle ( -- phandle) and do some stuff with that, > or just use pwd . > > > Segher > > > > Is there a reason this thread isn't going to the openbios mailing list? > > Do you mean [dff] or [ddf]? Wasn't the evidence pointing to [ddf]? > > [ddf] calls the parent's map-in function a few times. The "PCI Bus Binding to Open Firmware" document mentions a bug with map-in which existed in Apple's original Open Firmware implementation. Do QEMU and the Quicksilver G4 both have a correctly implemented map-in function? > > What is the maximum dictionary space allowed by QEMU's OpenBIOS? If the maximum is reached, does it grow or does an exception occur? It's probably not likely that the nvidia fcode is exceeding this limit, but it would be good to have a method to confirm this. > > >

1 0

← Newer
1
...
9
10
11
12
13
14
15
...
429
Older →

Jump to page: