Annotation of qemu/roms/openbios/arch/sparc32/tree.fs, revision 1.1

1.1     ! root        1: 
        !             2: " /" find-device
        !             3:   2 encode-int " #address-cells" property
        !             4:   1 encode-int " #size-cells" property
        !             5: 
        !             6:   " sun4m" encode-string " compatible" property
        !             7:   h# 0a21fe80 encode-int " clock-frequency" property
        !             8: 
        !             9:   : encode-unit encode-unit-sbus ;
        !            10:   : decode-unit decode-unit-sbus ;
        !            11: 
        !            12: new-device
        !            13:   " memory" device-name
        !            14:   external
        !            15:   : open true ;
        !            16:   : close ;
        !            17:   \ claim ( phys size align -- base )
        !            18:   \ release ( phys size -- )
        !            19: finish-device
        !            20: 
        !            21: new-device
        !            22:   " virtual-memory" device-name
        !            23:   external
        !            24:   : open true ;
        !            25:   : close ;
        !            26:   \ claim ( phys size align -- base )
        !            27:   \ release ( phys size -- )
        !            28: finish-device
        !            29: 
        !            30: new-device
        !            31:   " iommu" device-name
        !            32:   2 encode-int " #address-cells" property
        !            33:   1 encode-int " #size-cells" property
        !            34:   h# 1000 encode-int " page-size" property
        !            35:   0 encode-int " cache-coherence?" property
        !            36:   external
        !            37:   : open ( cr ." opening iommu" cr) true ;
        !            38:   : close ;
        !            39:   : encode-unit encode-unit-sbus ;
        !            40:   : decode-unit decode-unit-sbus ;
        !            41: finish-device
        !            42: 
        !            43: " /iommu" find-device
        !            44: new-device
        !            45:   " sbus" device-name
        !            46:   " hierarchical" device-type
        !            47:   2 encode-int " #address-cells" property
        !            48:   1 encode-int " #size-cells" property
        !            49:   h# 01443fd0 encode-int " clock-frequency" property
        !            50:   h# 1c encode-int " slot-address-bits" property
        !            51:   h# 3f encode-int " burst-sizes" property
        !            52:   external
        !            53:   : open ( cr ." opening SBus" cr) true ;
        !            54:   : close ;
        !            55:   : encode-unit encode-unit-sbus ;
        !            56:   : decode-unit decode-unit-sbus ;
        !            57: finish-device
        !            58: 
        !            59: [IFDEF] CONFIG_BPP
        !            60: " /iommu/sbus" find-device
        !            61: new-device
        !            62:   " SUNW,bpp" device-name
        !            63:   h# 4 encode-int h# 0c800000 encode-int encode+ h# 0000001c encode-int encode+ " reg" property
        !            64:   h# 33 encode-int 0 encode-int encode+ " intr" property
        !            65: finish-device
        !            66: [THEN]
        !            67: 
        !            68: " /iommu/sbus" find-device
        !            69: new-device
        !            70:   " SUNW,tcx" device-name
        !            71:   " display" device-type
        !            72:   h# 1d encode-int " vbporch" property
        !            73:   h# a0 encode-int " hbporch" property
        !            74:   h# 06 encode-int " vsync" property
        !            75:   h# 88 encode-int " hsync" property
        !            76:   h# 03 encode-int " vfporch" property
        !            77:   h# 18 encode-int " hfporch" property
        !            78:   h# 03dfd240 encode-int " pixfreq" property
        !            79:   h# 3c encode-int " vfreq" property
        !            80:   h# 300 encode-int " height" property
        !            81:   h# 400 encode-int " width" property
        !            82:   h# 400 encode-int " linebytes" property
        !            83:   5 encode-int 0 encode-int encode+ " intr" property
        !            84:   5 encode-int " interrupts" property
        !            85: finish-device
        !            86: 
        !            87: " /iommu/sbus" find-device
        !            88: new-device
        !            89:   " espdma" device-name
        !            90:   external
        !            91:   : encode-unit encode-unit-sbus ;
        !            92:   : decode-unit decode-unit-sbus ;
        !            93: finish-device
        !            94: 
        !            95: " /iommu/sbus" find-device
        !            96: new-device
        !            97:   " ledma" device-name
        !            98:   h# 3f encode-int " burst-sizes" property
        !            99:   external
        !           100:   : encode-unit encode-unit-sbus ;
        !           101:   : decode-unit decode-unit-sbus ;
        !           102: finish-device
        !           103: 
        !           104: " /iommu/sbus/ledma" find-device
        !           105: new-device
        !           106:   " le" device-name
        !           107:   " network" device-type
        !           108:   h# 7 encode-int " busmaster-regval" property
        !           109:   h# 26 encode-int 0 encode-int encode+ " intr" property
        !           110: finish-device
        !           111: 
        !           112: \ obio (on-board IO)
        !           113: " /" find-device
        !           114: new-device
        !           115:   " obio" device-name
        !           116:   " hierarchical" device-type
        !           117:   2 encode-int " #address-cells" property
        !           118:   1 encode-int " #size-cells" property
        !           119:   external
        !           120:   : open ( cr ." opening obio" cr) true ;
        !           121:   : close ;
        !           122:   : encode-unit encode-unit-sbus ;
        !           123:   : decode-unit decode-unit-sbus ;
        !           124: finish-device
        !           125: 
        !           126: " /options" find-device
        !           127:   " disk" encode-string " boot-from" property
        !           128: 
        !           129: " /openprom" find-device
        !           130:   0 0 " aligned-allocator" property

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.