xref: /freebsd/usr.bin/diff/pr.c (revision 6b96bb739548a8b8c2b13bd46234f70a29be12fb)
1  /*-
2   * Copyright (c) 2017 Baptiste Daroussin <bapt@FreeBSD.org>
3   * All rights reserved.
4   *
5   * Redistribution and use in source and binary forms, with or without
6   * modification, are permitted provided that the following conditions
7   * are met:
8   * 1. Redistributions of source code must retain the above copyright
9   *    notice, this list of conditions and the following disclaimer
10   *    in this position and unchanged.
11   * 2. Redistributions in binary form must reproduce the above copyright
12   *    notice, this list of conditions and the following disclaimer in the
13   *    documentation and/or other materials provided with the distribution.
14   *
15   * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
16   * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17   * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18   * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
19   * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20   * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21   * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22   * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23   * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24   * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25   */
26  
27  #include <sys/cdefs.h>
28  __FBSDID("$FreeBSD$");
29  
30  #include <sys/procdesc.h>
31  #include <sys/wait.h>
32  
33  #include <err.h>
34  #include <paths.h>
35  #include <signal.h>
36  #include <stdio.h>
37  #include <stdlib.h>
38  #include <unistd.h>
39  
40  #include "pr.h"
41  #include "diff.h"
42  #include "xmalloc.h"
43  
44  #define _PATH_PR "/usr/bin/pr"
45  
46  struct pr *
47  start_pr(char *file1, char *file2)
48  {
49  	int pfd[2];
50  	int pr_pd;
51  	pid_t pid;
52  	char *header;
53  	struct pr *pr;
54  
55  	pr = xcalloc(1, sizeof(*pr));
56  
57  	xasprintf(&header, "%s %s %s", diffargs, file1, file2);
58  	signal(SIGPIPE, SIG_IGN);
59  	fflush(stdout);
60  	rewind(stdout);
61  	if (pipe(pfd) == -1)
62  		err(2, "pipe");
63  	switch ((pid = pdfork(&pr_pd, PD_CLOEXEC))) {
64  	case -1:
65  		status |= 2;
66  		free(header);
67  		err(2, "No more processes");
68  	case 0:
69  		/* child */
70  		if (pfd[0] != STDIN_FILENO) {
71  			dup2(pfd[0], STDIN_FILENO);
72  			close(pfd[0]);
73  		}
74  		close(pfd[1]);
75  		execl(_PATH_PR, _PATH_PR, "-h", header, (char *)0);
76  		_exit(127);
77  	default:
78  
79  		/* parent */
80  		if (pfd[1] != STDOUT_FILENO) {
81  			pr->ostdout = dup(STDOUT_FILENO);
82  			dup2(pfd[1], STDOUT_FILENO);
83  			close(pfd[1]);
84  			close(pfd[1]);
85  			}
86  			close(pfd[0]);
87  			rewind(stdout);
88  			free(header);
89  			pr->kq = kqueue();
90  			if (pr->kq == -1)
91  				err(2, "kqueue");
92  			pr->e = xmalloc(sizeof(struct kevent));
93  			EV_SET(pr->e, pr_pd, EVFILT_PROCDESC, EV_ADD, NOTE_EXIT, 0,
94  			    NULL);
95  			if (kevent(pr->kq, pr->e, 1, NULL, 0, NULL) == -1)
96  				err(2, "kevent");
97  	}
98  	return (pr);
99  }
100  
101  /* close the pipe to pr and restore stdout */
102  void
103  stop_pr(struct pr *pr)
104  {
105  	int wstatus;
106  
107  	if (pr == NULL)
108  		return;
109  
110  	fflush(stdout);
111  	if (pr->ostdout != STDOUT_FILENO) {
112  		close(STDOUT_FILENO);
113  		dup2(pr->ostdout, STDOUT_FILENO);
114  		close(pr->ostdout);
115  	}
116  	if (kevent(pr->kq, NULL, 0, pr->e, 1, NULL) == -1)
117  		err(2, "kevent");
118  	wstatus = pr->e[0].data;
119  	close(pr->kq);
120  	free(pr);
121  	if (WIFEXITED(wstatus) && WEXITSTATUS(wstatus) != 0)
122  		errx(2, "pr exited abnormally");
123  	else if (WIFSIGNALED(wstatus))
124  		errx(2, "pr killed by signal %d",
125  		    WTERMSIG(wstatus));
126  }
127