[hackers] [sbase][PATCH v2] Add patch(1)

From: Mattias Andrée <maandree_AT_kth.se>
Date: Sat, 30 Sep 2017 18:32:38 +0200

Signed-off-by: Mattias Andrée <maandree_AT_kth.se>
---
 Makefile           |    2 +
 README             |    1 +
 TODO               |    1 -
 libutil/asprintf.c |   74 +++
 libutil/getlines.c |   17 +-
 patch.1            |  248 +++++++
 patch.c            | 1850 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 text.h             |    4 +-
 util.h             |    5 +
 9 files changed, 2195 insertions(+), 7 deletions(-)
 create mode 100644 libutil/asprintf.c
 create mode 100644 patch.1
 create mode 100644 patch.c
diff --git a/Makefile b/Makefile
index 1c39fef..014db74 100644
--- a/Makefile
+++ b/Makefile
_AT_@ -45,6 +45,7 @@ LIBUTFSRC =\
 
 LIBUTIL = libutil.a
 LIBUTILSRC =\
+	libutil/asprintf.c\
 	libutil/concat.c\
 	libutil/cp.c\
 	libutil/crypt.c\
_AT_@ -132,6 +133,7 @@ BIN =\
 	nohup\
 	od\
 	paste\
+	patch\
 	pathchk\
 	printenv\
 	printf\
diff --git a/README b/README
index da2e500..6c94f2f 100644
--- a/README
+++ b/README
_AT_@ -59,6 +59,7 @@ The following tools are implemented:
 0#*|o nl              .
 0=*|o nohup           .
 0=*|o od              .
+0=    patch           .
 0#* o pathchk         .
  #*|o paste           .
 0=*|x printenv        .
diff --git a/TODO b/TODO
index 5edb8a3..fe2344e 100644
--- a/TODO
+++ b/TODO
_AT_@ -8,7 +8,6 @@ awk
 bc
 diff
 ed manpage
-patch
 stty
 
 If you are looking for some work to do on sbase, another option is to
diff --git a/libutil/asprintf.c b/libutil/asprintf.c
new file mode 100644
index 0000000..929ed09
--- /dev/null
+++ b/libutil/asprintf.c
_AT_@ -0,0 +1,74 @@
+/* See LICENSE file for copyright and license details. */
+#include <stdarg.h>
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "../util.h"
+
+static int xenvasprintf(int, char **, const char *, va_list);
+
+int
+asprintf(char **strp, const char *fmt, ...)
+{
+	va_list ap;
+	int ret;
+
+	va_start(ap, fmt);
+	ret = xenvasprintf(-1, strp, fmt, ap);
+	va_end(ap);
+
+	return ret;
+}
+
+int
+easprintf(char **strp, const char *fmt, ...)
+{
+	va_list ap;
+	int ret;
+
+	va_start(ap, fmt);
+	ret = xenvasprintf(1, strp, fmt, ap);
+	va_end(ap);
+
+	return ret;
+}
+
+int
+enasprintf(int status, char **strp, const char *fmt, ...)
+{
+	va_list ap;
+	int ret;
+
+	va_start(ap, fmt);
+	ret = xenvasprintf(status, strp, fmt, ap);
+	va_end(ap);
+
+	return ret;
+}
+
+int
+xenvasprintf(int status, char **strp, const char *fmt, va_list ap)
+{
+	int ret;
+	va_list ap2;
+
+	va_copy(ap2, ap);
+	ret = vsnprintf(0, 0, fmt, ap2);
+	va_end(ap2);
+	if (ret < 0) {
+		if (status >= 0)
+			enprintf(status, "vsnprintf:");
+		*strp = 0;
+		return -1;
+	}
+
+	*strp = malloc(ret + 1);
+	if (!*strp) {
+		if (status >= 0)
+			enprintf(status, "malloc:");
+		return -1;
+	}
+
+	vsprintf(*strp, fmt, ap);
+	return ret;
+}
diff --git a/libutil/getlines.c b/libutil/getlines.c
index b912769..9af7684 100644
--- a/libutil/getlines.c
+++ b/libutil/getlines.c
_AT_@ -7,7 +7,7 @@
 #include "../util.h"
 
 void
