Changeset 3457


Ignore:
Timestamp:
Nov 24, 2012, 1:34:03 AM (3 years ago)
Author:
wmb
Message:

XO-4 - Additional SMBUS functions for HDMI EDID reading.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpu/arm/olpc/smbus.fth

    r3197 r3457  
    129129;
    130130
     131: smb-read  ( adr len reg# -- )
     132   over  0=  if  3drop exit  then   ( adr len reg# )
     133   smb-start              ( adr len reg# )
     134   0 smb-addr             ( adr len reg# )
     135   smb-byte               ( adr len )
     136   smb-stop smb-start   \ SCCB bus needs a stop and a start for the second phase
     137   1 smb-addr             ( adr len )
     138   2dup  bounds  ?do      ( adr len )
     139      0 smb-byte-in i c!  ( adr len )
     140   loop                   ( adr len )
     141   1 smb-byte-in  -rot    ( byte adr len )
     142   1- + c!                ( )
     143   smb-stop               ( )
     144;   
     145
     146: smb-write  ( adr len reg# -- )
     147   smb-start               ( adr len reg# )
     148   0 smb-addr              ( adr len reg# )
     149   smb-byte                ( adr len )
     150   bounds  ?do  i c@ smb-byte  loop  ( )
     151   smb-stop                ( )
     152;
     153
    131154: smb-word!  ( word reg# -- )
    132155   smb-start
Note: See TracChangeset for help on using the changeset viewer.