openfirmware

openfirmware@openfirmware.info

3007 discussions

[commit] r3301 - cpu/arm/olpc/cl4
by repository service 10 Sep '12

10 Sep '12

Author: quozl Date: Mon Sep 10 13:33:13 2012 New Revision: 3301 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3301 Log: Q7A14 Modified: cpu/arm/olpc/cl4/fw-version.fth Modified: cpu/arm/olpc/cl4/fw-version.fth ============================================================================== --- cpu/arm/olpc/cl4/fw-version.fth Mon Sep 10 10:39:51 2012 (r3300) +++ cpu/arm/olpc/cl4/fw-version.fth Mon Sep 10 13:33:13 2012 (r3301) @@ -1,11 +1,10 @@ \ The overall firmware revision macro: FW_PREFIX Q7 macro: FW_MAJOR A -macro: FW_MINOR 13 +macro: FW_MINOR 14 \ Create a 2-character build/fw-suffix file to personalize your test builds " fw-suffix" $file-exists? [if] " fw-suffix" $read-file 2 min " ${FW_MINOR}%s" expand$ sprintf " FW_MINOR" $set-macro [then] -

1 0

[commit] r3300 - dev/olpc/spiflash
by repository service 10 Sep '12

10 Sep '12

Author: quozl Date: Mon Sep 10 10:39:51 2012 New Revision: 3300 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3300 Log: OLPC XO-4 B1 - add new SPI FLASH ID 35 for MXIC 25U1635E Modified: dev/olpc/spiflash/spiflash.fth Modified: dev/olpc/spiflash/spiflash.fth ============================================================================== --- dev/olpc/spiflash/spiflash.fth Fri Sep 7 10:39:55 2012 (r3299) +++ dev/olpc/spiflash/spiflash.fth Mon Sep 10 10:39:51 2012 (r3300) @@ -308,7 +308,8 @@ h# 13 of ['] common-write endof h# 34 of ['] common-write endof h# bf of ['] sst-write endof - h# 14 of ['] common-write endof + h# 14 of ['] common-write endof + h# 35 of ['] common-write endof \ On some old board the ID would read as 14 when it should have been something else. \ On CL4, 14 is the expected ID. \ ." The SPI FLASH ID reads as 14. This is due to an infrequent hardware problem." cr

1 0

[commit] r3299 - cpu/arm/olpc
by repository service 07 Sep '12

07 Sep '12