-getlines(FILE *fp, struct linebuf *b)
+ngetlines(int status, FILE *fp, struct linebuf *b)
 {
 	char *line = NULL;
 	size_t size = 0, linelen = 0;
_AT_@ -16,17 +16,24 @@ getlines(FILE *fp, struct linebuf *b)
 	while ((len = getline(&line, &size, fp)) > 0) {
 		if (++b->nlines > b->capacity) {
 			b->capacity += 512;
-			b->lines = erealloc(b->lines, b->capacity * sizeof(*b->lines));
+			b->lines = enrealloc(status, b->lines, b->capacity * sizeof(*b->lines));
 		}
 		linelen = len;
-		b->lines[b->nlines - 1].data = memcpy(emalloc(linelen + 1), line, linelen + 1);
+		b->lines[b->nlines - 1].data = memcpy(enmalloc(status, linelen + 1), line, linelen + 1);
 		b->lines[b->nlines - 1].len = linelen;
 	}
 	free(line);
-	if (b->lines && b->nlines && linelen && b->lines[b->nlines - 1].data[linelen - 1] != '\n') {
-		b->lines[b->nlines - 1].data = erealloc(b->lines[b->nlines - 1].data, linelen + 2);
+	b->nolf = b->lines && b->nlines && linelen && b->lines[b->nlines - 1].data[linelen - 1] != '\n';
+	if (b->nolf) {
+		b->lines[b->nlines - 1].data = enrealloc(status, b->lines[b->nlines - 1].data, linelen + 2);
 		b->lines[b->nlines - 1].data[linelen] = '\n';
 		b->lines[b->nlines - 1].data[linelen + 1] = '\0';
 		b->lines[b->nlines - 1].len++;
 	}
 }
+
+void
+getlines(FILE *fp, struct linebuf *b)
+{
+	ngetlines(1, fp, b);
+}
diff --git a/patch.1 b/patch.1
new file mode 100644
index 0000000..b8235ab
--- /dev/null
+++ b/patch.1
_AT_@ -0,0 +1,248 @@
+.Dd 2016-03-20
+.Dt PATCH 1
+.Os sbase
+.Sh NAME
+.Nm patch
+.Nd apply patches to files
+.Sh SYNOPSIS
+.Nm
+.Op Fl c | e | n | u
+.Op Fl d Ar dir
+.Op Fl D Ar define
+.Op Fl o Ar outfile
+.Op Fl p Ar num
+.Op Fl r Ar rejectfile
+.Op Fl bflNRU
+.Po
+.Fl i Ar patchfile
+| <
+.Ar patchfile
+.Pc
+.Op Ar file
+.Sh DESCRIPTION
+.Nm
+applies patches to files from difference listings
+produced by
+.Xr diff 1 .
+.Pp
+.Nm
+will skip any garbage unless the
+.Ar patchfile
+consists entirely of garbage.
+Garbage is any data that does not conform to
+the supported difference listing formats.
+.Nm
+supports all difference listing formats
+specified in
+.Xr diff 1p
+except for the
+.Fl f
+flag in
+.Xr diff 1p .
+.Pp
+.Nm
+patch shall figure out which files to patch from the
+mentions of filenames in the patch, unless the files
+are specified explicitly. As an extension to the
+standard, this implementation of
+.Nm
+can determine the filename by looking at the
+\fIdiff\fP-lines that are produced by
+.Xr diff 1
+when comparing directories. However, if the
+.Ar file
+is specified, all patches in the
+.Ar patchfile
+shall be applied to that
+.Ar file .
+.Sh OPTIONS
+.Bl -tag -width Ds
+.It Fl b
+Back up files before the first time that a patch
+is applied to them. The backups will have the
+suffix \fI.orig\fP.
+.It Fl c
+Treat anything that is not conforming to the
+copied context format as garbage.
+.It Fl d Ar dir
+Prepend
+.Ar dir
+to all filenames that appear in the patchfile.
+.It Fl D Ar define
+Mark added lines with the C preprocessor construct
+.Bd -literal -offset left
+    #ifdef \fIdefine\fP
+    ...
+    #endif
+.Ed
+
+Mark removed lines with the C preprocessor construct
+.Bd -literal -offset left
+    #ifndef \fIdefine\fP
+    ...
+    #endif
+.Ed
+
+Mark changed lines with the C preprocessor construct
+.Bd -literal -offset left
+    #ifdef \fIdefine\fP
+    ...
+    #else
+    ...
+    #endif
+.Ed
+
+As an extension to the standard,
+.Ar define
+can be \fI1\fP or \fI0\fP to use
+.Bd -literal -offset left
+    #if 1
+    #if 0
+.Ed
+
+(swap those lines if
+.Ar define
+is \fI0\fP) instead of
+.Bd -literal -offset left
+    #ifdef \fIdefine\fP
+    #ifndef \fIdefine\fP
+.Ed
+
+As another extension to the standard, if
+.Ar define
+begins with an exclamation point (\fB!\fP),
+.Bd -literal -offset left
+    #ifdef \fIdefine\fP
+    #if 1
+.Ed
+
+and
+.Bd -literal -offset left
+    #ifndef \fIdefine\fP
+    #if 0
+.Ed
+
+are swapped.
+
+.Nm
+does not guarantee that a patched C source
+code file will be at least as syntactically
+correct after patching as it was before,
+despite this being implied by the standard.
+The syntactic correctness can be broken
+when edits are made on lines split using line
+continuation, made in comments, or spanning
+CPP conditional directives.
+.It Fl e
+Treat anything that is not conforming to the
+\fIed\fP-script format as garbage.
+.It Fl f
+Don't ask any questions.
+.It Fl i Ar patchfile
+Read the
+.Ar patchfile
+instead of standard output.
+.It Fl l
+Any sequence of whitespace of at least length 1
+in the input file shall match any sequence
+of whitespace of at least length 1 in the
+difference script when testing if lines match.
+Additionally, any whitespace at the beginning of
+a line or at the end of a line is ignored when
+matching lines. The former case is an extension
+of the standard.
+.It Fl n
+Treat anything that is not conforming to the
+normal format as garbage.
+.It Fl N
+Ignore already applied hunks. POSIX specifies
+that already applied patches shall be ignored
+if this flag is used. A hunk is a contiguous
+portion of a patch. A patch is a single
+file-comparison output from
+.Xr diff 1 .
+.It Fl o Ar outfile
+Store resulting files from patches to
+.Ar outfile
+instead of to the patched file itself.
+If the patchfile patches multiple files,
+the results are concatenated. If a patchfile
+patches a file multiple times, intermediary
+results are also stored.
+
+As an extension to the standard, you may use
+non-regular files such as \fI/dev/stdout\fP
+and \fI/dev/null\fP. \fI/dev/null\fP can be
+used to perform a dryrun.
+.It Fl p Ar num
+Remove the first
+.Ar num
+components from filenames that appear in the
+patchfile. Any leading / is regarded as the
+first component. If
+.Ar num
+is 0, the entire filename is used. Without
+this flag only basename is used.
+.It Fl r Ar rejectfile
+Save rejected hunks to
+.Ar rejectfile
+rather than to the \fIfilename.rej\fP where \fIfilename\fP
+is the filename of the file that is being patched. Rejected
+hunks are hunks that cannot be applied.
+
+Unless
+.Fl U
+is used, rejected hunks are stored in copied
+context format. However, the timestamps will
+be omitted.
+.It Fl R
+Try to apply patches reversed before trying
+to apply them in normal direction.
+.It Fl u
+Treat anything that is not conforming to the
+unified context format as garbage.
+.It Fl U
+Store rejected hunks in unified context rather
+than copied context. Copied context is the
+default even for unified context patches.
+.El
+.Sh NOTES
+Files that become empty as a result of a patch
+are not removed.
+.Pp
+Symbolic links are treated as regular files,
+provided that they link to regular files.
+.Pp
+Timestamps that appear in diff headers are not
+applied.
+.Pp
+Encapsulated patches, and patches with CRLF
+line breaks \(em or any other string \(em rather
+than LF line breaks are not supported.
+.Pp
+In this implementation, when the user is prompted,
+the message is printed to \fI/dev/tty\fP, rather
+than \fI/dev/stdout\fP despite POSIX's mandate.
+This is to make it possible to use \fI/dev/stdout\fP
+as the output file.
+.Pp
+Unportable characters in filenames are supported
+by parsing them as C string literals.
+.Pp
+In this implementation, the
+.Fl D
+flag can be used with \fIed\fP-scripts.
+.Sh SEE ALSO
+.Xr diff 1 ,
+.Xr ed 1
+.Sh STANDARDS
+The
+.Nm
+utility is compliant with the
+.St -p1003.1-2013
+specification except for the exceptions noted above.
+.Pp
+The
+.Op Fl fU
+flags are extensions to that specification,
+other extensions are noted above.
diff --git a/patch.c b/patch.c
new file mode 100644
index 0000000..ef6f0e1
--- /dev/null
+++ b/patch.c
_AT_@ -0,0 +1,1850 @@
+/* See LICENSE file for copyright and license details. */
+#include <sys/stat.h>
+#include <ctype.h>
+#include <errno.h>
+#include <fcntl.h>
+#include <stdint.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+
+#include "text.h"
+#include "util.h"
+
+/*
+ * Petty POSIX violations:
+ * -  Rejected hunks are saved without timestamps.
+ * -  Questions are prompted to /dev/tty rather than to /dev/stdout.
+ * -  -N skips applied hunks rather than applied patches.
+ * -  If -l is used leading whitespace is ignored.
+ *    (we interpret that trailing whitespace should be ignored.)
+ * -  Files in /dev/ are not considered as existing files. This is
+ *    checked before -p and -d are applied.
+ * -  SCCS is dead and is therefore not supported.
+ *
+ * I have choosen not to support git diff-files.
+ * CVE-2010-4651 is recognised as user error, not as a security issue.
+ */
+
+#define NO_LF_MARK         "\\ No newline at end of file"
+
+#define PATH(p)            ((p) == stdin_dash ? "/dev/stdin" : (p) == stdout_dash ? "/dev/stdout" : (p))
+#define isnulblank(c)      (!(c) || isblank(c))
+#define issamefile(a, b)   ((a).st_dev == (b).st_dev && (a).st_ino == (b).st_ino)
+#define storefile(d, s)    ((d)->st_dev = (s).st_dev, (d)->st_ino = (s).st_ino)
+#define strstart(h, n)     ((h) && strstr(h, n) == (h))
+#define linestart(h, n)    (strstart((h).data, n))
+#define anychr(cs, c)      ((c) && strchr(cs, c))
+#define containsnul(l)     ((size_t)(strchr((l).data, '\0') - (l).data) < (l).len)
+#define lineeq(l, s)       ((l).len == sizeof(s) - 1 && !memcmp((l).data, s, sizeof(s) - 1))
+#define linecpy2mem(d, s)  (memcpy(d, (s).data, (s).len + 1))
+#define missinglf(l)       ((l).len && (l).data[(l).len - 1] != '\n')
+#define fwriteline(f, l)   (fwrite((l).data, 1, (l).len, f))
+#define enmemdup(f, s, n)  ((n) ? memcpy(enmalloc(f, n), s, n) : NULL)
+
+enum { REJECTED = 1, FAILURE = 2 };
+enum applicability { APPLICABLE, APPLIED, INAPPLICABLE };
+enum format { NORMAL, COPIED, UNIFIED, ED, GARBAGE, EMPTY, GUESS };
+
+struct hunk_content {
+	size_t start;
+	size_t len;
+	struct line *lines;
+};
+
+struct parsed_hunk {
+	struct hunk_content old;
+	struct hunk_content new;
+	char *annot;
+	/* Symbols for `.annot`:
+	 *   ' ' = context
+	 *   '-' = removal
+	 *   '+' = addition
+	 *   '<' = change, removal
+	 *   '>' = change, addition */
+	char *rannot;
+};
+
+struct hunk {
+	struct line *head;
+	struct line *lines;
+	size_t nlines;
+};
+
+struct patch {
+	char *path;
+	enum format format;
+	struct hunk *hunks;
+	size_t nhunks;
+};
+
+struct patchset {
+	struct patch *patches;
+	size_t npatches;
+};
+
+struct line_data {
+	char new;
+	char orig;
+	size_t nold;
+	struct line line;
+	struct line *old;
+};
+
+struct file_data {
+	struct line_data *d;
+	size_t n;
+};
+
+struct patched_file {
+	dev_t st_dev;
+	ino_t st_ino;
+	struct file_data *data;
+};
+
+static int back_up_files = 0;
+static enum format specified_format = GUESS;
+static char *prefix_directory = NULL;
+static int no_questions = 0;
+static int lax_whitespace = 0;
+static int ignore_applied = 0;
+static size_t prefix_strip = SIZE_MAX;
+static int prefer_reversed = 0;
+static enum format rejected_format = COPIED;
+
+static const char *patchfile = NULL;
+static char *rejectfile = NULL;
+static const char *outfile = NULL;
+static char *apply_patches_to = NULL;
+static int rejected = 0;
+static struct patched_file *prevpatch = NULL;
+static size_t prevpatchn = 0;
+static struct patched_file *prevout = NULL;
+static size_t prevoutn = 0;
+static char stdin_dash[] = "-";
+static char stdout_dash[] = "-";
+static char *ifdef = NULL;
+static char *ifndef = NULL;
+
+static void
+usage(void)
+{
+	enprintf(FAILURE, "usage: %s [-c | -e | -n | -u] [-d dir] [-D define] [-o outfile] [-p num] "
+		 "[-r rejectfile] [-bflNRU] (-i patchfile | < patchfile) [file]\n", argv0);
+}
+
+static void
+load_lines(struct file_data *out, const char *path, int skip_lf, int orig)
+{
+	FILE *f;
+	struct linebuf b = EMPTY_LINEBUF;
+	size_t i, n;
+
+	if (!(f = path && path != stdin_dash ? fopen(path, "r") : stdin))
+		enprintf(FAILURE, "fopen %s:", path);
+	ngetlines(FAILURE, f, &b);
+	fshut(f, f == stdin ? "<stdin>" : path);
+
+	out->n = n = b.nlines;
+	out->d = encalloc(FAILURE, n + 1, sizeof(*out->d));
+	for (i = 0; i < n; i++) {
+		out->d[i].line = b.lines[i];
+		out->d[i].orig = orig;
+	}
+	free(b.lines);
+
+	if (b.nolf) {
+		n--;
+		out->d[n].line.data[--(out->d[n].line.len)] = '\0';
+	}
+	while (skip_lf && n--)
+		out->d[n].line.data[--(out->d[n].line.len)] = '\0';
+}
+
+static char *
+ask(const char *instruction)
+{
+	FILE *f;
+	char *answer = NULL;
+	size_t size = 0;
+	ssize_t n;
+
+	if (no_questions)
+		return NULL;
+
+	if (!(f = fopen("/dev/tty", "r+")))
+		enprintf(FAILURE, "fopen /dev/tty:");
+
+	if (fprintf(f, "%s: %s: %s: ", argv0, patchfile ? patchfile : "-", instruction) < 0)
+		enprintf(FAILURE, "printf /dev/tty:");
+	fflush(stdout);
+
+	if ((n = getline(&answer, &size, f)) <= 0) {
+		answer = NULL;
+	} else {
+		n -= (answer[n - 1] == '\n');
+		answer[n] = '\0';
+		if (!*answer) {
+			free(answer);
+			answer = NULL;
+		}
+	}
+
+	fclose(f);
+	return answer;
+}
+
+static char *
+adjust_filename(const char *filename)
+{
+	size_t strips = prefix_strip;
+	const char *p = strchr(filename, '\0');
+	const char *stripped = filename;
+	char *rc;
+
+	if (p == filename || p[-1] == '/')
+		return NULL;
+
+	for (; strips && (p = strchr(stripped, '/')); strips--)
+		for (stripped = p; *stripped == '/'; stripped++);
+	if (strips && prefix_strip != SIZE_MAX)
+		return NULL;
+
+	if (prefix_directory && *stripped != '/')
+		enasprintf(FAILURE, &rc, "%s/%s", prefix_directory, stripped);
+	else
+		rc = enstrdup(FAILURE, stripped);
+
+	return rc;
+}
+
+static int
+file_exists(const char *filename)
+{
+	char *adjusted;
+	int ret;
+
+	if (strstart(filename, "/dev/"))
+		return 0;
+
+	adjusted = adjust_filename(filename);
+	ret = adjusted ? !access(adjusted, F_OK) : 0;
+	free(adjusted);
+	return ret;
+}
+
+static int
+unquote(char *str)
+{
+	int quote = 0, escape = 0, value;
+	size_t r = 0, w = 0, i;
+
+	for (; str[r]; r++) {
+		if (escape) {
+			escape = 0;
+			switch (str[r++]) {
+			case 'a':  str[w++] = '\a';  break;
+			case 'b':  str[w++] = '\b';  break;
+			case 'e':  str[w++] = '\033';  break;
+			case 'f':  str[w++] = '\f';  break;
+			case 'n':  str[w++] = '\n';  break;
+			case 'r':  str[w++] = '\r';  break;
+			case 't':  str[w++] = '\t';  break;
+			case 'v':  str[w++] = '\v';  break;
+			case 'x':
+				for (i = value = 0; i < 2; i++, r++) {
+					if (!isxdigit(str[r]))
+						return -1;
+					value *= 16;
+					value += (str[r] & 15) + 9 * !isdigit(str[r]);
+				}
+				str[w++] = value;
+				break;
+			case '0': case '1': case '2': case '3':
+			case '4': case '5': case '6': case '7': case 'o':
+				r -= str[r - 1] != 'o';
+				for (i = value = 0; i < 3; i++, r++) {
+					if (!anychr("01234567", str[r]))
+						return -1;
+					value = value * 8 + (str[r] & 7);
+				}
+				str[w++] = value;
+				break;
+			default:
+				str[w++] = str[r];
+				break;
+			}
+		} if (str[r] == '\"') {
+			quote ^= 1;
+		} else if (str[r] == '\\') {
+			escape = 1;
+		} else {
+			str[w++] = str[r];
+		}
+	}
+
+	str[w] = '\0';
+	return 0;
+}
+
+static int
+parse_diff_line(char *str, char **old, char **new)
+{
+	/*
+	 * We will just assume that the two last arguments in `str` are sanely
+	 * formatted. All other ways to parse it will surely result in utter madness.
+	 *
+	 * The POSIX standard does not actually require or suggest supporting this,
+	 * but it is required to figure out the filename automatically for some diff
+	 * outputs since diff(1p) does not output the "Index:" string...
+	 */
+
+	char *s = strchr(str, '\0');
+	int ret = 0;
+
+	*new = NULL;
+	if (s == str)
+		return -1;
+
+again:
+	if (*s != '\"') {
+		while (--s != str)
+			if (*s == ' ')
+				goto found;
+	} else {
+		while (--s != str && s - 1 != str)
+			if (s[-1] == ' ' && s[0] == '"')
+				goto found;
+	}
+
+	free(*new);
+	return -1;
+
+found:
+	*s++ = '\0';
+	if (!*new) {
+		*new = enstrdup(FAILURE, s);
+		s--;
+		goto again;
+	} else {
+		*old = enstrdup(FAILURE, s);
+		s = strchr(s, '\0');
+		*s = ' ';
+	}
+
+	ret |= unquote(*old);
+	ret |= unquote(*new);
+
+	if (ret) {
+		free(*old);
+		free(*new);
+	}
+
+	return ret;
+}
+
+static void
+ask_for_filename(struct patchset *patchset)
+{
+	size_t i;
+	char *answer;
+	int missing = 0;
+
+	for (i = 0; i < patchset->npatches; i++) {
+		if (!patchset->patches[i].path) {
+			missing = 1;
+			break;
+		}
+	}
+
+	if (!missing)
+		return;
+
+	if (!(answer = ask("please enter name of file to patch")))
+		exit(FAILURE);
+
+	/* Two assumptions are made here. (1) if there are multiple
+	 * patches to unnamed files, they are all to the same file,
+	 * (with the specifications for -o to justify this assumption)
+	 * and (2) no developer is going to free the filenames. */
+
+	if (access(answer, F_OK)) {
+		free(answer);
+		enprintf(FAILURE, "selected file does not exist.\n");
+	}
+
+	for (i = 0; i < patchset->npatches; i++)
+		if (!patchset->patches[i].path)
+			patchset->patches[i].path = answer;
+}
+
+static int
+ask_for_reverse(void)
+{
+	char *answer = ask(prefer_reversed ?
+	                   "unreversed patch detected, ignore -R? [n]" :
+	                   "reversed or previously applied patch detected, assume -R? [n]");
+	return answer && strcasecmp(answer, "n") && strcasecmp(answer, "no");
+}
+
+static void
+reverse_hunk(struct parsed_hunk *hunk)
+{
+	struct hunk_content cont;
+	char *annot;
+	cont = hunk->old, hunk->old = hunk->new, hunk->new = cont;
+	annot = hunk->annot, hunk->annot = hunk->rannot, hunk->rannot = annot;
+}
+
+static struct file_data *
+get_last_patch(const char *path)
+{
+	struct stat attr;
+	struct file_data *data;
+	size_t i;
+
+	if (!outfile && !ifdef) {
+		data = enmalloc(FAILURE, sizeof(*data));
+		load_lines(data, path, 0, 0);
+		return data;
+	}
+
+	if (stat(PATH(path), &attr))
+		enprintf(FAILURE, "stat %s:", path);
+
+	for (i = 0; i < prevpatchn; i++) {
+		if (issamefile(prevpatch[i], attr)) {
+			if (!prevpatch[i].data) {
+				prevpatch[i].data = enmalloc(FAILURE, sizeof(*prevpatch->data));
+				data = prevpatch[i].data;
+				goto load_data;
+			}
+			return prevpatch[i].data;
+		}
+	}
+
+	prevpatch = enrealloc(FAILURE, prevpatch, (prevpatchn + 1) * sizeof(*prevpatch));
+	storefile(prevpatch + prevpatchn, attr);
+	prevpatch[prevpatchn++].data = data = enmalloc(FAILURE, sizeof(*prevpatch->data));
+
+load_data:
+	load_lines(data, path, 0, 1);
+	return data;
+}
+
+static int
+is_first_patch(const char *path)
+{
+	struct stat attr;
+	size_t i;
+
+	if (stat(PATH(path), &attr))
+		enprintf(FAILURE, "stat %s:", path);
+
+	for (i = 0; i < prevpatchn; i++)
+		if (issamefile(prevpatch[i], attr))
+			return 0;
+
+	prevpatch = enrealloc(FAILURE, prevpatch, (prevpatchn + 1) * sizeof(*prevpatch));
+	storefile(prevpatch + prevpatchn, attr);
+	prevpatch[prevpatchn].data = NULL;
+	prevpatchn++;
+
+	return 1;
+}
+
+static const char *
+get_fopen_mode(const char *path)
+{
+	int iteration = 0, fd;
+	struct stat attr;
+	struct stat attr_stdout;
+	size_t i;
+
+	if (!path)
+		return "w";
+	if (path == stdout_dash)
+		return "a";
+	if (!stat(path, &attr)) {
+		 if (stat("/dev/stdout", &attr_stdout))
+			enprintf(FAILURE, "stat /dev/stdout:");
+		 if (issamefile(attr, attr_stdout))
+			return "a";
+	}
+
+start_over:
+	iteration++;
+
+	if (stat(path, &attr)) {
+		if (errno == ENOENT && iteration == 1) {
+			if ((fd = open(path, O_CREAT | O_WRONLY, 0666)) < 0)
+				enprintf(FAILURE, "open %s:", path);
+			close(fd);
+			goto start_over;
+		} else {
+			enprintf(FAILURE, "stat %s:", path);
+		}
+	}
+
+	for (i = 0; i < prevoutn; i++)
+		if (issamefile(prevout[i], attr))
+			return "a";
+
+	prevout = enrealloc(FAILURE, prevout, (prevoutn + 1) * sizeof(*prevout));
+	storefile(prevout + prevoutn, attr);
+	prevout[prevoutn].data = NULL;
+	prevoutn++;
+
+	return "w";
+}
+
+static enum format
+guess_format(struct line *lines)
+{
+	char *str = lines[0].data;
+	size_t commas = 0;
+
+	if (!str)            return EMPTY;
+	if (*str == '*')     return COPIED;
+	if (*str == '-')     return UNIFIED;
+	if (!isdigit(*str))  return GARBAGE;
+
+	while (isdigit(*str) || *str == ',')
+		commas += *str++ == ',';
+
+	if (commas > 2 || !anychr("acdi", *str))
+		return GARBAGE;
+
+	if (isdigit(str[1]))               return NORMAL;
+	if (strchr("ai", *str) && commas)  return GARBAGE;
+	if (!str[1] && commas < 2)         return ED;
+
+	return GARBAGE;
+}
+
+static char *
+get_filename_from_context_header(char *line)
+{
+	char *end, old_end, *rc;
+	int quote = 0, escape = 0;
+
+	for (line += 4; isblank(*line); line++);
+
+	for (end = line; *end; end++) {
+		if (escape || *end == '\\')
+			escape ^= 1;
+		else if (*end == '"')
+			quote ^= 1;
+		else if (!quote && isblank(*end))
+			break;
+	}
+
+	old_end = *end, *end = '\0';
+	rc = enstrdup(FAILURE, line);
+	*end = old_end;
+
+	return unquote(rc) ? NULL : rc;
+}
+
+static int
+parse_context_header(struct patch *patch, struct line *lines, const char *old_mark, const char *new_mark)
+{
+	char *candidate, *adjusted;
+	int i, found = !!apply_patches_to;
+	const char *marks[] = {old_mark, new_mark};
+
+	for (i = 0; i < 2; i++, lines++) {
+		if (!lines->data ||
+		    containsnul(*lines) ||
+		    !strstart(lines->data, marks[i]) ||
+		    !isblank(lines->data[strlen(marks[i])]) ||
+		    !(candidate = get_filename_from_context_header(lines->data)))
+			return -1;
+		if (!found &&
+		    file_exists(candidate) &&
+		    (adjusted = adjust_filename(candidate))) {
+			free(patch->path);
+			patch->path = adjusted;
+			found = 1;
+		}
+		free(candidate);
+	}
+
+	return 0;
+}
+
+static char *
+parse_range(char *str, size_t *first, size_t *last, int *have_last)
+{
+	errno = 0;
+	*first = strtoul(str, &str, 10);
+	if (errno)
+		return NULL;
+	*last = 1;
+	if (have_last)
+		*have_last = *str == ',';
+	if (*str == ',') {
+		errno = 0;
+		*last = strtoul(str + 1, &str, 10);
+		if (errno)
+			return NULL;
+	}
+	return str;
+}
+
+static size_t
+parse_patch_normal(struct patch *patch, struct line *lines)
+{
+	struct line *lines_orig = lines;
+	char *p, action;
+	size_t n, a_first, a_last = 0, b_first, b_last = 0, added, deleted;
+	int have_a_last, have_b_last;
+	struct hunk hunk;
+
+	patch->nhunks = 0;
+	patch->hunks = NULL;
+
+	while (guess_format(lines) == NORMAL) {
+		added = deleted = 0;
+
+		hunk.head = lines;
+		if (!(p = parse_range(lines++->data, &a_first, &a_last, &have_a_last)) ||
+		    (action = *p++, !anychr("acd", action)) ||
+		    !(p = parse_range(p, &b_first, &b_last, &have_b_last)) ||
+		    p != hunk.head->data + hunk.head->len ||
+		    !(hunk.lines = lines)->data ||
+		    (have_a_last && a_first > a_last) ||
+		    (have_b_last && b_first > b_last))
+			goto out;
+
+		if (have_a_last) {
+			for (n = a_last - a_first + 1; n--; lines++, deleted++)
+				if (!linestart(*lines, "< "))
+					goto out;
+		} else {
+			if (linestart(*lines, "> "))   goto old_done;
+			if (lineeq(*lines, "---"))     goto check_delimited;
+			if (!linestart(*lines, "< "))  goto out;
+			lines++, deleted++;
+		}
+
+		if (!lines->data || !(lines += *lines->data == '\\')->data)
+			goto new_done;
+
+	check_delimited:
+		if (action == 'c' && !lineeq(*lines, "---"))
+			goto out;
+		lines += action == 'c';
+
+	old_done:
+		if (have_b_last) {
+			for (n = b_last - b_first + 1; n--; lines++, added++)
+				if (!linestart(*lines, "> "))
+					goto out;
+			if (lines->data && *lines->data == '\\')
+				lines++;
+		} else if (linestart(*lines, "> ")) {
+			added++;
+			if ((++lines)->data && *lines->data == '\\')
+				lines++;
+		}
+
+	new_done:
+		if ((action == 'd' && (added || !deleted)) ||
+		    (action == 'a' && (!added || deleted)) ||
+		    (action == 'c' && (!added || !deleted)))
+			goto out;
+
+		hunk.nlines = (size_t)(lines - hunk.lines);
+
+		patch->hunks = enrealloc(FAILURE, patch->hunks, (patch->nhunks + 1) * sizeof(hunk));
+		patch->hunks[patch->nhunks++] = hunk;
+	}
+
+	return lines - lines_orig;
+
+out:
+	if (patch->nhunks) {
+		lines = patch->hunks[patch->nhunks - 1].lines;
+		lines += patch->hunks[patch->nhunks - 1].nlines;
+		return lines - lines_orig;
+	}
+	return 0;
+}
+
+static size_t
+parse_patch_copied(struct patch *patch, struct line *lines)
+{
+	struct line *lines_orig = lines;
+	char *p;
+	size_t n, first = 0, last = 0;
+	int have_last;
+	struct hunk hunk;
+
+	patch->nhunks = 0;
+	patch->hunks = NULL;
+
+	if (parse_context_header(patch, lines, "***", "---"))
+		return 0;
+	lines += 2;
+
+#define LINE  (lines->data)
+
+	while (linestart(*lines, "***************")) {
+		if (!lineeq(*lines, "***************") && !isnulblank(LINE[sizeof("***************") - 1]))
+			break;
+
+		hunk.head = lines++;
+		hunk.lines = lines;
+
+		if (!linestart(*lines, "*** ") ||
+		    !(p = parse_range(LINE + 4, &first, &last, &have_last)) ||
+		    strcmp(p, " ****") || (size_t)(p + 5 - LINE) < lines->len ||
+		    !(++lines)->data)
+			goto out;
+
+		if (linestart(*lines, "--- "))
+			goto old_done;
+		if (have_last) {
+			for (n = last - first + 1; n--; lines++)
+				if (!LINE || !anychr(" -!", *LINE) || LINE[1] != ' ')
+					goto out;
+		} else {
+			if (!anychr(" -!", *LINE))
+				goto out;
+			lines++;
+		}
+
+	old_done:
+		if (!LINE)
+			goto out;
+		if (*LINE == '\\')
+			lines++;
+
+		if (!linestart(*lines, "--- ") ||
+		    !(p = parse_range(LINE + 4, &first, &last, &have_last)) ||
+		    strcmp(p, " ----") || (size_t)(p + 5 - LINE) < lines->len)
+			goto out;
+
+		if (!(++lines)->data || !anychr(" +!", *LINE) || LINE[1] != ' ')
+			goto new_done;
+		if (have_last) {
+			for (n = last - first + 1; n--; lines++)
+				if (!LINE || !anychr(" +!", *LINE) || LINE[1] != ' ')
+					goto out;
+			if (LINE && *LINE == '\\')
+				lines++;
+		} else if (anychr(" +!", *LINE) && LINE[1] == ' ') {
+			if ((++lines)->data && *LINE == '\\')
+				lines++;
+		}
+
+	new_done:
+		hunk.nlines = (size_t)(lines - hunk.lines);
+
+		patch->hunks = enrealloc(FAILURE, patch->hunks, (patch->nhunks + 1) * sizeof(hunk));
+		patch->hunks[patch->nhunks++] = hunk;
+	}
+
+#undef LINE
+
+	return lines - lines_orig;
+
+out:
+	if (patch->nhunks) {
+		lines = patch->hunks[patch->nhunks - 1].lines;
+		lines += patch->hunks[patch->nhunks - 1].nlines;
+		return lines - lines_orig;
+	}
+	return 0;
+}
+
+static size_t
+parse_patch_unified(struct patch *patch, struct line *lines)
+{
+	struct line *lines_orig = lines;
+	char *p;
+	size_t a_count, b_count, unused;
+	struct hunk hunk;
+
+	(void) unused;
+
+	patch->nhunks = 0;
+	patch->hunks = NULL;
+
+	if (parse_context_header(patch, lines, "---", "+++"))
+		return 0;
+	lines += 2;
+
+	while (linestart(*lines, "_AT_@ -")) {
+		hunk.head = lines++;
+		hunk.lines = lines;
+
+		if (!(p = parse_range(hunk.head->data + 4, &unused, &a_count, NULL)) ||
+		    !strstart(p, " +") ||
+		    !(p = parse_range(p + 2, &unused, &b_count, NULL)) ||
+		    !strstart(p, " _AT_@") || !isnulblank(p[3]))
+			goto out;
+
+		for (; a_count || b_count; lines++) {
+			if (!lines->data)
+				goto out;
+			else if (*lines->data == '\\')
+				continue;
+			else if (a_count && *lines->data == '-')
+				a_count--;
+			else if (b_count && *lines->data == '+')
+				b_count--;
+			else if (a_count && b_count && *lines->data == ' ')
+				a_count--, b_count--;
+			else
+				goto out;
+		}
+		if (lines->data && *lines->data == '\\')
+			lines++;
+
+		hunk.nlines = (size_t)(lines - hunk.lines);
+
+		patch->hunks = enrealloc(FAILURE, patch->hunks, (patch->nhunks + 1) * sizeof(hunk));
+		patch->hunks[patch->nhunks++] = hunk;
+	}
+
+	return lines - lines_orig;
+
+out:
+	if (patch->nhunks) {
+		lines = patch->hunks[patch->nhunks - 1].lines;
+		lines += patch->hunks[patch->nhunks - 1].nlines;
+		return lines - lines_orig;
+	}
+	return 0;
+}
+
+static size_t
+parse_patch_ed(struct patch *patch, struct line *lines)
+{
+	struct line *lines_orig = lines, *lines_last = lines, *last_addition;
+
+	while (guess_format(lines) == ED && !containsnul(*lines)) {
+		if (lines->data[lines->len - 1] == 'd') {
+			lines_last = ++lines;
+			continue;
+		}
+		last_addition = NULL;
+	again:
+		while ((++lines)->data && !lineeq(*lines, "."))
+			last_addition = lines;
+		if (!lines++->data)
+			break;
+		if (lines->data && *lines->data == 's') {
+			if ((!lineeq(*lines, "s/.//")  && !lineeq(*lines, "s/\\.//") &&
+			     !lineeq(*lines, "s/^.//") && !lineeq(*lines, "s/^\\.//")) ||
+			    !last_addition || !last_addition->len || last_addition->data[0] != '.') {
+				/* This is just so parse_ed_script does not have to be overkill. */
+				weprintf("suspicious line in ed-script, treating hunk as garbage: ");
+				fwriteline(stderr, *lines);
+				fprintf(stderr, "\n");
+				break;
+			}
+			if ((++lines)->data && lineeq(*lines, "a")) {
+				lines++;
+				goto again;
+			}
+		}
+		lines_last = lines;
+	}
+
+	if (lines_last == lines_orig)
+		return 0;
+
+	patch->nhunks = 1;
+	patch->hunks = enmalloc(FAILURE, sizeof(*(patch->hunks)));
+	patch->hunks->head = NULL;
+	patch->hunks->lines = lines_orig;
+	patch->hunks->nlines = (size_t)(lines_last - lines_orig);
+
+	return patch->hunks->nlines;
+}
+
+static size_t
+parse_patch(struct patch *patch, struct line *lines)
+{
+	switch (patch->format) {
+	case NORMAL:   return parse_patch_normal(patch, lines);
+	case COPIED:   return parse_patch_copied(patch, lines);
+	case UNIFIED:  return parse_patch_unified(patch, lines);
+	case ED:       return parse_patch_ed(patch, lines);
+	default:
+		abort();
+		return 0;
+	}
+}
+
+static void
+parse_patchfile(struct patchset *ps, struct line *lines)
+{
+	int only_garbage = 1;
+	size_t i, n, old_garbage, garbage_since_last_patch = 0;
+	enum format format;
+	char *diff_line;
+	char *index_line;
+	char *index_line_dup;
+	struct patch *patch;
+	char *oldfile, *newfile;
+
+	memset(ps, 0, sizeof(*ps));
+
+	if (!lines->data) {
+		/* Other implementations accept empty files, probably
+		 * because diff(1p) can produce empty patchfiles. */
+		enprintf(0, "%s: patchfile is empty, accepted.\n", patchfile ? patchfile : "-");
+	}
+
+	for (; lines->data; lines++) {
+		format = guess_format(lines);
+		if (format == GARBAGE ||
+		    (specified_format != GUESS && format != specified_format)) {
+			garbage_since_last_patch++;
+			continue;
+		}
+
+		diff_line = index_line = NULL;
+		for (i = 1; i <= garbage_since_last_patch; i++) {
+			if (!diff_line && linestart(lines[-i], "diff ") && !containsnul(lines[-i]))
+				diff_line = lines[-i].data;
+			if (!index_line && linestart(lines[-i], "Index:") && !containsnul(lines[-i]))
+				index_line = lines[-i].data;
+		}
+		old_garbage = garbage_since_last_patch;
+		garbage_since_last_patch = 0;
+
+		ps->patches = enrealloc(FAILURE, ps->patches, (ps->npatches + 1) * sizeof(*patch));
+		patch = ps->patches + ps->npatches++;
+		memset(patch, 0, sizeof(*patch));
+
+		patch->path = apply_patches_to;
+
+		if (!patch->path && diff_line &&
+		    !parse_diff_line(diff_line, &oldfile, &newfile)) {
+			if (file_exists(oldfile))
+				patch->path = adjust_filename(oldfile);
+			else if (file_exists(newfile))
+				patch->path = adjust_filename(newfile);
+			free(oldfile);
+			free(newfile);
+		}
+		if (!patch->path && index_line) {
+			index_line += sizeof("Index:") - 1;
+			if (!isblank(*index_line))
+				goto skip_index_line;
+			while (isblank(*index_line))
+				index_line++;
+			index_line_dup = enstrdup(FAILURE, index_line);
+			if (unquote(index_line_dup))
+				goto skip_index_line;
+			if (file_exists(index_line_dup))
+				patch->path = adjust_filename(index_line_dup);
+			free(index_line_dup);
+		}
+
+	skip_index_line:
+		patch->format = format;
+		n = parse_patch(patch, lines);
+		if (!n) {
+			garbage_since_last_patch = old_garbage + 1;
+			ps->npatches--;
+		} else {
+			lines += n;
+			lines--;
+			only_garbage = 0;
+		}
+
+		if (prefer_reversed && format == ED)
+			enprintf(FAILURE, "-R cannot be used with ed scripts.\n");
+	}
+
+	if (only_garbage)
+		enprintf(FAILURE, "%s: patchfile contains only garbage.\n", patchfile ? patchfile : "-");
+}
+
+static void
+save_file_cpp(FILE *f, struct file_data *file)
+{
+	size_t i, j, n;
+	char annot = ' ';
+
+	for (i = 0; i <= file->n; i++) {
+		if ((n = file->d[i].nold)) { /* file->d[file->n].nold is always 0 (set at allocation) */
+			fprintf(f, "%s\n", annot == '+' ? "#else" : ifndef);
+			for (j = 0; j < n; j++) {
+				fwriteline(f, file->d[i].old[j]);
+				if (missinglf(file->d[i].old[j]))
+					fprintf(f, "\n");
+			}
+			annot = '-';
+		}
+
+		if (i == file->n)
+			break;
+
+		if (annot == '-')
+			fprintf(f, "%s\n", file->d[i].new ? "#else" : "#endif");
+		else if (annot == ' ' && file->d[i].new)
+			fprintf(f, "%s\n", ifdef);
+		else if (annot == '+' && !file->d[i].new)
+			fprintf(f, "#endif\n");
+		fwriteline(f, file->d[i].line);
+		if ((i + 1 < file->n || file->d[i].new) && missinglf(file->d[i].line))
+			fprintf(f, "\n");
+		annot = file->d[i].new ? '+' : ' ';
+	}
+	if (annot != ' ')
+		fprintf(f, "#endif\n");
+}
+
+static void
+save_file(FILE *f, struct file_data *file)
+{
+	size_t i;
+	for (i = 0; i < file->n; i++) {
+		fwriteline(f, file->d[i].line);
+		if (i + 1 < file->n && missinglf(file->d[i].line))
+			fprintf(f, "\n");
+	}
+}
+
+static void
+save_rejected_line(FILE *f, int annot, int copied, struct line *line)
+{
+	if (copied) {
+		if (strchr("<>", annot))
+			fprintf(f, "! ");
+		else
+			fprintf(f, "%c ", annot);
+	} else {
+		if (annot == '<')
+			fprintf(f, "-");
+		else if (annot == '>')
+			fprintf(f, "+");
+		else
+			fprintf(f, "%c", annot);
+	}
+	fwriteline(f, *line);
+	if (line->len && line->data[line->len - 1] != '\n')
+		fprintf(f, "\n%s\n", NO_LF_MARK);
+}
+
+static void
+save_rejected_hunk_copied(FILE *f, struct parsed_hunk *hunk, int with_patch_header)
+{
+	size_t i, j, a, b;
+	int a_annots = 0, b_annots = 0;
+
+	if (with_patch_header)
+		fprintf(f, "*** /dev/null\n--- /dev/null\n");
+	fprintf(f, "***************\n");
+
+	if (hunk->old.len > 1)
+		fprintf(f, "*** %zu,%zu ****\n", hunk->old.start, hunk->old.start + hunk->old.len - 1);
+	else
+		fprintf(f, "*** %zu ****\n", hunk->old.start);
+
+	for (a = b = j = 0; a < hunk->old.len || b < hunk->new.len; j++) {
+		switch (hunk->annot[j]) {
+		case '<':
+		case '-':
+			a_annots = 1;
+			a++;
+			break;
+		case '>':
+		case '+':
+			b_annots = 1;
+			b++;
+			break;
+		default:
+			a++;
+			b++;
+			break;
+		}
+	}
+
+	for (i = j = 0; a_annots && i < hunk->old.len; i++) {
+		for (; strchr(">+", hunk->annot[j]); j++);
+		save_rejected_line(f, hunk->annot[j++], 1, hunk->old.lines + i);
+	}
+
+	if (hunk->new.len > 1)
+		fprintf(f, "--- %zu,%zu ----\n", hunk->new.start, hunk->new.start + hunk->new.len - 1);
+	else
+		fprintf(f, "--- %zu ----\n", hunk->new.start);
+
+	for (i = j = 0; b_annots && i < hunk->new.len; i++) {
+		for (; strchr("<-", hunk->annot[j]); j++);
+		save_rejected_line(f, hunk->annot[j++], 1, hunk->new.lines + i);
+	}
+}
+
+static void
+save_rejected_hunk_unified(FILE *f, struct parsed_hunk *hunk, int with_patch_header)
+{
+	size_t i = 0, a = 0, b = 0;
+	char annot;
+	struct line *line;
+
+	if (with_patch_header)
+		fprintf(f, "--- /dev/null\n+++ /dev/null\n");
+
+	fprintf(f, "_AT_@ -%zu", hunk->old.start);
+	if (hunk->old.len != 1)
+		fprintf(f, ",%zu", hunk->old.len);
+	fprintf(f, " +%zu", hunk->new.start);
+	if (hunk->new.len != 1)
+		fprintf(f, ",%zu", hunk->new.len);
+	fprintf(f, " _AT_@\n");
+
+	for (; a < hunk->old.len || b < hunk->new.len; i++) {
+		annot = hunk->annot[i];
+		if (strchr("<-", annot))
+			line = hunk->old.lines + a++;
+		else if (strchr(">+", annot))
+			line = hunk->new.lines + b++;
+		else
+			line = hunk->old.lines + a++, b++;
+		save_rejected_line(f, annot, 0, line);
+	}
+}
+
+static void
+save_rejected_hunk(struct parsed_hunk *hunk, const char *path, int with_patch_header)
+{
+	FILE *f;
+
+	if (!(f = fopen(PATH(path), get_fopen_mode(path))))
+		enprintf(FAILURE, "fopen %s:", path);
+
+	if (rejected_format == UNIFIED)
+		save_rejected_hunk_unified(f, hunk, with_patch_header);
+	else
+		save_rejected_hunk_copied(f, hunk, with_patch_header);
+
+	enfshut(FAILURE, f, path);
+}
+
+static void
+subline(struct line *dest, struct line *src, ssize_t off)
+{
+	dest->data = src->data + off;
+	dest->len = src->len - off;
+}
+
+static void
+parse_hunk_normal(struct hunk *hunk, struct parsed_hunk *parsed)
+{
+	struct hunk_content *old = &parsed->old, *new = &parsed->new;
+	size_t i, j;
+	char *p, action;
+
+	old->start = strtoul(hunk->head->data, &p, 10);
+	old->len = 0;
+	p += strspn(p, ",0123456789");
+	action = *p++;
+	new->start = strtoul(p, &p, 10);
+	new->len = 0;
+	free(hunk->head->data);
+
+	old->lines = enmalloc(FAILURE, hunk->nlines * sizeof(*old->lines));
+	new->lines = enmalloc(FAILURE, hunk->nlines * sizeof(*new->lines));
+	parsed->annot = enmalloc(FAILURE, hunk->nlines + 1);
+
+	for (i = j = 0; i < hunk->nlines; i++) {
+		if (hunk->lines[i].data[0] == '<') {
+			subline(old->lines + old->len++, hunk->lines + i, 2);
+			parsed->annot[j++] = action == 'c' ? '<' : '-';
+		}
+		else if (hunk->lines[i].data[0] == '>') {
+			subline(new->lines + new->len++, hunk->lines + i, 2);
+			parsed->annot[j++] = action == 'c' ? '>' : '+';
+		}
+	}
+	parsed->annot[j] = '\0';
+}
+
+static void
+parse_hunk_copied(struct hunk *hunk, struct parsed_hunk *parsed)
+{
+	struct hunk_content *old = &parsed->old, *new = &parsed->new;
+	size_t i = 0, a, b;
+	char *p;
+
+	free(hunk->head->data);
+
+	old->lines = enmalloc(FAILURE, hunk->nlines * sizeof(*old->lines));
+	new->lines = enmalloc(FAILURE, hunk->nlines * sizeof(*new->lines));
+	parsed->annot = enmalloc(FAILURE, hunk->nlines + 1);
+
+	p = hunk->lines[i++].data + 4;
+	old->start = strtoul(p, &p, 10);
+	old->len = 0;
+
+	for (; hunk->lines[i].data[1] == ' '; i++)
+		subline(old->lines + old->len++, hunk->lines + i, 2);
+
+	p = hunk->lines[i++].data + 4;
+	new->start = strtoul(p, &p, 10);
+	new->len = 0;
+
+	if (old->len) { /* The else-clause include `old->len++` */
+		for (; i < hunk->nlines; i++)
+			subline(new->lines + new->len++, hunk->lines + i, 2);
+	} else {
+		for (; i < hunk->nlines; i++) {
+			subline(new->lines + new->len++, hunk->lines + i, 2);
+			if (hunk->lines[i].data[0] != '+')
+				subline(old->lines + old->len++, hunk->lines + i, 2);
+		}
+	}
+
+	/* old->lines[].data is offset (due to the previous section) by two characters,
+	 * so that old->lines[].data starts at the first column in the diff:ed file rather
+	 * than in the content of the patchfile. */
+	if (!new->len)
+		for (i = 0; i < old->len; i++)
+			if (old->lines[i].data[-2] != '-')
+				new->lines[new->len++] = old->lines[i];
+
+#define OLDLINE  a < old->len && old->lines[a].data[-2]
+#define NEWLINE  b < new->len && new->lines[b].data[-2]
+
+	for (i = a = b = 0; a < old->len || b < new->len;) {
+		if (OLDLINE == '-')  parsed->annot[i++] = '-', a++;
+		if (NEWLINE == '+')  parsed->annot[i++] = '+', b++;
+		while (OLDLINE == ' ' && NEWLINE == ' ')
+			parsed->annot[i++] = ' ', a++, b++;
+		while (OLDLINE == '!')  parsed->annot[i++] = '<', a++;
+		while (NEWLINE == '!')  parsed->annot[i++] = '>', b++;
+	}
+	parsed->annot[i] = '\0';
+}
+
+static void
+parse_hunk_unified(struct hunk *hunk, struct parsed_hunk *parsed)
+{
+	struct hunk_content *old = &parsed->old, *new = &parsed->new;
+	size_t i, j;
+	char *p, *q;
+
+	p = strchr(hunk->head->data, '-');
+	old->start = strtoul(p + 1, &p, 10);
+	old->len = *p == ',' ? strtoul(p + 1, &p, 10) : 1;
+	p = strchr(p, '+');
+	new->start = strtoul(p + 1, &p, 10);
+	new->len = *p == ',' ? strtoul(p + 1, &p, 10) : 1;
+	free(hunk->head->data);
+
+	old->lines = enmalloc(FAILURE, old->len * sizeof(*old->lines));
+	new->lines = enmalloc(FAILURE, new->len * sizeof(*new->lines));
+	parsed->annot = enmalloc(FAILURE, hunk->nlines + 1);
+
+	for (i = j = 0; i < hunk->nlines; i++)
+		if (hunk->lines[i].data[0] != '+')
+			subline(old->lines + j++, hunk->lines + i, 1);
+
+	for (i = j = 0; i < hunk->nlines; i++)
+		if (hunk->lines[i].data[0] != '-')
+			subline(new->lines + j++, hunk->lines + i, 1);
+
+	for (i = 0; i < hunk->nlines; i++)
+		parsed->annot[i] = hunk->lines[i].data[0];
+	parsed->annot[i] = '\0';
+	for (;;) {
+		p = strstr(parsed->annot, "-+");
+		q = strstr(parsed->annot, "+-");
+		if (!p && !q)
+			break;
+		if (!p || (q && p > q))
+			p = q;
+		for (; p != parsed->annot && strchr("-+", p[-1]); p--);
+		for (; *p == '-' || *p == '+'; p++)
+			*p = "<>"[*p == '+'];
+	}
+}
+
+static void
+parse_hunk(struct hunk *hunk, enum format format, struct parsed_hunk *parsed)
+{
+	size_t i, n;
+
+	for (i = 0; i < hunk->nlines; i++) {
+		if (hunk->lines[i].data[0] != '\\') {
+			hunk->lines[i].data[hunk->lines[i].len++] = '\n';
+			continue;
+		}
+		hunk->nlines--;
+		memmove(hunk->lines + i, hunk->lines + i + 1, (hunk->nlines - i) * sizeof(*hunk->lines));
+		i--;
+		hunk->lines[i].data[hunk->lines[i].len--] = '\0';
+	}
+
+	switch (format) {
+	case NORMAL:   parse_hunk_normal(hunk, parsed);   break;
+	case COPIED:   parse_hunk_copied(hunk, parsed);   break;
+	case UNIFIED:  parse_hunk_unified(hunk, parsed);  break;
+	default:       abort();
+	}
+
+	n = strlen(parsed->annot);
+	parsed->rannot = enmalloc(FAILURE, n + 1);
+	for (i = 0; i < n; i++) {
+		switch (parsed->annot[i]) {
+		case '-':  parsed->rannot[i] = '+';  break;
+		case '+':  parsed->rannot[i] = '-';  break;
+		case '<':  parsed->rannot[i] = '>';  break;
+		case '>':  parsed->rannot[i] = '<';  break;
+		default:   parsed->rannot[i] = ' ';  break;
+		}
+	}
+	parsed->rannot[n] = '\0';
+}
+
+static int
+linecmpw(struct line *al, struct line *bl)
+{
+	const unsigned char *a = (const unsigned char *)(al->data);
+	const unsigned char *b = (const unsigned char *)(bl->data);
+	const unsigned char *ae = a + al->len, *be = b + bl->len;
+
+	for (; a != ae && isspace(*a); a++);
+	for (; b != be && isspace(*b); b++);
+
+	while (a != ae && b != be) {
+		if (*a != *b)
+			return *a > *b ? 1 : -1;
+		a++, b++;
+		if ((a == ae || isspace(*a)) && (b == be || isspace(*b))) {
+			for (; a != ae && isspace(*a); a++);
+			for (; b != be && isspace(*b); b++);
+		}
+	}
+
+	return a == ae ? b == be ? 0 : -1 : 1;
+}
+
+static int
+does_hunk_match(struct file_data *file, size_t position, struct hunk_content *hunk)
+{
+	size_t pos, n = hunk->len;
+	while (n)
+		if (pos = position + --n, pos >= file->n ||
+		    (lax_whitespace ? linecmpw : linecmp)(&file->d[pos].line, hunk->lines + n))
+			return 0;
+	return 1;
+}
+
+static void
+linedup(struct line *restrict dest, const struct line *restrict src)
+{
+	dest->data = enmalloc(FAILURE, src->len + 1);
+	linecpy2mem(dest->data, *src);
+	dest->len = src->len;
+}
+
+static void
+apply_contiguous_edit(struct file_data *f, size_t ln, size_t rm, size_t ad, struct line *newlines, const char *annot)
+{
+#define LN  (f->d[ln])
+
+	size_t rm_end, ad_end, n, a, b, start, extra, i, j, k;
+	struct line_data *orig;
+
+	rm_end = ln + rm;
+	ad_end = ln + ad;
+	n = f->n;
+
+	orig = enmemdup(FAILURE, f->d + ln, (rm + 1) * sizeof(*f->d));
+	memmove(f->d + ln, f->d + rm_end, (n - rm_end + 1) * sizeof(*f->d));
+
+	f->n -= rm;
+	if (f->n == 1 && !*(f->d->line.data))
+		f->n--, n--;
+	f->n += ad;
+
+	f->d = enrealloc(FAILURE, f->d, (f->n + 1) * sizeof(*f->d));
+	memmove(f->d + ad_end, f->d + ln, (n - rm_end + 1) * sizeof(*f->d));
+	memset(f->d + ln, 0, ad * sizeof(*f->d));
+
+	for (i = a = b = 0; a < rm || b < ad; ln++) {
+		for (start = i, extra = 0; a < rm && strchr("<-", annot[i]); a++, i++)
+			extra += orig[a].nold;
+		if (start < i) {
+			n = i - start + extra;
+			a -= i - start;
+			LN.old = enrealloc(FAILURE, LN.old, (LN.nold + n) * sizeof(*f->d->old));
+			memmove(LN.old + n, LN.old, LN.nold * sizeof(*f->d->old));
+			for (j = extra = 0; j < n - extra; a++) {
+				for (k = 0; k < orig[a].nold; k++)
+					linedup(LN.old + j++, orig[a].old + k);
+				if (orig[a].orig)
+					linedup(LN.old + j++, &orig[a].line);
+				else
+					extra++;
+			}
+			memmove(LN.old + n - extra, LN.old + n, LN.nold * sizeof(*f->d->old));
+			LN.nold += n - extra;
+		}
+		if (b == ad)
+			continue;
+		if (annot[i++] == ' ') {
+			LN.line = orig[a].line;
+			LN.orig = orig[a].orig;
+			LN.new = orig[a].new;
+			a++, b++;
+		} else {
+			LN.new = 1;
+			linedup(&LN.line, newlines + b++);
+		}
+	}
+
+	free(orig);
+}
+
+static void
+do_apply_hunk(struct file_data *f, struct parsed_hunk *h, size_t ln)
+{
+	size_t i, ad, rm, start, adoff = 0;
+	for (i = 0; h->annot[i];) {
+		start = i;
+		for (ad = rm = 0; h->annot[i] && h->annot[i] != ' '; i++) {
+			ad += !!strchr(">+", h->annot[i]);
+			rm += !!strchr("<-", h->annot[i]);
+		}
+		if (i == start) {
+			adoff++;
+			i++;
+		} else {
+			apply_contiguous_edit(f, ln + adoff, rm, ad, h->new.lines + adoff, h->annot + start);
+			adoff += ad;
+		}
+	}
+}
+
+static enum applicability
+apply_hunk_try(struct file_data *file, struct parsed_hunk *fhunk, ssize_t offset,
+               int reverse, int dryrun, ssize_t *fuzz)
+{
+	struct parsed_hunk hunk;
+	ssize_t pos, dist = 0;
+	int finbounds, binbounds;
+
+	hunk = *fhunk;
+	if (reverse)
+		reverse_hunk(&hunk);
+
+	hunk.old.start -= !!hunk.old.len;
+	hunk.new.start -= !!hunk.new.len;
+
+	pos = (ssize_t)(hunk.old.start) + offset;
+	if (pos < 0)
+		pos = 0;
+	if ((size_t)pos > file->n)
+		pos = file->n;
+	for (dist = 0;; dist++) {
+		finbounds = pos + dist < file->n;
+		binbounds = pos - dist >= 0;
+		if (finbounds && does_hunk_match(file, pos + dist, &hunk.old)) {
+			pos += *fuzz = +dist;
+			goto found;
+		} else if (binbounds && does_hunk_match(file, pos - dist, &hunk.old)) {
+			pos += *fuzz = -dist;
+			goto found;
+		} else if (!finbounds && !binbounds) {
+			break;
+		}
+	}
+
+	pos = (ssize_t)(hunk.new.start) + offset;
+	for (dist = 0;; dist++) {
+		finbounds = pos + dist < file->n;
+		binbounds = pos - dist >= 0;
+		if ((finbounds && does_hunk_match(file, pos + (*fuzz = +dist), &hunk.new)) ||
+		    (binbounds && does_hunk_match(file, pos + (*fuzz = -dist), &hunk.new)))
+			return APPLIED;
+		else if (!finbounds && !binbounds)
+			break;
+	}
+
+	return INAPPLICABLE;
+
+found:
+	if (!dryrun)
+		do_apply_hunk(file, &hunk, pos);
+	return APPLICABLE;
+}
+
+static enum applicability
+apply_hunk(struct file_data *file, struct parsed_hunk *hunk, ssize_t offset, ssize_t *fuzz, int forward)
+{
+	static int know_direction = 0;
+	int rev = forward ? 0 : prefer_reversed;
+	enum applicability fstatus, rstatus;
+
+	if (forward || know_direction) {
+		if ((fstatus = rstatus = apply_hunk_try(file, hunk, offset, rev, 0, fuzz)) != APPLICABLE)
+			goto rejected;
+	} else if ((fstatus = apply_hunk_try(file, hunk, offset, prefer_reversed, 0, fuzz)) == APPLICABLE) {
+		know_direction = 1;
+	} else if ((rstatus = apply_hunk_try(file, hunk, offset, !prefer_reversed, 1, fuzz)) == APPLICABLE) {
+		know_direction = 1;
+		if (!ask_for_reverse())
+			goto rejected;
+		apply_hunk_try(file, hunk, offset, !prefer_reversed, 0, fuzz);
+		prefer_reversed ^= 1;
+	} else {
+		goto rejected;
+	}
+
+	if (prefer_reversed)
+		reverse_hunk(hunk);
+	return APPLICABLE;
+
+rejected:
+	if (prefer_reversed)
+		reverse_hunk(hunk);
+	return (ignore_applied && fstatus == APPLIED && rstatus == fstatus) ? APPLIED : INAPPLICABLE;
+}
+
+static int
+parse_ed_script(struct patch *patch, struct file_data *file)
+{
+	/* Not relying on ed(1p) lets us implement -D for
+	 * ed-scripts too without diff(1p):ing afterwards.
+	 * This is not significantly more complex than
+	 * relying on ed(1p) anyways. */
+
+	struct hunk temp, *hunk, *ed = patch->hunks;
+	struct line *line;
+	size_t i, j, start, last, count, added, add;
+	ssize_t offset = 0;
+	int have_last;
+	char *p, *q;
+
+	patch->format = UNIFIED;
+	patch->nhunks = 0;
+	patch->hunks = 0;
+
+	for (i = 0; i < ed->nlines;) {
+		patch->nhunks++;
+		patch->hunks = enrealloc(FAILURE, patch->hunks, patch->nhunks * sizeof(*patch->hunks));
+		hunk = patch->hunks + patch->nhunks - 1;
+		p = parse_range(ed->lines[i++].data, &start, &last, &have_last);
+		if (!have_last)
+			last = start;
+		if (last < start)
+			return -1;
+		count = last - start + 1;
+		memset(hunk, 0, sizeof(*hunk));
+		added = 0;
+
+		switch (*p) {
+		case 'c':
+		case 'd':
+			if (start + count > file->n + 1)
+				return -1;
+			hunk->lines = enmalloc(FAILURE, count * sizeof(*hunk->lines));
+			hunk->nlines = count;
+			for (j = 0; j < count; j++) {
+				line = hunk->lines + j;
+				line->len = 1 + file->d[start + j - 1].line.len;
+				line->data = enmalloc(FAILURE, line->len + 2);
+				line->data[0] = '-';
+				line->data[line->len + 1] = '\0';
+				linecpy2mem(line->data + 1, file->d[start + j - 1].line);
+				if (line->data[line->len - 1] == '\n')
+					line->data[--(line->len)] = '\0';
+			}
+			if (*p == 'c')
+				goto list_addition;
+			break;
+		case 'a':
+		case 'i':
+			count = 0;
+		list_addition:
+			for (add = 0; !lineeq(ed->lines[i + add], "."); add++);
+			hunk->lines = enrealloc(FAILURE, hunk->lines,
+			                        (hunk->nlines + add) * sizeof(*hunk->lines));
+			for (j = 0; j < add; j++) {
+				line = hunk->lines + hunk->nlines + j;
+				line->len = 1 + ed->lines[i + j].len;
+				line->data = enmalloc(FAILURE, line->len + 2);
+				line->data[0] = '+';
+				line->data[line->len + 1] = '\0';
+				linecpy2mem(line->data + 1, ed->lines[i + j]);
+			}
+			i += add + 1;
+			hunk->nlines += add;
+			added += add;
+			if (i < ed->nlines && ed->lines[i].data[0] == 's') {
+				line = hunk->lines + hunk->nlines - 1;
+				memmove(line->data + 1, line->data + 2, line->len-- - 1);
+				i++;
+			}
+			if (i < ed->nlines && lineeq(ed->lines[i], "a")) {
+				i++;
+				goto list_addition;
+			}
+			if (*p == 'i' && start)
+				start--;
+			break;
+		default:
+			abort();
+		}
+
+		hunk->head = enmalloc(FAILURE, sizeof(*hunk->head));
+		hunk->head->len = enasprintf(FAILURE, &hunk->head->data, "_AT_@ -%zu,%zu +%zu,%zu @@",
+		                             start, count, SIZE_MAX, added);
+	}
+
+	for (i = 0; i < ed->nlines; i++)
+		free(ed->lines[i].data);
+	free(ed);
+
+	for (i = 0, j = patch->nhunks - 1; i < j; i++, j--) {
+		temp = patch->hunks[i];
+		patch->hunks[i] = patch->hunks[j];
+		patch->hunks[j] = temp;
+	}
+
+	for (i = 0; i < patch->nhunks; i++) {
+		hunk = patch->hunks + i;
+		start = strtoul(hunk->head->data + 4, &p, 10);
+		count = strtoul(p + 1, &p, 10);
+		p = strchr(q = p + 2, ',') + 1;
+		added = strtoul(p, NULL, 10);
+		q += sprintf(q, "%zu", start + offset - !added + !count);
+		*q++ = ',';
+		memmove(q, p, strlen(p) + 1);
+		offset -= count;
+		offset += added;
+		hunk->head->len = strlen(hunk->head->data);
+	}
+
+	return 0;
+}
+
+static const char *
+fuzzstr(ssize_t fuzz)
+{
+	static char buf[sizeof(" with downward fuzz ") + 3 * sizeof(unsigned long long int)];
+	if (!fuzz)
+		return "";
+	sprintf(buf, " with %sward fuzz %llu",
+	        fuzz < 0 ? "up" : "down", (unsigned long long int)llabs(fuzz));
+	return buf;
+}
+
+static void
+apply_patch(struct patch *patch)
+{
+	struct file_data *file;
+	struct parsed_hunk hunk;
+	char *rejfile, *origfile;
+	const char *path = outfile ? outfile : patch->path;
+	int firstrej = 1, edscript = patch->format == ED;
+	ssize_t offset = 0, fuzz;
+	size_t i;
+	FILE *f = NULL;
+
+	if (!rejectfile)
+		enasprintf(FAILURE, &rejfile, "%s.rej", path);
+	else
+		rejfile = rejectfile;
+
+	if (back_up_files && file_exists(path) && is_first_patch(path)) {
+		enasprintf(FAILURE, &origfile, "%s.orig", path);
+		if (!(f = fopen(PATH(origfile), "w")))
+			enprintf(FAILURE, "fopen %s:", origfile);
+	}
+
+	file = get_last_patch(patch->path);
+
+	if (edscript && parse_ed_script(patch, file))
+		enprintf(FAILURE, "ed-script for %s corrupt or out of date, aborting.\n", patch->path);
+
+	if (f) {
+		save_file(f, file);
+		enfshut(FAILURE, f, origfile);
+		free(origfile);
+	}
+
+	for (i = 0; i < patch->nhunks; i++) {
+		parse_hunk(patch->hunks + i, patch->format, &hunk);
+		switch (apply_hunk(file, &hunk, offset, &fuzz, edscript)) {
+		case APPLIED:
+			weprintf("hunk number %zu of %zu for %s has already been applied%s, skipping.\n",
+			         i + 1, patch->nhunks, patch->path, fuzzstr(fuzz));
+			break;
+		case INAPPLICABLE:
+			save_rejected_hunk(&hunk, rejfile, firstrej);
+			weprintf("hunk number %zu of %zu for %s has been rejected and saved to %s.\n",
+			         i + 1, patch->nhunks, patch->path, rejfile);
+			firstrej = 0;
+			rejected = 1;
+			break;
+		default:
+			if (fuzz)
+				weprintf("hunk number %zu of %zu for %s succeeded%s.\n",
+				         i + 1, patch->nhunks, patch->path, fuzzstr(fuzz));
+			offset += hunk.new.len;
+			offset -= hunk.old.len;
+			break;
+		}
+		while (patch->hunks[i].nlines--)
+			free(patch->hunks[i].lines[patch->hunks[i].nlines].data);
+		free(hunk.new.lines);
+		free(hunk.old.lines);
+		free(hunk.annot);
+		free(hunk.rannot);
+	}
+	free(patch->hunks);
+	if (!rejectfile)
+		free(rejfile);
+
+	if (!(f = fopen(PATH(path), get_fopen_mode(outfile))))
+		enprintf(FAILURE, "fopen %s:", path);
+	(ifdef ? save_file_cpp : save_file)(f, file);
+	enfshut(FAILURE, f, path);
+
+	if (!outfile && !ifdef) {
+		for (i = 0; i < file->n; i++)
+			free(file->d[i].line.data);
+		free(file->d);
+		free(file);
+	}
+}
+
+static void
+apply_patchset(struct patchset *ps)
+{
+	size_t i = 0;
+	for (i = 0; i < ps->npatches; i++)
+		apply_patch(ps->patches + i);
+	free(ps->patches);
+}
+
+static struct line *
+get_lines(struct file_data *file)
+{
+	size_t n = file->n + 1;
+	struct line *lines = enmalloc(FAILURE, n * sizeof(*lines));
+	while (n--)
+		lines[n] = file->d[n].line;
+	return lines;
+}
+
+int
+main(int argc, char *argv[])
+{
+	struct patchset patchset;
+	struct file_data patchfile_data;
+	char *p, *Dflag = NULL;
+
+	ARGBEGIN {
+	case 'b':
+		back_up_files = 1;
+		break;
+	case 'c':
+		specified_format = COPIED;
+		break;
+	case 'd':
+		prefix_directory = EARGF(usage());
+		break;
+	case 'D':
+		if (Dflag)
+			usage();
+		Dflag = EARGF(usage());
+		break;
+	case 'e':
+		specified_format = ED;
+		break;
+	case 'f':
+		no_questions = 1;
+		break;
+	case 'i':
+		if (patchfile)
+			usage();
+		patchfile = EARGF(usage());
+		if (!strcmp(patchfile, "-"))
+			patchfile = stdin_dash;
+		break;
+	case 'l':
+		lax_whitespace = 1;
+		break;
+	case 'n':
+		specified_format = NORMAL;
+		break;
+	case 'N':
+		ignore_applied = 1;
+		break;
+	case 'o':
+		if (outfile)
+			usage();
+		outfile = EARGF(usage());
+		if (!strcmp(outfile, "-"))
+			outfile = stdout_dash;
+		break;
+	case 'p':
+		errno = 0;
+		prefix_strip = strtoul(EARGF(usage()), &p, 10);
+		if (errno || *p)
+			usage();
+		break;
+	case 'r':
+		if (rejectfile)
+			usage();
+		rejectfile = EARGF(usage());
+		if (!strcmp(rejectfile, "-"))
+			rejectfile = stdout_dash;
+		break;
+	case 'R':
+		prefer_reversed = 1;
+		break;
+	case 'u':
+		specified_format = UNIFIED;
+		break;
+	case 'U':
+		rejected_format = UNIFIED;
+		break;
+	default:
+		usage();
+	} ARGEND;
+
+	if (argc > 1)
+		usage();
+	if (argc > 0) {
+		apply_patches_to = *argv;
+		if (!strcmp(apply_patches_to, "-"))
+			apply_patches_to = stdin_dash;
+	}
+	if (!rejectfile && outfile && !strcmp(outfile, "/dev/null"))
+		rejectfile = "/dev/null";
+
+	if (Dflag) {
+		p = Dflag + (*Dflag == '!');
+		if (!strcmp(p, "0") || !strcmp(p, "1")) {
+			enasprintf(FAILURE, &ifdef, "#if %s", p);
+			enasprintf(FAILURE, &ifndef, "#if %i", 1 - (*p - '0'));
+		} else {
+			enasprintf(FAILURE, &ifdef, "#ifdef %s", p);
+			enasprintf(FAILURE, &ifndef, "#ifndef %s", p);
+		}
+		if (*Dflag == '!')
+			p = ifdef, ifdef = ifndef, ifndef = p;
+	}
+
+	load_lines(&patchfile_data, patchfile, 1, 0);
+	parse_patchfile(&patchset, get_lines(&patchfile_data));
+	ask_for_filename(&patchset);
+	apply_patchset(&patchset);
+
+	return rejected ? REJECTED : 0;
+}
diff --git a/text.h b/text.h
index 9858592..2145c58 100644
--- a/text.h
+++ b/text.h
_AT_@ -9,8 +9,10 @@ struct linebuf {
 	struct line *lines;
 	size_t nlines;
 	size_t capacity;
+	int nolf;
 };
-#define EMPTY_LINEBUF {NULL, 0, 0,}
+#define EMPTY_LINEBUF {NULL, 0, 0, 0}
 void getlines(FILE *, struct linebuf *);
+void ngetlines(int, FILE *, struct linebuf *);
 
 int linecmp(struct line *, struct line *);
diff --git a/util.h b/util.h
index 1f3cd0c..c62fb67 100644
--- a/util.h
+++ b/util.h
_AT_@ -21,6 +21,11 @@
 
 extern char *argv0;
 
+#undef asprintf
+int asprintf(char **, const char *, ...);
+int easprintf(char **, const char *, ...);
+int enasprintf(int, char **, const char *, ...);
+
 void *ecalloc(size_t, size_t);
 void *emalloc(size_t);
 void *erealloc(void *, size_t);
-- 
2.11.1
Received on Sat Sep 30 2017 - 18:32:38 CEST

This archive was generated by hypermail 2.3.0 : Sat Sep 30 2017 - 18:36:22 CEST