about summary refs log tree commit diff
path: root/sourcecodes/execute_bn_gom.php
blob: f91d4bd710c57690ada91f48dc16425379b4043d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
<?php 
$keyval=$_GET["My_key"];

//////////////execute c codes for local score///////////////////
$dir="./data/";

$pfile="./data/".$keyval."parent.txt";
$parentf=file_get_contents("$pfile");
$maxp=trim($parentf);


$kfile="./data/".$keyval."k.txt";
$kf=file_get_contents("$kfile");
$maxk=trim($kf);



$thrfile="./data/".$keyval."thr.txt";
$thr=file_get_contents("$thrfile");
$thr=trim($thr);


//$cmd="./run.sh $keyval $maxp $maxk";
//system($cmd);
shell_exec('./run.sh '.$keyval.' '.$maxp.' '.$maxk.' '.$thr);

/////////////////////////////////structure matrix//////////////////////////////////////////////////////////

$matfile=$dir.$keyval."structure_input.txt";

$fout=fopen($dir.$keyval."graphviz.txt","w");

$matrix1=file_get_contents("$matfile");           
$str_arrmat=array();
$str_arrmat=explode("\n",$matrix1);
$datamat=array();
$data_cell=array(); 

$dataname=array();
$dataname=explode("\t",$str_arrmat[0]);
$n=count($dataname);

$initialstring="digraph G {\n"."size=\"10,10\";  ratio = fill;\n"."node [shape=square,width=1.5];\n";
$endstring="}";
fwrite($fout,"$initialstring");

$g_file_name="./data/".$keyval."grviz_name_file.txt";
$grviz_name_file=fopen($g_file_name,"w");

for($i=0;$i<$n;$i++)
{
      $row_name=trim($dataname[$i]);  
      fwrite($grviz_name_file,"$row_name\n");
}

for($i=1;$i<=$n;$i++)
{
         $ii=$i-1; 
         $row_name=trim($dataname[$ii]);  

         $col_arr=explode("\t",$str_arrmat[$i]);
        
        
	   for($j=0;$j<$n;$j++)
	   {
               $col_val=trim($col_arr[$j]);
               if($col_val==1)
               { 
                  $col_name=trim($dataname[$j]);
                  fprintf($fout,"%s -> %s;\n",$ii,$j);  
                  //fprintf($fouttemp,"%s -> %s;\n",$row_name,$col_name);
                 
	        }
          }
          
     
} 
fwrite($fout,"$endstring");   
fclose($fout);


shell_exec('./run_octave '.$keyval);

?>
<script>
window.open("layout.php?My_key=<?php print($keyval);?>",'_self',false);
</script>