Changeset 51 for anr/gantt.l

Timestamp:

Jan 31, 2010, 12:53:01 PM (15 years ago)

Author:

coach

Message:

IA: split gantt diagram into 2 figures

File:

• anr/gantt.l (modified) (22 diffs)

anr/gantt.l

@@ -4 +4 @@
 #define COLOR_BOX_LIGHT "gtcBoxLight"
 
-#define PICT_TOPSEP   3
-#define PICT_BOTSEP   3
-#define PICT_LEFTSEP  3
-#define PICT_RIGHTSEP 3
-#define PICT_VSEP     2
-#define PICT_HSEP     2
+#define PICT_TOPSEP   0.0
+#define PICT_BOTSEP   3.0
+#define PICT_LEFTSEP  3.0
+#define PICT_RIGHTSEP 3.0
+#define PICT_VSEP     2.0
+#define PICT_HSEP     2.0
 
 #define PICT_MONTHHEIGHT 5  // police height
@@ -17 +17 @@
 #define TASK_BGC0       "gtcTaskBG0"
 #define TASK_BGC1       "gtcTaskBG1"
+#define TASK_TITLEHEIGHT 6.
+#define TASK_TITLEFONTHEIGHT 2.
 
 #define DELIVRABLE_VSEP   1
@@ -25 +27 @@
 #define DELIVRABLE_TITLEHEIGHT DELIVRABLE_HEIGHT
 #define DELIVRABLE_BOXHEIGHT   (DELIVRABLE_HEIGHT)
