Initial commit of OpenSPARC T2 architecture model.
[OpenSPARC-T2-SAM] / obp / tools / fscope / format_tags.c
/*
* ========== Copyright Header Begin ==========================================
*
* Hypervisor Software File: format_tags.c
*
* Copyright (c) 2006 Sun Microsystems, Inc. All Rights Reserved.
*
* - Do no alter or remove copyright notices
*
* - Redistribution and use of this software in source and binary forms, with
* or without modification, are permitted provided that the following
* conditions are met:
*
* - Redistribution of source code must retain the above copyright notice,
* this list of conditions and the following disclaimer.
*
* - Redistribution in binary form must reproduce the above copyright notice,
* this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* Neither the name of Sun Microsystems, Inc. or the names of contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* This software is provided "AS IS," without a warranty of any kind.
* ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND WARRANTIES,
* INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY, FITNESS FOR A
* PARTICULAR PURPOSE OR NON-INFRINGEMENT, ARE HEREBY EXCLUDED. SUN
* MICROSYSTEMS, INC. ("SUN") AND ITS LICENSORS SHALL NOT BE LIABLE FOR
* ANY DAMAGES SUFFERED BY LICENSEE AS A RESULT OF USING, MODIFYING OR
* DISTRIBUTING THIS SOFTWARE OR ITS DERIVATIVES. IN NO EVENT WILL SUN
* OR ITS LICENSORS BE LIABLE FOR ANY LOST REVENUE, PROFIT OR DATA, OR
* FOR DIRECT, INDIRECT, SPECIAL, CONSEQUENTIAL, INCIDENTAL OR PUNITIVE
* DAMAGES, HOWEVER CAUSED AND REGARDLESS OF THE THEORY OF LIABILITY,
* ARISING OUT OF THE USE OF OR INABILITY TO USE THIS SOFTWARE, EVEN IF
* SUN HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
*
* You acknowledge that this software is not designed, licensed or
* intended for use in the design, construction, operation or maintenance of
* any nuclear facility.
*
* ========== Copyright Header End ============================================
*/
/*
* @(#)format_tags.c 1.1 02/05/02
* Copyright 2001-2002 Sun Microsystems, Inc. All Rights Reserved
* Use is subject to license terms.
*/
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include "fscope.h"
typedef struct TAG_T {
char *name;
char *file;
int line;
struct TAG_T *next;
} tag_t;
void
xref_tag_init(extract_t *info)
{
info->private = malloc(128 * sizeof (tag_t));
memset(info->private, 0, 128 * sizeof (tag_t));
}
void
xref_tag_fini(extract_t *info)
{
int i;
tag_t *this_tag, *next;
tag_t **tags = info->private;
for (i = 0; i < 128; i++) {
this_tag = tags[i];
while (this_tag) {
next = this_tag->next;
fprintf(info->outfd, "%s\t%s\t%d\n",
this_tag->name,
this_tag->file,
this_tag->line);
free(this_tag->file);
free(this_tag);
this_tag = next;
}
}
free(info->private);
info->private = NULL;
}
void
xref_tag_format(extract_t *info, xref_t *cref)
{
tag_t **all_tags = info->private;
tag_t *ipt, *new, *prev;
new = malloc(sizeof (tag_t));
new->name = cref->name;
new->file = strdup(expand_filename(info, cref));
new->line = cref->linenum;
new->next = NULL;
ipt = all_tags[(unsigned int)cref->name[0]];
prev = NULL;
while ((ipt != NULL) && (strcmp(new->name, ipt->name) > 0)) {
prev = ipt;
ipt = ipt->next;
}
if (prev == NULL) {
new->next = all_tags[(unsigned int)cref->name[0]];
all_tags[(unsigned int)cref->name[0]] = new;
} else {
new->next = prev->next;
prev->next = new;
}
}
void
xref_etag_format(extract_t *info, xref_t *cref)
{
fprintf(stderr, "etags, not yet implemented, sorry\n");
exit(1);
}