[openfirmware] [commit] r1794 - cpu/x86/pc/olpc/via

[repository service]

Author: wmb
Date: Thu Apr 29 19:35:58 2010
New Revision: 1794
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/1794

Log:
Added XO-1.5 heat spreader test file.

Added:
   cpu/x86/pc/olpc/via/temptest.fth

Added: cpu/x86/pc/olpc/via/temptest.fth
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ cpu/x86/pc/olpc/via/temptest.fth	Thu Apr 29 19:35:58 2010	(r1794)
@@ -0,0 +1,47 @@
+purpose: Test for heat spreader on OLPC XO-1.5
+\ See license at end of file
+
+: cold-secs  ( n -- )  d# 100 *  0  do  safe-idle  loop  ;
+: hot-secs  ( n -- )  d# 1000 *  0  do  ms-factor spins  loop  ;
+: temp-rise  ( -- delta-degrees )
+   d# 5 cold-secs  cpu-temperature  ( start-temp )
+   d# 5 hot-secs  cpu-temperature   ( start-temp end-temp )
+   swap -                           ( delta-degrees )
+;
+d# 8 constant temperature-threshold
+: .temp-rise  ( -- fail? )
+   ." Testing heat spreader ... "
+   temp-rise                                       ( delta-degrees )
+   ." temperature rose " dup .d ." degrees C - "   ( delta-degrees )
+   temperature-threshold >=                        ( fail? )
+   dup  if                                         ( fail? )
+      red-letters ." FAIL"                         ( fail? )
+   else                                            ( fail? )
+      green-letters  ." OKAY"                      ( fail? )
+   then                                            ( fail? )
+   black-letters
+;
+
+\ LICENSE_BEGIN
+\ Copyright (c) 2010 FirmWorks
+\ 
+\ Permission is hereby granted, free of charge, to any person obtaining
+\ a copy of this software and associated documentation files (the
+\ "Software"), to deal in the Software without restriction, including
+\ without limitation the rights to use, copy, modify, merge, publish,
+\ distribute, sublicense, and/or sell copies of the Software, and to
+\ permit persons to whom the Software is furnished to do so, subject to
+\ the following conditions:
+\ 
+\ The above copyright notice and this permission notice shall be
+\ included in all copies or substantial portions of the Software.
+\ 
+\ THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+\ EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+\ MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+\ NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+\ LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+\ OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+\ WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+\
+\ LICENSE_END