Author: quozl Date: Fri Sep 7 10:39:55 2012 New Revision: 3299 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3299 Log: OLPC XO-4 - Neonode, re-enable too-strong fail Modified: cpu/arm/olpc/nn-touchscreen.fth Modified: cpu/arm/olpc/nn-touchscreen.fth ============================================================================== --- cpu/arm/olpc/nn-touchscreen.fth Fri Sep 7 01:38:55 2012 (r3298) +++ cpu/arm/olpc/nn-touchscreen.fth Fri Sep 7 10:39:55 2012 (r3299) @@ -485,7 +485,6 @@ [ifdef] nn-fll \ forced LED levels test : test-fll-signal ( signal# signal-value led-level -- ) -[ifdef] nn-too-strong-is-fatal dup 0= if fault rot ." fail on axis signal " .d @@ -494,7 +493,6 @@ cr exit then -[then] dup h# c > if fault rot ." fail on axis signal " .d

1 0

[commit] r3298 - cpu/arm/olpc/cl4
by repository service 06 Sep '12

06 Sep '12

Author: quozl Date: Fri Sep 7 01:38:55 2012 New Revision: 3298 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3298 Log: Q7A13 Modified: cpu/arm/olpc/cl4/fw-version.fth Modified: cpu/arm/olpc/cl4/fw-version.fth ============================================================================== --- cpu/arm/olpc/cl4/fw-version.fth Thu Sep 6 10:23:20 2012 (r3297) +++ cpu/arm/olpc/cl4/fw-version.fth Fri Sep 7 01:38:55 2012 (r3298) @@ -8,3 +8,4 @@ " fw-suffix" $read-file 2 min " ${FW_MINOR}%s" expand$ sprintf " FW_MINOR" $set-macro [then] +

1 0

[commit] r3297 - cpu/arm/olpc
by repository service 06 Sep '12

06 Sep '12

Author: quozl Date: Thu Sep 6 10:23:20 2012 New Revision: 3297 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3297 Log: OLPC XO-4 - Neonode, adjacent axis tests, increase box array to cover used size for photodiode edges, remove debugging. Modified: cpu/arm/olpc/nn-touchscreen.fth Modified: cpu/arm/olpc/nn-touchscreen.fth ============================================================================== --- cpu/arm/olpc/nn-touchscreen.fth Thu Sep 6 10:11:52 2012 (r3296) +++ cpu/arm/olpc/nn-touchscreen.fth Thu Sep 6 10:23:20 2012 (r3297) @@ -736,13 +736,11 @@ 0 value dx 0 value dy -xleds yleds * constant /boxen +xleds 1+ yleds 1+ * constant /boxen create boxen /boxen allot \ non-zero means box is expected to be hit : 0boxen ( -- ) boxen /boxen erase ; -: >boxen ( bx by -- addr ) xleds * + - dup /boxen > if debug-me then - boxen + ; +: >boxen ( bx by -- addr ) xleds * + boxen + ; : dxdy ( xleds yleds -- ) 0boxen

1 0

[commit] r3296 - cpu/arm/olpc
by repository service 06 Sep '12

06 Sep '12

Author: quozl Date: Thu Sep 6 10:11:52 2012 New Revision: 3296 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3296 Log: OLPC XO-4 - Neonode, double randomness of adjacent axis test, fix boxes test; many boxes could not be cleared, flush events and ignore buffered up event; to avoid old data on scribble and adjacent axis test, fix bug in watch-fss; was occasionally aborting due to touch event data seen in stream, source formatting; tabs to spaces. Modified: cpu/arm/olpc/nn-touchscreen.fth Modified: cpu/arm/olpc/nn-touchscreen.fth ============================================================================== --- cpu/arm/olpc/nn-touchscreen.fth Thu Sep 6 02:30:17 2012 (r3295) +++ cpu/arm/olpc/nn-touchscreen.fth Thu Sep 6 10:11:52 2012 (r3296) @@ -111,6 +111,10 @@ : deactivate ( -- ) h# 00 h# 01 h# ee 3 bytes-out h# 00 d# 20 anticipate +; + +: deconfigure ( -- ) + deactivate true to configure? ; @@ -130,8 +134,8 @@ no-data? if reset no-data? if - ." no response to reset" cr - pbuf-free false exit + ." no response to reset" cr + pbuf-free false exit then then ['] read-boot-complete catch if @@ -146,10 +150,15 @@ ; : close - deactivate + deconfigure pbuf-free ; +: flush + deconfigure + configure +; + : stream-poll? ( -- false | x y buttons true ) in? if \ FIXME: only handles one subpacket @@ -213,135 +222,135 @@ \ a trailing ? means this combination is untested string-array x-os - ," PD13 open?" \ 01 00 00 00 00 00 00 00 - ," PD14 open?" \ 02 00 00 00 00 00 00 00 - ," PD15 open?" \ 04 00 00 00 00 00 00 00 - ," PD16 open?" \ 08 00 00 00 00 00 00 00 - ," PD17 open?" \ 10 00 00 00 00 00 00 00 - ," PD18 open?" \ 20 00 00 00 00 00 00 00 - ," PD19 open?" \ 40 00 00 00 00 00 00 00 - ," PD20 open?" \ 80 00 00 00 00 00 00 00 - - ," PD21 open?" \ 00 01 00 00 00 00 00 00 - ," PD22 open?" \ 00 02 00 00 00 00 00 00 - ," PD23 open?" \ 00 04 00 00 00 00 00 00 - ," PD24 open?" \ 00 08 00 00 00 00 00 00 - ," PD25 open?" \ 00 10 00 00 00 00 00 00 - ," PD26 open?" \ 00 20 00 00 00 00 00 00 - ," PD27 open?" \ 00 40 00 00 00 00 00 00 - ," PD28 open?" \ 00 80 00 00 00 00 00 00 - - ," PD13 short" \ 00 00 01 00 00 00 00 00 - ," PD14 short" \ 00 00 02 00 00 00 00 00 - ," PD15 short" \ 00 00 04 00 00 00 00 00 - ," PD16 short" \ 00 00 08 00 00 00 00 00 - ," PD17 short" \ 00 00 10 00 00 00 00 00 - ," PD18 short" \ 00 00 20 00 00 00 00 00 - ," PD19 short" \ 00 00 40 00 00 00 00 00 - ," PD20 short" \ 00 00 80 00 00 00 00 00 - - ," PD21 short" \ 00 00 00 01 00 00 00 00 - ," PD22 short" \ 00 00 00 02 00 00 00 00 - ," PD23 short" \ 00 00 00 04 00 00 00 00 - ," PD24 short" \ 00 00 00 08 00 00 00 00 - ," PD25 short" \ 00 00 00 10 00 00 00 00 - ," PD26 short" \ 00 00 00 20 00 00 00 00 - ," PD27 short" \ 00 00 00 40 00 00 00 00 - ," PD28 short" \ 00 00 00 80 00 00 00 00 - - ," IR12 short" \ 00 00 00 00 01 00 00 00 - ," IR13 short" \ 00 00 00 00 02 00 00 00 - ," IR14 short" \ 00 00 00 00 04 00 00 00 - ," IR15 short" \ 00 00 00 00 08 00 00 00 - ," IR16 short" \ 00 00 00 00 10 00 00 00 - ," IR17 short" \ 00 00 00 00 20 00 00 00 - ," IR18 short" \ 00 00 00 00 40 00 00 00 - ," IR19 short" \ 00 00 00 00 80 00 00 00 - - ," IR20 short" \ 00 00 00 00 00 01 00 00 - ," IR21 short" \ 00 00 00 00 00 02 00 00 - ," IR22 short" \ 00 00 00 00 00 04 00 00 - ," IR23 short" \ 00 00 00 00 00 08 00 00 - ," IR24 short" \ 00 00 00 00 00 10 00 00 - ," IR25 short" \ 00 00 00 00 00 20 00 00 - ," IR26 short" \ 00 00 00 00 00 40 00 00 - ," reserved?" \ 00 00 00 00 00 80 00 00 - - ," IR12 open?" \ 00 00 00 00 00 00 01 00 - ," IR13 open?" \ 00 00 00 00 00 00 02 00 - ," IR14 open?" \ 00 00 00 00 00 00 04 00 - ," IR15 open?" \ 00 00 00 00 00 00 08 00 - ," IR16 open?" \ 00 00 00 00 00 00 10 00 - ," IR17 open?" \ 00 00 00 00 00 00 20 00 - ," IR18 open?" \ 00 00 00 00 00 00 40 00 - ," IR19 open?" \ 00 00 00 00 00 00 80 00 - - ," IR20 open?" \ 00 00 00 00 00 00 00 01 - ," IR21 open?" \ 00 00 00 00 00 00 00 02 - ," IR22 open?" \ 00 00 00 00 00 00 00 04 - ," IR23 open?" \ 00 00 00 00 00 00 00 08 - ," IR24 open?" \ 00 00 00 00 00 00 00 10 - ," IR25 open?" \ 00 00 00 00 00 00 00 20 - ," IR26 open?" \ 00 00 00 00 00 00 00 40 - ," reserved?" \ 00 00 00 00 00 00 00 80 + ," PD13 open?" \ 01 00 00 00 00 00 00 00 + ," PD14 open?" \ 02 00 00 00 00 00 00 00 + ," PD15 open?" \ 04 00 00 00 00 00 00 00 + ," PD16 open?" \ 08 00 00 00 00 00 00 00 + ," PD17 open?" \ 10 00 00 00 00 00 00 00 + ," PD18 open?" \ 20 00 00 00 00 00 00 00 + ," PD19 open?" \ 40 00 00 00 00 00 00 00 + ," PD20 open?" \ 80 00 00 00 00 00 00 00 + + ," PD21 open?" \ 00 01 00 00 00 00 00 00 + ," PD22 open?" \ 00 02 00 00 00 00 00 00 + ," PD23 open?" \ 00 04 00 00 00 00 00 00 + ," PD24 open?" \ 00 08 00 00 00 00 00 00 + ," PD25 open?" \ 00 10 00 00 00 00 00 00 + ," PD26 open?" \ 00 20 00 00 00 00 00 00 + ," PD27 open?" \ 00 40 00 00 00 00 00 00 + ," PD28 open?" \ 00 80 00 00 00 00 00 00 + + ," PD13 short" \ 00 00 01 00 00 00 00 00 + ," PD14 short" \ 00 00 02 00 00 00 00 00 + ," PD15 short" \ 00 00 04 00 00 00 00 00 + ," PD16 short" \ 00 00 08 00 00 00 00 00 + ," PD17 short" \ 00 00 10 00 00 00 00 00 + ," PD18 short" \ 00 00 20 00 00 00 00 00 + ," PD19 short" \ 00 00 40 00 00 00 00 00 + ," PD20 short" \ 00 00 80 00 00 00 00 00 + + ," PD21 short" \ 00 00 00 01 00 00 00 00 + ," PD22 short" \ 00 00 00 02 00 00 00 00 + ," PD23 short" \ 00 00 00 04 00 00 00 00 + ," PD24 short" \ 00 00 00 08 00 00 00 00 + ," PD25 short" \ 00 00 00 10 00 00 00 00 + ," PD26 short" \ 00 00 00 20 00 00 00 00 + ," PD27 short" \ 00 00 00 40 00 00 00 00 + ," PD28 short" \ 00 00 00 80 00 00 00 00 + + ," IR12 short" \ 00 00 00 00 01 00 00 00 + ," IR13 short" \ 00 00 00 00 02 00 00 00 + ," IR14 short" \ 00 00 00 00 04 00 00 00 + ," IR15 short" \ 00 00 00 00 08 00 00 00 + ," IR16 short" \ 00 00 00 00 10 00 00 00 + ," IR17 short" \ 00 00 00 00 20 00 00 00 + ," IR18 short" \ 00 00 00 00 40 00 00 00 + ," IR19 short" \ 00 00 00 00 80 00 00 00 + + ," IR20 short" \ 00 00 00 00 00 01 00 00 + ," IR21 short" \ 00 00 00 00 00 02 00 00 + ," IR22 short" \ 00 00 00 00 00 04 00 00 + ," IR23 short" \ 00 00 00 00 00 08 00 00 + ," IR24 short" \ 00 00 00 00 00 10 00 00 + ," IR25 short" \ 00 00 00 00 00 20 00 00 + ," IR26 short" \ 00 00 00 00 00 40 00 00 + ," reserved?" \ 00 00 00 00 00 80 00 00 + + ," IR12 open?" \ 00 00 00 00 00 00 01 00 + ," IR13 open?" \ 00 00 00 00 00 00 02 00 + ," IR14 open?" \ 00 00 00 00 00 00 04 00 + ," IR15 open?" \ 00 00 00 00 00 00 08 00 + ," IR16 open?" \ 00 00 00 00 00 00 10 00 + ," IR17 open?" \ 00 00 00 00 00 00 20 00 + ," IR18 open?" \ 00 00 00 00 00 00 40 00 + ," IR19 open?" \ 00 00 00 00 00 00 80 00 + + ," IR20 open?" \ 00 00 00 00 00 00 00 01 + ," IR21 open?" \ 00 00 00 00 00 00 00 02 + ," IR22 open?" \ 00 00 00 00 00 00 00 04 + ," IR23 open?" \ 00 00 00 00 00 00 00 08 + ," IR24 open?" \ 00 00 00 00 00 00 00 10 + ," IR25 open?" \ 00 00 00 00 00 00 00 20 + ," IR26 open?" \ 00 00 00 00 00 00 00 40 + ," reserved?" \ 00 00 00 00 00 00 00 80 end-string-array string-array y-os - ," PD4 open?" \ 01 00 00 00 00 00 - ," PD3 open?" \ 02 00 00 00 00 00 - ," PD2 open?" \ 04 00 00 00 00 00 - ," PD1 open?" \ 08 00 00 00 00 00 - ," PD12 open?" \ 10 00 00 00 00 00 - ," PD11 open?" \ 20 00 00 00 00 00 - ," PD10 open?" \ 40 00 00 00 00 00 - ," PD9 open?" \ 80 00 00 00 00 00 - - ," PD8 open?" \ 00 01 00 00 00 00 - ," PD7 open?" \ 00 02 00 00 00 00 - ," PD6 open?" \ 00 04 00 00 00 00 - ," PD5 open?" \ 00 08 00 00 00 00 - ," PD12 short" \ 00 10 00 00 00 00 - ," PD11 short" \ 00 20 00 00 00 00 - ," PD10 short" \ 00 40 00 00 00 00 - ," PD9 short" \ 00 80 00 00 00 00 - - ," PD8 short" \ 00 00 01 00 00 00 - ," PD7 short" \ 00 00 02 00 00 00 - ," PD6 short" \ 00 00 04 00 00 00 - ," PD5 short" \ 00 00 08 00 00 00 - ," PD4 short" \ 00 00 10 00 00 00 - ," PD3 short" \ 00 00 20 00 00 00 - ," PD2 short" \ 00 00 40 00 00 00 - ," PD1 short" \ 00 00 80 00 00 00 - - ," IR11 short" \ 00 00 00 01 00 00 - ," IR10 short" \ 00 00 00 02 00 00 - ," IR9 short" \ 00 00 00 04 00 00 - ," IR8 short" \ 00 00 00 08 00 00 - ," IR7 short" \ 00 00 00 10 00 00 - ," IR6 short" \ 00 00 00 20 00 00 - ," IR5 short" \ 00 00 00 40 00 00 - ," IR4 short" \ 00 00 00 80 00 00 - - ," IR3 short" \ 00 00 00 00 01 00 - ," IR2 short" \ 00 00 00 00 02 00 - ," IR1 short" \ 00 00 00 00 04 00 - ," reserved?" \ 00 00 00 00 08 00 - ," reserved?" \ 00 00 00 00 10 00 - ," IR11 open?" \ 00 00 00 00 20 00 - ," IR10 open?" \ 00 00 00 00 40 00 - ," IR9 open?" \ 00 00 00 00 80 00 - - ," IR8 open?" \ 00 00 00 00 00 01 - ," IR7 open?" \ 00 00 00 00 00 02 - ," IR6 open?" \ 00 00 00 00 00 04 - ," IR5 open?" \ 00 00 00 00 00 08 - ," IR4 open?" \ 00 00 00 00 00 10 - ," IR3 open?" \ 00 00 00 00 00 20 - ," IR2 open?" \ 00 00 00 00 00 40 - ," IR1 open?" \ 00 00 00 00 00 80 + ," PD4 open?" \ 01 00 00 00 00 00 + ," PD3 open?" \ 02 00 00 00 00 00 + ," PD2 open?" \ 04 00 00 00 00 00 + ," PD1 open?" \ 08 00 00 00 00 00 + ," PD12 open?" \ 10 00 00 00 00 00 + ," PD11 open?" \ 20 00 00 00 00 00 + ," PD10 open?" \ 40 00 00 00 00 00 + ," PD9 open?" \ 80 00 00 00 00 00 + + ," PD8 open?" \ 00 01 00 00 00 00 + ," PD7 open?" \ 00 02 00 00 00 00 + ," PD6 open?" \ 00 04 00 00 00 00 + ," PD5 open?" \ 00 08 00 00 00 00 + ," PD12 short" \ 00 10 00 00 00 00 + ," PD11 short" \ 00 20 00 00 00 00 + ," PD10 short" \ 00 40 00 00 00 00 + ," PD9 short" \ 00 80 00 00 00 00 + + ," PD8 short" \ 00 00 01 00 00 00 + ," PD7 short" \ 00 00 02 00 00 00 + ," PD6 short" \ 00 00 04 00 00 00 + ," PD5 short" \ 00 00 08 00 00 00 + ," PD4 short" \ 00 00 10 00 00 00 + ," PD3 short" \ 00 00 20 00 00 00 + ," PD2 short" \ 00 00 40 00 00 00 + ," PD1 short" \ 00 00 80 00 00 00 + + ," IR11 short" \ 00 00 00 01 00 00 + ," IR10 short" \ 00 00 00 02 00 00 + ," IR9 short" \ 00 00 00 04 00 00 + ," IR8 short" \ 00 00 00 08 00 00 + ," IR7 short" \ 00 00 00 10 00 00 + ," IR6 short" \ 00 00 00 20 00 00 + ," IR5 short" \ 00 00 00 40 00 00 + ," IR4 short" \ 00 00 00 80 00 00 + + ," IR3 short" \ 00 00 00 00 01 00 + ," IR2 short" \ 00 00 00 00 02 00 + ," IR1 short" \ 00 00 00 00 04 00 + ," reserved?" \ 00 00 00 00 08 00 + ," reserved?" \ 00 00 00 00 10 00 + ," IR11 open?" \ 00 00 00 00 20 00 + ," IR10 open?" \ 00 00 00 00 40 00 + ," IR9 open?" \ 00 00 00 00 80 00 + + ," IR8 open?" \ 00 00 00 00 00 01 + ," IR7 open?" \ 00 00 00 00 00 02 + ," IR6 open?" \ 00 00 00 00 00 04 + ," IR5 open?" \ 00 00 00 00 00 08 + ," IR4 open?" \ 00 00 00 00 00 10 + ," IR3 open?" \ 00 00 00 00 00 20 + ," IR2 open?" \ 00 00 00 00 00 40 + ," IR1 open?" \ 00 00 00 00 00 80 end-string-array @@ -362,30 +371,30 @@ pbuf 3 + c@ if pbuf 4 + c@ h# 16 <> abort" bad signals y" [ifdef] nn-components - ['] y-os to our-os + ['] y-os to our-os [then] /y-os ( addr bits# ) else pbuf 4 + c@ h# 1e <> abort" bad signals x" [ifdef] nn-components - ['] x-os to our-os + ['] x-os to our-os [then] /x-os ( addr bits# ) then - 0 do ( addr ) - dup c@ ( addr byte ) - i 8 mod ( addr byte bit# ) - rshift 1 and if ( addr ) - 8sp - [ifdef] nn-components - i our-os count type - [then] - ." ( bit " i .d ." )" cr - fault - then ( addr ) - i 8 mod 7 = if 1+ then ( addr' ) - loop drop ( ) + 0 do ( addr ) + dup c@ ( addr byte ) + i 8 mod ( addr byte bit# ) + rshift 1 and if ( addr ) + 8sp + [ifdef] nn-components + i our-os count type + [then] + ." ( bit " i .d ." )" cr + fault + then ( addr ) + i 8 mod 7 = if 1+ then ( addr' ) + loop drop ( ) cr ; @@ -454,8 +463,8 @@ dup c@ ( addr byte ) i 8 mod ( addr byte bit# ) rshift 1 and if ( addr ) - i .d - fault + i .d + fault then i 8 mod ( addr rem ) 7 = if 1+ then ( addr' ) @@ -476,6 +485,7 @@ [ifdef] nn-fll \ forced LED levels test : test-fll-signal ( signal# signal-value led-level -- ) +[ifdef] nn-too-strong-is-fatal dup 0= if fault rot ." fail on axis signal " .d @@ -484,6 +494,7 @@ cr exit then +[then] dup h# c > if fault rot ." fail on axis signal " .d @@ -626,7 +637,7 @@ : watch-fss-axis ( axis# -- ) dup to axis# ( axis# ) fs swap h# 0f h# 03 h# ee 5 bytes-out - h# 0f d# 20 anticipate + h# 0f d# 200 anticipate pbuf 4 + c@ 0 do ( ) i pbuf 5 + over + c@ ( signal# level ) @@ -684,8 +695,13 @@ pbuf 4 + i 9 * + >r ( r:addr ) r@ w@ x>x' ( x r:addr ) r@ wa1+ w@ ( x y r:addr ) - r> 4 + c@ 2 rshift setcolor ( x y ) - (ev) ( ) + r> 4 + c@ ( x y id-state ) + dup 2 rshift setcolor ( x y id-state ) + 3 and 2 <> if ( x y ) + (ev) ( ) \ not an up event + else + 2drop ( ) \ an up event + then loop then then ( to ) @@ -700,7 +716,7 @@ configure cursor-off consume - begin in? 0= until + flush background -1 to remaining ; @@ -724,7 +740,7 @@ create boxen /boxen allot \ non-zero means box is expected to be hit : 0boxen ( -- ) boxen /boxen erase ; -: >boxen ( bx by -- addr ) yleds * + +: >boxen ( bx by -- addr ) xleds * + dup /boxen > if debug-me then boxen + ; @@ -744,9 +760,9 @@ ; : box ( bx by colour -- ) - -rot ( colour bx by ) - bxby>xy ( colour x y ) - dx dy ( colour x y w h ) + -rot ( colour bx by ) + bxby>xy ( colour x y ) + dx dy ( colour x y w h ) fill-rectangle-noff ; @@ -769,7 +785,7 @@ : unhit-all ( -- ) xleds 0 do yleds 0 do - j i unhit + j i unhit loop loop ; @@ -813,12 +829,16 @@ : ra ['] .ra to .tsmsg ev( ra0 ['] (ra) ev )ev r-fault? ; : test-adjacent-axes - get-msecs 3 and \ pick random corner + get-msecs 7 and \ pick random corner case 0 of ta ra exit endof 1 of ra ba exit endof 2 of ba la exit endof 3 of la ta exit endof + 4 of ra ta exit endof + 5 of ba ra exit endof + 6 of la ba exit endof + 7 of ta la exit endof endcase ;

1 0

[commit] r3295 - cpu/arm/olpc/cl4
by repository service 06 Sep '12

06 Sep '12

Author: quozl Date: Thu Sep 6 02:30:17 2012 New Revision: 3295 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3295 Log: Q7A13 Modified: cpu/arm/olpc/cl4/fw-version.fth Modified: cpu/arm/olpc/cl4/fw-version.fth ============================================================================== --- cpu/arm/olpc/cl4/fw-version.fth Thu Sep 6 02:28:28 2012 (r3294) +++ cpu/arm/olpc/cl4/fw-version.fth Thu Sep 6 02:30:17 2012 (r3295) @@ -1,7 +1,7 @@ \ The overall firmware revision macro: FW_PREFIX Q7 macro: FW_MAJOR A -macro: FW_MINOR 12 +macro: FW_MINOR 13 \ Create a 2-character build/fw-suffix file to personalize your test builds " fw-suffix" $file-exists? [if]

1 0

[commit] r3294 - cpu/arm/olpc
by repository service 06 Sep '12

06 Sep '12

Author: quozl Date: Thu Sep 6 02:28:28 2012 New Revision: 3294 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3294 Log: OLPC XO-4 - Neonode, graphical absolute signal strength tool, watch-fss Modified: cpu/arm/olpc/nn-touchscreen.fth Modified: cpu/arm/olpc/nn-touchscreen.fth ============================================================================== --- cpu/arm/olpc/nn-touchscreen.fth Thu Sep 6 01:10:40 2012 (r3293) +++ cpu/arm/olpc/nn-touchscreen.fth Thu Sep 6 02:28:28 2012 (r3294) @@ -18,7 +18,7 @@ create nn-os \ open short test create nn-fll \ forced LED levels test create nn-version \ version display -create nn-watch-fll \ forced LED levels test, graphical variant +create nn-watch \ graphical signal tests \ create nn-fss \ optional fixed signal strength test \ create nn-ls \ optional low signals test @@ -523,7 +523,7 @@ -[ifdef] nn-watch-fll \ forced LED levels test, graphical variant +[ifdef] nn-watch \ graphical signal tests d# 30 value r \ size of blocks @@ -535,7 +535,7 @@ fill-rectangle-noff ( ) ; -: signal>colour ( signal-value -- colour ) +: level>colour ( signal-value -- colour ) d# 3 rshift dup d# 5 lshift over d# 11 lshift or or ; @@ -558,17 +558,19 @@ ; 0 value axis# -: watch-fll-signal ( signal# signal-value led-level -- ) - >r ( signal# signal-value r: led-level ) - signal>colour pixcolor ! ( signal# r: led-level ) - axis# if ( signal# r: led-level ) \ y + +: draw-signal ( signal# level -- x y ) + level>colour pixcolor ! ( signal# ) + axis# if ( signal# ) \ y ys>xy - else ( signal# r: led-level ) \ x + else ( signal# ) \ x xs>xy - then ( x y r: led-level ) - 2dup bigdot ( x y r: led-level ) - r> ( x y led-level ) - h# c > if ( x y ) + then ( x y ) + 2dup bigdot ( x y ) +; + +: ?draw-fail ( x y flag? -- ) + if ( x y ) white pixcolor ! ( x y ) big>little ( x' y' ) dot ( ) @@ -577,6 +579,14 @@ then ( ) ; + +: watch-fll-signal ( signal# signal-value led-level -- ) + >r ( signal# signal-value r: led-level ) + draw-signal ( x y r: led-level ) + r> ( x y led-level ) + h# c > ?draw-fail ( ) +; + : watch-fll-axis ( axis# -- ) dup to axis# ( axis# ) (fll) @@ -588,8 +598,12 @@ loop ; -: watch-fll +: empty black 0 0 screen-w screen-h fill-rectangle-noff +; + +: watch-fll + empty begin 0 watch-fll-axis 1 watch-fll-axis key? @@ -599,6 +613,37 @@ ; + +: watch-fss-signal ( signal# level -- ) + dup >r ( signal# level r: level ) + draw-signal ( x y r: level ) + r> ( x y level ) + 1 < ?draw-fail ( ) +; + +d# 64 value fs \ fixed signal strength + +: watch-fss-axis ( axis# -- ) + dup to axis# ( axis# ) + fs swap h# 0f h# 03 h# ee 5 bytes-out + h# 0f d# 20 anticipate + + pbuf 4 + c@ 0 do ( ) + i pbuf 5 + over + c@ ( signal# level ) + watch-fss-signal ( ) + loop +; + +: watch-fss + empty + begin + 0 watch-fss-axis + 1 watch-fss-axis key? + until + key drop + page +; + [then]

1 0

[commit] r3293 - cpu/x86/pc/olpc
by repository service 05 Sep '12

05 Sep '12

Author: quozl Date: Thu Sep 6 01:10:40 2012 New Revision: 3293 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3293 Log: OLPC XO-4 - security, revert r3285 as it breaks booting of our hybrid builds, to be reapplied later once builds are fixed, #12091 Modified: cpu/x86/pc/olpc/security.fth Modified: cpu/x86/pc/olpc/security.fth ============================================================================== --- cpu/x86/pc/olpc/security.fth Thu Sep 6 01:09:19 2012 (r3292) +++ cpu/x86/pc/olpc/security.fth Thu Sep 6 01:10:40 2012 (r3293) @@ -892,7 +892,7 @@ pop-base ; : (fw-version) ( base-adr -- n ) - signature-offset + 7 + ((fw-version)) + h# f.ffc7 + ((fw-version)) ; \ Returns an integer that is derived from a base-36 decoding @@ -904,7 +904,7 @@ : firmware-up-to-date? ( img$ -- flag ) /flash <> if show-x " Invalid Firmware image" .security-failure then ( adr ) - (fw-version) ( file-version# ) + h# f.ffc7 + ((fw-version)) ( file-version# ) ofw-version-int ( file-version# rom-version# ) u<= ;

1 0

[commit] r3292 - cpu/x86/pc/olpc
by repository service 05 Sep '12

05 Sep '12

Author: quozl Date: Thu Sep 6 01:09:19 2012 New Revision: 3292 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3292 Log: OLPC XO-4 - security, skip signed firmware update for A2 boards due to pending size change, #12091 Modified: cpu/x86/pc/olpc/security.fth Modified: cpu/x86/pc/olpc/security.fth ============================================================================== --- cpu/x86/pc/olpc/security.fth Thu Sep 6 01:08:36 2012 (r3291) +++ cpu/x86/pc/olpc/security.fth Thu Sep 6 01:09:19 2012 (r3292) @@ -1161,6 +1161,10 @@ [then] : ?fw-update ( -- ) +[ifdef] olpc-cl4 + \ skip check for OLPC A2 boards + board-revision h# 4a28 <= if exit then +[then] null$ cn-buf place " bootfw" bundle-present? if " FW found - " ?lease-debug

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

openfirmware