Bugfix: Output typing on print of HID card formats (#895)
[proxmark3-svn] / client / hidcardformats.c
CommitLineData
b5a5fc4d 1//-----------------------------------------------------------------------------
2// Copyright (C) 2018 grauerfuchs
3//
4// This code is licensed to you under the terms of the GNU GPL, version 2 or,
5// at your option, any later version. See the LICENSE.txt file for the text of
6// the license.
7//-----------------------------------------------------------------------------
8// HID card format packing/unpacking routines
9//-----------------------------------------------------------------------------
10
11#include <stdbool.h>
12#include <stdint.h>
13#include <inttypes.h>
5d643cc0 14#include <math.h>
b5a5fc4d 15#include "cmddata.h"
16#include "hidcardformats.h"
17#include "hidcardformatutils.h"
18#include "parity.h" // for parity
19#include "ui.h"
20
21bool Pack_H10301(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
22 memset(packed, 0, sizeof(hidproxmessage_t));
23 if (card->FacilityCode > 0xFF) return false; // Can't encode FC.
24 if (card->CardNumber > 0xFFFF) return false; // Can't encode CN.
5d643cc0 25 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 26 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 27 packed->Length = 26; // Set number of bits
28 packed->bot |= (card->CardNumber & 0xFFFF) << 1;
29 packed->bot |= (card->FacilityCode & 0xFF) << 17;
be59094d 30 packed->bot |= oddparity32((packed->bot >> 1) & 0xFFF) & 1;
31 packed->bot |= (evenparity32((packed->bot >> 13) & 0xFFF) & 1) << 25;
b5a5fc4d 32 return add_HID_header(packed);
33}
34bool Unpack_H10301(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
35 memset(card, 0, sizeof(hidproxcard_t));
36 if (packed->Length != 26) return false; // Wrong length? Stop here.
37 card->CardNumber = (packed->bot >> 1) & 0xFFFF;
38 card->FacilityCode = (packed->bot >> 17) & 0xFF;
b5a5fc4d 39 card->ParityValid =
40 (oddparity32((packed->bot >> 1) & 0xFFF) == (packed->bot & 1)) &&
41 ((evenparity32((packed->bot >> 13) & 0xFFF) & 1) == ((packed->bot >> 25) & 1));
42 return true;
43}
44
45bool Pack_Tecom27(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
46 memset(packed, 0, sizeof(hidproxmessage_t));
47 if (card->FacilityCode > 0x7FF) return false; // Can't encode FC.
48 if (card->CardNumber > 0xFFFF) return false; // Can't encode CN.
5d643cc0 49 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 50 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 51 packed->Length = 27;
52 set_nonlinear_field(packed, card->FacilityCode, 10, (uint8_t[]){15, 19, 24, 23, 22, 18, 6, 10, 14, 3, 2});
53 set_nonlinear_field(packed, card->CardNumber, 16, (uint8_t[]){0, 1, 13, 12, 9, 26, 20, 16, 17, 21, 25, 7, 8, 11, 4, 5});
54 return add_HID_header(packed);
55}
56bool Unpack_Tecom27(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
57 memset(card, 0, sizeof(hidproxcard_t));
58 if (packed->Length != 27) return false; // Wrong length? Stop here.
59 card->CardNumber = get_nonlinear_field(packed, 16, (uint8_t[]){0, 1, 13, 12, 9, 26, 20, 16, 17, 21, 25, 7, 8, 11, 4, 5});
60 card->FacilityCode = get_nonlinear_field(packed, 10, (uint8_t[]){15, 19, 24, 23, 22, 18, 6, 10, 14, 3, 2});
b5a5fc4d 61 return true;
62}
63
64bool Pack_2804W(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
65 memset(packed, 0, sizeof(hidproxmessage_t));
66 if (card->FacilityCode > 0x0FF) return false; // Can't encode FC.
67 if (card->CardNumber > 0x7FFF) return false; // Can't encode CN.
5d643cc0 68 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 69 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 70 packed->Length = 28;
71 set_linear_field(packed, card->FacilityCode, 4, 8);
72 set_linear_field(packed, card->CardNumber, 12, 15);
be59094d 73 set_bit_by_position(packed,
74 oddparity32(get_nonlinear_field(packed, 16, (uint8_t[]){4, 5, 7, 8, 10, 11, 13, 14, 16, 17, 19, 20, 22, 23, 25, 26}))
75 , 2);
76 set_bit_by_position(packed,
77 evenparity32(get_linear_field(packed, 1, 13))
78 , 0);
79 set_bit_by_position(packed,
80 oddparity32(get_linear_field(packed, 0, 27))
81 , 27);
b5a5fc4d 82 return add_HID_header(packed);
83}
84bool Unpack_2804W(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
85 memset(card, 0, sizeof(hidproxcard_t));
86 if (packed->Length != 28) return false; // Wrong length? Stop here.
87 card->FacilityCode = get_linear_field(packed, 4, 8);
88 card->CardNumber = get_linear_field(packed, 12, 15);
b5a5fc4d 89 card->ParityValid =
90 (get_bit_by_position(packed, 0) == evenparity32(get_linear_field(packed, 1, 13))) &&
91 (get_bit_by_position(packed, 2) == oddparity32(get_nonlinear_field(packed, 16, (uint8_t[]){4, 5, 7, 8, 10, 11, 13, 14, 16, 17, 19, 20, 22, 23, 25, 26}))) &&
92 (get_bit_by_position(packed, 27) == oddparity32(get_linear_field(packed, 0, 27)));
93 return true;
94}
95
96bool Pack_ATSW30(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
97 memset(packed, 0, sizeof(hidproxmessage_t));
98 if (card->FacilityCode > 0xFFF) return false; // Can't encode FC.
99 if (card->CardNumber > 0xFFFF) return false; // Can't encode CN.
5d643cc0 100 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 101 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 102 packed->Length = 30;
103 set_linear_field(packed, card->FacilityCode, 1, 12);
104 set_linear_field(packed, card->CardNumber, 13, 16);
be59094d 105 set_bit_by_position(packed,
106 evenparity32(get_linear_field(packed, 1, 12))
107 , 0);
108 set_bit_by_position(packed,
109 oddparity32(get_linear_field(packed, 13, 16))
110 , 29);
b5a5fc4d 111 return add_HID_header(packed);
112}
113bool Unpack_ATSW30(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
114 memset(card, 0, sizeof(hidproxcard_t));
115 if (packed->Length != 30) return false; // Wrong length? Stop here.
116 card->FacilityCode = get_linear_field(packed, 1, 12);
117 card->CardNumber = get_linear_field(packed, 13, 16);
b5a5fc4d 118 card->ParityValid =
119 (get_bit_by_position(packed, 0) == evenparity32(get_linear_field(packed, 1, 12))) &&
120 (get_bit_by_position(packed, 29) == oddparity32(get_linear_field(packed, 13, 16)));
121 return true;
122}
123bool Pack_ADT31(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
124 memset(packed, 0, sizeof(hidproxmessage_t));
125 if (card->FacilityCode > 0x0F) return false; // Can't encode FC.
126 if (card->CardNumber > 0x7FFFFF) return false; // Can't encode CN.
5d643cc0 127 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 128 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 129 packed->Length = 31;
130 set_linear_field(packed, card->FacilityCode, 1, 4);
131 set_linear_field(packed, card->CardNumber, 5, 23);
132 // Parity not known, but 4 bits are unused.
133 return add_HID_header(packed);
134}
135bool Unpack_ADT31(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
136 memset(card, 0, sizeof(hidproxcard_t));
137 if (packed->Length != 31) return false; // Wrong length? Stop here.
138 card->FacilityCode = get_linear_field(packed, 1, 4);
139 card->CardNumber = get_linear_field(packed, 5, 23);
b5a5fc4d 140 return true;
141}
142
0d7ee55f 143bool Pack_Kastle(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
144 memset(packed, 0, sizeof(hidproxmessage_t));
145 if (card->FacilityCode > 0x00FF) return false; // Can't encode FC.
146 if (card->CardNumber > 0x0000FFFF) return false; // Can't encode CN.
147 if (card->IssueLevel > 0x001F) return false; // IL is only 5 bits.
148 if (card->OEM > 0) return false; // Not used in this format
149 packed->Length = 32; // Set number of bits
150 set_bit_by_position(packed, 1, 1); // Always 1
151 set_linear_field(packed, card->IssueLevel, 2, 5);
152 set_linear_field(packed, card->FacilityCode, 7, 8);
153 set_linear_field(packed, card->CardNumber, 15, 16);
154 set_bit_by_position(packed, evenparity32(get_linear_field(packed, 1, 16)), 0);
155 set_bit_by_position(packed, oddparity32(get_linear_field(packed, 14, 17)), 31);
156 return add_HID_header(packed);
157}
158bool Unpack_Kastle(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
159 memset(card, 0, sizeof(hidproxcard_t));
160 if (packed->Length != 32) return false; // Wrong length? Stop here.
161 if (get_bit_by_position(packed, 1) != 1) return false; // Always 1 in this format
162 card->IssueLevel = get_linear_field(packed, 2, 5);
163 card->FacilityCode = get_linear_field(packed, 7, 8);
164 card->CardNumber = get_linear_field(packed, 15, 16);
165 card->ParityValid =
166 (get_bit_by_position(packed, 0) == evenparity32(get_linear_field(packed, 1, 16))) &&
167 (get_bit_by_position(packed, 31) == oddparity32(get_linear_field(packed, 14, 17)));
168 return true;
169}
170
b5a5fc4d 171bool Pack_D10202(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
172 memset(packed, 0, sizeof(hidproxmessage_t));
173 if (card->FacilityCode > 0x007F) return false; // Can't encode FC.
174 if (card->CardNumber > 0x00FFFFFF) return false; // Can't encode CN.
5d643cc0 175 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 176 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 177 packed->Length = 33; // Set number of bits
178 set_linear_field(packed, card->FacilityCode, 1, 7);
179 set_linear_field(packed, card->CardNumber, 8, 24);
be59094d 180 set_bit_by_position(packed, evenparity32(get_linear_field(packed, 1, 16)), 0);
181 set_bit_by_position(packed, oddparity32(get_linear_field(packed, 16, 16)), 32);
b5a5fc4d 182 return add_HID_header(packed);
183}
184bool Unpack_D10202(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
185 memset(card, 0, sizeof(hidproxcard_t));
be59094d 186 if (packed->Length != 33) return false; // Wrong length? Stop here.
b5a5fc4d 187 card->CardNumber = get_linear_field(packed, 8, 24);
188 card->FacilityCode = get_linear_field(packed, 1, 7);
b5a5fc4d 189 card->ParityValid =
190 (get_bit_by_position(packed, 0) == evenparity32(get_linear_field(packed, 1, 16))) &&
191 (get_bit_by_position(packed, 32) == oddparity32(get_linear_field(packed, 16, 16)));
192 return true;
193}
194
b5a5fc4d 195bool Pack_H10306(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
196 memset(packed, 0, sizeof(hidproxmessage_t));
197 if (card->FacilityCode > 0xFFFF) return false; // Can't encode FC.
198 if (card->CardNumber > 0xFFFF) return false; // Can't encode CN.
5d643cc0 199 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 200 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 201 packed->Length = 34; // Set number of bits
202 packed->bot |= (card->CardNumber & 0xFFFF) << 1;
203 packed->bot |= (card->FacilityCode & 0x7FFF) << 17;
204 packed->mid |= (card->FacilityCode & 0x8000) >> 15;
be59094d 205 packed->mid |= (evenparity32((packed->mid & 0x00000001) ^ (packed->bot & 0xFFFE0000)) & 1) << 1;
206 packed->bot |= ( oddparity32(packed->bot & 0x0001FFFE) & 1);
b5a5fc4d 207 return add_HID_header(packed);
208}
209bool Unpack_H10306(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
210 memset(card, 0, sizeof(hidproxcard_t));
211 if (packed->Length != 34) return false; // Wrong length? Stop here.
b5a5fc4d 212 card->CardNumber = (packed->bot >> 1) & 0xFFFF;
213 card->FacilityCode = ((packed->mid & 1) << 15) | ((packed->bot >> 17) & 0xFF);
b5a5fc4d 214 card->ParityValid =
215 ((evenparity32((packed->mid & 0x00000001) ^ (packed->bot & 0xFFFE0000)) & 1) == ((packed->mid >> 1) & 1)) &&
216 ((oddparity32(packed->bot & 0x0001FFFE) & 1) == ((packed->bot & 1)));
217 return true;
218}
be59094d 219bool Pack_N10002(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
b5a5fc4d 220 memset(packed, 0, sizeof(hidproxmessage_t));
221 if (card->FacilityCode > 0xFF) return false; // Can't encode FC.
222 if (card->CardNumber > 0xFFFF) return false; // Can't encode CN.
5d643cc0 223 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 224 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 225 packed->Length = 34; // Set number of bits
226 set_linear_field(packed, card->FacilityCode, 9, 8);
227 set_linear_field(packed, card->CardNumber, 17, 16);
228 return add_HID_header(packed);
229}
be59094d 230bool Unpack_N10002(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
b5a5fc4d 231 memset(card, 0, sizeof(hidproxcard_t));
232 if (packed->Length != 34) return false; // Wrong length? Stop here.
b5a5fc4d 233 card->CardNumber = get_linear_field(packed, 17, 16);
234 card->FacilityCode = get_linear_field(packed, 9, 8);
b5a5fc4d 235 return true;
236}
237
b5a5fc4d 238bool Pack_C1k35s(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
239 memset(packed, 0, sizeof(hidproxmessage_t));
240 if (card->FacilityCode > 0xFFF) return false; // Can't encode FC.
241 if (card->CardNumber > 0xFFFFF) return false; // Can't encode CN.
5d643cc0 242 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 243 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 244 packed->Length = 35; // Set number of bits
245 packed->bot |= (card->CardNumber & 0x000FFFFF) << 1;
246 packed->bot |= (card->FacilityCode & 0x000007FF) << 21;
247 packed->mid |= (card->FacilityCode & 0x00000800) >> 11;
be59094d 248 packed->mid |= (evenparity32((packed->mid & 0x00000001) ^ (packed->bot & 0xB6DB6DB6)) & 1) << 1;
249 packed->bot |= ( oddparity32((packed->mid & 0x00000003) ^ (packed->bot & 0x6DB6DB6C)) & 1);
250 packed->mid |= ( oddparity32((packed->mid & 0x00000003) ^ (packed->bot & 0xFFFFFFFF)) & 1) << 2;
b5a5fc4d 251 return add_HID_header(packed);
252}
253bool Unpack_C1k35s(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
254 memset(card, 0, sizeof(hidproxcard_t));
255 if (packed->Length != 35) return false; // Wrong length? Stop here.
b5a5fc4d 256 card->CardNumber = (packed->bot >> 1) & 0x000FFFFF;
257 card->FacilityCode = ((packed->mid & 1) << 11) | ((packed->bot >> 21));
b5a5fc4d 258 card->ParityValid =
259 (evenparity32((packed->mid & 0x00000001) ^ (packed->bot & 0xB6DB6DB6)) == ((packed->mid >> 1) & 1)) &&
260 ( oddparity32((packed->mid & 0x00000003) ^ (packed->bot & 0x6DB6DB6C)) == ((packed->bot >> 0) & 1)) &&
261 ( oddparity32((packed->mid & 0x00000003) ^ (packed->bot & 0xFFFFFFFF)) == ((packed->mid >> 2) & 1));
262 return true;
263}
264
265bool Pack_H10320(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
266 memset(packed, 0, sizeof(hidproxmessage_t));
267 if (card->FacilityCode > 0) return false; // Can't encode FC. (none in this format)
268 if (card->CardNumber > 99999999) return false; // Can't encode CN.
5d643cc0 269 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 270 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 271 packed->Length = 36; // Set number of bits
272 // This card is BCD-encoded rather than binary. Set the 4-bit groups independently.
5d643cc0 273 for (uint32_t idx = 0; idx < 8; idx++){
274 set_linear_field(packed, (uint64_t)(card->CardNumber / pow(10, 7-idx)) % 10, idx * 4, 4);
275 }
be59094d 276 set_bit_by_position(packed, evenparity32(
277 get_nonlinear_field(packed, 8, (uint8_t[]){0, 4, 8, 12, 16, 20, 24, 28})
278 ), 32);
279 set_bit_by_position(packed, oddparity32(
280 get_nonlinear_field(packed, 8, (uint8_t[]){1, 5, 9, 13, 17, 21, 25, 29})
281 ), 33);
282 set_bit_by_position(packed, evenparity32(
283 get_nonlinear_field(packed, 8, (uint8_t[]){2, 6, 10, 14, 18, 22, 28, 30})
284 ), 34);
285 set_bit_by_position(packed, evenparity32(
286 get_nonlinear_field(packed, 8, (uint8_t[]){3, 7, 11, 15, 19, 23, 29, 31})
287 ), 35);
b5a5fc4d 288 return add_HID_header(packed);
289}
290bool Unpack_H10320(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
291 memset(card, 0, sizeof(hidproxcard_t));
292 if (packed->Length != 36) return false; // Wrong length? Stop here.
293 // This card is BCD-encoded rather than binary. Get the 4-bit groups independently.
5d643cc0 294 for (uint32_t idx = 0; idx < 8; idx++){
295 uint64_t val = get_linear_field(packed, idx * 4, 4);
296 if (val > 9){
297 // Violation of BCD; Zero and exit.
298 card->CardNumber = 0;
299 return false;
300 } else {
301 card->CardNumber += val * pow(10, 7-idx);
302 }
303 }
b5a5fc4d 304 card->ParityValid =
305 (get_bit_by_position(packed, 32) == evenparity32(get_nonlinear_field(packed, 8, (uint8_t[]){0, 4, 8, 12, 16, 20, 24, 28}))) &&
306 (get_bit_by_position(packed, 33) == oddparity32(get_nonlinear_field(packed, 8, (uint8_t[]){1, 5, 9, 13, 17, 21, 25, 29}))) &&
307 (get_bit_by_position(packed, 34) == evenparity32(get_nonlinear_field(packed, 8, (uint8_t[]){2, 6, 10, 14, 18, 22, 28, 30}))) &&
308 (get_bit_by_position(packed, 35) == evenparity32(get_nonlinear_field(packed, 8, (uint8_t[]){3, 7, 11, 15, 19, 23, 29, 31})));
309 return true;
310}
311
5d643cc0 312bool Pack_S12906(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
313 memset(packed, 0, sizeof(hidproxmessage_t));
314 if (card->FacilityCode > 0xFF) return false; // Can't encode FC.
315 if (card->IssueLevel > 0x03) return false; // Can't encode IL.
316 if (card->CardNumber > 0x00FFFFFF) return false; // Can't encode CN.
be59094d 317 if (card->OEM > 0) return false; // Not used in this format
5d643cc0 318 packed->Length = 36; // Set number of bits
319 set_linear_field(packed, card->FacilityCode, 1, 8);
320 set_linear_field(packed, card->IssueLevel, 9, 2);
321 set_linear_field(packed, card->CardNumber, 11, 24);
be59094d 322 set_bit_by_position(packed,
323 oddparity32(get_linear_field(packed, 1, 17))
324 , 0);
325 set_bit_by_position(packed,
326 oddparity32(get_linear_field(packed, 17, 18))
327 , 35);
5d643cc0 328 return add_HID_header(packed);
329}
330bool Unpack_S12906(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
331 memset(card, 0, sizeof(hidproxcard_t));
332 if (packed->Length != 36) return false; // Wrong length? Stop here.
5d643cc0 333 card->FacilityCode = get_linear_field(packed, 1, 8);
334 card->IssueLevel = get_linear_field(packed, 9, 2);
335 card->CardNumber = get_linear_field(packed, 11, 24);
5d643cc0 336 card->ParityValid =
337 (get_bit_by_position(packed, 0) == oddparity32(get_linear_field(packed, 1, 17))) &&
be59094d 338 (get_bit_by_position(packed, 35) == oddparity32(get_linear_field(packed, 17, 18)));
5d643cc0 339 return true;
340}
341
342bool Pack_Sie36(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
343 memset(packed, 0, sizeof(hidproxmessage_t));
344 if (card->FacilityCode > 0x0003FFFF) return false; // Can't encode FC.
5d643cc0 345 if (card->CardNumber > 0x0000FFFF) return false; // Can't encode CN.
346 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 347 if (card->OEM > 0) return false; // Not used in this format
5d643cc0 348 packed->Length = 36; // Set number of bits
349 set_linear_field(packed, card->FacilityCode, 1, 18);
350 set_linear_field(packed, card->CardNumber, 19, 16);
be59094d 351 set_bit_by_position(packed,
352 oddparity32(get_nonlinear_field(packed, 23, (uint8_t[]){1, 3, 4, 6, 7, 9, 10, 12, 13, 15, 16, 18, 19, 21, 22, 24, 25, 27, 28, 30, 31, 33, 34}))
353 , 0);
354 set_bit_by_position(packed,
355 evenparity32(get_nonlinear_field(packed, 23, (uint8_t[]){1, 2, 4, 5, 7, 8, 10, 11, 13, 14, 16, 17, 19, 20, 22, 23, 25, 26, 28, 29, 31, 32, 34}))
356 , 35);
5d643cc0 357 return add_HID_header(packed);
358}
359bool Unpack_Sie36(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
360 memset(card, 0, sizeof(hidproxcard_t));
361 if (packed->Length != 36) return false; // Wrong length? Stop here.
5d643cc0 362 card->FacilityCode = get_linear_field(packed, 1, 18);
363 card->CardNumber = get_linear_field(packed, 19, 16);
5d643cc0 364 card->ParityValid =
365 (get_bit_by_position(packed, 0) == oddparity32(get_nonlinear_field(packed, 23, (uint8_t[]){1, 3, 4, 6, 7, 9, 10, 12, 13, 15, 16, 18, 19, 21, 22, 24, 25, 27, 28, 30, 31, 33, 34}))) &&
366 (get_bit_by_position(packed, 35) == oddparity32(get_nonlinear_field(packed, 23, (uint8_t[]){1, 2, 4, 5, 7, 8, 10, 11, 13, 14, 16, 17, 19, 20, 22, 23, 25, 26, 28, 29, 31, 32, 34})));
5d643cc0 367 return true;
368}
369
be59094d 370bool Pack_C15001(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
371 memset(packed, 0, sizeof(hidproxmessage_t));
372 if (card->FacilityCode > 0x000000FF) return false; // Can't encode FC.
373 if (card->CardNumber > 0x0000FFFF) return false; // Can't encode CN.
374 if (card->IssueLevel > 0) return false; // Not used in this format
375 if (card->OEM > 0x000003FF) return false; // Can't encode OEM.
376 packed->Length = 36; // Set number of bits
377 set_linear_field(packed, card->OEM, 1, 10);
378 set_linear_field(packed, card->FacilityCode, 11, 8);
379 set_linear_field(packed, card->CardNumber, 19, 16);
380 set_bit_by_position(packed,
381 evenparity32(get_linear_field(packed, 1, 17))
382 , 0);
383 set_bit_by_position(packed,
384 oddparity32(get_linear_field(packed, 18, 17))
385 , 35);
386 return add_HID_header(packed);
387}
388bool Unpack_C15001(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
389 memset(card, 0, sizeof(hidproxcard_t));
390 if (packed->Length != 36) return false; // Wrong length? Stop here.
391 card->OEM = get_linear_field(packed, 1, 10);
392 card->FacilityCode = get_linear_field(packed, 11, 8);
393 card->CardNumber = get_linear_field(packed, 19, 16);
394 card->ParityValid =
395 (get_bit_by_position(packed, 0) == evenparity32(get_linear_field(packed, 1, 17))) &&
396 (get_bit_by_position(packed, 35) == oddparity32(get_linear_field(packed, 18, 17)));
397 return true;
398}
b5a5fc4d 399
400bool Pack_H10302(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
401 memset(packed, 0, sizeof(hidproxmessage_t));
402 if (card->FacilityCode > 0) return false; // Can't encode FC. (none in this format)
403 if (card->CardNumber > 0x00000007FFFFFFFF) return false; // Can't encode CN.
5d643cc0 404 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 405 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 406 packed->Length = 37; // Set number of bits
407 set_linear_field(packed, card->CardNumber, 1, 35);
be59094d 408 set_bit_by_position(packed,
409 evenparity32(get_linear_field(packed, 1, 18))
410 , 0);
411 set_bit_by_position(packed,
412 oddparity32(get_linear_field(packed, 18, 18))
413 , 36);
b5a5fc4d 414 return add_HID_header(packed);
415}
416bool Unpack_H10302(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
417 memset(card, 0, sizeof(hidproxcard_t));
418 if (packed->Length != 37) return false; // Wrong length? Stop here.
b5a5fc4d 419 card->CardNumber = get_linear_field(packed, 1, 35);
b5a5fc4d 420 card->ParityValid =
421 (get_bit_by_position(packed, 0) == evenparity32(get_linear_field(packed, 1, 18))) &&
422 (get_bit_by_position(packed, 36) == oddparity32(get_linear_field(packed, 18, 18)));
b5a5fc4d 423 return true;
424}
425
426bool Pack_H10304(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
427 memset(packed, 0, sizeof(hidproxmessage_t));
428 if (card->FacilityCode > 0x0000FFFF) return false; // Can't encode FC.
429 if (card->CardNumber > 0x0007FFFF) return false; // Can't encode CN.
5d643cc0 430 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 431 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 432 packed->Length = 37; // Set number of bits
433 packed->bot |= (card->CardNumber & 0x0007FFFF) << 1;
434 packed->bot |= (card->FacilityCode & 0x00000FFF) << 20;
435 packed->mid |= (card->FacilityCode & 0x0000F000) >> 12;
be59094d 436 packed->mid |= (evenparity32((packed->mid & 0x0000000F) ^ (packed->bot & 0xFFFC0000)) & 1) << 4;
437 packed->bot |= ( oddparity32(packed->bot & 0x0007FFFE) & 1);
b5a5fc4d 438 return add_HID_header(packed);
439}
440bool Unpack_H10304(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
441 memset(card, 0, sizeof(hidproxcard_t));
442 if (packed->Length != 37) return false; // Wrong length? Stop here.
b5a5fc4d 443 card->CardNumber = (packed->bot >> 1) & 0x0007FFFF;
444 card->FacilityCode = ((packed->mid & 0xF) << 12) | ((packed->bot >> 20));
b5a5fc4d 445 card->ParityValid =
446 (evenparity32((packed->mid & 0x0000000F) ^ (packed->bot & 0xFFFC0000)) == ((packed->mid >> 4) & 1)) &&
447 (oddparity32( packed->bot & 0x0007FFFE) == (packed->bot & 1));
448 return true;
449}
450
b5a5fc4d 451bool Pack_P10001(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
452 memset(packed, 0, sizeof(hidproxmessage_t));
453 if (card->FacilityCode > 0xFFF) return false; // Can't encode FC.
454 if (card->CardNumber > 0xFFFF) return false; // Can't encode CN.
5d643cc0 455 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 456 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 457 packed->Length = 40; // Set number of bits
458 set_linear_field(packed, 0xF, 0, 4);
459 set_linear_field(packed, card->FacilityCode, 4, 12);
460 set_linear_field(packed, card->CardNumber, 16, 16);
be59094d 461 set_linear_field(packed,
462 get_linear_field(packed, 0, 8) ^
463 get_linear_field(packed, 8, 8) ^
464 get_linear_field(packed, 16, 8) ^
465 get_linear_field(packed, 24, 8)
466 , 32, 8);
b5a5fc4d 467 return add_HID_header(packed);
468}
469bool Unpack_P10001(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
470 memset(card, 0, sizeof(hidproxcard_t));
471 if (packed->Length != 40) return false; // Wrong length? Stop here.
b5a5fc4d 472 card->CardNumber = get_linear_field(packed, 16, 16);
473 card->FacilityCode = get_linear_field(packed, 4, 12);
b5a5fc4d 474 card->ParityValid = (
475 get_linear_field(packed, 0, 8) ^
476 get_linear_field(packed, 8, 8) ^
477 get_linear_field(packed, 16, 8) ^
478 get_linear_field(packed, 24, 8)
479 ) == get_linear_field(packed, 32, 8);
480 return true;
481}
482
b5a5fc4d 483bool Pack_C1k48s(/*in*/hidproxcard_t* card, /*out*/hidproxmessage_t* packed){
484 memset(packed, 0, sizeof(hidproxmessage_t));
485 if (card->FacilityCode > 0x003FFFFF) return false; // Can't encode FC.
486 if (card->CardNumber > 0x007FFFFF) return false; // Can't encode CN.
5d643cc0 487 if (card->IssueLevel > 0) return false; // Not used in this format
be59094d 488 if (card->OEM > 0) return false; // Not used in this format
b5a5fc4d 489 packed->Length = 48; // Set number of bits
490 packed->bot |= (card->CardNumber & 0x007FFFFF) << 1;
491 packed->bot |= (card->FacilityCode & 0x000000FF) << 24;
492 packed->mid |= (card->FacilityCode & 0x003FFF00) >> 8;
be59094d 493 packed->mid |= (evenparity32((packed->mid & 0x00001B6D) ^ (packed->bot & 0xB6DB6DB6)) & 1) << 14;
494 packed->bot |= ( oddparity32((packed->mid & 0x000036DB) ^ (packed->bot & 0x6DB6DB6C)) & 1);
495 packed->mid |= ( oddparity32((packed->mid & 0x00007FFF) ^ (packed->bot & 0xFFFFFFFF)) & 1) << 15;
b5a5fc4d 496 return add_HID_header(packed);
497}
498bool Unpack_C1k48s(/*in*/hidproxmessage_t* packed, /*out*/hidproxcard_t* card){
499 memset(card, 0, sizeof(hidproxcard_t));
500 if (packed->Length != 48) return false; // Wrong length? Stop here.
b5a5fc4d 501 card->CardNumber = (packed->bot >> 1) & 0x007FFFFF;
502 card->FacilityCode = ((packed->mid & 0x00003FFF) << 8) | ((packed->bot >> 24));
b5a5fc4d 503 card->ParityValid =
504 (evenparity32((packed->mid & 0x00001B6D) ^ (packed->bot & 0xB6DB6DB6)) == ((packed->mid >> 14) & 1)) &&
505 ( oddparity32((packed->mid & 0x000036DB) ^ (packed->bot & 0x6DB6DB6C)) == ((packed->bot >> 0) & 1)) &&
506 ( oddparity32((packed->mid & 0x00007FFF) ^ (packed->bot & 0xFFFFFFFF)) == ((packed->mid >> 15) & 1));
507 return true;
508}
509
510static const hidcardformat_t FormatTable[] = {
be59094d 511 {"H10301", Pack_H10301, Unpack_H10301, "HID H10301 26-bit", {1, 1, 0, 0, 1}}, // imported from old pack/unpack
512 {"Tecom27", Pack_Tecom27, Unpack_Tecom27, "Tecom 27-bit", {1, 1, 0, 0, 1}}, // from cardinfo.barkweb.com.au
513 {"2804W", Pack_2804W, Unpack_2804W, "2804 Wiegand", {1, 1, 0, 0, 1}}, // from cardinfo.barkweb.com.au
514 {"ATSW30", Pack_ATSW30, Unpack_ATSW30, "ATS Wiegand 30-bit", {1, 1, 0, 0, 1}}, // from cardinfo.barkweb.com.au
515 {"ADT31", Pack_ADT31, Unpack_ADT31, "HID ADT 31-bit", {1, 1, 0, 0, 1}}, // from cardinfo.barkweb.com.au
0d7ee55f 516 {"Kastle", Pack_Kastle, Unpack_Kastle, "Kastle 32-bit", {1, 1, 1, 0, 1}}, // from @xilni; PR #23 on RfidResearchGroup/proxmark3
be59094d 517 {"D10202", Pack_D10202, Unpack_D10202, "HID D10202 33-bit", {1, 1, 0, 0, 1}}, // from cardinfo.barkweb.com.au
518 {"H10306", Pack_H10306, Unpack_H10306, "HID H10306 34-bit", {1, 1, 0, 0, 1}}, // imported from old pack/unpack
519 {"N10002", Pack_N10002, Unpack_N10002, "HID N10002 34-bit", {1, 1, 0, 0, 1}}, // from cardinfo.barkweb.com.au
520 {"C1k35s", Pack_C1k35s, Unpack_C1k35s, "HID Corporate 1000 35-bit standard layout", {1, 1, 0, 0, 1}}, // imported from old pack/unpack
521 {"C15001", Pack_C15001, Unpack_C15001, "HID KeySpan 36-bit", {1, 1, 0, 1, 1}}, // from Proxmark forums
522 {"S12906", Pack_S12906, Unpack_S12906, "HID Simplex 36-bit", {1, 1, 1, 0, 1}}, // from cardinfo.barkweb.com.au
523 {"Sie36", Pack_Sie36, Unpack_Sie36, "HID 36-bit Siemens", {1, 1, 0, 0, 1}}, // from cardinfo.barkweb.com.au
524 {"H10320", Pack_H10320, Unpack_H10320, "HID H10320 36-bit BCD", {1, 0, 0, 0, 1}}, // from Proxmark forums
525 {"H10302", Pack_H10302, Unpack_H10302, "HID H10302 37-bit huge ID", {1, 0, 0, 0, 1}}, // from Proxmark forums
526 {"H10304", Pack_H10304, Unpack_H10304, "HID H10304 37-bit", {1, 1, 0, 0, 1}}, // imported from old pack/unpack
b5a5fc4d 527 {"P10001", Pack_P10001, Unpack_P10001, "HID P10001 Honeywell 40-bit"}, // from cardinfo.barkweb.com.au
be59094d 528 {"C1k48s", Pack_C1k48s, Unpack_C1k48s, "HID Corporate 1000 48-bit standard layout", {1, 1, 0, 0, 1}}, // imported from old pack/unpack
529 {NULL, NULL, NULL, NULL, {0, 0, 0, 0, 0}} // Must null terminate array
b5a5fc4d 530};
531
532void HIDListFormats(){
533 if (FormatTable[0].Name == NULL)
534 return;
535 int i = 0;
536 PrintAndLog("%-10s %s", "Name", "Description");
537 PrintAndLog("------------------------------------------------------------");
538 while (FormatTable[i].Name)
539 {
be59094d 540 PrintAndLog("%-10s %-30s", FormatTable[i].Name, FormatTable[i].Descrp);
b5a5fc4d 541 ++i;
542 }
543 PrintAndLog("");
544 return;
545}
546
547hidcardformat_t HIDGetCardFormat(int idx){
548 return FormatTable[idx];
549}
550
551int HIDFindCardFormat(const char *format)
552{
553 if (FormatTable[0].Name == NULL)
554 return -1;
555 int i = 0;
556 while (FormatTable[i].Name && strcmp(FormatTable[i].Name, format))
557 {
558 ++i;
559 }
560
561 if (FormatTable[i].Name) {
562 return i;
563 } else {
564 return -1;
565 }
566}
567
568bool HIDPack(/* in */int FormatIndex, /* in */hidproxcard_t* card, /* out */hidproxmessage_t* packed){
569 memset(packed, 0, sizeof(hidproxmessage_t));
570 if (FormatIndex < 0 || FormatIndex >= (sizeof(FormatTable) / sizeof(FormatTable[0]))) return false;
571 return FormatTable[FormatIndex].Pack(card, packed);
572}
573
be59094d 574void HIDDisplayUnpackedCard(hidproxcard_t* card, const hidcardformat_t format){
575 PrintAndLog(" Format: %s (%s)", format.Name, format.Descrp);
576 if (format.Fields.hasFacilityCode)
763d1bef 577 PrintAndLog("Facility Code: %" PRIu32,card->FacilityCode);
be59094d 578 if (format.Fields.hasCardNumber)
763d1bef 579 PrintAndLog(" Card Number: %" PRIu64,card->CardNumber);
be59094d 580 if (format.Fields.hasIssueLevel)
763d1bef 581 PrintAndLog(" Issue Level: %" PRIu32,card->IssueLevel);
be59094d 582 if (format.Fields.hasOEMCode)
763d1bef 583 PrintAndLog(" OEM Code: %" PRIu32,card->OEM);
be59094d 584 if (format.Fields.hasParity)
585 PrintAndLog(" Parity: %s",card->ParityValid ? "Valid" : "Invalid");
586}
587
5d643cc0 588bool HIDTryUnpack(/* in */hidproxmessage_t* packed, /* in */bool ignoreParity){
b5a5fc4d 589 if (FormatTable[0].Name == NULL)
590 return false;
591
592 bool result = false;
593 int i = 0;
594 hidproxcard_t card;
595 memset(&card, 0, sizeof(hidproxcard_t));
596 while (FormatTable[i].Name)
597 {
598 if (FormatTable[i].Unpack(packed, &card)){
be59094d 599 if (ignoreParity || !FormatTable[i].Fields.hasParity || card.ParityValid){
600 if (!result) PrintAndLog("--------------------------------------------------");
5d643cc0 601 result = true;
be59094d 602 HIDDisplayUnpackedCard(&card, FormatTable[i]);
603 PrintAndLog("--------------------------------------------------");
5d643cc0 604 }
b5a5fc4d 605 }
606 ++i;
607 }
608 return result;
609}
Impressum, Datenschutz