Migrated vendor_id_payload to INIT/METHOD macros
[strongswan.git] / src / libcharon / encoding / parser.c
1 /*
2 * Copyright (C) 2005-2009 Martin Willi
3 * Copyright (C) 2005 Jan Hutter
4 * Hochschule fuer Technik Rapperswil
5 *
6 * This program is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License as published by the
8 * Free Software Foundation; either version 2 of the License, or (at your
9 * option) any later version. See <http://www.fsf.org/copyleft/gpl.txt>.
10 *
11 * This program is distributed in the hope that it will be useful, but
12 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 * for more details.
15 */
16
17 #include <stdlib.h>
18 #include <arpa/inet.h>
19 #include <string.h>
20
21 #include "parser.h"
22
23 #include <library.h>
24 #include <daemon.h>
25 #include <utils/linked_list.h>
26 #include <encoding/payloads/encodings.h>
27 #include <encoding/payloads/payload.h>
28 #include <encoding/payloads/sa_payload.h>
29 #include <encoding/payloads/proposal_substructure.h>
30 #include <encoding/payloads/transform_substructure.h>
31 #include <encoding/payloads/transform_attribute.h>
32 #include <encoding/payloads/ke_payload.h>
33 #include <encoding/payloads/nonce_payload.h>
34 #include <encoding/payloads/id_payload.h>
35 #include <encoding/payloads/notify_payload.h>
36 #include <encoding/payloads/encryption_payload.h>
37 #include <encoding/payloads/auth_payload.h>
38 #include <encoding/payloads/cert_payload.h>
39 #include <encoding/payloads/certreq_payload.h>
40 #include <encoding/payloads/ts_payload.h>
41 #include <encoding/payloads/delete_payload.h>
42 #include <encoding/payloads/vendor_id_payload.h>
43 #include <encoding/payloads/cp_payload.h>
44 #include <encoding/payloads/configuration_attribute.h>
45 #include <encoding/payloads/eap_payload.h>
46 #include <encoding/payloads/unknown_payload.h>
47
48
49 typedef struct private_parser_t private_parser_t;
50
51 /**
52 * Private data stored in a context.
53 *
54 * Contains pointers and counters to store current state.
55 */
56 struct private_parser_t {
57 /**
58 * Public members, see parser_t.
59 */
60 parser_t public;
61
62 /**
63 * Current bit for reading in input data.
64 */
65 u_int8_t bit_pos;
66
67 /**
68 * Current byte for reading in input data.
69 */
70 u_int8_t *byte_pos;
71
72 /**
73 * Input data to parse.
74 */
75 u_int8_t *input;
76
77 /**
78 * Roof of input, used for length-checking.
79 */
80 u_int8_t *input_roof;
81
82 /**
83 * Set of encoding rules for this parsing session.
84 */
85 encoding_rule_t *rules;
86 };
87
88 /**
89 * Forward declaration
90 */
91 static status_t parse_payload(private_parser_t *this,
92 payload_type_t payload_type, payload_t **payload);
93
94 /**
95 * Log invalid length error
96 */
97 static bool short_input(private_parser_t *this, int number)
98 {
99 DBG1(DBG_ENC, " not enough input to parse rule %d %N",
100 number, encoding_type_names, this->rules[number].type);
101 return FALSE;
102 }
103
104 /**
105 * Log unaligned rules
106 */
107 static bool bad_bitpos(private_parser_t *this, int number)
108 {
109 DBG1(DBG_ENC, " found rule %d %N on bitpos %d",
110 number, encoding_type_names, this->rules[number].type, this->bit_pos);
111 return FALSE;
112 }
113
114 /**
115 * Parse a 4-Bit unsigned integer from the current parsing position.
116 */
117 static bool parse_uint4(private_parser_t *this, int rule_number,
118 u_int8_t *output_pos)
119 {
120 if (this->byte_pos + sizeof(u_int8_t) > this->input_roof)
121 {
122 return short_input(this, rule_number);
123 }
124 switch (this->bit_pos)
125 {
126 case 0:
127 if (output_pos)
128 {
129 *output_pos = *(this->byte_pos) >> 4;
130 }
131 this->bit_pos = 4;
132 break;
133 case 4:
134 if (output_pos)
135 {
136 *output_pos = *(this->byte_pos) & 0x0F;
137 }
138 this->bit_pos = 0;
139 this->byte_pos++;
140 break;
141 default:
142 return bad_bitpos(this, rule_number);
143 }
144 if (output_pos)
145 {
146 DBG3(DBG_ENC, " => %d", *output_pos);
147 }
148 return TRUE;
149 }
150
151 /**
152 * Parse a 8-Bit unsigned integer from the current parsing position.
153 */
154 static bool parse_uint8(private_parser_t *this, int rule_number,
155 u_int8_t *output_pos)
156 {
157 if (this->byte_pos + sizeof(u_int8_t) > this->input_roof)
158 {
159 return short_input(this, rule_number);
160 }
161 if (this->bit_pos)
162 {
163 return bad_bitpos(this, rule_number);
164 }
165 if (output_pos)
166 {
167 *output_pos = *(this->byte_pos);
168 DBG3(DBG_ENC, " => %d", *output_pos);
169 }
170 this->byte_pos++;
171 return TRUE;
172 }
173
174 /**
175 * Parse a 15-Bit unsigned integer from the current parsing position.
176 */
177 static bool parse_uint15(private_parser_t *this, int rule_number,
178 u_int16_t *output_pos)
179 {
180 if (this->byte_pos + sizeof(u_int16_t) > this->input_roof)
181 {
182 return short_input(this, rule_number);
183 }
184 if (this->bit_pos != 1)
185 {
186 return bad_bitpos(this, rule_number);
187 }
188 if (output_pos)
189 {
190 memcpy(output_pos, this->byte_pos, sizeof(u_int16_t));
191 *output_pos = ntohs(*output_pos) & ~0x8000;
192 DBG3(DBG_ENC, " => %d", *output_pos);
193 }
194 this->byte_pos += sizeof(u_int16_t);
195 this->bit_pos = 0;
196 return TRUE;
197 }
198
199 /**
200 * Parse a 16-Bit unsigned integer from the current parsing position.
201 */
202 static bool parse_uint16(private_parser_t *this, int rule_number,
203 u_int16_t *output_pos)
204 {
205 if (this->byte_pos + sizeof(u_int16_t) > this->input_roof)
206 {
207 return short_input(this, rule_number);
208 }
209 if (this->bit_pos)
210 {
211 return bad_bitpos(this, rule_number);
212 }
213 if (output_pos)
214 {
215 memcpy(output_pos, this->byte_pos, sizeof(u_int16_t));
216 *output_pos = ntohs(*output_pos);
217 DBG3(DBG_ENC, " => %d", *output_pos);
218 }
219 this->byte_pos += sizeof(u_int16_t);
220 return TRUE;
221 }
222 /**
223 * Parse a 32-Bit unsigned integer from the current parsing position.
224 */
225 static bool parse_uint32(private_parser_t *this, int rule_number,
226 u_int32_t *output_pos)
227 {
228 if (this->byte_pos + sizeof(u_int32_t) > this->input_roof)
229 {
230 return short_input(this, rule_number);
231 }
232 if (this->bit_pos)
233 {
234 return bad_bitpos(this, rule_number);
235 }
236 if (output_pos)
237 {
238 memcpy(output_pos, this->byte_pos, sizeof(u_int32_t));
239 *output_pos = ntohl(*output_pos);
240 DBG3(DBG_ENC, " => %d", *output_pos);
241 }
242 this->byte_pos += sizeof(u_int32_t);
243 return TRUE;
244 }
245
246 /**
247 * Parse a given amount of bytes and writes them to a specific location
248 */
249 static bool parse_bytes(private_parser_t *this, int rule_number,
250 u_int8_t *output_pos, int bytes)
251 {
252 if (this->byte_pos + bytes > this->input_roof)
253 {
254 return short_input(this, rule_number);
255 }
256 if (this->bit_pos)
257 {
258 return bad_bitpos(this, rule_number);
259 }
260 if (output_pos)
261 {
262 memcpy(output_pos, this->byte_pos, bytes);
263 DBG3(DBG_ENC, " => %b", output_pos, bytes);
264 }
265 this->byte_pos += bytes;
266 return TRUE;
267 }
268
269 /**
270 * Parse a single Bit from the current parsing position
271 */
272 static bool parse_bit(private_parser_t *this, int rule_number,
273 bool *output_pos)
274 {
275 if (this->byte_pos + sizeof(u_int8_t) > this->input_roof)
276 {
277 return short_input(this, rule_number);
278 }
279 if (output_pos)
280 {
281 u_int8_t mask;
282 mask = 0x01 << (7 - this->bit_pos);
283 *output_pos = *this->byte_pos & mask;
284
285 if (*output_pos)
286 { /* set to a "clean", comparable true */
287 *output_pos = TRUE;
288 }
289 DBG3(DBG_ENC, " => %d", *output_pos);
290 }
291 this->bit_pos = (this->bit_pos + 1) % 8;
292 if (this->bit_pos == 0)
293 {
294 this->byte_pos++;
295 }
296 return TRUE;
297 }
298
299 /**
300 * Parse substructures in a list.
301 */
302 static bool parse_list(private_parser_t *this, int rule_number,
303 linked_list_t **output_pos, payload_type_t payload_type, int length)
304 {
305 linked_list_t *list = *output_pos;
306
307 if (length < 0)
308 {
309 return short_input(this, rule_number);
310 }
311 if (this->bit_pos)
312 {
313 return bad_bitpos(this, rule_number);
314 }
315 while (length > 0)
316 {
317 u_int8_t *pos_before = this->byte_pos;
318 payload_t *payload;
319
320 DBG2(DBG_ENC, " %d bytes left, parsing recursively %N",
321 length, payload_type_names, payload_type);
322
323 if (parse_payload(this, payload_type, &payload) != SUCCESS)
324 {
325 DBG1(DBG_ENC, " parsing of a %N substructure failed",
326 payload_type_names, payload_type);
327 return FALSE;
328 }
329 list->insert_last(list, payload);
330 length -= this->byte_pos - pos_before;
331 }
332 if (length != 0)
333 { /* must yield exactly to zero */
334 DBG1(DBG_ENC, " length of %N substructure list invalid",
335 payload_type_names, payload_type);
336 return FALSE;
337 }
338 *output_pos = list;
339 return TRUE;
340 }
341
342 /**
343 * Parse data from current parsing position in a chunk.
344 */
345 static bool parse_chunk(private_parser_t *this, int rule_number,
346 chunk_t *output_pos, int length)
347 {
348 if (this->byte_pos + length > this->input_roof)
349 {
350 return short_input(this, rule_number);
351 }
352 if (this->bit_pos)
353 {
354 return bad_bitpos(this, rule_number);
355 }
356 if (output_pos)
357 {
358 *output_pos = chunk_alloc(length);
359 memcpy(output_pos->ptr, this->byte_pos, length);
360 DBG3(DBG_ENC, " => %b", output_pos->ptr, length);
361 }
362 this->byte_pos += length;
363 return TRUE;
364 }
365
366 /**
367 * Implementation of parser_t.parse_payload.
368 */
369 static status_t parse_payload(private_parser_t *this,
370 payload_type_t payload_type, payload_t **payload)
371 {
372 payload_t *pld;
373 void *output;
374 size_t rule_count;
375 int payload_length = 0, spi_size = 0, attribute_length = 0;
376 u_int16_t ts_type = 0;
377 bool attribute_format = FALSE;
378 int rule_number;
379 encoding_rule_t *rule;
380
381 /* create instance of the payload to parse */
382 pld = payload_create(payload_type);
383
384 DBG2(DBG_ENC, "parsing %N payload, %d bytes left",
385 payload_type_names, payload_type, this->input_roof - this->byte_pos);
386
387 DBG3(DBG_ENC, "parsing payload from %b",
388 this->byte_pos, this->input_roof - this->byte_pos);
389
390 /* base pointer for output, avoids casting in every rule */
391 output = pld;
392
393 /* parse the payload with its own rulse */
394 pld->get_encoding_rules(pld, &this->rules, &rule_count);
395 for (rule_number = 0; rule_number < rule_count; rule_number++)
396 {
397 rule = &(this->rules[rule_number]);
398 DBG2(DBG_ENC, " parsing rule %d %N",
399 rule_number, encoding_type_names, rule->type);
400 switch (rule->type)
401 {
402 case U_INT_4:
403 {
404 if (!parse_uint4(this, rule_number, output + rule->offset))
405 {
406 pld->destroy(pld);
407 return PARSE_ERROR;
408 }
409 break;
410 }
411 case U_INT_8:
412 {
413 if (!parse_uint8(this, rule_number, output + rule->offset))
414 {
415 pld->destroy(pld);
416 return PARSE_ERROR;
417 }
418 break;
419 }
420 case U_INT_16:
421 {
422 if (!parse_uint16(this, rule_number, output + rule->offset))
423 {
424 pld->destroy(pld);
425 return PARSE_ERROR;
426 }
427 break;
428 }
429 case U_INT_32:
430 {
431 if (!parse_uint32(this, rule_number, output + rule->offset))
432 {
433 pld->destroy(pld);
434 return PARSE_ERROR;
435 }
436 break;
437 }
438 case IKE_SPI:
439 {
440 if (!parse_bytes(this, rule_number, output + rule->offset, 8))
441 {
442 pld->destroy(pld);
443 return PARSE_ERROR;
444 }
445 break;
446 }
447 case RESERVED_BIT:
448 {
449 if (!parse_bit(this, rule_number, NULL))
450 {
451 pld->destroy(pld);
452 return PARSE_ERROR;
453 }
454 break;
455 }
456 case RESERVED_BYTE:
457 {
458 if (!parse_uint8(this, rule_number, NULL))
459 {
460 pld->destroy(pld);
461 return PARSE_ERROR;
462 }
463 break;
464 }
465 case FLAG:
466 {
467 if (!parse_bit(this, rule_number, output + rule->offset))
468 {
469 pld->destroy(pld);
470 return PARSE_ERROR;
471 }
472 break;
473 }
474 case PAYLOAD_LENGTH:
475 {
476 if (!parse_uint16(this, rule_number, output + rule->offset))
477 {
478 pld->destroy(pld);
479 return PARSE_ERROR;
480 }
481 /* parsed u_int16 should be aligned */
482 payload_length = *(u_int16_t*)(output + rule->offset);
483 if (payload_length < UNKNOWN_PAYLOAD_HEADER_LENGTH)
484 {
485 pld->destroy(pld);
486 return PARSE_ERROR;
487 }
488 break;
489 }
490 case HEADER_LENGTH:
491 {
492 if (!parse_uint32(this, rule_number, output + rule->offset))
493 {
494 pld->destroy(pld);
495 return PARSE_ERROR;
496 }
497 break;
498 }
499 case SPI_SIZE:
500 {
501 if (!parse_uint8(this, rule_number, output + rule->offset))
502 {
503 pld->destroy(pld);
504 return PARSE_ERROR;
505 }
506 spi_size = *(u_int8_t*)(output + rule->offset);
507 break;
508 }
509 case SPI:
510 {
511 if (!parse_chunk(this, rule_number, output + rule->offset,
512 spi_size))
513 {
514 pld->destroy(pld);
515 return PARSE_ERROR;
516 }
517 break;
518 }
519 case PROPOSALS:
520 {
521 if (payload_length < SA_PAYLOAD_HEADER_LENGTH ||
522 !parse_list(this, rule_number, output + rule->offset,
523 PROPOSAL_SUBSTRUCTURE,
524 payload_length - SA_PAYLOAD_HEADER_LENGTH))
525 {
526 pld->destroy(pld);
527 return PARSE_ERROR;
528 }
529 break;
530 }
531 case TRANSFORMS:
532 {
533 if (payload_length <
534 spi_size + PROPOSAL_SUBSTRUCTURE_HEADER_LENGTH ||
535 !parse_list(this, rule_number, output + rule->offset,
536 TRANSFORM_SUBSTRUCTURE, payload_length - spi_size -
537 PROPOSAL_SUBSTRUCTURE_HEADER_LENGTH))
538 {
539 pld->destroy(pld);
540 return PARSE_ERROR;
541 }
542 break;
543 }
544 case TRANSFORM_ATTRIBUTES:
545 {
546 if (payload_length < TRANSFORM_SUBSTRUCTURE_HEADER_LENGTH ||
547 !parse_list(this, rule_number, output + rule->offset,
548 TRANSFORM_ATTRIBUTE,
549 payload_length - TRANSFORM_SUBSTRUCTURE_HEADER_LENGTH))
550 {
551 pld->destroy(pld);
552 return PARSE_ERROR;
553 }
554 break;
555 }
556 case CONFIGURATION_ATTRIBUTES:
557 {
558 if (payload_length < CP_PAYLOAD_HEADER_LENGTH ||
559 !parse_list(this, rule_number, output + rule->offset,
560 CONFIGURATION_ATTRIBUTE,
561 payload_length - CP_PAYLOAD_HEADER_LENGTH))
562 {
563 pld->destroy(pld);
564 return PARSE_ERROR;
565 }
566 break;
567 }
568 case ATTRIBUTE_FORMAT:
569 {
570 if (!parse_bit(this, rule_number, output + rule->offset))
571 {
572 pld->destroy(pld);
573 return PARSE_ERROR;
574 }
575 attribute_format = *(bool*)(output + rule->offset);
576 break;
577 }
578 case ATTRIBUTE_TYPE:
579 {
580 if (!parse_uint15(this, rule_number, output + rule->offset))
581 {
582 pld->destroy(pld);
583 return PARSE_ERROR;
584 }
585 break;
586 }
587 case CONFIGURATION_ATTRIBUTE_LENGTH:
588 {
589 if (!parse_uint16(this, rule_number, output + rule->offset))
590 {
591 pld->destroy(pld);
592 return PARSE_ERROR;
593 }
594 attribute_length = *(u_int16_t*)(output + rule->offset);
595 break;
596 }
597 case ATTRIBUTE_LENGTH_OR_VALUE:
598 {
599 if (!parse_uint16(this, rule_number, output + rule->offset))
600 {
601 pld->destroy(pld);
602 return PARSE_ERROR;
603 }
604 attribute_length = *(u_int16_t*)(output + rule->offset);
605 break;
606 }
607 case ATTRIBUTE_VALUE:
608 {
609 if (attribute_format == FALSE &&
610 !parse_chunk(this, rule_number, output + rule->offset,
611 attribute_length))
612 {
613 pld->destroy(pld);
614 return PARSE_ERROR;
615 }
616 break;
617 }
618 case NONCE_DATA:
619 {
620 if (payload_length < NONCE_PAYLOAD_HEADER_LENGTH ||
621 !parse_chunk(this, rule_number, output + rule->offset,
622 payload_length - NONCE_PAYLOAD_HEADER_LENGTH))
623 {
624 pld->destroy(pld);
625 return PARSE_ERROR;
626 }
627 break;
628 }
629 case ID_DATA:
630 {
631 if (payload_length < ID_PAYLOAD_HEADER_LENGTH ||
632 !parse_chunk(this, rule_number, output + rule->offset,
633 payload_length - ID_PAYLOAD_HEADER_LENGTH))
634 {
635 pld->destroy(pld);
636 return PARSE_ERROR;
637 }
638 break;
639 }
640 case AUTH_DATA:
641 {
642 if (payload_length < AUTH_PAYLOAD_HEADER_LENGTH ||
643 !parse_chunk(this, rule_number, output + rule->offset,
644 payload_length - AUTH_PAYLOAD_HEADER_LENGTH))
645 {
646 pld->destroy(pld);
647 return PARSE_ERROR;
648 }
649 break;
650 }
651 case CERT_DATA:
652 {
653 if (payload_length < CERT_PAYLOAD_HEADER_LENGTH ||
654 !parse_chunk(this, rule_number, output + rule->offset,
655 payload_length - CERT_PAYLOAD_HEADER_LENGTH))
656 {
657 pld->destroy(pld);
658 return PARSE_ERROR;
659 }
660 break;
661 }
662 case CERTREQ_DATA:
663 {
664 if (payload_length < CERTREQ_PAYLOAD_HEADER_LENGTH ||
665 !parse_chunk(this, rule_number, output + rule->offset,
666 payload_length - CERTREQ_PAYLOAD_HEADER_LENGTH))
667 {
668 pld->destroy(pld);
669 return PARSE_ERROR;
670 }
671 break;
672 }
673 case EAP_DATA:
674 {
675 if (payload_length < EAP_PAYLOAD_HEADER_LENGTH ||
676 !parse_chunk(this, rule_number, output + rule->offset,
677 payload_length - EAP_PAYLOAD_HEADER_LENGTH))
678 {
679 pld->destroy(pld);
680 return PARSE_ERROR;
681 }
682 break;
683 }
684 case SPIS:
685 {
686 if (payload_length < DELETE_PAYLOAD_HEADER_LENGTH ||
687 !parse_chunk(this, rule_number, output + rule->offset,
688 payload_length - DELETE_PAYLOAD_HEADER_LENGTH))
689 {
690 pld->destroy(pld);
691 return PARSE_ERROR;
692 }
693 break;
694 }
695 case VID_DATA:
696 {
697 if (payload_length < VENDOR_ID_PAYLOAD_HEADER_LENGTH ||
698 !parse_chunk(this, rule_number, output + rule->offset,
699 payload_length - VENDOR_ID_PAYLOAD_HEADER_LENGTH))
700 {
701 pld->destroy(pld);
702 return PARSE_ERROR;
703 }
704 break;
705 }
706 case CONFIGURATION_ATTRIBUTE_VALUE:
707 {
708 if (!parse_chunk(this, rule_number, output + rule->offset,
709 attribute_length))
710 {
711 pld->destroy(pld);
712 return PARSE_ERROR;
713 }
714 break;
715 }
716 case KEY_EXCHANGE_DATA:
717 {
718 if (payload_length < KE_PAYLOAD_HEADER_LENGTH ||
719 !parse_chunk(this, rule_number, output + rule->offset,
720 payload_length - KE_PAYLOAD_HEADER_LENGTH))
721 {
722 pld->destroy(pld);
723 return PARSE_ERROR;
724 }
725 break;
726 }
727 case NOTIFICATION_DATA:
728 {
729 if (payload_length < NOTIFY_PAYLOAD_HEADER_LENGTH + spi_size ||
730 !parse_chunk(this, rule_number, output + rule->offset,
731 payload_length - NOTIFY_PAYLOAD_HEADER_LENGTH - spi_size))
732 {
733 pld->destroy(pld);
734 return PARSE_ERROR;
735 }
736 break;
737 }
738 case ENCRYPTED_DATA:
739 {
740 if (payload_length < ENCRYPTION_PAYLOAD_HEADER_LENGTH ||
741 !parse_chunk(this, rule_number, output + rule->offset,
742 payload_length - ENCRYPTION_PAYLOAD_HEADER_LENGTH))
743 {
744 pld->destroy(pld);
745 return PARSE_ERROR;
746 }
747 break;
748 }
749 case TS_TYPE:
750 {
751 if (!parse_uint8(this, rule_number, output + rule->offset))
752 {
753 pld->destroy(pld);
754 return PARSE_ERROR;
755 }
756 ts_type = *(u_int8_t*)(output + rule->offset);
757 break;
758 }
759 case ADDRESS:
760 {
761 int address_length = (ts_type == TS_IPV4_ADDR_RANGE) ? 4 : 16;
762
763 if (!parse_chunk(this, rule_number, output + rule->offset,
764 address_length))
765 {
766 pld->destroy(pld);
767 return PARSE_ERROR;
768 }
769 break;
770 }
771 case TRAFFIC_SELECTORS:
772 {
773 if (payload_length < TS_PAYLOAD_HEADER_LENGTH ||
774 !parse_list(this, rule_number, output + rule->offset,
775 TRAFFIC_SELECTOR_SUBSTRUCTURE,
776 payload_length - TS_PAYLOAD_HEADER_LENGTH))
777 {
778 pld->destroy(pld);
779 return PARSE_ERROR;
780 }
781 break;
782 }
783 case UNKNOWN_DATA:
784 {
785 if (payload_length < UNKNOWN_PAYLOAD_HEADER_LENGTH ||
786 !parse_chunk(this, rule_number, output + rule->offset,
787 payload_length - UNKNOWN_PAYLOAD_HEADER_LENGTH))
788 {
789 pld->destroy(pld);
790 return PARSE_ERROR;
791 }
792 break;
793 }
794 default:
795 {
796 DBG1(DBG_ENC, " no rule to parse rule %d %N",
797 rule_number, encoding_type_names, rule->type);
798 pld->destroy(pld);
799 return PARSE_ERROR;
800 }
801 }
802 /* process next rulue */
803 rule++;
804 }
805
806 *payload = pld;
807 DBG2(DBG_ENC, "parsing %N payload finished",
808 payload_type_names, payload_type);
809 return SUCCESS;
810 }
811
812 /**
813 * Implementation of parser_t.get_remaining_byte_count.
814 */
815 static int get_remaining_byte_count (private_parser_t *this)
816 {
817 return this->input_roof - this->byte_pos;
818 }
819
820 /**
821 * Implementation of parser_t.reset_context.
822 */
823 static void reset_context (private_parser_t *this)
824 {
825 this->byte_pos = this->input;
826 this->bit_pos = 0;
827 }
828
829 /**
830 * Implementation of parser_t.destroy.
831 */
832 static void destroy(private_parser_t *this)
833 {
834 free(this);
835 }
836
837 /*
838 * Described in header.
839 */
840 parser_t *parser_create(chunk_t data)
841 {
842 private_parser_t *this = malloc_thing(private_parser_t);
843
844 this->public.parse_payload = (status_t(*)(parser_t*,payload_type_t,payload_t**))parse_payload;
845 this->public.reset_context = (void(*)(parser_t*)) reset_context;
846 this->public.get_remaining_byte_count = (int (*) (parser_t *))get_remaining_byte_count;
847 this->public.destroy = (void(*)(parser_t*)) destroy;
848
849 this->input = data.ptr;
850 this->byte_pos = data.ptr;
851 this->bit_pos = 0;
852 this->input_roof = data.ptr + data.len;
853
854 return &this->public;
855 }
856