OLD | NEW |
| (Empty) |
1 /*- | |
2 * Copyright 2003-2005 Colin Percival | |
3 * All rights reserved | |
4 * | |
5 * Redistribution and use in source and binary forms, with or without | |
6 * modification, are permitted providing 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 * 2. Redistributions in binary form must reproduce the above copyright | |
11 * notice, this list of conditions and the following disclaimer in the | |
12 * documentation and/or other materials provided with the distribution. | |
13 * | |
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR | |
15 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED | |
16 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY | |
18 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | |
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | |
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | |
22 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING | |
23 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | |
24 * POSSIBILITY OF SUCH DAMAGE. | |
25 */ | |
26 | |
27 #if 0 | |
28 __FBSDID("$FreeBSD: src/usr.bin/bsdiff/bspatch/bspatch.c,v 1.1 2005/08/06 01:59:
06 cperciva Exp $"); | |
29 #endif | |
30 | |
31 #include <bzlib.h> | |
32 #include <stdlib.h> | |
33 #include <stdio.h> | |
34 #include <string.h> | |
35 #include <err.h> | |
36 #include <unistd.h> | |
37 #include <fcntl.h> | |
38 | |
39 static off_t offtin(u_char *buf) | |
40 { | |
41 off_t y; | |
42 | |
43 y=buf[7]&0x7F; | |
44 y=y*256;y+=buf[6]; | |
45 y=y*256;y+=buf[5]; | |
46 y=y*256;y+=buf[4]; | |
47 y=y*256;y+=buf[3]; | |
48 y=y*256;y+=buf[2]; | |
49 y=y*256;y+=buf[1]; | |
50 y=y*256;y+=buf[0]; | |
51 | |
52 if(buf[7]&0x80) y=-y; | |
53 | |
54 return y; | |
55 } | |
56 | |
57 int main(int argc,char * argv[]) | |
58 { | |
59 FILE * f, * cpf, * dpf, * epf; | |
60 BZFILE * cpfbz2, * dpfbz2, * epfbz2; | |
61 int cbz2err, dbz2err, ebz2err; | |
62 int fd; | |
63 ssize_t oldsize,newsize; | |
64 ssize_t bzctrllen,bzdatalen; | |
65 u_char header[32],buf[8]; | |
66 u_char *old, *new; | |
67 off_t oldpos,newpos; | |
68 off_t ctrl[3]; | |
69 off_t lenread; | |
70 off_t i; | |
71 | |
72 if(argc!=4) errx(1,"usage: %s oldfile newfile patchfile\n",argv[0]); | |
73 | |
74 /* Open patch file */ | |
75 if ((f = fopen(argv[3], "r")) == NULL) | |
76 err(1, "fopen(%s)", argv[3]); | |
77 | |
78 /* | |
79 File format: | |
80 0 8 "BSDIFF40" | |
81 8 8 X | |
82 16 8 Y | |
83 24 8 sizeof(newfile) | |
84 32 X bzip2(control block) | |
85 32+X Y bzip2(diff block) | |
86 32+X+Y ??? bzip2(extra block) | |
87 with control block a set of triples (x,y,z) meaning "add x bytes | |
88 from oldfile to x bytes from the diff block; copy y bytes from the | |
89 extra block; seek forwards in oldfile by z bytes". | |
90 */ | |
91 | |
92 /* Read header */ | |
93 if (fread(header, 1, 32, f) < 32) { | |
94 if (feof(f)) | |
95 errx(1, "Corrupt patch\n"); | |
96 err(1, "fread(%s)", argv[3]); | |
97 } | |
98 | |
99 /* Check for appropriate magic */ | |
100 if (memcmp(header, "BSDIFF40", 8) != 0) | |
101 errx(1, "Corrupt patch\n"); | |
102 | |
103 /* Read lengths from header */ | |
104 bzctrllen=offtin(header+8); | |
105 bzdatalen=offtin(header+16); | |
106 newsize=offtin(header+24); | |
107 if((bzctrllen<0) || (bzdatalen<0) || (newsize<0)) | |
108 errx(1,"Corrupt patch\n"); | |
109 | |
110 /* Close patch file and re-open it via libbzip2 at the right places */ | |
111 if (fclose(f)) | |
112 err(1, "fclose(%s)", argv[3]); | |
113 if ((cpf = fopen(argv[3], "r")) == NULL) | |
114 err(1, "fopen(%s)", argv[3]); | |
115 if (fseeko(cpf, 32, SEEK_SET)) | |
116 err(1, "fseeko(%s, %lld)", argv[3], | |
117 (long long)32); | |
118 if ((cpfbz2 = BZ2_bzReadOpen(&cbz2err, cpf, 0, 0, NULL, 0)) == NULL) | |
119 errx(1, "BZ2_bzReadOpen, bz2err = %d", cbz2err); | |
120 if ((dpf = fopen(argv[3], "r")) == NULL) | |
121 err(1, "fopen(%s)", argv[3]); | |
122 if (fseeko(dpf, 32 + bzctrllen, SEEK_SET)) | |
123 err(1, "fseeko(%s, %lld)", argv[3], | |
124 (long long)(32 + bzctrllen)); | |
125 if ((dpfbz2 = BZ2_bzReadOpen(&dbz2err, dpf, 0, 0, NULL, 0)) == NULL) | |
126 errx(1, "BZ2_bzReadOpen, bz2err = %d", dbz2err); | |
127 if ((epf = fopen(argv[3], "r")) == NULL) | |
128 err(1, "fopen(%s)", argv[3]); | |
129 if (fseeko(epf, 32 + bzctrllen + bzdatalen, SEEK_SET)) | |
130 err(1, "fseeko(%s, %lld)", argv[3], | |
131 (long long)(32 + bzctrllen + bzdatalen)); | |
132 if ((epfbz2 = BZ2_bzReadOpen(&ebz2err, epf, 0, 0, NULL, 0)) == NULL) | |
133 errx(1, "BZ2_bzReadOpen, bz2err = %d", ebz2err); | |
134 | |
135 if(((fd=open(argv[1],O_RDONLY,0))<0) || | |
136 ((oldsize=lseek(fd,0,SEEK_END))==-1) || | |
137 ((old=malloc(oldsize+1))==NULL) || | |
138 (lseek(fd,0,SEEK_SET)!=0) || | |
139 (read(fd,old,oldsize)!=oldsize) || | |
140 (close(fd)==-1)) err(1,"%s",argv[1]); | |
141 if((new=malloc(newsize+1))==NULL) err(1,NULL); | |
142 | |
143 oldpos=0;newpos=0; | |
144 while(newpos<newsize) { | |
145 /* Read control data */ | |
146 for(i=0;i<=2;i++) { | |
147 lenread = BZ2_bzRead(&cbz2err, cpfbz2, buf, 8); | |
148 if ((lenread < 8) || ((cbz2err != BZ_OK) && | |
149 (cbz2err != BZ_STREAM_END))) | |
150 errx(1, "Corrupt patch\n"); | |
151 ctrl[i]=offtin(buf); | |
152 }; | |
153 | |
154 /* Sanity-check */ | |
155 if(newpos+ctrl[0]>newsize) | |
156 errx(1,"Corrupt patch\n"); | |
157 | |
158 /* Read diff string */ | |
159 lenread = BZ2_bzRead(&dbz2err, dpfbz2, new + newpos, ctrl[0]); | |
160 if ((lenread < ctrl[0]) || | |
161 ((dbz2err != BZ_OK) && (dbz2err != BZ_STREAM_END))) | |
162 errx(1, "Corrupt patch\n"); | |
163 | |
164 /* Add old data to diff string */ | |
165 for(i=0;i<ctrl[0];i++) | |
166 if((oldpos+i>=0) && (oldpos+i<oldsize)) | |
167 new[newpos+i]+=old[oldpos+i]; | |
168 | |
169 /* Adjust pointers */ | |
170 newpos+=ctrl[0]; | |
171 oldpos+=ctrl[0]; | |
172 | |
173 /* Sanity-check */ | |
174 if(newpos+ctrl[1]>newsize) | |
175 errx(1,"Corrupt patch\n"); | |
176 | |
177 /* Read extra string */ | |
178 lenread = BZ2_bzRead(&ebz2err, epfbz2, new + newpos, ctrl[1]); | |
179 if ((lenread < ctrl[1]) || | |
180 ((ebz2err != BZ_OK) && (ebz2err != BZ_STREAM_END))) | |
181 errx(1, "Corrupt patch\n"); | |
182 | |
183 /* Adjust pointers */ | |
184 newpos+=ctrl[1]; | |
185 oldpos+=ctrl[2]; | |
186 }; | |
187 | |
188 /* Clean up the bzip2 reads */ | |
189 BZ2_bzReadClose(&cbz2err, cpfbz2); | |
190 BZ2_bzReadClose(&dbz2err, dpfbz2); | |
191 BZ2_bzReadClose(&ebz2err, epfbz2); | |
192 if (fclose(cpf) || fclose(dpf) || fclose(epf)) | |
193 err(1, "fclose(%s)", argv[3]); | |
194 | |
195 /* Write the new file */ | |
196 if(((fd=open(argv[2],O_CREAT|O_TRUNC|O_WRONLY,0666))<0) || | |
197 (write(fd,new,newsize)!=newsize) || (close(fd)==-1)) | |
198 err(1,"%s",argv[2]); | |
199 | |
200 free(new); | |
201 free(old); | |
202 | |
203 return 0; | |
204 } | |
OLD | NEW |