+
+char* task_names[] = {
+    "Project management",
+    "Backbone infrastructure",
+    "System generation",
+    "HAS front-end",
+    "HAS back-end",
+    "PC/FPGA communication middleware",
+    "Industrial demonstrators",
+    "Dissemination",
+    0
+};
 
 typedef struct _Tlivrable {
@@ -34 +48 @@
     double task_y;           // top of task
     double task_dy;          // bot of task is task_y+task_dy
+    double task_y_del;       // delivrables start at task_y+task_y_del
     // these fields are filled by the program for data[tn][stn][dn][0]
     struct _Tlivrable
@@ -49 +64 @@
 #define D_MAX 10
 #define V_MAX 10
-Tlivrable* data[T_MAX][S_MAX][D_MAX][V_MAX];
+typedef struct _Tdata {
+    FILE*      os;
+    Tlivrable* ls[T_MAX][S_MAX][D_MAX][V_MAX];
+} Tdata;
+Tdata  data_org;
+Tdata* curr;
+
+Tdata* data_new(int *tnplus, int *tnmoins)
+{
+    int i,skip;
+    int tn,stn,dn,v;
+    Tdata* data = malloc(sizeof(*data));
+    memset(data,0,sizeof(*data));
+    for (tn=0 ; tn<T_MAX ; tn++)
+    for (stn=0; stn<S_MAX; stn++)
+    for (dn=0; dn<D_MAX; dn++)
+    for (v=0; v<V_MAX; v++) {
+        if ( data_org.ls[tn][stn][dn][v]==0 ) continue;
+        // tnplus treatment
+        skip = 0;
+        if (tnplus!=0) {
+            skip=1;
+            for (i=0 ; tnplus[i]!=-1 ; i++) {
+                if ( tnplus[i]==data_org.ls[tn][stn][dn][v]->tn ) {
+                    skip=0;
+                    break;
+        }   }   }
+        if (skip) continue;
+        // tnmoins treatment
+        skip = 0;
+        if (tnmoins!=0) {
+            for (i=0 ; tnmoins[i]!=-1 ; i++) {
+//fprintf(stderr,"i=%d data_org.ls[tn][stn][dn][v]->tn=%d tnmoins[i]=%d\n",i,data_org.ls[tn][stn][dn][v]->tn,tnmoins[i]);
+                if ( tnmoins[i]==data_org.ls[tn][stn][dn][v]->tn ) {
+                    skip=1;
+                    break;
+        }   }   }
+//fprintf(stderr,"selected: [tn][stn][dn][v]=%d,%d,%d,%d skip=%d\n",tn,stn,dn,v,skip);
+        if (skip) continue;
+        Tlivrable* l=malloc(sizeof(*l));
+        *l = *data_org.ls[tn][stn][dn][v];
+        data->ls[tn][stn][dn][v] = l;
+fprintf(stderr,"selected: [tn][stn][dn][v]=%d,%d,%d,%d\n",tn,stn,dn,v);
+    }
+    return data;
+}
 
 int milestones[100];
@@ -56 +116 @@
     { sprintf(buf,"D%d%d%d",p->tn,p->stn,p->dn); return buf; }
 char* gen_label_vers(char* buf,Tlivrable*p)
-    { if (p->nbvers<=1) sprintf(buf,""); else sprintf(buf,"V%c",p->v); return buf; }
+    { if (p->nbvers<=1) strcpy(buf,""); else sprintf(buf,"V%c",p->v); return buf; }
 char* gen_label_full(char* buf,Tlivrable*p)
     { char b[100],v[100]; gen_label_base(b,p); gen_label_vers(v,p);
@@ -62 +122 @@
 
 void print_put(double x,double y, const char* object)
-    { printf("\\put(%.2f,%.2f){%s}\n",x,y,object); }
+    { fprintf(curr->os,"\\put(%.2f,%.2f){%s}\n",x,y,object); }
 void print_hline(double x,double y, double len, const char* color)
 {
     char object[1024];
-    if (color!=0) { printf("\\bgroup\\color{%s}\n",color); }
+    if (color!=0) { fprintf(curr->os,"\\bgroup\\color{%s}\n",color); }
     sprintf(object,"\\line(1,0){%.2f}",len);
     print_put(x,y,object);
-    if (color!=0) { printf("\\egroup\n"); }
+    if (color!=0) { fprintf(curr->os,"\\egroup\n"); }
 }
 void print_vline(double x,double y, double len, const char* color)
 {
     char object[1024];
-    if (color!=0) { printf("\\bgroup\\color{%s}\n",color); }
+    if (color!=0) { fprintf(curr->os,"\\bgroup\\color{%s}\n",color); }
     sprintf(object,"\\line(0,1){%.2f}",len);
     print_put(x,y,object);
-    if (color!=0) { printf("\\egroup\n"); }
+    if (color!=0) { fprintf(curr->os,"\\egroup\n"); }
 }
 void print_box(
@@ -97 +157 @@
         double tn2=tn/2;
         double e=.1;
-        printf("\\bgroup\\color{%s}\n",boxcolor);
-        printf("\\linethickness{%.2fmm}\n",tn);
+        fprintf(curr->os,"\\bgroup\\color{%s}\n",boxcolor);
+        fprintf(curr->os,"\\linethickness{%.2fmm}\n",tn);
         print_hline(x+tn2-e ,y,    dx     ,0);
         print_hline(x+tn2-e ,y+dy, dx     ,0);
         print_vline(x+tn-e  ,y+e,  dy-2*e ,0);
         print_vline(x+dx-2*e,y+e,  dy-2*e ,0);
-        printf("\\egroup\n");
+        fprintf(curr->os,"\\egroup\n");
     }
     if (vers) {
@@ -166 +226 @@
         gen_titleLines(p);
 
-        for (v=0; data[tn][stn][dn][v]!=0 ; v++);
-        data[tn][stn][dn][v] = p;
+        for (v=0; data_org.ls[tn][stn][dn][v]!=0 ; v++);
+        data_org.ls[tn][stn][dn][v] = p;
 fprintf(stderr,"ADDED: %d %d %d %d\n",tn,stn,dn,v);
 //{int i,tn=0; fprintf(stderr,"CURR:t=%d:: ",tn); for (i=0; i<S_MAX ; i++) fprintf(stderr,"%d:%p ",i,data[tn][i][0][0]); fprintf(stderr,"\n"); }
@@ -174 +234 @@
 %%
 
-void prepare0()
-{
-int tn,stn,dn,v;
+void prepare0(Tdata* data)
+{
+int tn,stn,v;
 int i0,i1,i;
     for (tn=0 ; tn<T_MAX ; tn++)
     for (stn=0; stn<S_MAX; stn++) {
 //fprintf(stderr,"AVANT:t=%d:%d:: ",tn,stn); for (i=0; i<D_MAX ; i++)
-//fprintf(stderr,"%d:%p ",i,data[tn][stn][i][0]); fprintf(stderr,"\n");
+//fprintf(stderr,"%d:%p ",i,data->ls[tn][stn][i][0]); fprintf(stderr,"\n");
         while (1) {
             for (i0=0 ; i0<D_MAX ; i0++)
-                if (data[tn][stn][i0][0] == 0) break;
+                if (data->ls[tn][stn][i0][0] == 0) break;
             for (i1=i0+1 ; i1<D_MAX ; i1++)
-                if (data[tn][stn][i1][0] != 0) break;
+                if (data->ls[tn][stn][i1][0] != 0) break;
             if (i1>=D_MAX) break;
             // shift 
             for (i=0 ; (i1+i)<D_MAX ; i++)
                 for (v=0;v<V_MAX;v+=1) {
-                    data[tn][stn][i0+i][v] = data[tn][stn][i1+i][v];
-                    data[tn][stn][i1+i][v] = 0;
+                    data->ls[tn][stn][i0+i][v] = data->ls[tn][stn][i1+i][v];
+                    data->ls[tn][stn][i1+i][v] = 0;
                 }
         }
 //fprintf(stderr,"AVANT:t=%d:%d:: ",tn,stn); for (i=0; i<D_MAX ; i++)
-//fprintf(stderr,"%d:%p ",i,data[tn][stn][i][0]); fprintf(stderr,"\n");
-    }
-}
-void prepare1()
-{
-int tn,stn,dn,v;
+//fprintf(stderr,"%d:%p ",i,data->ls[tn][stn][i][0]); fprintf(stderr,"\n");
+    }
+}
+void prepare1(Tdata* data)
+{
+int tn,dn,v;
 int i0,i1,i;
     for (tn=0 ; tn<T_MAX ; tn++) {
-//fprintf(stderr,"AVANT:t=%d:: ",tn,i0,i1); for (i=0; i<S_MAX ; i++) fprintf(stderr,"%d:%p ",i,data[tn][i][0][0]); fprintf(stderr,"\n");
+//fprintf(stderr,"AVANT:t=%d:: ",tn,i0,i1); for (i=0; i<S_MAX ; i++) fprintf(stderr,"%d:%p ",i,data->ls[tn][i][0][0]); fprintf(stderr,"\n");
         while (1) {
             for (i0=0 ; i0<S_MAX ; i0++)
-                if (data[tn][i0][0][0] == 0) break;
+                if (data->ls[tn][i0][0][0] == 0) break;
             for (i1=i0+1 ; i1<S_MAX ; i1++)
-                if (data[tn][i1][0][0] != 0) break;
+                if (data->ls[tn][i1][0][0] != 0) break;
 //fprintf(stderr,"%d %d %d\n",tn,i0,i1);
             if (i1>=S_MAX) break;
@@ -216 +276 @@
                 for (dn=0;dn<D_MAX;dn+=1) 
                     for (v=0;v<V_MAX;v+=1) {
-                        data[tn][i0+i][dn][v] = data[tn][i1+i][dn][v];
-                        data[tn][i1+i][dn][v] = 0;
+                        data->ls[tn][i0+i][dn][v] = data->ls[tn][i1+i][dn][v];
+                        data->ls[tn][i1+i][dn][v] = 0;
                     }
         }
-//fprintf(stderr,"APRES:t=%d:: ",tn,i0,i1); for (i=0; i<S_MAX ; i++) fprintf(stderr,"%d:%p ",i,data[tn][i][0][0]); fprintf(stderr,"\n");
-    }
-}
-void prepare2()
+//fprintf(stderr,"APRES:t=%d:: ",tn,i0,i1); for (i=0; i<S_MAX ; i++) fprintf(stderr,"%d:%p ",i,data->ls[tn][i][0][0]); fprintf(stderr,"\n");
+    }
+}
+void prepare2(Tdata* data)
+{
+int tn0,tn1,stn,dn,vn;
+int moved=1;
+    while (moved) {
+        moved=0;
+        for (tn0=0 ; tn0<T_MAX ; tn0++)
+            if (data->ls[tn0][0][0][0] == 0) break;
+        for (tn1=tn0+1 ; tn1<T_MAX ; tn1++)
+            if (data->ls[tn1][0][0][0] != 0) break;
+        if (tn1==T_MAX) break;
+        for (stn=0 ; stn<S_MAX ; stn++)
+            for (dn=0;dn<D_MAX;dn+=1) 
+                for (vn=0;vn<V_MAX;vn+=1) {
+                    data->ls[tn0][stn][dn][vn] = data->ls[tn1][stn][dn][vn];
+                    data->ls[tn1][stn][dn][vn] = 0;
+                }
+        moved=1;
+    }
+}
+
+void prepare3(Tdata* data)
 {
 int tn,stn,dn,vn;
@@ -229 +310 @@
     for (stn=0; stn<S_MAX; stn++)
     for (dn=0; dn<D_MAX; dn++) {
-        Tlivrable* p = data[tn][stn][dn][0];
+        Tlivrable* p = data->ls[tn][stn][dn][0];
         if (p==0) continue;
         p->nbvers=0 ;
         for (vn=0 ; vn<V_MAX ; vn+=1) 
-            if (data[tn][stn][dn][vn]!=0) p->nbvers+=1;
+            if (data->ls[tn][stn][dn][vn]!=0) p->nbvers+=1;
         p->vers=(Tlivrable**)malloc(sizeof(*p->vers)*(p->nbvers+1));
         for (vn=0 ; vn<p->nbvers ; vn+=1) {
-            p->vers[vn] = data[tn][stn][dn][vn];
-            data[tn][stn][dn][vn]->nbvers = p->nbvers;
+            p->vers[vn] = data->ls[tn][stn][dn][vn];
+            data->ls[tn][stn][dn][vn]->nbvers = p->nbvers;
         }
         p->vers[vn] = 0;
@@ -250 +331 @@
 }
 
-double task_livrable_height(int tn)
+double task_livrable_height(int tn, double* delivrable_y)
 {
 int    stn,dn,nblivrables=0;
 double height=0;
-    for (stn=0 ; data[tn][stn][0][0]!=0 ; stn++)
-        for (dn=0 ; data[tn][stn][dn][0]!=0 ; dn++) {
+    height += TASK_TITLEHEIGHT ;
+    *delivrable_y = height;
+    for (stn=0 ; curr->ls[tn][stn][0][0]!=0 ; stn++)
+        for (dn=0 ; curr->ls[tn][stn][dn][0]!=0 ; dn++) {
             nblivrables += 1;
-            height+=data[tn][stn][dn][0]->height;
+            height+=curr->ls[tn][stn][dn][0]->height;
         }
         height += DELIVRABLE_VSEP/2;
@@ -268 +351 @@
 {
     int tn;
-    for ( tn=0 ; data[tn][0][0][0]!=0 ; tn++ ) {
+    for ( tn=0 ; curr->ls[tn][0][0][0]!=0 ; tn++ ) {
         const char* color= (tn%2)!=0 ? TASK_BGC1 : TASK_BGC0 ;
-        printf(
+        fprintf(curr->os,
             "\\put(%.2f,%.2f){\\fcolorbox{black}{%s}{\\makebox(%5.2f,%5.2f){}}}\n",
-            0.0,data[tn][0][0][0]->task_y,
+            0.0,curr->ls[tn][0][0][0]->task_y,
             color,
-            pictwidth,data[tn][0][0][0]->task_dy
+            pictwidth,curr->ls[tn][0][0][0]->task_dy
         );
     }
@@ -284 +367 @@
     for (i=0 ;  i<=36 ; i+=1,x+=PICT_MONTHWIDTH) {
         if ( (i%3)!=0 ) continue;
-        printf(
+        fprintf(curr->os,
             "\\put(%5.1f,%5.1f){\\line(0,1){%5.1f}}\\put(%5.1f,%5.1f){%d}\n",
             x,y,dy-PICT_MONTHWIDTH-PICT_VSEP,
@@ -298 +381 @@
     double tn=.3;
     //x=x-tn/2;
-    printf("\\bgroup\n");
-    printf("\\color{red}\n");
-    printf("\\linethickness{%.2fmm}\n",tn);
+    fprintf(curr->os,"\\bgroup\n");
+    fprintf(curr->os,"\\color{red}\n");
+    fprintf(curr->os,"\\linethickness{%.2fmm}\n",tn);
     for (i=0 ;  milestones[i]!=0 ; i+=1) {
         double xx= x + milestones[i]*PICT_MONTHWIDTH;
         print_vline(xx,y,dy-PICT_MONTHWIDTH-PICT_VSEP,0);
     }
-    printf("\\egroup\n");
+    fprintf(curr->os,"\\egroup\n");
 }
 
@@ -313 +396 @@
     int tn, int stn, int dn)
 {
-    Tlivrable* top=data[tn][stn][dn][0];
-    Tlivrable* last=data[tn][stn][dn][top->nbvers-1];
+    Tlivrable* top=curr->ls[tn][stn][dn][0];
+    Tlivrable* last=curr->ls[tn][stn][dn][top->nbvers-1];
     char tmp[1000],label[1000],title[1000];
     double y0;
@@ -330 +413 @@
     y -= top->height ;
 //print_hline(0,y,180,0);
-    printf("% Delivrable %s (tn=%d stn=%d dn=%d\n",label,tn,stn,dn);
+    fprintf(curr->os,"%% Delivrable %s (tn=%d stn=%d dn=%d\n",label,tn,stn,dn);
 
     // print label
@@ -366 +449 @@
         print_box(0,0,boxx,y+y0,box_dx,box_dy,0,0,0);
     } else for (v=0 ; v<top->nbvers ; v+=1) {
-        Tlivrable* l=data[tn][stn][dn][v] ;
+        Tlivrable* l=curr->ls[tn][stn][dn][v] ;
         gen_label_vers(tmp,l);
         boxx = box_x + l->bm*PICT_MONTHWIDTH ;
@@ -380 +463 @@
 {
 int stn,dn;
-double y = data[tn][0][0][0]->task_y+data[tn][0][0][0]->task_dy;
+Tlivrable* task=curr->ls[tn][0][0][0];
+double y = task->task_y+task->task_dy-task->task_y_del;
+    char tmp[1000];
+    sprintf(tmp,"\\textbf{Task-%d \\textit{%s}}",task->tn,task_names[task->tn]);
+    print_put(label_x/2,y+(TASK_TITLEHEIGHT-TASK_TITLEFONTHEIGHT)/2,tmp);
+
     //y += DELIVRABLE_VSEP/2. ;
-    for (stn=0 ; data[tn][stn][0][0]!=0 ; stn++)
-        for (dn=0 ; data[tn][stn][dn][0]!=0 ; dn++) {
+    for (stn=0 ; curr->ls[tn][stn][0][0]!=0 ; stn++)
+        for (dn=0 ; curr->ls[tn][stn][dn][0]!=0 ; dn++) {
             y=delivrable(label_x,box_x,title_x,y,tn,stn,dn);
         }
 }
 
-int main()
+void do_gantt(const char* fn, int* tnplus, int* tnmoins)
 {
     int tn;
@@ -396 +484 @@
 
     double label_x,title_x;
-
-    yylex();
-    prepare0();
-    prepare1();
-    prepare2();
+    curr = data_new(tnplus,tnmoins);
+    if ( (curr->os=fopen(fn,"w"))==0 ) {
+        fprintf(stderr,"can not open %s file for writing.\n",fn);
+        fprintf(stderr,"generation of %s graph is skipped.\n",fn);
+        return;
+    }
+    prepare0(curr);
+    prepare1(curr);
+    prepare2(curr);
+    prepare3(curr);
 
     pictheight=0 ;
     pictheight += PICT_BOTSEP ;
-    for ( tn=0 ; data[tn][0][0][0]!=0 ; tn++ );
+    for ( tn=0 ; curr->ls[tn][0][0][0]!=0 ; tn++ );
     for ( tn=tn-1 ; tn>=0 ; tn-- ) {
-        data[tn][0][0][0]->task_y = pictheight;
-        data[tn][0][0][0]->task_dy = task_livrable_height(tn);
-        pictheight += data[tn][0][0][0]->task_dy;
+        double offset;
+        curr->ls[tn][0][0][0]->task_y     = pictheight;
+        curr->ls[tn][0][0][0]->task_dy    = task_livrable_height(tn,&offset);
+        curr->ls[tn][0][0][0]->task_y_del = offset;
+        pictheight += curr->ls[tn][0][0][0]->task_dy;
         pictheight += TASK_VSEP;
     }
@@ -429 +524 @@
     pictwidth += PICT_RIGHTSEP;
     
-    printf("\\setlength{\\unitlength}{1.0mm}\n");
-    printf("\\begin{picture}(%.1f,%.1f)\n",pictwidth,pictheight);
-      task_box(pictwidth);
-      month_grid(gantt_x,gantt_y,gantt_dx,gantt_dy);
-      for ( tn=0 ; data[tn][0][0][0]!=0 ; tn++ ) {
+    fprintf(curr->os,"\\setlength{\\unitlength}{1.0mm}\n");
+    fprintf(curr->os,"\\begin{picture}(%.1f,%.1f)\n",pictwidth,pictheight);
+    //print_hline(0,0,pictwidth,0);
+    //print_hline(0,pictheight,pictwidth,0);
+    task_box(pictwidth);
+    month_grid(gantt_x,gantt_y,gantt_dx,gantt_dy);
+    for ( tn=0 ; curr->ls[tn][0][0][0]!=0 ; tn++ ) {
         task_delivrable(label_x,gantt_x,title_x,tn);
-      }
+    }
 
     print_milestones(gantt_x,0,gantt_dx,gantt_dy+gantt_y);
-    printf("\\end{picture}\n");
+    fprintf(curr->os,"\\end{picture}\n");
+}
+
+int main()
+{
+    int tnplus[10] = { 0, 6, 7, -1 };
+    int tnmoins[10] = { 0, 6, 7, -1 };
+
+    yylex();
+    do_gantt("gantt.tex",0,0);
+    do_gantt("gantt1.tex",tnplus,0);
+    do_gantt("gantt2.tex",0,tnmoins);
 
     return 0;