summaryrefslogtreecommitdiff
path: root/include/libfile.h
blob: ea9ed9c8072a920b032730a9d458dfce6151238d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
/* libfile.h: read auxiliary data files.

Copyright (C) 1992 Free Software Foundation, Inc.

This program 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.

This program 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 this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */

#ifndef LIBFILE_H
#define LIBFILE_H

#include "types.h"


/* Open (close) the file `HEAD.SUFFIX' using the library path.  Give a
   fatal error if the file cannot be (has not been) opened.  Only one
   file can be open at a time.  `libfile_start' returns the resulting
   opened FILE structure, although this is commonly ignored by the
   caller, in favor of using `libfile_line' (declared below) to read
   from the file.  */
extern FILE *libfile_start (string head, string suffix);
extern void libfile_close (void);


/* The name (line number) of the currently open library file, or NULL (0).  */
extern string libfilename (void);
extern unsigned libfile_linenumber (void);


/* An abbreviation for common error messages.  */
#define LIBFILE_ERROR1(fmt, e1) \
  FATAL3 ("%s:%u: " fmt, libfilename (), libfile_linenumber (), e1);
#define LIBFILE_ERROR2(fmt, e1, e2) \
  FATAL4 ("%s:%u: " fmt, libfilename (), libfile_linenumber (), e1, e2);

#define LIBFILE_WARN1(fmt, e1) \
  fprintf (stderr, "%s:%u: " fmt "\n", libfilename (), libfile_linenumber (),\
           e1)
#define LIBFILE_WARN2(fmt, e1, e2) \
  fprintf (stderr, "%s:%u: " fmt "\n", libfilename (), libfile_linenumber (),\
           e1, e2)


/* Return the next non-blank non-comment line in the currently open
   library file, or NULL if at EOF.  The terminating newline and any
   trailing comment are also removed.  */
extern string libfile_line (void);

#endif /* not LIBFILE_H */