读入一个c程序，并按字母表顺序分组打印变量名，每组前N个字符相同（TCPL 练习6-2）

在建立结构tnode的过程中，我们没有预设门槛。这道题目就设置了门槛，必须根据前N个字符来进行分组，于是排除了长度小于N的变量，以便减轻负担。

因为要求对变量名分组打印，组别理所应当地应该按照至少是升序来排列，在每一组内，也至少应该是升序排列（以字母顺序），于是构造一棵二叉树，它的每一个节点都指向另一棵二叉树，即一棵由二叉树构成的二叉树。这样，在我们对每一个母二叉树的节点进行访问的时候，也可以遍历它所指向的子二叉树，也就是每一个组别内的升序排列实现了。遍历母二叉树的过程也实现了各组升序排列。

代码如下：

#include
#include
#include
#include

#define MAXWORD 100

extern int getword(char *word, int lim);
struct tnode *addtree(struct tnode *, char *);		/* 二叉树tnode，每个节点存放一个word以及其出现的次数 */
struct maketree *mtree(struct maketree *, char *);/*  二叉树maketree，每个节点指向一棵二叉树tnode */
void trreprint(struct tnode *);			/*  打印二叉树tnode */
void actreeprint(struct maketree *);	/*  打印二叉树maketree */
struct tnode *talloc(void);			/*  为树tnode申请储存空间 */
struct maketree *atalloc(void);		/*  为树maketree申请储存空间 */
char *strduper(char *s);			/*  word存放在一个安全的地方 */
int num;
struct tnode {
	char *word;
	int count;
	struct tnode *left;
	struct tnode *right;
};

struct maketree {
	int count;				/*	每个节点出现的次数 */
	struct tnode *nroot;	/*	指向一棵tnode二叉树 */
	struct maketree *left;	/*	左子树 */
	struct maketree *right;/*	右子树 */
};
/*  编写程序，按字母顺序打印文本中的变量名，每一组内各变量前6个字符相同，其余字符不同，不考虑注释、字符常量等，6可在命令行中更改 */
main(int argc, char *argv[]) {
	struct maketree *root;
	char word[MAXWORD];

	root=NULL;
	num=(--argc>0&&(**(++argv)=='-'))?atoi(++(*argv)):6;
	while(getword(word,MAXWORD)!=EOF &&(sizeof word/sizeof(char)) >=num)
		if(isalpha(word[0])||word[0]=='_')
			root=mtree(root,word);
	actreeprint(root);
	return 0;
}
struct tnode *addtree(struct tnode *p, char *w) {
	int cond;

	if(p==NULL) {
		p=talloc();
		p->word=strduper(w);
		p->count=1;
		p->left=p->right=NULL;

	} else if ((cond= strcmp(w,p->word))==0)
		p->count++;
	else if (cond <0)
		p->left=addtree(p->left,w);
	else 
		p->right=addtree(p->right,w);
	return p;
}

struct maketree *mtree(struct maketree *aroot, char *w) {
	
	int cond;

	if(aroot==NULL) {
		aroot=atalloc();
		aroot->nroot=NULL;
		aroot->nroot=addtree(aroot->nroot,w);			/*  将word传递给二叉树tnode */
		aroot->left=aroot->right=NULL;
		aroot->count=1;
	} else if ((cond=strncmp(w,aroot->nroot->word,num))==0) {
		addtree(aroot->nroot,w);
		aroot->count++;	
	} else if (cond <0)
		aroot->left=mtree(aroot->left,w);
	else 
		aroot->right=mtree(aroot->right,w);
	return aroot;

}

struct tnode *talloc(void) {
	return (struct tnode *) malloc(sizeof(struct tnode));

}
struct maketree *atalloc(void) {
	return (struct maketree *) malloc(sizeof(struct maketree));
}
char *strduper(char *s) {
	char *p;

	p=(char *)malloc(strlen(s)+1);
	if(p!=NULL)
		strcpy(p,s);
	return p;	
}

void treeprint(struct tnode *p) {
	if(p!=NULL) {
		treeprint(p->left);
		printf("%4d %s\n", p->count, p->word);
		treeprint(p->right);
	}
}
void actreeprint(struct maketree *p) {
	if(p!=NULL)
	{
		actreeprint(p->left);
		treeprint(p->nroot);
		printf("\n");
		actreeprint(p->right);
	}
}