Add gnetlist:get-input-files scheme function.
[geda-gaf/peter-b.git] / gnetlist / src / globals.c
blobe24f5491f825c51d24554d49b17d9e4387033fa1
1 /* gEDA - GPL Electronic Design Automation
2 * gnetlist - gEDA Netlist
3 * Copyright (C) 1998-2010 Ales Hvezda
4 * Copyright (C) 1998-2010 gEDA Contributors (see ChangeLog for details)
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21 #include <config.h>
23 #include <stdio.h>
25 #include <libgeda/libgeda.h>
27 #include "../include/globals.h"
28 #include "../include/prototype.h"
30 #ifdef HAVE_LIBDMALLOC
31 #include <dmalloc.h>
32 #endif
34 char *rc_filename = NULL;
36 int logfile_fd=-1;
37 int logging_dest=LOG_WINDOW;
39 /* netlist specific variables */
40 NETLIST *netlist_head=NULL;
41 NETLIST *graphical_netlist_head=NULL; /* Special objects with
42 graphical=1 attribute */
43 char *guile_proc=NULL;
46 /* command line arguments */
47 int list_backends=FALSE;
48 int verbose_mode=FALSE;
49 int interactive_mode=FALSE;
50 int quiet_mode=FALSE;
52 /* what kind of netlist are we generating? see define.h for #defs */
53 int netlist_mode=gEDA;
54 char *output_filename=NULL;
56 /* scheme expression to evaluate before loading of rc files */
57 SCM pre_rc_list = SCM_EOL;
59 /* scheme expression to evaluate before loading of the backend */
60 SCM pre_backend_list = SCM_EOL;
62 /* scheme expression to evaluate after loading of the backend but
63 * before the execution of the backend procedure */
64 SCM post_backend_list = SCM_EOL;
66 /* List of input filenames */
67 GSList *input_files;
69 /* Parameters passed to the backend from the command line */
70 GSList *backend_params = NULL;