diff options
Diffstat (limited to 'gas/depend.c')
| -rw-r--r-- | gas/depend.c | 208 |
1 files changed, 0 insertions, 208 deletions
diff --git a/gas/depend.c b/gas/depend.c deleted file mode 100644 index f17c7c8e3a0..00000000000 --- a/gas/depend.c +++ /dev/null @@ -1,208 +0,0 @@ -/* depend.c - Handle dependency tracking. - Copyright (C) 1997, 1998 Free Software Foundation, Inc. - - This file is part of GAS, the GNU Assembler. - - GAS is free software; you can redistribute it and/or modify - it under the terms of the GNU General Public License as published by - the Free Software Foundation; either version 2, or (at your option) - any later version. - - GAS 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 General Public License for more details. - - You should have received a copy of the GNU General Public License - along with GAS; see the file COPYING. If not, write to the Free - Software Foundation, 59 Temple Place - Suite 330, Boston, MA - 02111-1307, USA. */ - -#include "as.h" - -/* The file to write to, or NULL if no dependencies being kept. */ -static char *dep_file = NULL; - -struct dependency -{ - char *file; - struct dependency *next; -}; - -/* All the files we depend on. */ -static struct dependency *dep_chain = NULL; - -/* Current column in output file. */ -static int column = 0; - -static int quote_string_for_make PARAMS ((FILE *, char *)); -static void wrap_output PARAMS ((FILE *, char *, int)); - -/* Number of columns allowable. */ -#define MAX_COLUMNS 72 - - - -/* Start saving dependencies, to be written to FILENAME. If this is - never called, then dependency tracking is simply skipped. */ - -void -start_dependencies (filename) - char *filename; -{ - dep_file = filename; -} - -/* Noticed a new filename, so try to register it. */ - -void -register_dependency (filename) - char *filename; -{ - struct dependency *dep; - - if (dep_file == NULL) - return; - - for (dep = dep_chain; dep != NULL; dep = dep->next) - { - if (! strcmp (filename, dep->file)) - return; - } - - dep = (struct dependency *) xmalloc (sizeof (struct dependency)); - dep->file = xstrdup (filename); - dep->next = dep_chain; - dep_chain = dep; -} - -/* Quote a file name the way `make' wants it, and print it to FILE. - If FILE is NULL, do no printing, but return the length of the - quoted string. - - This code is taken from gcc with only minor changes. */ - -static int -quote_string_for_make (file, src) - FILE *file; - char *src; -{ - char *p = src; - int i = 0; - for (;;) - { - char c = *p++; - switch (c) - { - case '\0': - case ' ': - case '\t': - { - /* GNU make uses a weird quoting scheme for white space. - A space or tab preceded by 2N+1 backslashes represents - N backslashes followed by space; a space or tab - preceded by 2N backslashes represents N backslashes at - the end of a file name; and backslashes in other - contexts should not be doubled. */ - char *q; - for (q = p - 1; src < q && q[-1] == '\\'; q--) - { - if (file) - putc ('\\', file); - i++; - } - } - if (!c) - return i; - if (file) - putc ('\\', file); - i++; - goto ordinary_char; - - case '$': - if (file) - putc (c, file); - i++; - /* Fall through. This can mishandle things like "$(" but - there's no easy fix. */ - default: - ordinary_char: - /* This can mishandle characters in the string "\0\n%*?[\\~"; - exactly which chars are mishandled depends on the `make' version. - We know of no portable solution for this; - even GNU make 3.76.1 doesn't solve the problem entirely. - (Also, '\0' is mishandled due to our calling conventions.) */ - if (file) - putc (c, file); - i++; - break; - } - } -} - -/* Append some output to the file, keeping track of columns and doing - wrapping as necessary. */ - -static void -wrap_output (f, string, spacer) - FILE *f; - char *string; - int spacer; -{ - int len = quote_string_for_make (NULL, string); - - if (len == 0) - return; - - if (column && MAX_COLUMNS - 1 /*spacer*/ - 2 /*` \'*/ < column + len) - { - fprintf (f, " \\\n "); - column = 0; - if (spacer == ' ') - spacer = '\0'; - } - - if (spacer == ' ') - { - putc (spacer, f); - ++column; - } - - quote_string_for_make (f, string); - column += len; - - if (spacer == ':') - { - putc (spacer, f); - ++column; - } -} - -/* Print dependency file. */ - -void -print_dependencies () -{ - FILE *f; - struct dependency *dep; - - if (dep_file == NULL) - return; - - f = fopen (dep_file, "w"); - if (f == NULL) - { - as_warn (_("Can't open `%s' for writing"), dep_file); - return; - } - - column = 0; - wrap_output (f, out_file_name, ':'); - for (dep = dep_chain; dep != NULL; dep = dep->next) - wrap_output (f, dep->file, ' '); - - putc ('\n', f); - - if (fclose (f)) - as_warn (_("Can't close `%s'"), dep_file); -} |