读取一个格式良好的XML文档（只能包含标记和内容），并按层次编号并输出。

1. #include <stdio.h>
2. #include <memory.h>
3. #include <string.h>
4. #include <ctype.h>
6. #define BUFSIZE 30
8. //XML文档结点
9. struct Node
10. {
11.     int num;    //结点编号
12.     char name[BUFSIZE]; //结点名
13.     char value[BUFSIZE]; //结点值
14.     Node *parent; //父结点;
15.     Node *lsibling; //左同胞结点
16.     Node *rsibling; //右同胞结点
17.     Node *firstChild; //第一个子结点
18.     Node *lastChild; //最后一个子结点
19.     int childCount; //子结点个数，这个可以不要，有这个要方便些，在插入和删除子结点时要维护
20. };
21. //从文件中读一个字符串，直到读到标记符为此
22. void ReadString(FILE *fp, char *buf)
23. {
24.     char ch;
25.     char *p = buf;
26.     ch = fgetc(fp);
27.     do
28.     {
29.         if (p != buf || !isspace(ch)) //自动去掉首部空白
30.         {
31.             *(p++) = ch;
32.         }
33.         ch = fgetc(fp);
34.     }while (!feof(fp) && (ch != '<' && ch != '>' || p == buf));
35.     if ('<' == ch) //下一个标记开始
36.     {
37.         fseek(fp, -1, SEEK_CUR);
38.         p--;
39.     }
40.     else if ('>' == ch) 
41.     {
42.         *p = ch;
43.     }
44.     //以下代码为去掉buf的尾空白
45.     while (p != buf && isspace(*p)) p--;
46.     *(++p) = '/0';
47. }
49. //从文件中读取一个结点及其所有子结点
50. void ReadNode(FILE *fp, Node *node)
51. {
52.     char buf[BUFSIZE];
53.     Node *child = NULL; //当前子结点
54.     ReadString(fp, buf); //读入开始标记
55.     strcpy(node->name, &buf[1]);  //只拷贝标记正文
56.     node->name[strlen(node->name) - 1] = '/0';
57.     while (1)
58.     {
59.         buf[0] = '/0';
60.         ReadString(fp, buf); //读入下一个字符串
61.         if ('<' == buf[0]) //读到标记
62.         {
63.             if ('/' == buf[1]) //是结束标记
64.             {
65.                 break; //本层结束
66.             }
67.             else //遇到开始标记，是子结点
68.             {
69.                 Node *p = new Node;
70.                 memset(p, 0, sizeof(Node));
71.                 p->parent = node;
72.                 if (child) //如果当前子结点不为空
73.                 {
74.                     child->rsibling = p;
75.                     p->lsibling = child;
76.                 }
77.                 else //为第一个子结点
78.                 {
79.                     node->firstChild = p;
80.                 }
81.                 fseek(fp, -(long)strlen(buf), SEEK_CUR); //将文件指针拨回开始标记之前
82.                 ReadNode(fp, p);
83.                 child = p;
84.                 node->childCount ++; //子结点个数加一
85.             }
86.         }
87.         else //是结点值
88.         {
89.             strcpy(node->value, buf);
90.         }
91.     }
92.     node->lastChild = child; //最后一个子结点
93. }
94. //按层次访问所有结点并编号
95. void GetNum(Node *node)
96. {
97.     static int num = 1;
98.     if (!node) return;
99.     node->num = num++;
100.     if (node->rsibling) //本层还未结束
101.         GetNum(node->rsibling);
102.     else if (node->parent)
103.     {
104.         if (node->parent->rsibling) //找到右堂兄弟
105.             GetNum(node->parent->rsibling->firstChild);
106.         else //进下一层
107.             GetNum(node->parent->firstChild->firstChild);
108.     }
109.     else //本结点是根结点，直接进入下一层
110.         GetNum(node->firstChild);
111. }
112. //按层次打印所有结点
113. void PrintNode(Node *node)
114. {
115.     if (!node) return;
116.     printf("Element %d - %s: %s, child:", 
117.         node->num, node->name, 
118.         strlen(node->value) ? node->value : "null");
119.     Node *p = node->firstChild;
120.     if (!p) printf("null");
121.     while (p)
122.     {
123.         printf("Element %d", p->num);
124.         p = p->rsibling;
125.         if (p) printf(", ");
126.     }
127.     printf("/n");
128.     if (node->rsibling) //本层还未结束
129.         PrintNode(node->rsibling);
130.     else if (node->parent)
131.     {
132.         if (node->parent->rsibling) //找到右堂兄弟
133.             PrintNode(node->parent->rsibling->firstChild);
134.         else //进下一层
135.             PrintNode(node->parent->firstChild->firstChild);
136.     }
137.     else //本结点是根结点，直接进入下一层
138.         PrintNode(node->firstChild);
139. }
141. //释放结点树
142. void FreeNode(Node *node)
143. {
144.     Node *p = node->firstChild;
145.     while (p)
146.     {
147.         Node *q = p->rsibling;
148.         FreeNode(p);
149.         p = q;
150.     }
151.     delete node;
152. }
154. void main()
155. {
156.     char filename[BUFSIZE];
157.     FILE *fp;
158.     printf("Please enter XML filename:");
159.     scanf("%s", filename);
160.     if (!(fp = fopen(filename, "r")))
161.     {
162.         printf("Open file %s fail!/n");
163.     }
164.     else
165.     {
166.         Node *node = new Node;
167.         memset(node, 0, sizeof(Node));
168.         ReadNode(fp, node);
169.         fclose(fp);
170.         GetNum(node);
171.         PrintNode(node);
172.         FreeNode(node);
173.     }
174. }