/*
Name: 拓扑排序之关键路径(深度优先搜索)
Copyright:
Author: 巧若拙
Date: 17-11-14 21:02
Description: 拓扑排序之关键路径
若在带权的有向图中，以顶点表示事件，以有向边表示活动，边上的权值表示活动的开销（如该活动持续时间），
则此带权的有向图称为边表示活动的网 (Activity on Edge Network) ，简称 AOE 网。
(1)AOV 网具有的性质
⒈ 只有在某顶点所代表的事件发生后，从该顶点出发的各有向边所代表的活动才能开始。
⒉ 只有在进入某一顶点的各有向边所代表的活动都已经结束，该顶点所代表的事件才能发生。
⒊ 表示实际工程计划的 AOE 网应该是无环的，并且存在唯一的入度过为 0 的开始顶点和唯一的出度为 0 的完成顶点。
(2)由事件 v j 的最早发生时间和最晚发生时间的定义 , 可以采取如下步骤求得关键活动 :
1. 从开始顶点 v 1 出发 , 令 ve(1)=0, 按拓朴有序序列求其余各顶点的可能最早发生时间。
Ve(k)=max{ve(j)+dut(<j,k>)} （ 7.1 ）
j ∈ T
其中 T 是以顶点 v k 为尾的所有弧的头顶点的集合 (2 ≤ k ≤ n) 。
如果得到的拓朴有序序列中顶点的个数小于网中顶点个数 n ，则说明网中有环，不能求出关键路径，算法结束。
2. 从完成顶点 v n 出发，令 vl(n)=ve(n) ，按逆拓朴序列求其余各顶点的允许的最晚发生时间 :
vl(j)=min{vl(k)-dut(<j,k>)}
k ∈ S
其中 S 是以顶点 v j 是头的所有弧的尾顶点集合 (1 ≤ j ≤ n-1) 。
3. 求每一项活动 a i (1 ≤ i ≤ m) 的最早开始时间 e(i)=ve(j) ；最晚开始时间
l(i)=vl(k)-dut(<j,k>)
。若某条弧满足 e(i)=l(i) ，则它是关键活动。
输入：
第一行两个整数n，m分别表示顶点个数和边的条数，其中顶点的编号为0~n-1。
接下来的m行，每行有三个数u，v，w，表示从弧尾u到弧头v的边的权值w。
8 10
0 1 5
0 2 4
1 4 3
2 3 2
3 4 1
4 5 6
4 6 6
5 7 2
6 7 2
4 7 8
输出：
输出所有关键路径，每行输出一个关键路径。格式如下：
0->1->4->7
0->1->4->5->7
0->1->4->6->7
算法分析：
采用深度优先搜索进行拓扑排序，获取拓扑序列的同时计算各顶点事件的最早发生时间，然后逆序计算各顶点事件的最晚发生时间。
本文是《大话数据结构》的读书笔记，在输出关键路径时采用深度优先搜索输出关键路径，能输出多条关键路径。
*/
#include<stdio.h>
#include<stdlib.h>
#define MAXN 26 //最大顶点数量
#define MAXM 100000 //最大边数量
typedef int VertexType; //顶点类型由用户自定义
typedef int EdgeType; //边上的权值类型由用户自定义
typedef struct EdgeNode{ //边表结点
int adjvex; //邻接点域，存储该顶点对应的下标
EdgeType weight; //权值，对于非网图可以不需要
struct EdgeNode *next; //链域，指向下一个邻接点
} EdgeNode;
typedef struct VertexNode{ //顶点表结点
VertexType data; //顶点域，存储顶点信息
int in; //存储顶点入度的数量
EdgeNode *firstEdge; //边表头指针
} VertexNode;
void CreateGraph(VertexNode *GL, int n, int m);//把顶点和边信息读入到表示图的邻接表中
int TopoLogicalSort_DFS(int topo[], int Etv[], VertexNode *GL, int n);//深度优先搜索获取拓扑序列
void CriticalPath(VertexNode *GL, int n);//求关键路径
void PrintPath(VertexNode *GL, int Etv[], int Ltv[], int path[], int top, int end);//深度优先搜索输出关键路径
int main()
{
int i, m, n;
VertexNode GL[MAXN];
printf("请输入顶点数量和边数量:");
scanf("%d%d", &n, &m);
CreateGraph(GL, n, m);//把顶点和边信息读入到表示图的邻接表中
CriticalPath(GL, n);//求关键路径
return 0;
}
void CreateGraph(VertexNode *GL, int n, int m)//把顶点和边信息读入到表示图的邻接表中
{
int i, u, v;
EdgeNode *e;
for (i=0; i<n; i++)//初始化图
{
GL[i].data = i;
GL[i].in = 0;
GL[i].firstEdge = NULL;
}
for (i=0; i<m; i++)
{
e = (EdgeNode*)malloc(sizeof(EdgeNode)); //采用头插法插入边表结点
if (!e)
{
puts("Error");
exit(1);
}
scanf("%d%d%d", &u, &v, &e->weight);
e->next = GL[u].firstEdge;
GL[u].firstEdge = e;
e->adjvex = v;
GL[v].in++;
}
}
int TopoLogicalSort_DFS(int topo[], int Etv[], VertexNode *GL, int n)//深度优先搜索获取拓扑序列
{
int i, u, v, top, count = 0;
EdgeNode *e;
int *Stack;
Stack = (int*)malloc(sizeof(int) * n); //分配栈空间
if (!Stack)
{
puts("Error");
exit(1);
}
for (top=i=0; i<n; i++)//将入度为0的顶点入栈
{
Etv[i] = 0; //初始化各事件最早发生事件为0
if (GL[i].in == 0)
{
Stack[top++] = i;
}
}
while (top > 0)//采用深度优先搜索获取拓扑序列
{
u = Stack[--top];
topo[count++] = u;
for (e=GL[u].firstEdge; e!=NULL; e=e->next)//将u的邻接点入度减1，并将入度为0的顶点入栈
{
v = e->adjvex;
if (--GL[v].in == 0)
Stack[top++] = v;
if (Etv[v] < Etv[u] + e->weight)//更新各顶点事件的最早发生时间
Etv[v] = Etv[u] + e->weight;
}
}
free(Stack);
return (count == n);//如果count小于顶点数，说明存在环
}
void CriticalPath(VertexNode *GL, int n)//求关键路径
{
int i, u, v;
EdgeNode *e;
int topo[MAXN], path[MAXN];
int Etv[MAXN], Ltv[MAXN];//存储事件的最早和最晚发生时间
if (!TopoLogicalSort_DFS(topo, Etv, GL, n))
{
puts("不存在关键路径");
return;
}
for (i=0; i<n; i++)
{
Ltv[i] = Etv[n-1]; //初始化各事件最晚发生事件为最后一个事件发生的时间
}
for (i=n-2; i>=0; i--)
{
u = topo[i];
for (e=GL[u].firstEdge; e!=NULL; e=e->next)
{
v = e->adjvex;
if (Ltv[u] > Ltv[v] - e->weight)//更新各顶点事件的最晚发生时间
Ltv[u] = Ltv[v] - e->weight;
}
}
path[0] = topo[0];
PrintPath(GL, Etv, Ltv, path, 1, topo[n-1]);
}
void PrintPath(VertexNode *GL, int Etv[], int Ltv[], int path[], int top, int end)//深度优先搜索输出关键路径
{
int i, u = path[top-1];
EdgeNode *e;
if (u == end)
{
printf("%d", path[0]); //输出关键路径
for (i=1; i<top; i++)
{
printf("->%d", path[i]);
}
printf("\n");
return;
}
for (e=GL[u].firstEdge; e!=NULL; e=e->next)
{
if (Etv[e->adjvex] == Ltv[e->adjvex])//关键事件
{
path[top++] = e->adjvex; //入栈
PrintPath(GL, Etv, Ltv, path, top, end);
top--; //退栈
}
}
}