1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
/*******************************************************************/
/* slibtool: a skinny libtool implementation, written in C */
/* Copyright (C) 2016--2024 SysDeer Technologies, LLC */
/* Released under the Standard MIT License; see COPYING.SLIBTOOL. */
/*******************************************************************/
#include <stdint.h>
#include <stddef.h>
#include <stdlib.h>
#include <string.h>
#include <slibtool/slibtool.h>
#include <slibtool/slibtool_arbits.h>
#include "slibtool_ar_impl.h"
#include "slibtool_driver_impl.h"
#include "slibtool_errinfo_impl.h"
int slbt_ar_parse_primary_armap_sysv_64(
const struct slbt_driver_ctx * dctx,
struct slbt_archive_meta_impl * m)
{
struct ar_raw_armap_sysv_64 * armap;
struct ar_meta_member_info * memberp;
struct ar_meta_armap_common_64 *armapref;
struct ar_meta_armap_ref_64 * symrefs;
uint64_t idx;
uint64_t uref_hi;
uint64_t uref_lo;
uint64_t nsyms_hi;
uint64_t nsyms_lo;
uint64_t nsyms;
uint64_t nstrs;
const char * ch;
const char * cap;
unsigned char * uch;
unsigned char (*mark)[0x08];
armap = &m->armaps.armap_sysv_64;
memberp = m->memberv[0];
mark = memberp->ar_object_data;
armap->ar_num_of_syms = mark;
uch = *mark++;
armap->ar_first_ref_offset = mark;
nsyms_hi = (uch[0] << 24) + (uch[1] << 16) + (uch[2] << 8) + uch[3];
nsyms_lo = (uch[4] << 24) + (uch[5] << 16) + (uch[6] << 8) + uch[7];
nsyms = (nsyms_hi << 32) + nsyms_lo;
mark += nsyms;
if (memberp->ar_object_size < (sizeof(*mark) + (nsyms * sizeof(*mark))))
return SLBT_CUSTOM_ERROR(
dctx,
SLBT_ERR_AR_INVALID_ARMAP_NUMBER_OF_SYMS);
m->symstrs = (const char *)mark;
cap = memberp->ar_object_data;
cap += memberp->ar_object_size;
if ((cap == m->symstrs) && nsyms)
return SLBT_CUSTOM_ERROR(
dctx,
SLBT_ERR_AR_INVALID_ARMAP_STRING_TABLE);
if (nsyms && !m->symstrs[0])
return SLBT_CUSTOM_ERROR(
dctx,
SLBT_ERR_AR_INVALID_ARMAP_STRING_TABLE);
for (ch=&m->symstrs[1],nstrs=0; ch<cap; ch++) {
if (!ch[0] && !ch[-1] && (nstrs < nsyms))
return SLBT_CUSTOM_ERROR(
dctx,
SLBT_ERR_AR_INVALID_ARMAP_STRING_TABLE);
if (!ch[0] && ch[-1])
nstrs++;
}
if (nstrs != nsyms)
return SLBT_CUSTOM_ERROR(
dctx,
SLBT_ERR_AR_INVALID_ARMAP_STRING_TABLE);
if (cap[-1])
return SLBT_CUSTOM_ERROR(
dctx,
SLBT_ERR_AR_INVALID_ARMAP_STRING_TABLE);
if (!(m->symstrv = calloc(nsyms + 1,sizeof(const char *))))
return SLBT_SYSTEM_ERROR(dctx,0);
if (!(m->armaps.armap_symrefs_64 = calloc(nsyms + 1,sizeof(*symrefs))))
return SLBT_SYSTEM_ERROR(dctx,0);
mark = armap->ar_first_ref_offset;
symrefs = m->armaps.armap_symrefs_64;
for (idx=0,uch=*mark; idx<nsyms; idx++,uch=*++mark) {
uref_hi = (uch[0] << 24) + (uch[1] << 16) + (uch[2] << 8) + uch[3];
uref_lo = (uch[4] << 24) + (uch[5] << 16) + (uch[6] << 8) + uch[7];
symrefs[idx].ar_member_offset = (uref_hi << 32) + uref_lo;
}
armap->ar_string_table = m->symstrv;
armapref = &m->armaps.armap_common_64;
armapref->ar_member = memberp;
armapref->ar_symrefs = symrefs;
armapref->ar_armap_sysv = armap;
armapref->ar_armap_attr = AR_ARMAP_ATTR_SYSV | AR_ARMAP_ATTR_BE_64;
armapref->ar_num_of_symbols = nsyms;
armapref->ar_size_of_refs = nsyms * sizeof(*mark);
armapref->ar_size_of_strs = cap - m->symstrs;
armapref->ar_string_table = m->symstrs;
m->armaps.armap_nsyms = nsyms;
m->armeta.a_armap_primary.ar_armap_common_64 = armapref;
return 0;
}
|