Changeset 3235

Timestamp:

Aug 29, 2012 2:12:35 AM (9 months ago)

Author:

wmb

Message:

OLPC ARM - Set reg and compatible properties in the /image-sensor node dynamically, by probing for the specific chip that is present. This requires the assistance of the camera driver, because the image sensor won't respond to its I2C bus unless it has a clock from the CCIC camera unit.

Location:

dev/olpc

Files:

• imagesensor.fth (modified) (1 diff)
• mmp2camera/loadpkg.fth (modified) (1 diff)
• ov7670.fth (modified) (1 diff)
• seti.fth (modified) (1 diff)

dev/olpc/imagesensor.fth

@@ -13 +13 @@
    false
 ;
+: set-sensor-properties  ( name$ i2c-addr -- )
+   my-self >r  0 to my-self
+   " /image-sensor" find-device  ( name$ i2c-addr )
+      " reg" get-property  if    ( name$ i2c-addr )
+         1 reg                   ( name$ )
+         +compatible             ( )
+      else                       ( name$ i2c-addr regval$ )
+         2drop 3drop             ( )
+      then
+   device-end
+   r> to my-self
+;
+
+also forth definitions
+: probe-image-sensor  ( -- )
+   " /camera" open-dev close-dev
+;
+previous definitions

dev/olpc/mmp2camera/loadpkg.fth

@@ -10 +10 @@
       cam-rst-gpio# 0 encode-gpio
    " gpios" property
+
+   " /image-sensor" encode-phandle  " image-sensor" property
 
 0 [if]

dev/olpc/ov7670.fth

@@ -167 +167 @@
 
    " OV7670" " sensor" string-property
+   " omnivision,ov7670" camera-smb-slave set-sensor-properties
 
    ['] ov7670-set-mirrored to set-mirrored

dev/olpc/seti.fth

@@ -307 +307 @@
 
    " SETi,SIV120D" " sensor" string-property
+   " seti,siv120d" camera-smb-slave set-sensor-properties
 
    ['] seti-set-mirrored to set-mirrored