packages/web/353/php_top/bdetect.php

Go to the documentation of this file.

<?php
/*
 * This programs tries to recognize the "sensor" board FPGA using JTAG
 * and control of the main FPGA of the SCL and SDA pins.
 * It changes values of these two pins and reads JTAG boundary scan
 * of the 'sensor board' FPGA
 
 */


function readbscan($filename) {
   $jtag  = fopen($filename, 'r+');
   $ffs=  str_repeat ( chr(0xff), 97);
   $ret=  fwrite($jtag, $ffs);
//   printf ("fwrite returned %d<br/>\n",$ret);
   fseek ($jtag,0);
   $boundary= fread($jtag, 97);
   fclose($jtag);
  return $boundary;
}
function read_fpga_reg($addr) {
   $fpga  = fopen('/dev/fpgaio', 'r+');
   fseek ($fpga,$addr<<2);
   $rd=fread($fpga, 4);
   fclose($fpga);
   $v=unpack('V1',$rd);
   print_r($v[1]);
   return $v[1];
}
function checkSclSda($boards) {
   exec("fpcf -c  f 1"); // SCL=0
   exec("fpcf -c 10 2"); // SCL_EN=1
   exec("fpcf -c 11 1"); // SDA=0
   exec("fpcf -c 12 2"); // SDA_EN=1
   $test=array();
   $boundary=readbscan('/dev/sfpgabscan');
   foreach ($boards as $key => $value) {
     $test[$key]= (((ord($boundary[$value['sda'] >> 3]) >> (7 -($value['sda'] & 7))) &1) == 0) &&
                  (((ord($boundary[$value['scl'] >> 3]) >> (7 -($value['scl'] & 7))) &1) == 0);
   }
   
   exec("fpcf -c  f 2"); // SCL=1
//   exec("fpcf -c 11 1"); // SDA=0
   $boundary=readbscan('/dev/sfpgabscan');
   foreach ($boards as $key => $value) {
     $test[$key] = $test[$key] &&
                     (((ord($boundary[$value['sda'] >> 3]) >> (7 -($value['sda'] & 7))) &1) == 0) &&
                     (((ord($boundary[$value['scl'] >> 3]) >> (7 -($value['scl'] & 7))) &1) == 1);
   }
   
   exec("fpcf -c  f 1"); // SCL=0
   exec("fpcf -c 11 2"); // SDA=1
   $boundary=readbscan('/dev/sfpgabscan');
   foreach ($boards as $key => $value) {
     $test[$key] = $test[$key] &&
                     (((ord($boundary[$value['sda'] >> 3]) >> (7 -($value['sda'] & 7))) &1) == 1) &&
                     (((ord($boundary[$value['scl'] >> 3]) >> (7 -($value['scl'] & 7))) &1) == 0);
   }
   
   exec("fpcf -c  f 2"); // SCL=1
//   exec("fpcf -c 11 2"); // SDA=1
   $boundary=readbscan('/dev/sfpgabscan');
   exec("fpcf -c 10 1"); // SCL_EN=0
   exec("fpcf -c 12 1"); // SDA_EN=0
   
   foreach ($boards as $key => $value) {
     $test[$key] = $test[$key] &&
                     (((ord($boundary[$value['sda'] >> 3]) >> (7 -($value['sda'] & 7))) &1) == 1) &&
                     (((ord($boundary[$value['scl'] >> 3]) >> (7 -($value['scl'] & 7))) &1) == 1);
     if($test[$key]) {
       return $value['model'];
     }
   }
   
//   return $sdascl;                 
//echo "<pre>\n";
//var_dump ($sdascl);
//echo "</pre>\n";

   return "";
}   

$boards=array (
                '0' => array ('model' => '10347', 'scl' =>241,'sda' => 199),  // E4, C1
                '1' => array ('model' => '10359', 'scl' =>280,'sda' => 296)   // H6, J5

);


$rslt=checkSclSda($boards);
echo $rslt;
if ($rslt=="") exit (-1);
exit (0);
//echo "<pre>\n";
//var_dump ($rslt);
//echo "</pre>\n";


?> 

---