QUIC: Add FHOL (Force Head Of Line blocking) tag from Q036
[metze/wireshark/wip.git] / epan / dwarf.c
1 /* dwarf.c
2  * Common DWARF parts
3  *
4  * Wireshark - Network traffic analyzer
5  * By Gerald Combs <gerald@wireshark.org>
6  * Copyright 1998 Gerald Combs
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License
10  * as published by the Free Software Foundation; either version 2
11  * of the License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
21  */
22
23 #include "config.h"
24
25 #include <epan/tvbuff.h>
26
27 #include "dwarf.h"
28
29 gint
30 dissect_uleb128(tvbuff_t *tvb, gint offset, guint64 *value)
31 {
32     guint  start_offset = offset;
33     guint  shift = 0;
34     guint8 byte;
35
36     *value = 0;
37
38     do {
39         byte = tvb_get_guint8(tvb, offset);
40         offset += 1;
41
42         *value |= ((guint64)(byte & 0x7F) << shift);
43         shift += 7;
44     } while (byte & 0x80);
45
46     return offset - start_offset;
47 }
48
49 gint
50 dissect_leb128(tvbuff_t *tvb, gint offset, gint64 *value)
51 {
52     guint  start_offset = offset;
53     guint  shift = 0;
54     guint8 byte;
55
56     *value = 0;
57
58     do {
59         byte = tvb_get_guint8(tvb, offset);
60         offset += 1;
61
62         *value |= ((guint64)(byte & 0x7F) << shift);
63         shift += 7;
64     } while (byte & 0x80);
65
66     if (shift < 64 && byte & 0x40)
67         *value |= - ((gint64)1 << shift);
68
69     return offset - start_offset;
70 }
71
72 /*
73  * Editor modelines  -  http://www.wireshark.org/tools/modelines.html
74  *
75  * Local variables:
76  * c-basic-offset: 4
77  * tab-width: 8
78  * indent-tabs-mode: nil
79  * End:
80  *
81  * vi: set shiftwidth=4 tabstop=8 expandtab:
82  * :indentSize=4:tabSize=8:noTabs=true:
83  */