1 /* Handle a .class file embedded in a .zip archive.
2 This extracts a member from a .zip file, but does not handle
3 uncompression (since that is not needed for classes.zip).
5 Copyright (C) 1996, 97-99, 2000 Free Software Foundation, Inc.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GNU CC; see the file COPYING. If not, write to
19 the Free Software Foundation, 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA.
22 Java and all Java-based marks are trademarks or registered trademarks
23 of Sun Microsystems, Inc. in the United States and other countries.
24 The Free Software Foundation is independent of Sun Microsystems, Inc. */
26 /* Written by Per Bothner <bothner@cygnus.com>, February 1996. */
32 /* This stuff is partly based on the 28 August 1994 public release of the
33 Info-ZIP group's portable UnZip zipfile-extraction program (and related
41 #define UNZIP_VERSION 20 /* compatible with PKUNZIP 2.0 */
42 #define VMS_UNZIP_VERSION 42 /* if OS-needed-to-extract is VMS: can do */
46 #define CENTRAL_HDR_SIG "\113\001\002" /* the infamous "PK" signature */
47 #define LOCAL_HDR_SIG "\113\003\004" /* bytes, sans "P" (so unzip */
48 #define END_CENTRAL_SIG "\113\005\006" /* executable not mistaken for */
49 #define EXTD_LOCAL_SIG "\113\007\010" /* zipfile itself) */
51 #define STORED 0 /* compression methods */
60 #define NUM_METHODS 9 /* index of last method + 1 */
61 /* don't forget to update list_files() appropriately if NUM_METHODS changes */
63 #define PK_OK 0 /* no error */
64 #define PK_COOL 0 /* no error */
65 #define PK_GNARLY 0 /* no error */
66 #define PK_WARN 1 /* warning error */
67 #define PK_ERR 2 /* error in zipfile */
68 #define PK_BADERR 3 /* severe error in zipfile */
69 #define PK_MEM 4 /* insufficient memory */
70 #define PK_MEM2 5 /* insufficient memory */
71 #define PK_MEM3 6 /* insufficient memory */
72 #define PK_MEM4 7 /* insufficient memory */
73 #define PK_MEM5 8 /* insufficient memory */
74 #define PK_NOZIP 9 /* zipfile not found */
75 #define PK_PARAM 10 /* bad or illegal parameters specified */
76 #define PK_FIND 11 /* no files found */
77 #define PK_DISK 50 /* disk full */
78 #define PK_EOF 51 /* unexpected EOF */
80 /*---------------------------------------------------------------------------
81 True sizes of the various headers, as defined by PKWARE--so it is not
82 likely that these will ever change. But if they do, make sure both these
83 defines AND the typedefs below get updated accordingly.
84 ---------------------------------------------------------------------------*/
85 #define LREC_SIZE 26 /* lengths of local file headers, central */
86 #define CREC_SIZE 42 /* directory headers, and the end-of- */
87 #define ECREC_SIZE 18 /* central-dir record, respectively */
100 typedef char boolean
;
101 typedef unsigned char uch
; /* code assumes unsigned bytes; these type- */
102 typedef unsigned short ush
; /* defs replace byte/UWORD/ULONG (which are */
103 typedef unsigned long ulg
; /* predefined on some systems) & match zip */
105 /*---------------------------------------------------------------------------
106 Zipfile layout declarations. If these headers ever change, make sure the
107 xxREC_SIZE defines (above) change with them!
108 ---------------------------------------------------------------------------*/
110 typedef uch local_byte_hdr
[ LREC_SIZE
];
111 # define L_VERSION_NEEDED_TO_EXTRACT_0 0
112 # define L_VERSION_NEEDED_TO_EXTRACT_1 1
113 # define L_GENERAL_PURPOSE_BIT_FLAG 2
114 # define L_COMPRESSION_METHOD 4
115 # define L_LAST_MOD_FILE_TIME 6
116 # define L_LAST_MOD_FILE_DATE 8
118 # define L_COMPRESSED_SIZE 14
119 # define L_UNCOMPRESSED_SIZE 18
120 # define L_FILENAME_LENGTH 22
121 # define L_EXTRA_FIELD_LENGTH 24
123 typedef uch cdir_byte_hdr
[ CREC_SIZE
];
124 # define C_VERSION_MADE_BY_0 0
125 # define C_VERSION_MADE_BY_1 1
126 # define C_VERSION_NEEDED_TO_EXTRACT_0 2
127 # define C_VERSION_NEEDED_TO_EXTRACT_1 3
128 # define C_GENERAL_PURPOSE_BIT_FLAG 4
129 # define C_COMPRESSION_METHOD 6
130 # define C_LAST_MOD_FILE_TIME 8
131 # define C_LAST_MOD_FILE_DATE 10
133 # define C_COMPRESSED_SIZE 16
134 # define C_UNCOMPRESSED_SIZE 20
135 # define C_FILENAME_LENGTH 24
136 # define C_EXTRA_FIELD_LENGTH 26
137 # define C_FILE_COMMENT_LENGTH 28
138 # define C_DISK_NUMBER_START 30
139 # define C_INTERNAL_FILE_ATTRIBUTES 32
140 # define C_EXTERNAL_FILE_ATTRIBUTES 34
141 # define C_RELATIVE_OFFSET_LOCAL_HEADER 38
143 typedef uch ec_byte_rec
[ ECREC_SIZE
+4 ];
144 /* define SIGNATURE 0 space-holder only */
145 # define NUMBER_THIS_DISK 4
146 # define NUM_DISK_WITH_START_CENTRAL_DIR 6
147 # define NUM_ENTRIES_CENTRL_DIR_THS_DISK 8
148 # define TOTAL_ENTRIES_CENTRAL_DIR 10
149 # define SIZE_CENTRAL_DIRECTORY 12
150 # define OFFSET_START_CENTRAL_DIRECTORY 16
151 # define ZIPFILE_COMMENT_LENGTH 20
154 typedef struct local_file_header
{ /* LOCAL */
155 uch version_needed_to_extract
[2];
156 ush general_purpose_bit_flag
;
157 ush compression_method
;
158 ush last_mod_file_time
;
159 ush last_mod_file_date
;
164 ush extra_field_length
;
167 typedef struct central_directory_file_header
{ /* CENTRAL */
168 uch version_made_by
[2];
169 uch version_needed_to_extract
[2];
170 ush general_purpose_bit_flag
;
171 ush compression_method
;
172 ush last_mod_file_time
;
173 ush last_mod_file_date
;
178 ush extra_field_length
;
179 ush file_comment_length
;
180 ush disk_number_start
;
181 ush internal_file_attributes
;
182 ulg external_file_attributes
;
183 ulg relative_offset_local_header
;
186 typedef struct end_central_dir_record
{ /* END CENTRAL */
187 ush number_this_disk
;
188 ush num_disk_with_start_central_dir
;
189 ush num_entries_centrl_dir_ths_disk
;
190 ush total_entries_central_dir
;
191 ulg size_central_directory
;
192 ulg offset_start_central_directory
;
193 ush zipfile_comment_length
;
202 # define MAX(a,b) ((a) > (b) ? (a) : (b))
205 # define MIN(a,b) ((a) < (b) ? (a) : (b))
209 /***********************/
211 /***********************/
213 static ush makeword
PARAMS ((const uch
*));
214 static ulg makelong
PARAMS ((const uch
*));
216 /***********************/
217 /* Function makeword() */
218 /***********************/
220 static ush
makeword(b
)
224 * Convert Intel style 'short' integer to non-Intel non-16-bit
225 * host format. This routine also takes care of byte-ordering.
227 return (ush
)((b
[1] << 8) | b
[0]);
231 /***********************/
232 /* Function makelong() */
233 /***********************/
235 static ulg
makelong(sig
)
239 * Convert intel style 'long' variable to non-Intel non-16-bit
240 * host format. This routine also takes care of byte-ordering.
242 return (((ulg
)sig
[3]) << 24)
243 + (((ulg
)sig
[2]) << 16)
244 + (((ulg
)sig
[1]) << 8)
249 read_zip_archive (zipf
)
250 register ZipFile
*zipf
;
257 zipf
->size
= lseek (zipf
->fd
, 0L, SEEK_END
);
259 if (zipf
->size
< (ECREC_SIZE
+4) || lseek (zipf
->fd
, (long)(-(ECREC_SIZE
+4)), SEEK_CUR
) <= 0)
261 if (read (zipf
->fd
, buffer
, ECREC_SIZE
+4) != ECREC_SIZE
+4)
263 zipf
->count
= makeword(&buffer
[TOTAL_ENTRIES_CENTRAL_DIR
]);
264 zipf
->dir_size
= makelong(&buffer
[SIZE_CENTRAL_DIRECTORY
]);
265 #define ALLOC xmalloc
266 /* Allocate 1 more to allow appending '\0' to last filename. */
267 zipf
->central_directory
= ALLOC (zipf
->dir_size
+1);
268 if (lseek (zipf
->fd
, -(zipf
->dir_size
+ECREC_SIZE
+4), SEEK_CUR
) < 0)
270 if (read (zipf
->fd
, zipf
->central_directory
, zipf
->dir_size
) < 0)
274 printf ("number_this_disk = %d\n", makeword(&buffer
[NUMBER_THIS_DISK
]));
275 printf ("num_disk_with_start_central_dir = %d\n", makeword(&buffer
[NUM_DISK_WITH_START_CENTRAL_DIR
]));
277 printf ("num_entries_centrl_dir_ths_disk = %d\n",
278 makeword(&buffer
[NUM_ENTRIES_CENTRL_DIR_THS_DISK
]));
279 printf ("total_entries_central_dir = %d\n",
280 makeword(&buffer
[TOTAL_ENTRIES_CENTRAL_DIR
]));
281 printf ("size_central_directory = %d\n",
282 makelong(&buffer
[SIZE_CENTRAL_DIRECTORY
]));
283 printf ("offset_start_central_directory = %d\n",
284 makelong(&buffer
[OFFSET_START_CENTRAL_DIRECTORY
]));
285 printf ("zipfile_comment_length = %d\n",
286 makeword(&buffer
[ZIPFILE_COMMENT_LENGTH
]));
290 dir_ptr
= zipf
->central_directory
;
291 for (i
= 0; i
< zipf
->count
; i
++)
293 ZipDirectory
*zipd
= (ZipDirectory
*)(dir_ptr
+ dir_last_pad
);
294 long uncompressed_size
= makelong (&dir_ptr
[4+C_UNCOMPRESSED_SIZE
]);
295 long filename_length
= makeword (&dir_ptr
[4+C_FILENAME_LENGTH
]);
296 long extra_field_length
= makeword (&dir_ptr
[4+C_EXTRA_FIELD_LENGTH
]);
297 long file_comment_length
= makeword (&dir_ptr
[4+C_FILE_COMMENT_LENGTH
]);
298 int unpadded_direntry_length
;
299 if ((dir_ptr
-zipf
->central_directory
)+filename_length
+CREC_SIZE
+4>zipf
->dir_size
)
302 zipd
->filename_length
= filename_length
;
303 zipd
->size
= uncompressed_size
;
305 #define DIR_ALIGN __alignof__(ZipDirectory)
307 #define DIR_ALIGN sizeof(long)
309 zipd
->filestart
= makelong (&dir_ptr
[4+C_RELATIVE_OFFSET_LOCAL_HEADER
])
310 + (LREC_SIZE
+4) + filename_length
+ file_comment_length
+
311 + (extra_field_length
? extra_field_length
+4 : 0);
312 /* About the last term of the expression above. Should the same
313 apply if file_comment_length is not zero ? I've never seen
314 the comment field uses so far. FIXME. */
315 zipd
->filename_offset
= CREC_SIZE
+4 - dir_last_pad
;
316 unpadded_direntry_length
317 = zipd
->filename_offset
+ zipd
->filename_length
+ extra_field_length
;
318 zipd
->direntry_size
=
319 ((unpadded_direntry_length
+ DIR_ALIGN
) / DIR_ALIGN
) * DIR_ALIGN
;
320 dir_last_pad
= zipd
->direntry_size
- unpadded_direntry_length
;
321 dir_ptr
= (char*)zipd
+ unpadded_direntry_length
;
336 i
= read_zip_archive (zipf
);
339 fprintf (stderr
, "Bad zip file.\n");
343 zipd
= (ZipDirectory
*) zipf
->central_directory
;
344 for (i
= 0; i
< zipf
->count
; i
++, zipd
= ZIPDIR_NEXT (zipd
))
346 printf ("%d: size:%d, name(#%d)%s, offset:%d\n",
347 i
, zipd
->size
, zipd
->filename_length
,
348 ZIPDIR_FILENAME (zipd
),