1 /* Output routines for ed-script format.
2
3 Copyright (C) 1988, 1989, 1991, 1992, 1993, 1995, 1998, 2001, 2004
4 Free Software Foundation, Inc.
5
6 This file is part of GNU DIFF.
7
8 GNU DIFF is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2, or (at your option)
11 any later version.
12
13 GNU DIFF is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with this program; see the file COPYING.
20 If not, write to the Free Software Foundation,
21 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
22
23 #include "diff.h"
24
25 static void print_ed_hunk (struct change *);
26 static void print_rcs_hunk (struct change *);
27 static void pr_forward_ed_hunk (struct change *);
28
29 /* Print our script as ed commands. */
30
31 void
print_ed_script(struct change * script)32 print_ed_script (struct change *script)
33 {
34 print_script (script, find_reverse_change, print_ed_hunk);
35 }
36
37 /* Print a hunk of an ed diff */
38
39 static void
print_ed_hunk(struct change * hunk)40 print_ed_hunk (struct change *hunk)
41 {
42 lin f0, l0, f1, l1;
43 enum changes changes;
44
45 #ifdef DEBUG
46 debug_script (hunk);
47 #endif
48
49 /* Determine range of line numbers involved in each file. */
50 changes = analyze_hunk (hunk, &f0, &l0, &f1, &l1);
51 if (!changes)
52 return;
53
54 begin_output ();
55
56 /* Print out the line number header for this hunk */
57 print_number_range (',', &files[0], f0, l0);
58 fprintf (outfile, "%c\n", change_letter[changes]);
59
60 /* Print new/changed lines from second file, if needed */
61 if (changes != OLD)
62 {
63 lin i;
64 for (i = f1; i <= l1; i++)
65 {
66 if (files[1].linbuf[i][0] == '.' && files[1].linbuf[i][1] == '\n')
67 {
68 /* The file's line is just a dot, and it would exit
69 insert mode. Precede the dot with another dot, exit
70 insert mode, remove the extra dot, and then resume
71 insert mode. */
72 fprintf (outfile, "..\n.\ns/.//\na\n");
73 }
74 else
75 print_1_line ("", &files[1].linbuf[i]);
76 }
77
78 fprintf (outfile, ".\n");
79 }
80 }
81
82 /* Print change script in the style of ed commands,
83 but print the changes in the order they appear in the input files,
84 which means that the commands are not truly useful with ed. */
85
86 void
pr_forward_ed_script(struct change * script)87 pr_forward_ed_script (struct change *script)
88 {
89 print_script (script, find_change, pr_forward_ed_hunk);
90 }
91
92 static void
pr_forward_ed_hunk(struct change * hunk)93 pr_forward_ed_hunk (struct change *hunk)
94 {
95 lin i, f0, l0, f1, l1;
96
97 /* Determine range of line numbers involved in each file. */
98 enum changes changes = analyze_hunk (hunk, &f0, &l0, &f1, &l1);
99 if (!changes)
100 return;
101
102 begin_output ();
103
104 fprintf (outfile, "%c", change_letter[changes]);
105 print_number_range (' ', files, f0, l0);
106 fprintf (outfile, "\n");
107
108 /* If deletion only, print just the number range. */
109
110 if (changes == OLD)
111 return;
112
113 /* For insertion (with or without deletion), print the number range
114 and the lines from file 2. */
115
116 for (i = f1; i <= l1; i++)
117 print_1_line ("", &files[1].linbuf[i]);
118
119 fprintf (outfile, ".\n");
120 }
121
122 /* Print in a format somewhat like ed commands
123 except that each insert command states the number of lines it inserts.
124 This format is used for RCS. */
125
126 void
print_rcs_script(struct change * script)127 print_rcs_script (struct change *script)
128 {
129 print_script (script, find_change, print_rcs_hunk);
130 }
131
132 /* Print a hunk of an RCS diff */
133
134 static void
print_rcs_hunk(struct change * hunk)135 print_rcs_hunk (struct change *hunk)
136 {
137 lin i, f0, l0, f1, l1;
138 long int tf0, tl0, tf1, tl1;
139
140 /* Determine range of line numbers involved in each file. */
141 enum changes changes = analyze_hunk (hunk, &f0, &l0, &f1, &l1);
142 if (!changes)
143 return;
144
145 begin_output ();
146
147 translate_range (&files[0], f0, l0, &tf0, &tl0);
148
149 if (changes & OLD)
150 {
151 fprintf (outfile, "d");
152 /* For deletion, print just the starting line number from file 0
153 and the number of lines deleted. */
154 fprintf (outfile, "%ld %ld\n", tf0, tf0 <= tl0 ? tl0 - tf0 + 1 : 1);
155 }
156
157 if (changes & NEW)
158 {
159 fprintf (outfile, "a");
160
161 /* Take last-line-number from file 0 and # lines from file 1. */
162 translate_range (&files[1], f1, l1, &tf1, &tl1);
163 fprintf (outfile, "%ld %ld\n", tl0, tf1 <= tl1 ? tl1 - tf1 + 1 : 1);
164
165 /* Print the inserted lines. */
166 for (i = f1; i <= l1; i++)
167 print_1_line ("", &files[1].linbuf[i]);
168 }
169 }
170