package UnZip.Streams is
subtype Stream_Access is Ada.Streams.Stream_IO.Stream_Access;
type Zipped_File_Type is private;
Use_Error : exception renames Ada.IO_Exceptions.Use_Error;
End_Error : exception renames Ada.IO_Exceptions.End_Error;
procedure Open
( | File | : in out Zipped_File_Type; |
-- File-in-archive handle Archive_Name | : in String; | |
-- Name of archive file Name | : in String; | |
-- Name of zipped entry Password | : in String := ""; | |
-- Decryption password Case_sensitive | : in Boolean:= False ); |
procedure Open
( | File | : in out Zipped_File_Type; |
-- File-in-archive handle Archive_Stream | : in Zip_Streams.Zipstream_Class; | |
-- Archive's stream Name | : in String; | |
-- Name of zipped entry Password | : in String := ""; | |
-- Decryption password Case_sensitive | : in Boolean:= False ); |
procedure Open
( | File | : in out Zipped_File_Type; |
-- File-in-archive handle Archive_Info | : in Zip.Zip_info; | |
-- Archive's Zip_info Name | : in String; | |
-- Name of zipped entry Password | : in String := ""; | |
-- Decryption password Case_sensitive | : in Boolean:= False ); |
procedure Close
( | File | : in out Zipped_File_Type); |