Data_Structure/資料結構光碟檔/CH12/topologicalSort.c.txt

137 lines
2.8 KiB
Plaintext
Raw Permalink Normal View History

2025-01-20 21:25:33 +08:00
/* file name: topologicalSort.c */
/* <20>ݾ<EFBFBD><DDBE>Ƨ<EFBFBD> */
#include <stdio.h>
#include <stdlib.h>
#define MAX_V 100 /* <20>̤j<CCA4>`<60>I<EFBFBD><49> */
#define TRUE 1
#define FALSE 0
/*<2A>w<EFBFBD>q<EFBFBD><71><EFBFBD>Ƶ<EFBFBD><C6B5>c*/
typedef struct node_tag {
int vertex;
struct node_tag *link;
} Node;
Node *adjlist[MAX_V+1]; /* <20>ŧi<C5A7>۾F<DBBE><46><EFBFBD>C */
int visited[MAX_V+1]; /* <20>O<EFBFBD><4F><EFBFBD><EFBFBD><EFBFBD>I<EFBFBD>O<EFBFBD>_<EFBFBD>w<EFBFBD><77><EFBFBD>X */
int Top_order[MAX_V+1];
int N;
int place;
void build_adjlist(void);
void show_adjlist(void);
void topological(void);
void top_sort(int);
Node *searchlast(Node *);
int main()
{
int i;
build_adjlist(); /* <20>H<EFBFBD>۾F<DBBE><46><EFBFBD>C<EFBFBD><43><EFBFBD>ܹϧ<DCB9> */
show_adjlist(); /* <20><><EFBFBD>ܦ<EFBFBD><DCA6>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD><EFBFBD> */
topological(); /* <20>ϧΤ<CFA7><CEA4>ܦV<DCA6>u<EFBFBD><75><EFBFBD>j<EFBFBD>M<EFBFBD>A<EFBFBD>H<EFBFBD><48><EFBFBD>I 1 <20><><EFBFBD>ҩl<D2A9><6C><EFBFBD>I */
puts("\n------Topological sort------");
for (i = 0; i < N; i++)
printf("V%d ", Top_order[i]);
printf("\n");
return 0;
}
void build_adjlist()
{
FILE *fptr;
Node *node, *lastnode;
int vi, vj;
fptr = fopen("topologicalSort.dat", "r");
if (fptr == NULL) {
perror("topologicalSort.dat");
exit(0);
}
/* Ū<><C5AA><EFBFBD>`<60>I<EFBFBD>`<60><> */
fscanf(fptr, "%d", &N);
for (vi = 1; vi <= N; vi++) {
/* <20>]<5D>w<EFBFBD>}<7D>C<EFBFBD>ΦU<CEA6><55><EFBFBD>C<EFBFBD>ҩl<D2A9><6C> */
adjlist[vi] = (Node *)malloc(sizeof(Node));
adjlist[vi]->vertex = vi;
adjlist[vi]->link = NULL;
}
/* Ū<><C5AA><EFBFBD>`<60>I<EFBFBD><49><EFBFBD><EFBFBD> */
while (fscanf(fptr,"%d %d",&vi,&vj) != EOF) {
node = (Node *)malloc(sizeof(Node));
node->vertex = vj;
node->link = NULL;
if (adjlist[vi]->link == NULL)
adjlist[vi]->link = node;
else {
lastnode = searchlast(adjlist[vi]);
lastnode->link = node;
}
}
fclose(fptr);
}
/* <20><><EFBFBD>ܦU<DCA6>۾F<DBBE><46><EFBFBD>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD><EFBFBD> */
void show_adjlist()
{
int v;
Node *ptr;
puts("Head adjacency nodes");
puts("--------------------------");
for (v = 1; v <= N; v++) {
printf("V%d ",adjlist[v]->vertex);
ptr = adjlist[v]->link;
while (ptr != NULL) {
printf("--> V%d ",ptr->vertex);
ptr = ptr->link;
}
printf("\n");
}
}
/* <20>ϧΤ<CFA7><CEA4>ܦV<DCA6>u<EFBFBD><75><EFBFBD>j<EFBFBD>M */
void topological()
{
int v;
for (v = 1; v <= N; v++)
visited[v] = FALSE;
place = N;
for (v = 1; v <= N; v++)
if (!visited[v])
top_sort(v);
}
void top_sort(int k)
{
Node *ptr;
int w;
visited[k] = TRUE; /* <20>]<5D>w v <20><><EFBFBD>I<EFBFBD><49><EFBFBD>w<EFBFBD><77><EFBFBD>X<EFBFBD>L */
ptr = adjlist[k]->link; /* <20><><EFBFBD>X v <20>۾F<DBBE><46><EFBFBD>I */
while (ptr != NULL) {
w = ptr->vertex; /* w <20><> v <20><><EFBFBD>ߧY<DFA7><59><EFBFBD>~<7E><> */
if (!visited[w])
top_sort(w);
ptr = ptr->link;
}
Top_order[--place] = k;
}
/* <20>j<EFBFBD>M<EFBFBD><4D><EFBFBD>C<EFBFBD>̫<EFBFBD><CCAB>`<60>I<EFBFBD><49><EFBFBD><EFBFBD> */
Node *searchlast(Node *linklist)
{
Node *ptr;
ptr = linklist;
while (ptr->link != NULL)
ptr = ptr->link;
return ptr;
}