关键路径的计算(C语言)

#include<stdio.h>
#include<stdlib.h>
#include<math.h>
struct stack{
    int *data;
    int top;
    int maxSize;
};
struct node{
	int index;
	struct node *next;
};
struct table{
	struct node **body;
	int tablesize;
};
char ch[9]={'a','b','c','d','e','f','g','h','k'};
int Earliest[9];
int Latest[9];
int map[9][9]={/*pow(2,30)定义为无穷大*/
	0,6,4,5,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,
	pow(2,30)-1,0,pow(2,30)-1,pow(2,30)-1,1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,
	pow(2,30)-1,pow(2,30)-1,0,pow(2,30)-1,1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,
	pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,0,pow(2,30)-1,2,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,
	pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,0,pow(2,30)-1,8,7,pow(2,30)-1,
	pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,0,pow(2,30)-1,4,pow(2,30)-1,
	pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,0,pow(2,30)-1,2,
	pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,0,4,
	pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,pow(2,30)-1,0
};
int map2[9][9];
struct stack *createStack(int maxsize){
    struct stack *s;
    s=(struct stack *)malloc(sizeof(struct stack));
    s->data=(int *)malloc(sizeof(int)*maxsize);
    s->top=-1;
    s->maxSize=maxsize;
    return s;
}
int isFull(struct stack *s){
    return s->top==s->maxSize-1;
}
int isEmpty(struct stack *s){
    return s->top==-1;
}
void push(struct stack *s,int num){
    if(isFull(s)){
        printf("stack is full\n");
        return;
    }
    s->data[++s->top]=num;
}
int pop(struct stack *s){
    if(isEmpty(s)){
        printf("stack is empty\n");
        exit(-1);
    }
    return s->data[s->top--];
}
struct table *createTable(int size){
	struct table *T;
	T=(struct table *)malloc(sizeof(struct table));
	T->tablesize=size;
	T->body=(struct node **)malloc(sizeof(struct node *)*T->tablesize);
	for(int i=0;i<T->tablesize;i++){
		T->body[i]=(struct node *)malloc(sizeof(struct node));
		T->body[i]->index=0;
		T->body[i]->next=NULL;
	}
	for(int i=0;i<T->tablesize;i++){
		for(int j=0;j<T->tablesize;j++){
			if(map[i][j]!=0&&map[i][j]!=pow(2,30)-1){
				struct node *p,*q;
				p=T->body[i];
				q=(struct node *)malloc(sizeof(struct node));
				q->index=j;
				q->next=p->next;
				p->next=q;
				T->body[j]->index++;
			}
		}
	}
	return T;
}
int main(){
	struct stack *s;
	int n=9;
	s=createStack(n);
	struct table *T;
	T=createTable(n);
	for(int i=0;i<T->tablesize;i++){
		if(T->body[i]->index==0){
			push(s,i);
		}
	}
	int a[n];
	int k=0;
	while(!isEmpty(s)){/*利用栈计算出一种可行的执行顺序*/
		a[k]=pop(s);
		struct node *q;
		q=T->body[a[k]]->next;
		while(q!=NULL){
			T->body[q->index]->index--;
			if(T->body[q->index]->index==0){
				push(s,q->index);
			}
			q=q->next;
		}
		k++;
		}
	printf("\n\n拓扑排序的一种情况:");
	for(int i=0;i<T->tablesize;i++){
		printf("%3c",ch[a[i]]);/*利用拓扑排序得到的序列作为后面最早最晚时间的计算顺序*/
	}
	for(int i=0;i<n;i++){
		for(int j=0;j<n;j++){
			map2[i][j]=-1;
			Latest[i]=pow(2,30)-1;
		}
	}
	for(int i=0;i<n;i++){
		Earliest[i]=0;
	}
	for(int i=0;i<n;i++){
		for(int j=0;j<n;j++){/*求最早开始时间*/
			if(map[j][a[i]]!=pow(2,30)-1&&map[j][a[i]]+Earliest[j]>Earliest[a[i]]){
				Earliest[a[i]]=map[j][a[i]]+Earliest[j];
			}
		}
	}
	Latest[n-1]=Earliest[n-1];
	for(int i=n-2;i>=0;i--){
		for(int j=0;j<n;j++){/*求最晚开始时间*/
			if(map[a[i]][j]!=pow(2,30)-1&&Latest[j]-map[a[i]][j]<Latest[a[i]]){
				Latest[a[i]]=Latest[j]-map[a[i]][j];
			}
		}
	}
	printf("\n\n最早开始时间:\n");
	for(int i=0;i<n;i++){
		printf("  %c:%d",ch[i],Earliest[i]);
	}
	printf("\n\n最晚开始时间:\n");
	for(int i=0;i<n;i++){
		printf("  %c:%d",ch[i],Latest[i]);
	}
	for(int i=0;i<n;i++){/*计算每条边的最大允许延误时间*/
		for(int j=0;j<n;j++){
			if(map[i][j]!=0&&map[i][j]!=pow(2,30)-1){
				map2[i][j]=Latest[j]-Earliest[i]-map[i][j];
			}else{
				map2[i][j]=-1;
			}
		}
	}
	printf("\n\n各边的最大允许延误时间:\n");
	for(int i=0;i<n;i++){
		for(int j=0;j<n;j++){
			if(map2[i][j]!=-1){
				printf("  %c%c:%d",ch[i],ch[j],map2[i][j]);
			}
		}
	}
	printf("\n\n关键路径为:");
	printf("%c",ch[0]);
	for(int i=0;i<n;i++){
		for(int j=0;j<n;j++){
			if(map2[i][j]==0){
				printf(">%c",ch[j]);
			}
		}
	}
	printf("\n");
	return 0;
}