C语言实现拓扑排序

#include <bits/stdc++.h>
//#define ERROR 0
//#define OK 1
#define FALSE 0
#define TRUE 1
#define Mdingdian 99
//首先我有三个结构体
using namespace std;

typedef int Boolean;//设置一个布尔值,这样就可以用到上面定义的true和false了
//typedef int VertexType;//顶点信息
Boolean visit[Mdingdian];//定义了一个布尔类型的栈,作为标记使用，被访问的元素为1，否则为0
typedef struct node//这个是用来做边表的
{
    int adjvex;//链接点值
    struct node *next;
}no;//定义一个结构体来存放所连接的顶点的值(也就是边表上的元素)

typedef struct vexnode//这个是用来做顶点表的
{
    int vertex;//顶点
    no *firstedge;//就是顶点后面的那个东西
}Vno;//定义一个结构体来存放顶点的值

typedef Vno dadedingdianshuzu[Mdingdian];//先定义99个顶点

typedef struct Gnode
{
    dadedingdianshuzu adjlist;//adjlist就是我的表的名字
    int n,e;//点数和边数
}Gno;//定义一个结构体来存放点和边

int zhaodingdian(Gno *G,int e,int n)
{
    for(int i=0;i<n;i++)
    {
        if(G->adjlist[i].vertex==e)
        {
            return i;
        }
    }
    return -1;
}

void create(Gno *G)//创建邻接表，G本身就是一个指针,这个指针可以指表上的任何地方
{
    int i,j,k;
    no *s;
    cout<<"读入顶点和边数"<<endl;
    scanf("%d %d",&G->n,&G->e);
    for(i=0;i<G->n;i++)//i表示的是顶点的下标
    {
        printf("建立顶点表");
        fflush(stdin);//清空输入缓冲区，通常是为了确保不影响后面的数据读取
        scanf("%d",&G->adjlist[i].vertex);
        G->adjlist[i].firstedge=NULL;//在对数据域赋顶点值之后，对数据域后面的指针域赋值为空
    }
    printf("建立边表\n");
    for(k=0;k<G->e;k++)//要建立边表了,就把边输入
    {//K在这里控制的是序对的数量，也就是边的数量
        printf("读入(vi-vj)的顶点对序号");//所谓的把边输入，就是把每对序列输入，因为元素与元素之间连着的就是边
        scanf("%d %d",&i,&j);//i表示的是顶点的值，j表示的是顶点后面边表的值
        i=zhaodingdian(G,i,G->n);
        j=zhaodingdian(G,j,G->n);
        if(i==-1||j==-1)//找不到顶点
        {
            printf("找不到顶点，请重新输入!\n");
            printf("读入(vi-vj)的顶点对序号");
            scanf("%d %d",&i,&j);//如果输入的序对不对，还有再来一次的机会，这就是容错性
            i=zhaodingdian(G,i,G->n);
            j=zhaodingdian(G,j,G->n);
        }
        s=new no;//开辟一个新指针
        s->adjvex=(j);//用这个指针指向邻接点,并把邻接的值赋值给这个指针
        s->next=G->adjlist[i].firstedge;
        G->adjlist[i].firstedge=s;
    }
}

void TopoSort(Gno *G,int n)//拓扑排序的中心函数
{
    int i,j,k,top,sum=0;
    no *p;
    int *d=(int *)malloc(n*sizeof(int));
    for(i=0;i<n;i++)//初始化数组.定义一个一维数组作为栈来使用，
    {//数据的元素填每个顶点的入度情况，用数组的下标代替顶点
        d[i]=0;//这个栈用于暂存所有入为0的顶点
    }
    for(i=0;i<n;i++)//统计各个顶点的入度情况，并把他们填入数组里面
    {
        p=G->adjlist[i].firstedge;
        while(p!=NULL)
        {
            j=p->adjvex;
            d[j]++;
            p=p->next;
        }
    }
    top=-1;
    for(i=0;i<n;i++)//先找出里面入度是0的顶点
    {
        if(d[i]==0)
        {
            d[i]=top;
            top=i;
        }
    }
    while(top!=-1)
    {
        j=top;
        top=d[top];
        printf("%d ",j);
        sum++;//统计顶点
        p=G->adjlist[j].firstedge;
        while(p)
        {
            k=p->adjvex;//相l连接的顶点
            d[k]--;//相连接的顶点入度减1
            if(d[k]==0)//如果发现入度为0的新顶点，从该顶点出发
            {
                d[k]=top;
                top=k;
            }
            p=p->next;
        }
    }
    if(sum<n)
    printf("\n有回路！\n");
    free(d);
}

int main()
{
    Gno *G=(Gno *)malloc(sizeof(Gno));//一定要搞懂这里是什么意思
    create(G);//建立一个邻接表
    printf("邻接表为：\n");
    for(int i=0;i<G->n;i++)
    {
        p=G->adjlist[i].firstedge;//先把指针指向顶点表数据域后面的指针域
        printf("%d->",G->adjlist[i].vertex);
        while(p!=NULL)
        {
            printf("%d->",G->adjlist[p->adjvex].vertex);
            p=p->next;
        }
        printf("\n");
    }
    printf("拓扑排序为：\n");
    TopoSort(G,G->n);
    return 0;
}