base random stuff fixed

[physik/morpheus.git] / main.c

diff --git a/main.c b/main.c
index cf2a703..49be0ef 100644 (file)
--- a/main.c
+++ b/main.c
@@ -13,35 +13,60 @@
 
 #include <stdio.h>
 #include <stdlib.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+
 #include "defines.h"
 
 /* global variables */
-int sum_z_segments;
+u32 sum_z_segments;
+int random_fd; /* /dev/urandom file descriptor */
 
 int usage()
 {
  puts("usage:");
  puts("-h: help");
- puts("-a <value> \t slope of C concentration with depth (default 1)");
- puts("-c <value> \t concentration at depths 0 (default 0)");
+ puts("-a <value> \t slope of nuclear energy loss (default 1)");
+ puts("-c <value> \t nuclear enery loss at depths 0 (default 0)");
  puts("-x <value> \t # x segments (default 50)");
  puts("-y <value> \t # y segments (default 50)");
  puts("-z <value> \t # z segments (default 100)");
+ puts("-s <value> \t # steps to calculate (default 5000");
  return -23;
 }
 
-int main(int argc,char **argv) {
- int x_seg,y_seg,z_seg; /* amount of segments */
- int x,y,z; /* segments */
+int make_amorph(u32 *segment)
+{
+ *segment=*segment|AMORPH
+ return 23;
+}
+
+/* look at segment ... */
+int process_segment(u32 *segment)
+{
+ /* tag it ... testing! */
+ make_amorph(segment);
+ 
+ return 23;
+}
+
+int main(int argc,char **argv) 
+{
+ u32 x_seg,y_seg,z_seg; /* amount of segments */
+ u32 x,y,z; /* segments */
  int i; /* for counting */
- int slope_cc,start_cc; /* C concentration: slope, c(0) */
+ int slope_nel,start_nel; /* nuclear energy loss: slope, constant */
+ int steps; /* # steps */
+ void *segments_p;
 
  /* default values */
- x_seg=DEFAULT_X_SEG-1;
- y_seg=DEFAULT_Y_SEG-1;
- z_seg=DEFAULT_Z_SEG-1;
- slope_cc=DEFAULT_SLOPE_CC;
- start_cc=DEFAULT_START_CC;
+ x_seg=DEFAULT_X_SEG;
+ y_seg=DEFAULT_Y_SEG;
+ z_seg=DEFAULT_Z_SEG;
+ slope_nel=DEFAULT_SLOPE_NEL;
+ start_nel=DEFAULT_START_NEL;
+ steps=DEFAULT_STEPS;
  
  /* parse command args */
  for(i=1;i<argc;i++)
@@ -55,10 +80,10 @@ int main(int argc,char **argv) {
      return 23;
      break;
     case 'a':
-     slope_cc=atoi(argv[++i]);
+     slope_nel=atoi(argv[++i]);
      break;
     case 'c':
-     start_cc=atoi(argv[++i]);
+     start_nel=atoi(argv[++i]);
      break;
     case 'x':
      x_seg=atoi(argv[++i]);
@@ -69,24 +94,52 @@ int main(int argc,char **argv) {
     case 'z':
      z_seg=atoi(argv[++i]);
      break;
+   case 's':
+     steps=atoi(argv[++i]);
+     break;
+    default:
+     usage();
+     return -23;
    }
   } else usage();
  }
 
+ /* open random fd */
+ if((random_fd=open("/dev/urandom",O_RDONLY))<0)
+ {
+  puts("cannot open /dev/urandom\n");
+  return -23;
+ }
+
  /* calculate sum_z_segments one time! */
  sum_z_segments=0;
- for(i=0;i<z_seg;i++) sum_z_segments+=(start_cc+i*slope_cc);
+ for(i=1;i<=z_seg;i++) sum_z_segments+=(start_nel+i*slope_nel);
  printfd("debug: sum z segments -> %d\n",sum_z_segments);
 
 
  /* testing ... */
 
- for(i=0;i<100;i++)
+ /* allocate segments */
+ if((segments_p=malloc(x_seg*y_seg*z_seg*sizeof(u32)))==NULL)
+ {
+  puts("failed allocating memory for segments\n");
+  return -23;
+ }
+ memset(segments_p,0,x_seg*y_seg*z_seg*sizeof(u32));
+
+ /* main routine */
+ for(i=0;i<steps;i++)
  {
   x=rand_get(x_seg);
   y=rand_get(y_seg);
-  z=rand_get_lgp(slope_cc,start_cc);
-  printf ("x=%d y=%d z=%d\n",x,y,z);
+  z=rand_get_lgp(slope_nel,start_nel);
+
+  /* todo */
+  distrib_c_conc(segments_p);
+  process_segment((u32)(segments_p+x+y*(x_seg-1)+z*(x_seg-1)*(y_seg-1)));
+  display(segments_p);
+  /* */
+
  }
  return 23;
 }