diff options
| -rw-r--r-- | gmon/bb_exit_func.c | 78 |
1 files changed, 0 insertions, 78 deletions
diff --git a/gmon/bb_exit_func.c b/gmon/bb_exit_func.c index 215f0badab..0607bf0064 100644 --- a/gmon/bb_exit_func.c +++ b/gmon/bb_exit_func.c @@ -76,81 +76,3 @@ DEFUN_VOID(__bb_exit_func) } fclose (fp); } -/* Copyright (C) 1996 Free Software Foundation, Inc. - Contributed by David Mosberger (davidm@cs.arizona.edu). - -This file is part of the GNU C Library. - -The GNU C Library is free software; you can redistribute it and/or -modify it under the terms of the GNU Library General Public License as -published by the Free Software Foundation; either version 2 of the -License, or (at your option) any later version. - -The GNU C Library is distributed in the hope that it will be useful, -but WITHOUT ANY WARRANTY; without even the implied warranty of -MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -Library General Public License for more details. - -You should have received a copy of the GNU Library General Public -License along with the GNU C Library; see the file COPYING.LIB. If -not, write to the Free Software Foundation, Inc., 675 Mass Ave, -Cambridge, MA 02139, USA. */ - -/* __bb_exit_func() dumps all the basic-block statistics linked into - the bb_head chain to .d files. */ - -#include <sys/gmon_out.h> -#include <sys/types.h> - -#include <ansidecl.h> -#include <stdio.h> -#include <strings.h> - -/* structure emitted by -a */ -struct bb { - long zero_word; - const char *filename; - long *counts; - long ncounts; - struct bb *next; - const unsigned long *addresses; -}; - -extern struct bb *__bb_head; /* from gmon.c */ - -#define OUT_NAME "gmon.out" - - -void -DEFUN_VOID(__bb_exit_func) -{ - const int version = GMON_VERSION; - struct gmon_hdr ghdr; - struct bb *ptr; - FILE *fp; - fp = fopen(OUT_NAME, "wb"); - if (!fp) - { - perror(OUT_NAME); - return; - } - bcopy(GMON_MAGIC, &ghdr.cookie[0], 4); - bcopy(&version, &ghdr.version, sizeof(version)); - fwrite(&ghdr, sizeof(ghdr), 1, fp); - - for (ptr = __bb_head; ptr != 0; ptr = ptr->next) { - u_int ncounts = ptr->ncounts; - u_char tag; - u_int i; - - tag = GMON_TAG_BB_COUNT; - fwrite(&tag, sizeof(tag), 1, fp); - fwrite(&ncounts, sizeof(ncounts), 1, fp); - - for (i = 0; i < ncounts; ++i) { - fwrite(&ptr->addresses[i], sizeof(ptr->addresses[0]), 1, fp); - fwrite(&ptr->counts[i], sizeof(ptr->counts[0]), 1, fp); - } - } - fclose (fp); -} |