]> git.saurik.com Git - apt.git/blob - apt-inst/contrib/arfile.cc
merge from the expermental2 branch
[apt.git] / apt-inst / contrib / arfile.cc
1 // -*- mode: cpp; mode: fold -*-
2 // Description /*{{{*/
3 // $Id: arfile.cc,v 1.6.2.1 2004/01/16 18:58:50 mdz Exp $
4 /* ######################################################################
5
6 AR File - Handle an 'AR' archive
7
8 AR Archives have plain text headers at the start of each file
9 section. The headers are aligned on a 2 byte boundry.
10
11 Information about the structure of AR files can be found in ar(5)
12 on a BSD system, or in the binutils source.
13
14 ##################################################################### */
15 /*}}}*/
16 // Include Files /*{{{*/
17 #include<config.h>
18
19 #include <apt-pkg/arfile.h>
20 #include <apt-pkg/strutl.h>
21 #include <apt-pkg/fileutl.h>
22 #include <apt-pkg/error.h>
23
24 #include <stdlib.h>
25
26 #include <apti18n.h>
27 /*}}}*/
28
29 struct ARArchive::MemberHeader
30 {
31 char Name[16];
32 char MTime[12];
33 char UID[6];
34 char GID[6];
35 char Mode[8];
36 char Size[10];
37 char Magic[2];
38 };
39
40 // ARArchive::ARArchive - Constructor /*{{{*/
41 // ---------------------------------------------------------------------
42 /* */
43 ARArchive::ARArchive(FileFd &File) : List(0), File(File)
44 {
45 LoadHeaders();
46 }
47 /*}}}*/
48 // ARArchive::~ARArchive - Destructor /*{{{*/
49 // ---------------------------------------------------------------------
50 /* */
51 ARArchive::~ARArchive()
52 {
53 while (List != 0)
54 {
55 Member *Tmp = List;
56 List = List->Next;
57 delete Tmp;
58 }
59 }
60 /*}}}*/
61 // ARArchive::LoadHeaders - Load the headers from each file /*{{{*/
62 // ---------------------------------------------------------------------
63 /* AR files are structured with a 8 byte magic string followed by a 60
64 byte plain text header then the file data, another header, data, etc */
65 bool ARArchive::LoadHeaders()
66 {
67 signed long Left = File.Size();
68
69 // Check the magic byte
70 char Magic[8];
71 if (File.Read(Magic,sizeof(Magic)) == false)
72 return false;
73 if (memcmp(Magic,"!<arch>\012",sizeof(Magic)) != 0)
74 return _error->Error(_("Invalid archive signature"));
75 Left -= sizeof(Magic);
76
77 // Read the member list
78 while (Left > 0)
79 {
80 MemberHeader Head;
81 if (File.Read(&Head,sizeof(Head)) == false)
82 return _error->Error(_("Error reading archive member header"));
83 Left -= sizeof(Head);
84
85 // Convert all of the integer members
86 Member *Memb = new Member();
87 if (StrToNum(Head.MTime,Memb->MTime,sizeof(Head.MTime)) == false ||
88 StrToNum(Head.UID,Memb->UID,sizeof(Head.UID)) == false ||
89 StrToNum(Head.GID,Memb->GID,sizeof(Head.GID)) == false ||
90 StrToNum(Head.Mode,Memb->Mode,sizeof(Head.Mode),8) == false ||
91 StrToNum(Head.Size,Memb->Size,sizeof(Head.Size)) == false)
92 {
93 delete Memb;
94 return _error->Error(_("Invalid archive member header %s"), Head.Name);
95 }
96
97 // Check for an extra long name string
98 if (memcmp(Head.Name,"#1/",3) == 0)
99 {
100 char S[300];
101 unsigned long Len;
102 if (StrToNum(Head.Name+3,Len,sizeof(Head.Size)-3) == false ||
103 Len >= sizeof(S))
104 {
105 delete Memb;
106 return _error->Error(_("Invalid archive member header"));
107 }
108 if (File.Read(S,Len) == false)
109 return false;
110 S[Len] = 0;
111 Memb->Name = S;
112 Memb->Size -= Len;
113 Left -= Len;
114 }
115 else
116 {
117 unsigned int I = sizeof(Head.Name) - 1;
118 for (; Head.Name[I] == ' ' || Head.Name[I] == '/'; I--);
119 Memb->Name = std::string(Head.Name,I+1);
120 }
121
122 // Account for the AR header alignment
123 unsigned Skip = Memb->Size % 2;
124
125 // Add it to the list
126 Memb->Next = List;
127 List = Memb;
128 Memb->Start = File.Tell();
129 if (File.Skip(Memb->Size + Skip) == false)
130 return false;
131 if (Left < (signed)(Memb->Size + Skip))
132 return _error->Error(_("Archive is too short"));
133 Left -= Memb->Size + Skip;
134 }
135 if (Left != 0)
136 return _error->Error(_("Failed to read the archive headers"));
137
138 return true;
139 }
140 /*}}}*/
141 // ARArchive::FindMember - Find a name in the member list /*{{{*/
142 // ---------------------------------------------------------------------
143 /* Find a member with the given name */
144 const ARArchive::Member *ARArchive::FindMember(const char *Name) const
145 {
146 const Member *Res = List;
147 while (Res != 0)
148 {
149 if (Res->Name == Name)
150 return Res;
151 Res = Res->Next;
152 }
153
154 return 0;
155 }
156 /*}}}*/