mem_alloc.c

一个很不错的程序切片工具,希望大家来讨论以下,对测试人员很有帮助

# include <stdio.h>
# include "ansi_parse.h"
# include <malloc.h>
# include <string.h>
	static  char    sccsid[] = "@(#)mem_alloc.c	1.2  4/26/95";
static	int	n_strings = 0,
			n_text = 0,
			n_tokens = 0,
			n_types = 0,
			n_type_ste = 0,
			n_var_ste = 0,
			n_trees = 0,
			n_procs = 0,
			n_lists = 0,
			n_stmts = 0,
			n_tag_ste = 0,
			n_addr_tab = 0,
			n_labels = 0,
			n_decls = 0
	;

string_ptr alloc_string (s,next)
	char		*s;
	string_ptr	next;
{
	string_ptr	new;
	unsigned	size;

	n_strings++;
	size = strlen(s) + 1;
	n_text += size;
	new = (string_ptr) malloc (sizeof(string_node));
	new->text = malloc (size);
	new->next = next;
	new->text = strcpy (new->text,s);
	
	return new;
}

stmt_ptr alloc_stmt()
{
	n_stmts++;
	return (stmt_ptr) malloc (sizeof(stmt_rec));
}

tree_ptr alloc_tree()
{
	n_trees++;
	return (tree_ptr) malloc (sizeof(tree_rec));
}

proc_ptr alloc_proc()
{
	n_procs++;
	return (proc_ptr) malloc (sizeof(proc_rec));
}


list_ptr alloc_list()
{
	n_lists++;
	return (list_ptr) malloc (sizeof(list_rec));
}


type_ptr alloc_type()
{
	n_types++;
	return (type_ptr) malloc (sizeof(type_rec));
}

decl_ptr alloc_decl()
{
	n_decls++;
	return (decl_ptr) malloc (sizeof(decl_rec));
}

token_ptr alloc_token()
{
	token_ptr  t;

	n_tokens++;

	t = (token_ptr) malloc (sizeof(token_rec));
	t->desc.decl = NULL;
	t->desc.any = NULL;
	t->desc.type_desc = NULL;
	return t;
}

type_ste_ptr alloc_type_ste()
{
	n_type_ste++;
	return (type_ste_ptr) malloc (sizeof(type_ste_rec));
}

var_ste_ptr alloc_var_ste()
{
	n_var_ste++;
	return (var_ste_ptr) malloc (sizeof(var_ste_rec));
}

tag_ste_ptr alloc_tag_ste()
{
	n_tag_ste++;
	return (tag_ste_ptr) malloc (sizeof(tag_ste_rec));
}

addr_tab_ptr alloc_addr_tab()
{
	n_addr_tab++;
	return (addr_tab_ptr) malloc (sizeof(addr_tab_rec));
}

label_ptr alloc_label()
{
	n_labels++;
	return (label_ptr) malloc (sizeof(label_rec));
}

alloc_summary()
{
	printf ("Memory allocation summary\n");
	printf ("Records  Size  Total  Type\n");
	/*       123456   123  123456  abc... */
	printf ("%6d %5d %7d  %s\n",
		n_text,1,n_text,"Bytes in names");
	printf ("%6d %5d %7d  %s\n",
		n_strings,sizeof(string_node),n_strings*sizeof(string_node),
		"String Records");
	printf ("%6d %5d %7d  %s\n",
		n_tokens,sizeof(token_rec),n_tokens*sizeof(token_rec),
		"Token Records");
	printf ("%6d %5d %7d  %s\n",
		n_decls,sizeof(decl_rec),n_decls*sizeof(decl_rec),
		"Decl Records");
	printf ("%6d %5d %7d  %s\n",
		n_stmts,sizeof(stmt_rec),n_stmts*sizeof(stmt_rec),
		"Stmt Records");
	printf ("%6d %5d %7d  %s\n",
		n_lists,sizeof(list_rec),n_lists*sizeof(list_rec),
		"List Records");
	printf ("%6d %5d %7d  %s\n",
		n_procs,sizeof(proc_rec),n_procs*sizeof(proc_rec),
		"Proc Records");
	printf ("%6d %5d %7d  %s\n",
		n_trees,sizeof(tree_rec),n_trees*sizeof(tree_rec),
		"Tree Records");
	printf ("%6d %5d %7d  %s\n",
		n_types,sizeof(type_rec),n_types*sizeof(type_rec),
		"Type Records");
	printf ("%6d %5d %7d  %s\n",
		n_type_ste,sizeof(type_ste_rec),n_type_ste*sizeof(type_ste_rec),
		"Type_ste Records");
	printf ("%6d %5d %7d  %s\n",
		n_var_ste,sizeof(var_ste_rec),n_var_ste*sizeof(var_ste_rec),
		"Var_ste Records");
	printf ("%6d %5d %7d  %s\n",
		n_tag_ste,sizeof(tag_ste_rec),n_tag_ste*sizeof(tag_ste_rec),
		"Tag_ste Records");
	printf ("%6d %5d %7d  %s\n",
		n_addr_tab,sizeof(addr_tab_rec),n_addr_tab*sizeof(addr_tab_rec),
		"Addr_tab Records");
	printf ("%6d %5d %7d  %s\n",
		n_labels,sizeof(label_rec),n_labels*sizeof(label_rec),
		"Label Records");
}