Changeset 3197


Ignore:
Timestamp:
Aug 18, 2012, 9:05:11 AM (2 years ago)
Author:
wmb
Message:

OLPC - Change all uses of I2C addresses for bit-banged SMBUS (I2C) to use unshifted address form.

Files:
12 edited

Legend:

Unmodified
Added
Removed
  • cpu/arm/olpc/1.75/attic/audiosmb.fth

    r2726 r3197  
    7373 
    74740 value smb-slave 
    75 : smb-addr  ( lowbit -- )  smb-slave or  smb-byte  ; 
     75: smb-addr  ( lowbit -- )  smb-slave 2* or  smb-byte  ; 
    7676 
    7777: smb-byte!  ( byte reg# -- ) 
     
    116116; 
    117117 
    118 : set-dcon-slave  ( -- )  h# 1a to smb-slave  ; 
     118: set-dcon-slave  ( -- )  h# 0d to smb-slave  ; 
    119119: smb-init    ( -- )  set-dcon-slave  smb-on  smb-pulses  ; 
    120120 
  • cpu/arm/olpc/1.75/compass.fth

    r3183 r3197  
    55   compass-scl-gpio# to smb-clock-gpio# 
    66   compass-sda-gpio# to smb-data-gpio# 
    7    h# 1e to smb-slave 
     7   h# 0f to smb-slave 
    88   smb-data-gpio# gpio-dir-out 
    99; 
     
    4040   4 to smb-clock-gpio# 
    4141   5 to smb-data-gpio# 
    42    h# 18 to smb-slave 
     42   h# 0c to smb-slave 
    4343   smb-data-gpio# gpio-dir-out 
    4444; 
  • cpu/arm/olpc/rtc.fth

    r3183 r3197  
    1818   rtc-scl-gpio# to smb-clock-gpio# 
    1919   rtc-sda-gpio# to smb-data-gpio# 
    20    h# d0 to smb-slave 
     20   h# 68 to smb-slave 
    2121; 
    2222: rtc@  ( reg# -- byte )  set-address  smb-byte@  ; 
  • cpu/arm/olpc/smbus.fth

    r2880 r3197  
    8888 
    89890 value smb-slave 
    90 : smb-addr  ( lowbit -- )  smb-slave or  smb-byte  ; 
     90: smb-addr  ( lowbit -- )  smb-slave 2* or  smb-byte  ; 
    9191 
    9292: smb-byte!  ( byte reg# -- ) 
  • dev/olpc/cafecamera/platform.fth

    r2880 r3197  
    3838; 
    3939 
    40 h# 42 value camera-smb-slave 
     40h# 21 value camera-smb-slave 
    4141: camera-smb-on  ( -- )  ; 
    4242 
     
    4747; 
    4848 
    49 : set-slave  ( -- )  camera-smb-slave 2 lshift  87.fc01 or b8 cl!  ;    \ TWSI control 0: id, 8-bit, clk 
     49: set-slave  ( -- )  camera-smb-slave 2* 2 lshift  87.fc01 or b8 cl!  ; \ TWSI control 0: id, 8-bit, clk 
    5050 
    5151: ov@  ( reg -- data ) 
  • dev/olpc/dcon/mmp2dcon.fth

    r3195 r3197  
    77; 
    88 
    9 0 0  " 1a"  " /dcon-i2c" begin-package 
     90 0  " 0d"  " /dcon-i2c" begin-package 
    1010 
    1111" dcon" device-name 
    1212" olpc,xo1-dcon" +compatible 
    1313" olpc,xo1.75-dcon" +compatible 
    14 h# 1a 1 reg 
     14my-space 1 reg 
    1515 
    16160 0 encode-bytes 
     
    5858   dcon-sda-gpio# to smb-data-gpio# 
    5959 
    60    h# 1a to smb-slave 
     60   h# 0d to smb-slave 
    6161; 
    6262 
  • dev/olpc/mmp2camera/smbus.fth

    r2880 r3197  
    7979 
    80800 value smb-slave 
    81 : smb-addr  ( lowbit -- )  smb-slave or  smb-byte  ; 
     81: smb-addr  ( lowbit -- )  smb-slave 2* or  smb-byte  ; 
    8282 
    8383: smb-byte!  ( byte reg# -- ) 
  • dev/olpc/ov7670.fth

    r2880 r3197  
    149149 
    150150: probe-ov7670  ( -- found? ) 
    151    h# 42 to camera-smb-slave    ( )   \ Omnivision SMB ID 
     151   h# 21 to camera-smb-slave    ( )   \ Omnivision SMB ID 
    152152   camera-smb-on 
    153153 
  • dev/olpc/seti.fth

    r2887 r3197  
    295295 
    296296: probe-seti  ( -- found? ) 
    297    h# 66 to camera-smb-slave  ( ) 
     297   h# 33 to camera-smb-slave  ( ) 
    298298   camera-smb-on              ( ) 
    299299 
  • dev/olpc/viacamera/platform.fth

    r2880 r3197  
    33 
    44h# 26 constant dcon-port 
    5 : dcon-setup  ( -- )  dcon-port to smb-port  h# 1a to smb-slave  ; 
     5: dcon-setup  ( -- )  dcon-port to smb-port  h# 0d to smb-slave  ; 
    66: smb-init    ( -- )  dcon-setup  smb-on  smb-pulses  ; 
    77 
  • dev/olpc/viacamera/smbus.fth

    r2880 r3197  
    7474 
    75750 value smb-slave 
    76 : smb-addr  ( lowbit -- )  smb-slave or  smb-byte  ; 
     76: smb-addr  ( lowbit -- )  smb-slave 2* or  smb-byte  ; 
    7777 
    7878: smb-byte!  ( byte reg# -- ) 
  • dev/via/unichrome/dconsmb.fth

    r1206 r3197  
    7171 
    72720 value smb-slave 
    73 : smb-addr  ( lowbit -- )  smb-slave or  smb-byte  ; 
     73: smb-addr  ( lowbit -- )  smb-slave 2* or  smb-byte  ; 
    7474: smb-word!  ( word reg# -- ) 
    7575   smb-start 
     
    9696: smb-init  ( -- )  smb-on  smb-pulses ; 
    9797 
    98 : dcon@  ( reg# -- word )  h# 1a to smb-slave  smb-word@  ; 
    99 : dcon!  ( word reg# -- )  h# 1a to smb-slave  smb-word!  ; 
     98: dcon@  ( reg# -- word )  h# 0d to smb-slave  smb-word@  ; 
     99: dcon!  ( word reg# -- )  h# 0d to smb-slave  smb-word!  ; 
Note: See TracChangeset for help on using the changeset viewer.