File: misc.c

package info (click to toggle)
dctrl-tools 2.24-3
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, buster, sid
  • size: 10,840 kB
  • sloc: ansic: 3,802; sh: 228; makefile: 13
file content (71 lines) | stat: -rw-r--r-- 1,837 bytes parent folder | download | duplicates (4)
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
60
61
62
63
64
65
66
67
68
69
70
71
/*  dctrl-tools - Debian control file inspection tools
    Copyright © 2004, 2008 Antti-Juhani Kaijanaho

    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 of the License, 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.,
    51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */

#include <errno.h>
#include <stdio.h>
#include <unistd.h>
#include "misc.h"
#include "msg.h"

int to_stdout (const char * fname)
{
	FILE * f;
	FILE * t = stdout;
	bool pipe = false;
	int c;
	int rv = 1;

	if (isatty(STDOUT_FILENO)) {
		char * cmd = getenv("PAGER");
		if (cmd == 0) cmd = "/usr/bin/pager";
		if (do_msg(L_INFORMATIONAL)) {
			fprintf(stderr, _("%s: using `%s' as pager\n"),
				get_progname(), cmd);
		}
		// popen does not set errno if memory allocation fails
		errno = ENOMEM;
		FILE * p = popen(cmd, "w");
		if (p != 0) {
			t = p;
			pipe = true;
		} else if (do_msg(L_IMPORTANT)) {
			fprintf(stderr, _("%s: popen failed for %s: %s\n"),
				get_progname(), cmd, strerror(errno));
		}
	}

	f = fopen (fname, "r");
	if (f == 0) {
		message(L_FATAL, COPYING, "%s", strerror (errno));
		return 0;
	}

	while ( ( c = getc (f)) != EOF) putc(c, t);

	if (ferror (f)) {
		message(L_FATAL, COPYING, "%s", strerror(errno));
		rv = 0;
	}

	fclose (f);

	if (pipe) pclose(t);

	return rv;
}