拓扑排序－邻接表实现（C语言）

/*拓扑排序*/
#include<stdio.h>
#include<stdlib.h> 
#define max 105

typedef struct edge{
	int adjvex;
	int weight;
	struct edge* next;
}Elink;

typedef struct ver{
	int vertex;
	Elink* link;
}Vlink;
Vlink Graph[max];
以上为邻接表常规操作

int temp[max][max];／／用于对读入的数据进行排序再构造邻接表
int n,m;
int in[max];／／记录各顶点的入度
int cnt;／／记录拓扑排序完成的个数，若等于ｎ，则说明无环，否则说明有环
int answer[max];／／存储拓扑排序结果

void toposort(){／／拓扑排序
	int i;
	int times=n;
	while(times--){／／进行ｎ次循环，一次完成一个顶点
		for(i=1;i<=n;i++){
			if(in[i]==0){
			／＊读取入度为０的最小顶点（若不要求最小，则排序结果不唯一）
			事实上，这里只是拓扑排序的一种结果。＊／
				in[i]--;／／使得入度－１.纯粹是为了标记已经操作过，以不影响后续循环为准。
				answer[++cnt]=i;／／存储顶点顺序
				break;／／找到一个入读为０的最小顶点就跳出ｆｏｒ循环
			}
		}
		Elink *p;
		for(p=Graph[i].link;p!=NULL;p=p->next){
			in[p->adjvex]--;／／对上述找到的顶点，将其一步可以到达的顶点入度全部－１.
		}
	}
}

int main()
{
	scanf("%d%d",&n,&m);//n个顶点,m条边
	int u,v;
	int i,j,k;
	int t;
	for(i=1;i<=m;i++){
		scanf("%d%d",&u,&v);//表示从顶点u到顶点v
		in[v]++;//将顶点v的入度+1
		temp[u][0]++;//这里为了构造邻接表而设定
		/*与u顶点相连的顶点有temp[u][0]个*/
		temp[u][temp[u][0]]=v;
		/*第temp[u][0]个与顶点u相连的顶点为v*/
	}
	
	//冒泡排序 
	for(i=1;i<=n;i++){
		for(j=1;j<=temp[i][0];j++){
			for(k=1;k<=temp[i][0]-j;k++){
				if(temp[i][k]>temp[i][k+1]){
					t=temp[i][k];
					temp[i][k]=temp[i][k+1];
					temp[i][k+1]=t;
				}
			}
		}
	}//冒泡排序结束 
	
	//构造邻接表 
	for(i=1;i<=n;i++){
		Graph[i].vertex=i;
		for(j=1;j<=temp[i][0];j++){
			if(Graph[i].link==NULL){
				Graph[i].link=(Elink*)malloc(sizeof(Elink));
				Graph[i].link->adjvex=temp[i][j];
				Graph[i].link->weight=1;
				Graph[i].link->next=NULL;
			} else{
				Elink* p;
				for(p=Graph[i].link;p->next!=NULL;p=p->next)	;
				Elink* q=(Elink*)malloc(sizeof(Elink));
				q->adjvex=temp[i][j];
				q->weight=1;
				q->next=NULL;
				p->next=q;
			}
		}
	}//构造结束 
	
	toposort();//拓扑排序 
	
	if(cnt==n){
		for(i=1;i<=n;i++){
			printf("%d ",answer[i]);
		}
		puts("");
	}else printf("Error!!!\n");
	
	return 0;
}