From 2e1de51e35bea53ebece1a6fd6d6970534f4cbe9 Mon Sep 17 00:00:00 2001 From: "Richard W.M. Jones" Date: Thu, 1 Jan 1970 00:00:00 +0000 Subject: [PATCH] Extracted kernel structures for device addressing in ifconfig. --- lib/Makefile.in | 4 + lib/kernel_in_device.ml | 671 ++++++++++++++++++ lib/kernel_in_device.mli | 11 + lib/kernel_in_ifaddr.ml | 755 ++++++++++++++++++++ lib/kernel_in_ifaddr.mli | 23 + lib/kernel_inet6_dev.ml | 671 ++++++++++++++++++ lib/kernel_inet6_dev.mli | 11 + lib/kernel_inet6_ifaddr.ml | 937 +++++++++++++++++++++++++ lib/kernel_inet6_ifaddr.mli | 16 + lib/kernel_net.ml | 8 + lib/kernel_net_device.ml | 1586 +++++++++++++++++++++++++++++++------------ lib/kernel_net_device.mli | 19 +- lib/kernel_task_struct.ml | 640 +++++++++-------- lib/virt_mem_kernels.ml | 6 +- 14 files changed, 4632 insertions(+), 726 deletions(-) create mode 100644 lib/kernel_in_device.ml create mode 100644 lib/kernel_in_device.mli create mode 100644 lib/kernel_in_ifaddr.ml create mode 100644 lib/kernel_in_ifaddr.mli create mode 100644 lib/kernel_inet6_dev.ml create mode 100644 lib/kernel_inet6_dev.mli create mode 100644 lib/kernel_inet6_ifaddr.ml create mode 100644 lib/kernel_inet6_ifaddr.mli diff --git a/lib/Makefile.in b/lib/Makefile.in index ee50a4c..ed43af2 100644 --- a/lib/Makefile.in +++ b/lib/Makefile.in @@ -58,6 +58,10 @@ OBJS = virt_mem_gettext.cmo \ kernel_task_struct.cmo \ kernel_net_device.cmo \ kernel_net.cmo \ + kernel_in_device.cmo \ + kernel_in_ifaddr.cmo \ + kernel_inet6_dev.cmo \ + kernel_inet6_ifaddr.cmo \ virt_mem_ksyms.cmo \ virt_mem_kallsyms.cmo \ virt_mem_utsname.cmo \ diff --git a/lib/kernel_in_device.ml b/lib/kernel_in_device.ml new file mode 100644 index 0000000..62373eb --- /dev/null +++ b/lib/kernel_in_device.ml @@ -0,0 +1,671 @@ +(* WARNING: This file and the corresponding mli (interface) are + * automatically generated by the extract/codegen/kerneldb_to_parser.ml + * program. + * + * Any edits you make to this file will be lost. + * + * To update this file from the latest kernel database, it is recommended + * that you do 'make update-kernel-structs'. + *) + +let zero = 0;; +let struct_name = "in_device";; +let match_err = "failed to match kernel structure";; +type t = { in_device_ifa_list : Virt_mem_mmap.addr };; +type fs_t = { __fs_in_device_ifa_list : Virt_mem_types.fieldsig };; +let fieldsig_1 = + { + __fs_in_device_ifa_list = + { Virt_mem_types.field_available = true; field_offset = 12; }; + };; +let fieldsig_2 = + { + __fs_in_device_ifa_list = + { Virt_mem_types.field_available = true; field_offset = 16; }; + };; +let fieldsig_3 = + { + __fs_in_device_ifa_list = + { Virt_mem_types.field_available = true; field_offset = 12; }; + };; +let fieldsig_4 = + { + __fs_in_device_ifa_list = + { Virt_mem_types.field_available = true; field_offset = 16; }; + };; +let parser_1 bits = + bitmatch bits with + | { in_device_ifa_list : zero+32 : offset(96), littleendian } -> + { in_device_ifa_list = in_device_ifa_list } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_1", match_err));; +let parser_2 bits = + bitmatch bits with + | { in_device_ifa_list : zero+64 : offset(128), littleendian } -> + { in_device_ifa_list = in_device_ifa_list } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_2", match_err));; +let parser_3 bits = + bitmatch bits with + | { in_device_ifa_list : zero+32 : offset(96), bigendian } -> + { in_device_ifa_list = in_device_ifa_list } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_3", match_err));; +let parser_4 bits = + bitmatch bits with + | { in_device_ifa_list : zero+64 : offset(128), bigendian } -> + { in_device_ifa_list = in_device_ifa_list } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_4", match_err));; +module StringMap = Map.Make(String);; +let map = StringMap.empty;; +let v = (parser_1, 240, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_1, 216, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3132.fc7.i686" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3141.fc7.i686" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;; +let v = (parser_1, 264, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_1, 264, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; +let v = (parser_1, 240, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.24-7.fc9.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.24-9.fc9.i686" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_1, 240, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_2, 376, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_2, 440, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_2, 440, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_2, 440, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.25.14-69.fc8.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; +let v = (parser_1, 216, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i586" v map;; +let v = (parser_1, 216, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_3, 212, fieldsig_3);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; +let v = (parser_4, 328, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; +let v = (parser_4, 328, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; +let v = (parser_2, 328, fieldsig_2);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_1, 216, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i586" v map;; +let v = (parser_1, 216, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_3, 212, fieldsig_3);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; +let v = (parser_4, 328, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; +let v = (parser_2, 328, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3128.fc7.i586" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;; +let v = (parser_3, 260, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; +let v = (parser_2, 440, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3132.fc7.i586" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3132.fc7.i686" v map;; +let v = (parser_3, 260, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; +let v = (parser_2, 440, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3141.fc7.i586" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3141.fc7.i686" v map;; +let v = (parser_3, 260, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; +let v = (parser_2, 440, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3144.fc7.i586" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;; +let v = (parser_3, 260, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; +let v = (parser_2, 440, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; +let v = (parser_1, 264, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i586" v map;; +let v = (parser_1, 264, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_3, 260, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; +let v = (parser_2, 392, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_1, 264, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i586" v map;; +let v = (parser_1, 264, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_3, 260, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; +let v = (parser_2, 392, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3209.fc8.i586" v map;; +let v = (parser_1, 288, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; +let v = (parser_3, 260, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; +let v = (parser_2, 440, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3209.fc8.x86_64" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3218.fc8.i586" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; +let v = (parser_2, 448, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3218.fc8.x86_64" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3221.fc8.i586" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; +let v = (parser_2, 448, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3221.fc8.x86_64" v map;; +let v = (parser_1, 240, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i586" v map;; +let v = (parser_1, 240, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_3, 232, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; +let v = (parser_4, 360, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; +let v = (parser_2, 360, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; +let v = (parser_2, 448, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3234.fc8.x86_64" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; +let v = (parser_2, 448, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3236.fc8.x86_64" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; +let v = (parser_2, 448, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3238.fc8.x86_64" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; +let v = (parser_2, 448, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3242.fc8.x86_64" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; +let v = (parser_2, 448, fieldsig_2);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.x86_64" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; +let v = (parser_2, 448, fieldsig_2);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.x86_64" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i586" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_3, 236, fieldsig_3);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; +let v = (parser_4, 368, fieldsig_4);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; +let v = (parser_2, 368, fieldsig_2);; +let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i586" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_3, 236, fieldsig_3);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; +let v = (parser_4, 368, fieldsig_4);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; +let v = (parser_2, 368, fieldsig_2);; +let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i586" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.24-7.fc9.i586" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.24-7.fc9.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.24-7.fc9.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.24-9.fc9.i586" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.24-9.fc9.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.24-9.fc9.x86_64" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.25.11-97.fc9.i686" v map;; +let v = (parser_2, 368, fieldsig_2);; +let map = StringMap.add "2.6.25.11-97.fc9.x86_64" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i586" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_4, 368, fieldsig_4);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i586" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_3, 236, fieldsig_3);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; +let v = (parser_4, 368, fieldsig_4);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; +let v = (parser_2, 368, fieldsig_2);; +let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i586" v map;; +let v = (parser_1, 244, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_3, 236, fieldsig_3);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; +let v = (parser_4, 368, fieldsig_4);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; +let v = (parser_2, 368, fieldsig_2);; +let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i586" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i586" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i586" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i586" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i586" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i586" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.x86_64" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i586" v map;; +let v = (parser_1, 300, fieldsig_1);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.x86_64" v map;; +let v = (parser_1, 212, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_4, 328, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; +let v = (parser_4, 328, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; +let v = (parser_2, 320, fieldsig_2);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_1, 212, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_4, 328, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; +let v = (parser_2, 320, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; +let v = (parser_2, 480, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; +let v = (parser_2, 480, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; +let v = (parser_2, 480, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; +let v = (parser_2, 480, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; +let v = (parser_2, 384, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; +let v = (parser_2, 384, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_4, 392, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; +let v = (parser_4, 360, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; +let v = (parser_2, 344, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; +let v = (parser_4, 368, fieldsig_4);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; +let v = (parser_4, 368, fieldsig_4);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; +let v = (parser_4, 400, fieldsig_4);; +let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; +let v = (parser_4, 368, fieldsig_4);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_4, 368, fieldsig_4);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; +let v = (parser_4, 368, fieldsig_4);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; +let v = (parser_3, 216, fieldsig_3);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; +let v = (parser_3, 216, fieldsig_3);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; +let v = (parser_3, 264, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; +let v = (parser_3, 240, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; +let v = (parser_3, 244, fieldsig_3);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; +let v = (parser_3, 244, fieldsig_3);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; +let v = (parser_3, 244, fieldsig_3);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; +let v = (parser_3, 244, fieldsig_3);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; +let v = (parser_1, 216, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_2, 328, fieldsig_2);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_1, 216, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_2, 328, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +type kernel_version = string;; +let in_device_known version = StringMap.mem version map;; +let in_device_size version = + let (_, size, _) = StringMap.find version map in size;; +let in_device_of_bits version bits = + let (parsefn, _, _) = StringMap.find version map in parsefn bits;; +let get_in_device version mem addr = + let (parsefn, size, _) = StringMap.find version map in + let bytes = Virt_mem_mmap.get_bytes mem addr size in + let bits = Bitstring.bitstring_of_string bytes in parsefn bits;; +let field_signature_of_in_device_ifa_list version = + let (_, _, fs) = StringMap.find version map in fs.__fs_in_device_ifa_list;; diff --git a/lib/kernel_in_device.mli b/lib/kernel_in_device.mli new file mode 100644 index 0000000..a115843 --- /dev/null +++ b/lib/kernel_in_device.mli @@ -0,0 +1,11 @@ +type t = { in_device_ifa_list : Virt_mem_mmap.addr };; +val struct_name : string;; +type kernel_version = string;; +val in_device_known : kernel_version -> bool;; +val in_device_size : kernel_version -> int;; +val in_device_of_bits : kernel_version -> Bitstring.bitstring -> t;; +val get_in_device : + kernel_version -> + ('a, 'b, [ | `HasMapping ]) Virt_mem_mmap.t -> Virt_mem_mmap.addr -> t;; +val field_signature_of_in_device_ifa_list : + kernel_version -> Virt_mem_types.fieldsig;; diff --git a/lib/kernel_in_ifaddr.ml b/lib/kernel_in_ifaddr.ml new file mode 100644 index 0000000..90711b3 --- /dev/null +++ b/lib/kernel_in_ifaddr.ml @@ -0,0 +1,755 @@ +(* WARNING: This file and the corresponding mli (interface) are + * automatically generated by the extract/codegen/kerneldb_to_parser.ml + * program. + * + * Any edits you make to this file will be lost. + * + * To update this file from the latest kernel database, it is recommended + * that you do 'make update-kernel-structs'. + *) + +let zero = 0;; +let struct_name = "in_ifaddr";; +let match_err = "failed to match kernel structure";; +type t = + { in_ifaddr_ifa_next : Virt_mem_mmap.addr; in_ifaddr_ifa_local : int64; + in_ifaddr_ifa_address : int64; in_ifaddr_ifa_mask : int64; + in_ifaddr_ifa_broadcast : int64 + };; +type fs_t = + { __fs_in_ifaddr_ifa_next : Virt_mem_types.fieldsig; + __fs_in_ifaddr_ifa_local : Virt_mem_types.fieldsig; + __fs_in_ifaddr_ifa_address : Virt_mem_types.fieldsig; + __fs_in_ifaddr_ifa_mask : Virt_mem_types.fieldsig; + __fs_in_ifaddr_ifa_broadcast : Virt_mem_types.fieldsig + };; +let fieldsig_1 = + { + __fs_in_ifaddr_ifa_next = + { Virt_mem_types.field_available = true; field_offset = 0; }; + __fs_in_ifaddr_ifa_local = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_in_ifaddr_ifa_address = + { Virt_mem_types.field_available = true; field_offset = 20; }; + __fs_in_ifaddr_ifa_mask = + { Virt_mem_types.field_available = true; field_offset = 24; }; + __fs_in_ifaddr_ifa_broadcast = + { Virt_mem_types.field_available = true; field_offset = 28; }; + };; +let fieldsig_2 = + { + __fs_in_ifaddr_ifa_next = + { Virt_mem_types.field_available = true; field_offset = 0; }; + __fs_in_ifaddr_ifa_local = + { Virt_mem_types.field_available = true; field_offset = 32; }; + __fs_in_ifaddr_ifa_address = + { Virt_mem_types.field_available = true; field_offset = 36; }; + __fs_in_ifaddr_ifa_mask = + { Virt_mem_types.field_available = true; field_offset = 40; }; + __fs_in_ifaddr_ifa_broadcast = + { Virt_mem_types.field_available = true; field_offset = 44; }; + };; +let fieldsig_3 = + { + __fs_in_ifaddr_ifa_next = + { Virt_mem_types.field_available = true; field_offset = 0; }; + __fs_in_ifaddr_ifa_local = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_in_ifaddr_ifa_address = + { Virt_mem_types.field_available = true; field_offset = 20; }; + __fs_in_ifaddr_ifa_mask = + { Virt_mem_types.field_available = true; field_offset = 24; }; + __fs_in_ifaddr_ifa_broadcast = + { Virt_mem_types.field_available = true; field_offset = 28; }; + };; +let fieldsig_4 = + { + __fs_in_ifaddr_ifa_next = + { Virt_mem_types.field_available = true; field_offset = 0; }; + __fs_in_ifaddr_ifa_local = + { Virt_mem_types.field_available = true; field_offset = 32; }; + __fs_in_ifaddr_ifa_address = + { Virt_mem_types.field_available = true; field_offset = 36; }; + __fs_in_ifaddr_ifa_mask = + { Virt_mem_types.field_available = true; field_offset = 40; }; + __fs_in_ifaddr_ifa_broadcast = + { Virt_mem_types.field_available = true; field_offset = 44; }; + };; +let parser_1 bits = + bitmatch bits with + | { in_ifaddr_ifa_next : zero+32 : offset(0), littleendian; + in_ifaddr_ifa_local : zero+32 : offset(128), littleendian; + in_ifaddr_ifa_address : zero+32 : offset(160), littleendian; + in_ifaddr_ifa_mask : zero+32 : offset(192), littleendian; + in_ifaddr_ifa_broadcast : zero+32 : offset(224), littleendian } -> + { in_ifaddr_ifa_next = in_ifaddr_ifa_next; + in_ifaddr_ifa_local = in_ifaddr_ifa_local; + in_ifaddr_ifa_address = in_ifaddr_ifa_address; + in_ifaddr_ifa_mask = in_ifaddr_ifa_mask; + in_ifaddr_ifa_broadcast = in_ifaddr_ifa_broadcast } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_1", match_err));; +let parser_2 bits = + bitmatch bits with + | { in_ifaddr_ifa_next : zero+64 : offset(0), littleendian; + in_ifaddr_ifa_local : zero+32 : offset(256), littleendian; + in_ifaddr_ifa_address : zero+32 : offset(288), littleendian; + in_ifaddr_ifa_mask : zero+32 : offset(320), littleendian; + in_ifaddr_ifa_broadcast : zero+32 : offset(352), littleendian } -> + { in_ifaddr_ifa_next = in_ifaddr_ifa_next; + in_ifaddr_ifa_local = in_ifaddr_ifa_local; + in_ifaddr_ifa_address = in_ifaddr_ifa_address; + in_ifaddr_ifa_mask = in_ifaddr_ifa_mask; + in_ifaddr_ifa_broadcast = in_ifaddr_ifa_broadcast } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_2", match_err));; +let parser_3 bits = + bitmatch bits with + | { in_ifaddr_ifa_next : zero+32 : offset(0), bigendian; + in_ifaddr_ifa_local : zero+32 : offset(128), bigendian; + in_ifaddr_ifa_address : zero+32 : offset(160), bigendian; + in_ifaddr_ifa_mask : zero+32 : offset(192), bigendian; + in_ifaddr_ifa_broadcast : zero+32 : offset(224), bigendian } -> + { in_ifaddr_ifa_next = in_ifaddr_ifa_next; + in_ifaddr_ifa_local = in_ifaddr_ifa_local; + in_ifaddr_ifa_address = in_ifaddr_ifa_address; + in_ifaddr_ifa_mask = in_ifaddr_ifa_mask; + in_ifaddr_ifa_broadcast = in_ifaddr_ifa_broadcast } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_3", match_err));; +let parser_4 bits = + bitmatch bits with + | { in_ifaddr_ifa_next : zero+64 : offset(0), bigendian; + in_ifaddr_ifa_local : zero+32 : offset(256), bigendian; + in_ifaddr_ifa_address : zero+32 : offset(288), bigendian; + in_ifaddr_ifa_mask : zero+32 : offset(320), bigendian; + in_ifaddr_ifa_broadcast : zero+32 : offset(352), bigendian } -> + { in_ifaddr_ifa_next = in_ifaddr_ifa_next; + in_ifaddr_ifa_local = in_ifaddr_ifa_local; + in_ifaddr_ifa_address = in_ifaddr_ifa_address; + in_ifaddr_ifa_mask = in_ifaddr_ifa_mask; + in_ifaddr_ifa_broadcast = in_ifaddr_ifa_broadcast } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_4", match_err));; +module StringMap = Map.Make(String);; +let map = StringMap.empty;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3132.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3141.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.24-7.fc9.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.24-9.fc9.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.25.14-69.fc8.x86_64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3128.fc7.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3132.fc7.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3132.fc7.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3141.fc7.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3141.fc7.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3144.fc7.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3209.fc8.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3209.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3218.fc8.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3218.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3221.fc8.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3221.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3234.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3236.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3238.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3242.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.24-7.fc9.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.24-7.fc9.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.24-7.fc9.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.24-9.fc9.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.24-9.fc9.i686" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.24-9.fc9.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.25.11-97.fc9.i686" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.25.11-97.fc9.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i586" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i586" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i586" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i586" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.x86_64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i586" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.x86_64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i586" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.x86_64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i586" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.x86_64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i586" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.x86_64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i586" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.x86_64" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i586" v map;; +let v = (parser_1, 51, fieldsig_1);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; +let v = (parser_2, 67, fieldsig_2);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; +let v = (parser_4, 71, fieldsig_4);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; +let v = (parser_4, 67, fieldsig_4);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; +let v = (parser_3, 55, fieldsig_3);; +let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; +let v = (parser_3, 51, fieldsig_3);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_1, 55, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_2, 71, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +type kernel_version = string;; +let in_ifaddr_known version = StringMap.mem version map;; +let in_ifaddr_size version = + let (_, size, _) = StringMap.find version map in size;; +let in_ifaddr_of_bits version bits = + let (parsefn, _, _) = StringMap.find version map in parsefn bits;; +let get_in_ifaddr version mem addr = + let (parsefn, size, _) = StringMap.find version map in + let bytes = Virt_mem_mmap.get_bytes mem addr size in + let bits = Bitstring.bitstring_of_string bytes in parsefn bits;; +let field_signature_of_in_ifaddr_ifa_next version = + let (_, _, fs) = StringMap.find version map in fs.__fs_in_ifaddr_ifa_next;; +let field_signature_of_in_ifaddr_ifa_local version = + let (_, _, fs) = StringMap.find version map in fs.__fs_in_ifaddr_ifa_local;; +let field_signature_of_in_ifaddr_ifa_address version = + let (_, _, fs) = StringMap.find version map + in fs.__fs_in_ifaddr_ifa_address;; +let field_signature_of_in_ifaddr_ifa_mask version = + let (_, _, fs) = StringMap.find version map in fs.__fs_in_ifaddr_ifa_mask;; +let field_signature_of_in_ifaddr_ifa_broadcast version = + let (_, _, fs) = StringMap.find version map + in fs.__fs_in_ifaddr_ifa_broadcast;; diff --git a/lib/kernel_in_ifaddr.mli b/lib/kernel_in_ifaddr.mli new file mode 100644 index 0000000..7387359 --- /dev/null +++ b/lib/kernel_in_ifaddr.mli @@ -0,0 +1,23 @@ +type t = + { in_ifaddr_ifa_next : Virt_mem_mmap.addr; in_ifaddr_ifa_local : int64; + in_ifaddr_ifa_address : int64; in_ifaddr_ifa_mask : int64; + in_ifaddr_ifa_broadcast : int64 + };; +val struct_name : string;; +type kernel_version = string;; +val in_ifaddr_known : kernel_version -> bool;; +val in_ifaddr_size : kernel_version -> int;; +val in_ifaddr_of_bits : kernel_version -> Bitstring.bitstring -> t;; +val get_in_ifaddr : + kernel_version -> + ('a, 'b, [ | `HasMapping ]) Virt_mem_mmap.t -> Virt_mem_mmap.addr -> t;; +val field_signature_of_in_ifaddr_ifa_next : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_in_ifaddr_ifa_local : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_in_ifaddr_ifa_address : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_in_ifaddr_ifa_mask : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_in_ifaddr_ifa_broadcast : + kernel_version -> Virt_mem_types.fieldsig;; diff --git a/lib/kernel_inet6_dev.ml b/lib/kernel_inet6_dev.ml new file mode 100644 index 0000000..0a02556 --- /dev/null +++ b/lib/kernel_inet6_dev.ml @@ -0,0 +1,671 @@ +(* WARNING: This file and the corresponding mli (interface) are + * automatically generated by the extract/codegen/kerneldb_to_parser.ml + * program. + * + * Any edits you make to this file will be lost. + * + * To update this file from the latest kernel database, it is recommended + * that you do 'make update-kernel-structs'. + *) + +let zero = 0;; +let struct_name = "inet6_dev";; +let match_err = "failed to match kernel structure";; +type t = { inet6_dev_addr_list : Virt_mem_mmap.addr };; +type fs_t = { __fs_inet6_dev_addr_list : Virt_mem_types.fieldsig };; +let fieldsig_1 = + { + __fs_inet6_dev_addr_list = + { Virt_mem_types.field_available = true; field_offset = 4; }; + };; +let fieldsig_2 = + { + __fs_inet6_dev_addr_list = + { Virt_mem_types.field_available = true; field_offset = 8; }; + };; +let fieldsig_3 = + { + __fs_inet6_dev_addr_list = + { Virt_mem_types.field_available = true; field_offset = 4; }; + };; +let fieldsig_4 = + { + __fs_inet6_dev_addr_list = + { Virt_mem_types.field_available = true; field_offset = 8; }; + };; +let parser_1 bits = + bitmatch bits with + | { inet6_dev_addr_list : zero+32 : offset(32), littleendian } -> + { inet6_dev_addr_list = inet6_dev_addr_list } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_1", match_err));; +let parser_2 bits = + bitmatch bits with + | { inet6_dev_addr_list : zero+64 : offset(64), littleendian } -> + { inet6_dev_addr_list = inet6_dev_addr_list } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_2", match_err));; +let parser_3 bits = + bitmatch bits with + | { inet6_dev_addr_list : zero+32 : offset(32), bigendian } -> + { inet6_dev_addr_list = inet6_dev_addr_list } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_3", match_err));; +let parser_4 bits = + bitmatch bits with + | { inet6_dev_addr_list : zero+64 : offset(64), bigendian } -> + { inet6_dev_addr_list = inet6_dev_addr_list } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_4", match_err));; +module StringMap = Map.Make(String);; +let map = StringMap.empty;; +let v = (parser_1, 316, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_1, 404, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_1, 404, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_1, 416, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3132.fc7.i686" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3141.fc7.i686" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;; +let v = (parser_1, 368, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_1, 368, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; +let v = (parser_1, 344, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; +let v = (parser_1, 348, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_1, 348, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i686" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.24-7.fc9.i686" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.24-9.fc9.i686" v map;; +let v = (parser_1, 356, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_1, 360, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_1, 360, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; +let v = (parser_1, 416, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_1, 316, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_2, 512, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_2, 608, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_2, 608, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_2, 608, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_1, 404, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_2, 632, fieldsig_2);; +let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; +let v = (parser_2, 632, fieldsig_2);; +let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_2, 648, fieldsig_2);; +let map = StringMap.add "2.6.25.14-69.fc8.x86_64" v map;; +let v = (parser_1, 416, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_2, 648, fieldsig_2);; +let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; +let v = (parser_1, 416, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_2, 648, fieldsig_2);; +let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; +let v = (parser_1, 276, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i586" v map;; +let v = (parser_1, 276, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_3, 268, fieldsig_3);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; +let v = (parser_4, 432, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; +let v = (parser_4, 432, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; +let v = (parser_2, 432, fieldsig_2);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i586" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_3, 284, fieldsig_3);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3128.fc7.i586" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;; +let v = (parser_3, 360, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; +let v = (parser_2, 608, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3132.fc7.i586" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3132.fc7.i686" v map;; +let v = (parser_3, 360, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; +let v = (parser_2, 608, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3141.fc7.i586" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3141.fc7.i686" v map;; +let v = (parser_3, 360, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; +let v = (parser_2, 608, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3144.fc7.i586" v map;; +let v = (parser_1, 392, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;; +let v = (parser_3, 360, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; +let v = (parser_2, 608, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; +let v = (parser_1, 368, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i586" v map;; +let v = (parser_1, 368, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_3, 360, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; +let v = (parser_2, 560, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_1, 368, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i586" v map;; +let v = (parser_1, 368, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_3, 360, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; +let v = (parser_2, 560, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3209.fc8.i586" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; +let v = (parser_3, 364, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; +let v = (parser_2, 616, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3209.fc8.x86_64" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3218.fc8.i586" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; +let v = (parser_3, 364, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; +let v = (parser_2, 616, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3218.fc8.x86_64" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3221.fc8.i586" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; +let v = (parser_3, 364, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; +let v = (parser_2, 616, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3221.fc8.x86_64" v map;; +let v = (parser_1, 344, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i586" v map;; +let v = (parser_1, 344, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_3, 336, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; +let v = (parser_4, 520, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; +let v = (parser_2, 520, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; +let v = (parser_3, 364, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; +let v = (parser_2, 616, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3234.fc8.x86_64" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; +let v = (parser_3, 364, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; +let v = (parser_2, 616, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3236.fc8.x86_64" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; +let v = (parser_3, 364, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; +let v = (parser_2, 616, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3238.fc8.x86_64" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; +let v = (parser_3, 364, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; +let v = (parser_2, 616, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3242.fc8.x86_64" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; +let v = (parser_3, 364, fieldsig_3);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; +let v = (parser_2, 616, fieldsig_2);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.x86_64" v map;; +let v = (parser_1, 396, fieldsig_1);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; +let v = (parser_3, 364, fieldsig_3);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; +let v = (parser_2, 616, fieldsig_2);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.x86_64" v map;; +let v = (parser_1, 348, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i586" v map;; +let v = (parser_1, 348, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_3, 340, fieldsig_3);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; +let v = (parser_4, 528, fieldsig_4);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; +let v = (parser_2, 528, fieldsig_2);; +let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; +let v = (parser_1, 348, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i586" v map;; +let v = (parser_1, 348, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_3, 340, fieldsig_3);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; +let v = (parser_4, 528, fieldsig_4);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; +let v = (parser_2, 528, fieldsig_2);; +let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i586" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i686" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; +let v = (parser_4, 584, fieldsig_4);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; +let v = (parser_2, 648, fieldsig_2);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.x86_64" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.24-7.fc9.i586" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.24-7.fc9.i686" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; +let v = (parser_4, 584, fieldsig_4);; +let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; +let v = (parser_2, 648, fieldsig_2);; +let map = StringMap.add "2.6.24-7.fc9.x86_64" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.24-9.fc9.i586" v map;; +let v = (parser_1, 412, fieldsig_1);; +let map = StringMap.add "2.6.24-9.fc9.i686" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; +let v = (parser_4, 584, fieldsig_4);; +let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; +let v = (parser_2, 648, fieldsig_2);; +let map = StringMap.add "2.6.24-9.fc9.x86_64" v map;; +let v = (parser_1, 356, fieldsig_1);; +let map = StringMap.add "2.6.25.11-97.fc9.i686" v map;; +let v = (parser_2, 536, fieldsig_2);; +let map = StringMap.add "2.6.25.11-97.fc9.x86_64" v map;; +let v = (parser_1, 356, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i586" v map;; +let v = (parser_1, 356, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_4, 536, fieldsig_4);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_1, 360, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i586" v map;; +let v = (parser_1, 360, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_3, 352, fieldsig_3);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; +let v = (parser_4, 536, fieldsig_4);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; +let v = (parser_2, 536, fieldsig_2);; +let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; +let v = (parser_1, 360, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i586" v map;; +let v = (parser_1, 360, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_3, 352, fieldsig_3);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; +let v = (parser_4, 536, fieldsig_4);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; +let v = (parser_2, 536, fieldsig_2);; +let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i586" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; +let v = (parser_3, 384, fieldsig_3);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; +let v = (parser_2, 656, fieldsig_2);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.x86_64" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i586" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; +let v = (parser_3, 384, fieldsig_3);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; +let v = (parser_2, 656, fieldsig_2);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.x86_64" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i586" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; +let v = (parser_3, 384, fieldsig_3);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; +let v = (parser_2, 656, fieldsig_2);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.x86_64" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i586" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; +let v = (parser_3, 384, fieldsig_3);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; +let v = (parser_2, 656, fieldsig_2);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.x86_64" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i586" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; +let v = (parser_3, 384, fieldsig_3);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; +let v = (parser_2, 656, fieldsig_2);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.x86_64" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i586" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; +let v = (parser_3, 384, fieldsig_3);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; +let v = (parser_2, 656, fieldsig_2);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.x86_64" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i586" v map;; +let v = (parser_1, 424, fieldsig_1);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; +let v = (parser_3, 384, fieldsig_3);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; +let v = (parser_2, 656, fieldsig_2);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.x86_64" v map;; +let v = (parser_1, 268, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_4, 432, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; +let v = (parser_4, 432, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; +let v = (parser_2, 416, fieldsig_2);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_1, 284, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_4, 464, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; +let v = (parser_2, 448, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; +let v = (parser_2, 640, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; +let v = (parser_2, 640, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; +let v = (parser_2, 640, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; +let v = (parser_2, 640, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; +let v = (parser_2, 544, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_4, 560, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; +let v = (parser_2, 544, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; +let v = (parser_4, 520, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; +let v = (parser_2, 512, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; +let v = (parser_4, 568, fieldsig_4);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; +let v = (parser_4, 528, fieldsig_4);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; +let v = (parser_4, 528, fieldsig_4);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; +let v = (parser_4, 584, fieldsig_4);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; +let v = (parser_4, 584, fieldsig_4);; +let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; +let v = (parser_4, 584, fieldsig_4);; +let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; +let v = (parser_4, 536, fieldsig_4);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_4, 536, fieldsig_4);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; +let v = (parser_4, 536, fieldsig_4);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; +let v = (parser_4, 656, fieldsig_4);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; +let v = (parser_3, 276, fieldsig_3);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; +let v = (parser_3, 292, fieldsig_3);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; +let v = (parser_3, 368, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; +let v = (parser_3, 368, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; +let v = (parser_3, 368, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; +let v = (parser_3, 368, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; +let v = (parser_3, 368, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; +let v = (parser_3, 368, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; +let v = (parser_3, 344, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; +let v = (parser_3, 372, fieldsig_3);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; +let v = (parser_3, 348, fieldsig_3);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; +let v = (parser_3, 348, fieldsig_3);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; +let v = (parser_3, 380, fieldsig_3);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; +let v = (parser_3, 380, fieldsig_3);; +let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; +let v = (parser_3, 380, fieldsig_3);; +let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; +let v = (parser_3, 360, fieldsig_3);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; +let v = (parser_3, 360, fieldsig_3);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; +let v = (parser_3, 392, fieldsig_3);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; +let v = (parser_3, 392, fieldsig_3);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; +let v = (parser_3, 392, fieldsig_3);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; +let v = (parser_3, 392, fieldsig_3);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; +let v = (parser_3, 392, fieldsig_3);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; +let v = (parser_3, 392, fieldsig_3);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; +let v = (parser_3, 392, fieldsig_3);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; +let v = (parser_1, 276, fieldsig_1);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_2, 432, fieldsig_2);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_1, 292, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_2, 464, fieldsig_2);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +type kernel_version = string;; +let inet6_dev_known version = StringMap.mem version map;; +let inet6_dev_size version = + let (_, size, _) = StringMap.find version map in size;; +let inet6_dev_of_bits version bits = + let (parsefn, _, _) = StringMap.find version map in parsefn bits;; +let get_inet6_dev version mem addr = + let (parsefn, size, _) = StringMap.find version map in + let bytes = Virt_mem_mmap.get_bytes mem addr size in + let bits = Bitstring.bitstring_of_string bytes in parsefn bits;; +let field_signature_of_inet6_dev_addr_list version = + let (_, _, fs) = StringMap.find version map in fs.__fs_inet6_dev_addr_list;; diff --git a/lib/kernel_inet6_dev.mli b/lib/kernel_inet6_dev.mli new file mode 100644 index 0000000..1058ba1 --- /dev/null +++ b/lib/kernel_inet6_dev.mli @@ -0,0 +1,11 @@ +type t = { inet6_dev_addr_list : Virt_mem_mmap.addr };; +val struct_name : string;; +type kernel_version = string;; +val inet6_dev_known : kernel_version -> bool;; +val inet6_dev_size : kernel_version -> int;; +val inet6_dev_of_bits : kernel_version -> Bitstring.bitstring -> t;; +val get_inet6_dev : + kernel_version -> + ('a, 'b, [ | `HasMapping ]) Virt_mem_mmap.t -> Virt_mem_mmap.addr -> t;; +val field_signature_of_inet6_dev_addr_list : + kernel_version -> Virt_mem_types.fieldsig;; diff --git a/lib/kernel_inet6_ifaddr.ml b/lib/kernel_inet6_ifaddr.ml new file mode 100644 index 0000000..1382f80 --- /dev/null +++ b/lib/kernel_inet6_ifaddr.ml @@ -0,0 +1,937 @@ +(* WARNING: This file and the corresponding mli (interface) are + * automatically generated by the extract/codegen/kerneldb_to_parser.ml + * program. + * + * Any edits you make to this file will be lost. + * + * To update this file from the latest kernel database, it is recommended + * that you do 'make update-kernel-structs'. + *) + +let zero = 0;; +let struct_name = "inet6_ifaddr";; +let match_err = "failed to match kernel structure";; +type t = + { inet6_ifaddr_prefix_len : int64; + inet6_ifaddr_lst_next : Virt_mem_mmap.addr + };; +type fs_t = + { __fs_inet6_ifaddr_prefix_len : Virt_mem_types.fieldsig; + __fs_inet6_ifaddr_lst_next : Virt_mem_types.fieldsig + };; +let fieldsig_1 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 104; }; + };; +let fieldsig_2 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 128; }; + };; +let fieldsig_3 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 132; }; + };; +let fieldsig_4 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 92; }; + };; +let fieldsig_5 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 116; }; + };; +let fieldsig_6 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 176; }; + };; +let fieldsig_7 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 208; }; + };; +let fieldsig_8 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 216; }; + };; +let fieldsig_9 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 92; }; + };; +let fieldsig_10 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 152; }; + };; +let fieldsig_11 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 152; }; + };; +let fieldsig_12 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 116; }; + };; +let fieldsig_13 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 184; }; + };; +let fieldsig_14 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 184; }; + };; +let fieldsig_15 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 100; }; + };; +let fieldsig_16 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 160; }; + };; +let fieldsig_17 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 160; }; + };; +let fieldsig_18 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 216; }; + };; +let fieldsig_19 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 232; }; + };; +let fieldsig_20 = + { + __fs_inet6_ifaddr_prefix_len = + { Virt_mem_types.field_available = true; field_offset = 16; }; + __fs_inet6_ifaddr_lst_next = + { Virt_mem_types.field_available = true; field_offset = 104; }; + };; +let parser_1 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+32 : offset(832), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_1", match_err));; +let parser_2 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+32 : offset(1024), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_2", match_err));; +let parser_3 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+32 : offset(1056), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_3", match_err));; +let parser_4 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+32 : offset(736), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_4", match_err));; +let parser_5 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+32 : offset(928), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_5", match_err));; +let parser_6 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+64 : offset(1408), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_6", match_err));; +let parser_7 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+64 : offset(1664), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_7", match_err));; +let parser_8 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+64 : offset(1728), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_8", match_err));; +let parser_9 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), bigendian; + inet6_ifaddr_lst_next : zero+32 : offset(736), bigendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_9", match_err));; +let parser_10 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), bigendian; + inet6_ifaddr_lst_next : zero+64 : offset(1216), bigendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_10", match_err));; +let parser_11 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+64 : offset(1216), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_11", match_err));; +let parser_12 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), bigendian; + inet6_ifaddr_lst_next : zero+32 : offset(928), bigendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_12", match_err));; +let parser_13 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), bigendian; + inet6_ifaddr_lst_next : zero+64 : offset(1472), bigendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_13", match_err));; +let parser_14 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+64 : offset(1472), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_14", match_err));; +let parser_15 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), bigendian; + inet6_ifaddr_lst_next : zero+32 : offset(800), bigendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_15", match_err));; +let parser_16 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), bigendian; + inet6_ifaddr_lst_next : zero+64 : offset(1280), bigendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_16", match_err));; +let parser_17 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+64 : offset(1280), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_17", match_err));; +let parser_18 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), bigendian; + inet6_ifaddr_lst_next : zero+64 : offset(1728), bigendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_18", match_err));; +let parser_19 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), littleendian; + inet6_ifaddr_lst_next : zero+64 : offset(1856), littleendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_19", match_err));; +let parser_20 bits = + bitmatch bits with + | { inet6_ifaddr_prefix_len : zero+32 : offset(128), bigendian; + inet6_ifaddr_lst_next : zero+32 : offset(832), bigendian } -> + { inet6_ifaddr_prefix_len = inet6_ifaddr_prefix_len; + inet6_ifaddr_lst_next = inet6_ifaddr_lst_next } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_20", match_err));; +module StringMap = Map.Make(String);; +let map = StringMap.empty;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_4, 116, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3132.fc7.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3141.fc7.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;; +let v = (parser_5, 140, fieldsig_5);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_5, 140, fieldsig_5);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.24-7.fc9.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.24-9.fc9.i686" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_6, 216, fieldsig_6);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.25.14-69.fc8.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; +let v = (parser_4, 116, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.i586" v map;; +let v = (parser_4, 116, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_9, 116, fieldsig_9);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; +let v = (parser_10, 192, fieldsig_10);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; +let v = (parser_10, 192, fieldsig_10);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; +let v = (parser_11, 192, fieldsig_11);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_4, 116, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.i586" v map;; +let v = (parser_4, 116, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_9, 116, fieldsig_9);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; +let v = (parser_10, 192, fieldsig_10);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; +let v = (parser_11, 192, fieldsig_11);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3128.fc7.i586" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3132.fc7.i586" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3132.fc7.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3141.fc7.i586" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3141.fc7.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3144.fc7.i586" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; +let v = (parser_5, 140, fieldsig_5);; +let map = StringMap.add "2.6.21-1.3145.fc7.i586" v map;; +let v = (parser_5, 140, fieldsig_5);; +let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; +let v = (parser_14, 224, fieldsig_14);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_5, 140, fieldsig_5);; +let map = StringMap.add "2.6.21-1.3190.fc7.i586" v map;; +let v = (parser_5, 140, fieldsig_5);; +let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; +let v = (parser_14, 224, fieldsig_14);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3209.fc8.i586" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3209.fc8.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3218.fc8.i586" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3218.fc8.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3221.fc8.i586" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3221.fc8.x86_64" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i586" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; +let v = (parser_15, 124, fieldsig_15);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; +let v = (parser_17, 200, fieldsig_17);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3234.fc8.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3236.fc8.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3238.fc8.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.21-1.3242.fc8.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.x86_64" v map;; +let v = (parser_2, 152, fieldsig_2);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; +let v = (parser_7, 248, fieldsig_7);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.x86_64" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i586" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; +let v = (parser_15, 124, fieldsig_15);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; +let v = (parser_17, 200, fieldsig_17);; +let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i586" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; +let v = (parser_15, 124, fieldsig_15);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; +let v = (parser_17, 200, fieldsig_17);; +let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i586" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.24-7.fc9.i586" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.24-7.fc9.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.24-7.fc9.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.24-9.fc9.i586" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.24-9.fc9.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.24-9.fc9.x86_64" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.25.11-97.fc9.i686" v map;; +let v = (parser_17, 200, fieldsig_17);; +let map = StringMap.add "2.6.25.11-97.fc9.x86_64" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i586" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i586" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; +let v = (parser_15, 124, fieldsig_15);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; +let v = (parser_17, 200, fieldsig_17);; +let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i586" v map;; +let v = (parser_1, 128, fieldsig_1);; +let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; +let v = (parser_15, 124, fieldsig_15);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; +let v = (parser_17, 200, fieldsig_17);; +let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i586" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i586" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i586" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i586" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i586" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i586" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.x86_64" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i586" v map;; +let v = (parser_3, 156, fieldsig_3);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; +let v = (parser_8, 256, fieldsig_8);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.x86_64" v map;; +let v = (parser_4, 116, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_10, 192, fieldsig_10);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; +let v = (parser_10, 192, fieldsig_10);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; +let v = (parser_11, 192, fieldsig_11);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_4, 116, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_10, 192, fieldsig_10);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; +let v = (parser_11, 192, fieldsig_11);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; +let v = (parser_19, 272, fieldsig_19);; +let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; +let v = (parser_19, 272, fieldsig_19);; +let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; +let v = (parser_19, 272, fieldsig_19);; +let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; +let v = (parser_19, 272, fieldsig_19);; +let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; +let v = (parser_14, 224, fieldsig_14);; +let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; +let v = (parser_14, 224, fieldsig_14);; +let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; +let v = (parser_11, 192, fieldsig_11);; +let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; +let v = (parser_13, 224, fieldsig_13);; +let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; +let v = (parser_16, 200, fieldsig_16);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; +let v = (parser_18, 256, fieldsig_18);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; +let v = (parser_9, 116, fieldsig_9);; +let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; +let v = (parser_9, 116, fieldsig_9);; +let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; +let v = (parser_20, 128, fieldsig_20);; +let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; +let v = (parser_20, 128, fieldsig_20);; +let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; +let v = (parser_20, 128, fieldsig_20);; +let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; +let v = (parser_20, 128, fieldsig_20);; +let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; +let v = (parser_20, 128, fieldsig_20);; +let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; +let v = (parser_12, 140, fieldsig_12);; +let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; +let v = (parser_4, 116, fieldsig_4);; +let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; +let v = (parser_11, 192, fieldsig_11);; +let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; +let v = (parser_4, 116, fieldsig_4);; +let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; +let v = (parser_11, 192, fieldsig_11);; +let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; +type kernel_version = string;; +let inet6_ifaddr_known version = StringMap.mem version map;; +let inet6_ifaddr_size version = + let (_, size, _) = StringMap.find version map in size;; +let inet6_ifaddr_of_bits version bits = + let (parsefn, _, _) = StringMap.find version map in parsefn bits;; +let get_inet6_ifaddr version mem addr = + let (parsefn, size, _) = StringMap.find version map in + let bytes = Virt_mem_mmap.get_bytes mem addr size in + let bits = Bitstring.bitstring_of_string bytes in parsefn bits;; +let field_signature_of_inet6_ifaddr_prefix_len version = + let (_, _, fs) = StringMap.find version map + in fs.__fs_inet6_ifaddr_prefix_len;; +let field_signature_of_inet6_ifaddr_lst_next version = + let (_, _, fs) = StringMap.find version map + in fs.__fs_inet6_ifaddr_lst_next;; diff --git a/lib/kernel_inet6_ifaddr.mli b/lib/kernel_inet6_ifaddr.mli new file mode 100644 index 0000000..c4efa59 --- /dev/null +++ b/lib/kernel_inet6_ifaddr.mli @@ -0,0 +1,16 @@ +type t = + { inet6_ifaddr_prefix_len : int64; + inet6_ifaddr_lst_next : Virt_mem_mmap.addr + };; +val struct_name : string;; +type kernel_version = string;; +val inet6_ifaddr_known : kernel_version -> bool;; +val inet6_ifaddr_size : kernel_version -> int;; +val inet6_ifaddr_of_bits : kernel_version -> Bitstring.bitstring -> t;; +val get_inet6_ifaddr : + kernel_version -> + ('a, 'b, [ | `HasMapping ]) Virt_mem_mmap.t -> Virt_mem_mmap.addr -> t;; +val field_signature_of_inet6_ifaddr_prefix_len : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_inet6_ifaddr_lst_next : + kernel_version -> Virt_mem_types.fieldsig;; diff --git a/lib/kernel_net.ml b/lib/kernel_net.ml index f350fbd..4f0885d 100644 --- a/lib/kernel_net.ml +++ b/lib/kernel_net.ml @@ -203,6 +203,8 @@ let v = (parser_2, 732, fieldsig_2);; let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; let v = (parser_1, 356, fieldsig_1);; let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_6, 616, fieldsig_6);; +let map = StringMap.add "2.6.25.14-69.fc8.x86_64" v map;; let v = (parser_2, 732, fieldsig_2);; let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; let v = (parser_6, 1352, fieldsig_6);; @@ -246,7 +248,11 @@ let map = StringMap.add "2.6.25.11-97.fc9.i686" v map;; let v = (parser_10, 488, fieldsig_10);; let map = StringMap.add "2.6.25.11-97.fc9.x86_64" v map;; let v = (parser_3, 284, fieldsig_3);; +let map = StringMap.add "2.6.25.14-69.fc8.i586" v map;; +let v = (parser_3, 284, fieldsig_3);; let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_11, 488, fieldsig_11);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; let v = (parser_4, 660, fieldsig_4);; let map = StringMap.add "2.6.26.1-9.fc9.i586" v map;; let v = (parser_4, 660, fieldsig_4);; @@ -343,6 +349,8 @@ let v = (parser_8, 120, fieldsig_8);; let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; let v = (parser_8, 120, fieldsig_8);; let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; +let v = (parser_11, 488, fieldsig_11);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; let v = (parser_11, 1224, fieldsig_11);; let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; let v = (parser_11, 1224, fieldsig_11);; diff --git a/lib/kernel_net_device.ml b/lib/kernel_net_device.ml index 3408048..50066f8 100644 --- a/lib/kernel_net_device.ml +++ b/lib/kernel_net_device.ml @@ -15,14 +15,23 @@ type t = { net_device_dev_list'prev : Virt_mem_mmap.addr option; net_device_dev_list'next : Virt_mem_mmap.addr option; net_device_next : Virt_mem_mmap.addr option; net_device_name : string; - net_device_dev_addr : string + net_device_flags : int64; net_device_operstate : int64; + net_device_mtu : int64; net_device_perm_addr : string; + net_device_addr_len : int64; net_device_ip_ptr : Virt_mem_mmap.addr; + net_device_ip6_ptr : Virt_mem_mmap.addr };; type fs_t = { __fs_net_device_dev_list'prev : Virt_mem_types.fieldsig; __fs_net_device_dev_list'next : Virt_mem_types.fieldsig; __fs_net_device_next : Virt_mem_types.fieldsig; __fs_net_device_name : Virt_mem_types.fieldsig; - __fs_net_device_dev_addr : Virt_mem_types.fieldsig + __fs_net_device_flags : Virt_mem_types.fieldsig; + __fs_net_device_operstate : Virt_mem_types.fieldsig; + __fs_net_device_mtu : Virt_mem_types.fieldsig; + __fs_net_device_perm_addr : Virt_mem_types.fieldsig; + __fs_net_device_addr_len : Virt_mem_types.fieldsig; + __fs_net_device_ip_ptr : Virt_mem_types.fieldsig; + __fs_net_device_ip6_ptr : Virt_mem_types.fieldsig };; let fieldsig_1 = { @@ -30,8 +39,20 @@ let fieldsig_1 = { Virt_mem_types.field_available = true; field_offset = 0; }; __fs_net_device_next = { Virt_mem_types.field_available = true; field_offset = 48; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 280; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 88; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 98; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 100; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 112; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 144; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 168; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 176; }; __fs_net_device_dev_list'prev = { Virt_mem_types.field_available = false; field_offset = (-1); }; __fs_net_device_dev_list'next = @@ -45,8 +66,20 @@ let fieldsig_2 = { Virt_mem_types.field_available = true; field_offset = 48; }; __fs_net_device_dev_list'prev = { Virt_mem_types.field_available = true; field_offset = 52; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 408; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 184; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 194; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 196; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 208; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 240; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 276; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 284; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -58,8 +91,20 @@ let fieldsig_3 = { Virt_mem_types.field_available = true; field_offset = 48; }; __fs_net_device_dev_list'prev = { Virt_mem_types.field_available = true; field_offset = 52; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 316; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 196; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 206; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 208; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 220; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 252; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 288; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 296; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -71,8 +116,20 @@ let fieldsig_4 = { Virt_mem_types.field_available = true; field_offset = 48; }; __fs_net_device_dev_list'prev = { Virt_mem_types.field_available = true; field_offset = 52; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 320; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 196; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 206; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 208; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 224; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 256; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 292; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 300; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -84,8 +141,20 @@ let fieldsig_5 = { Virt_mem_types.field_available = true; field_offset = 48; }; __fs_net_device_dev_list'prev = { Virt_mem_types.field_available = true; field_offset = 52; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 348; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 184; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 194; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 196; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 208; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 240; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 264; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 272; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -93,26 +162,50 @@ let fieldsig_6 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_next = - { Virt_mem_types.field_available = true; field_offset = 72; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 424; }; - __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = false; field_offset = (-1); }; __fs_net_device_dev_list'next = + { Virt_mem_types.field_available = true; field_offset = 48; }; + __fs_net_device_dev_list'prev = + { Virt_mem_types.field_available = true; field_offset = 52; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 192; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 202; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 204; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 220; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 252; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 320; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 328; }; + __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; let fieldsig_7 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_dev_list'next = + __fs_net_device_next = { Virt_mem_types.field_available = true; field_offset = 72; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 144; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 154; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 156; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 176; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 208; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 248; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 264; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = true; field_offset = 80; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 552; }; - __fs_net_device_next = + { Virt_mem_types.field_available = false; field_offset = (-1); }; + __fs_net_device_dev_list'next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; let fieldsig_8 = @@ -123,8 +216,20 @@ let fieldsig_8 = { Virt_mem_types.field_available = true; field_offset = 72; }; __fs_net_device_dev_list'prev = { Virt_mem_types.field_available = true; field_offset = 80; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 536; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 336; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 346; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 348; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 368; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 400; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 456; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 472; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -132,13 +237,25 @@ let fieldsig_9 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_next = - { Virt_mem_types.field_available = true; field_offset = 48; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 216; }; - __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = false; field_offset = (-1); }; __fs_net_device_dev_list'next = + { Virt_mem_types.field_available = true; field_offset = 72; }; + __fs_net_device_dev_list'prev = + { Virt_mem_types.field_available = true; field_offset = 80; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 360; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 370; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 372; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 392; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 424; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 480; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 496; }; + __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; let fieldsig_10 = @@ -146,9 +263,21 @@ let fieldsig_10 = __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; __fs_net_device_next = - { Virt_mem_types.field_available = true; field_offset = 72; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 424; }; + { Virt_mem_types.field_available = true; field_offset = 48; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 92; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 102; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 104; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 116; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 148; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 172; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 180; }; __fs_net_device_dev_list'prev = { Virt_mem_types.field_available = false; field_offset = (-1); }; __fs_net_device_dev_list'next = @@ -160,8 +289,20 @@ let fieldsig_11 = { Virt_mem_types.field_available = true; field_offset = 0; }; __fs_net_device_next = { Virt_mem_types.field_available = true; field_offset = 48; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 212; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 92; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 102; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 104; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 116; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 148; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 172; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 180; }; __fs_net_device_dev_list'prev = { Virt_mem_types.field_available = false; field_offset = (-1); }; __fs_net_device_dev_list'next = @@ -171,52 +312,100 @@ let fieldsig_12 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_dev_list'next = - { Virt_mem_types.field_available = true; field_offset = 48; }; - __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = true; field_offset = 52; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 312; }; __fs_net_device_next = + { Virt_mem_types.field_available = true; field_offset = 72; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 152; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 162; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 164; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 184; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 216; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 256; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 272; }; + __fs_net_device_dev_list'prev = + { Virt_mem_types.field_available = false; field_offset = (-1); }; + __fs_net_device_dev_list'next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; let fieldsig_13 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_dev_list'next = + __fs_net_device_next = { Virt_mem_types.field_available = true; field_offset = 72; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 152; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 162; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 164; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 184; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 216; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 256; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 272; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = true; field_offset = 80; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 552; }; - __fs_net_device_next = + { Virt_mem_types.field_available = false; field_offset = (-1); }; + __fs_net_device_dev_list'next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; let fieldsig_14 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_dev_list'next = + __fs_net_device_next = { Virt_mem_types.field_available = true; field_offset = 48; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 88; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 98; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 100; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 112; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 144; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 168; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 176; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = true; field_offset = 52; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 324; }; - __fs_net_device_next = + { Virt_mem_types.field_available = false; field_offset = (-1); }; + __fs_net_device_dev_list'next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; let fieldsig_15 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_dev_list'next = - { Virt_mem_types.field_available = true; field_offset = 48; }; - __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = true; field_offset = 52; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 316; }; __fs_net_device_next = + { Virt_mem_types.field_available = true; field_offset = 72; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 144; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 154; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 156; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 176; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 208; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 248; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 264; }; + __fs_net_device_dev_list'prev = + { Virt_mem_types.field_available = false; field_offset = (-1); }; + __fs_net_device_dev_list'next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; let fieldsig_16 = @@ -224,11 +413,23 @@ let fieldsig_16 = __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; __fs_net_device_dev_list'next = - { Virt_mem_types.field_available = true; field_offset = 72; }; + { Virt_mem_types.field_available = true; field_offset = 48; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = true; field_offset = 80; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 536; }; + { Virt_mem_types.field_available = true; field_offset = 52; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 184; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 194; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 196; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 208; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 240; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 264; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 272; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -237,11 +438,23 @@ let fieldsig_17 = __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; __fs_net_device_dev_list'next = - { Virt_mem_types.field_available = true; field_offset = 48; }; + { Virt_mem_types.field_available = true; field_offset = 72; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = true; field_offset = 52; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 320; }; + { Virt_mem_types.field_available = true; field_offset = 80; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 336; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 346; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 348; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 368; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 400; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 440; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 456; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -250,11 +463,23 @@ let fieldsig_18 = __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; __fs_net_device_dev_list'next = - { Virt_mem_types.field_available = true; field_offset = 48; }; + { Virt_mem_types.field_available = true; field_offset = 72; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = true; field_offset = 52; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 332; }; + { Virt_mem_types.field_available = true; field_offset = 80; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 336; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 346; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 348; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 368; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 400; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 440; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 456; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -263,11 +488,23 @@ let fieldsig_19 = __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; __fs_net_device_dev_list'next = - { Virt_mem_types.field_available = true; field_offset = 72; }; + { Virt_mem_types.field_available = true; field_offset = 48; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = true; field_offset = 80; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 584; }; + { Virt_mem_types.field_available = true; field_offset = 52; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 184; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 194; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 196; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 208; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 240; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 276; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 284; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -279,8 +516,20 @@ let fieldsig_20 = { Virt_mem_types.field_available = true; field_offset = 72; }; __fs_net_device_dev_list'prev = { Virt_mem_types.field_available = true; field_offset = 80; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 584; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 336; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 346; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 348; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 368; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 400; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 456; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 472; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -288,64 +537,149 @@ let fieldsig_21 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_next = + __fs_net_device_dev_list'next = { Virt_mem_types.field_available = true; field_offset = 48; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 216; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = false; field_offset = (-1); }; - __fs_net_device_dev_list'next = + { Virt_mem_types.field_available = true; field_offset = 52; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 196; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 206; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 208; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 220; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 252; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 288; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 296; }; + __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; let fieldsig_22 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_next = + __fs_net_device_dev_list'next = { Virt_mem_types.field_available = true; field_offset = 72; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 336; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = false; field_offset = (-1); }; - __fs_net_device_dev_list'next = + { Virt_mem_types.field_available = true; field_offset = 80; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 360; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 370; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 372; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 392; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 424; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 480; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 496; }; + __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; let fieldsig_23 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_next = + __fs_net_device_dev_list'next = { Virt_mem_types.field_available = true; field_offset = 48; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 212; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = false; field_offset = (-1); }; - __fs_net_device_dev_list'next = + { Virt_mem_types.field_available = true; field_offset = 52; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 196; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 206; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 208; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 224; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 256; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 292; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 300; }; + __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; let fieldsig_24 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; - __fs_net_device_next = - { Virt_mem_types.field_available = true; field_offset = 72; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 328; }; + __fs_net_device_dev_list'next = + { Virt_mem_types.field_available = true; field_offset = 48; }; __fs_net_device_dev_list'prev = + { Virt_mem_types.field_available = true; field_offset = 52; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 192; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 202; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 204; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 220; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 252; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 304; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 312; }; + __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; + };; +let fieldsig_25 = + { + __fs_net_device_name = + { Virt_mem_types.field_available = true; field_offset = 0; }; __fs_net_device_dev_list'next = + { Virt_mem_types.field_available = true; field_offset = 72; }; + __fs_net_device_dev_list'prev = + { Virt_mem_types.field_available = true; field_offset = 80; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 352; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 362; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 364; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 384; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 416; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 528; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 544; }; + __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; -let fieldsig_25 = +let fieldsig_26 = { __fs_net_device_name = { Virt_mem_types.field_available = true; field_offset = 0; }; __fs_net_device_dev_list'next = - { Virt_mem_types.field_available = true; field_offset = 48; }; + { Virt_mem_types.field_available = true; field_offset = 72; }; __fs_net_device_dev_list'prev = - { Virt_mem_types.field_available = true; field_offset = 52; }; - __fs_net_device_dev_addr = - { Virt_mem_types.field_available = true; field_offset = 344; }; + { Virt_mem_types.field_available = true; field_offset = 80; }; + __fs_net_device_flags = + { Virt_mem_types.field_available = true; field_offset = 352; }; + __fs_net_device_operstate = + { Virt_mem_types.field_available = true; field_offset = 362; }; + __fs_net_device_mtu = + { Virt_mem_types.field_available = true; field_offset = 364; }; + __fs_net_device_perm_addr = + { Virt_mem_types.field_available = true; field_offset = 384; }; + __fs_net_device_addr_len = + { Virt_mem_types.field_available = true; field_offset = 416; }; + __fs_net_device_ip_ptr = + { Virt_mem_types.field_available = true; field_offset = 528; }; + __fs_net_device_ip6_ptr = + { Virt_mem_types.field_available = true; field_offset = 544; }; __fs_net_device_next = { Virt_mem_types.field_available = false; field_offset = (-1); }; };; @@ -353,10 +687,22 @@ let parser_1 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; net_device_next : zero+32 : offset(384), littleendian; - net_device_dev_addr : 256 : offset(2240), string } -> + net_device_flags : zero+32 : offset(704), littleendian; + net_device_operstate : zero+8 : offset(784), littleendian; + net_device_mtu : zero+32 : offset(800), littleendian; + net_device_perm_addr : 256 : offset(896), string; + net_device_addr_len : zero+8 : offset(1152), littleendian; + net_device_ip_ptr : zero+32 : offset(1344), littleendian; + net_device_ip6_ptr : zero+32 : offset(1408), littleendian } -> { net_device_name = net_device_name; net_device_next = Some net_device_next; - net_device_dev_addr = net_device_dev_addr; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_dev_list'prev = None; net_device_dev_list'next = None } | { _ } -> @@ -366,11 +712,23 @@ let parser_2 bits = | { net_device_name : 128 : offset(0), string; net_device_dev_list'next : zero+32 : offset(384), littleendian; net_device_dev_list'prev : zero+32 : offset(416), littleendian; - net_device_dev_addr : 256 : offset(3264), string } -> + net_device_flags : zero+32 : offset(1472), littleendian; + net_device_operstate : zero+8 : offset(1552), littleendian; + net_device_mtu : zero+32 : offset(1568), littleendian; + net_device_perm_addr : 256 : offset(1664), string; + net_device_addr_len : zero+8 : offset(1920), littleendian; + net_device_ip_ptr : zero+32 : offset(2208), littleendian; + net_device_ip6_ptr : zero+32 : offset(2272), littleendian } -> { net_device_name = net_device_name; net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); - net_device_dev_addr = net_device_dev_addr; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_2", match_err));; @@ -379,11 +737,23 @@ let parser_3 bits = | { net_device_name : 128 : offset(0), string; net_device_dev_list'next : zero+32 : offset(384), littleendian; net_device_dev_list'prev : zero+32 : offset(416), littleendian; - net_device_dev_addr : 256 : offset(2528), string } -> + net_device_flags : zero+32 : offset(1568), littleendian; + net_device_operstate : zero+8 : offset(1648), littleendian; + net_device_mtu : zero+32 : offset(1664), littleendian; + net_device_perm_addr : 256 : offset(1760), string; + net_device_addr_len : zero+8 : offset(2016), littleendian; + net_device_ip_ptr : zero+32 : offset(2304), littleendian; + net_device_ip6_ptr : zero+32 : offset(2368), littleendian } -> { net_device_name = net_device_name; net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); - net_device_dev_addr = net_device_dev_addr; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_3", match_err));; @@ -392,11 +762,23 @@ let parser_4 bits = | { net_device_name : 128 : offset(0), string; net_device_dev_list'next : zero+32 : offset(384), littleendian; net_device_dev_list'prev : zero+32 : offset(416), littleendian; - net_device_dev_addr : 256 : offset(2560), string } -> + net_device_flags : zero+32 : offset(1568), littleendian; + net_device_operstate : zero+8 : offset(1648), littleendian; + net_device_mtu : zero+32 : offset(1664), littleendian; + net_device_perm_addr : 256 : offset(1792), string; + net_device_addr_len : zero+8 : offset(2048), littleendian; + net_device_ip_ptr : zero+32 : offset(2336), littleendian; + net_device_ip6_ptr : zero+32 : offset(2400), littleendian } -> { net_device_name = net_device_name; net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); - net_device_dev_addr = net_device_dev_addr; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_4", match_err));; @@ -405,37 +787,73 @@ let parser_5 bits = | { net_device_name : 128 : offset(0), string; net_device_dev_list'next : zero+32 : offset(384), littleendian; net_device_dev_list'prev : zero+32 : offset(416), littleendian; - net_device_dev_addr : 256 : offset(2784), string } -> + net_device_flags : zero+32 : offset(1472), littleendian; + net_device_operstate : zero+8 : offset(1552), littleendian; + net_device_mtu : zero+32 : offset(1568), littleendian; + net_device_perm_addr : 256 : offset(1664), string; + net_device_addr_len : zero+8 : offset(1920), littleendian; + net_device_ip_ptr : zero+32 : offset(2112), littleendian; + net_device_ip6_ptr : zero+32 : offset(2176), littleendian } -> { net_device_name = net_device_name; net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); - net_device_dev_addr = net_device_dev_addr; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_5", match_err));; let parser_6 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_next : zero+64 : offset(576), littleendian; - net_device_dev_addr : 256 : offset(3392), string } -> + net_device_dev_list'next : zero+32 : offset(384), littleendian; + net_device_dev_list'prev : zero+32 : offset(416), littleendian; + net_device_flags : zero+32 : offset(1536), littleendian; + net_device_operstate : zero+8 : offset(1616), littleendian; + net_device_mtu : zero+32 : offset(1632), littleendian; + net_device_perm_addr : 256 : offset(1760), string; + net_device_addr_len : zero+8 : offset(2016), littleendian; + net_device_ip_ptr : zero+32 : offset(2560), littleendian; + net_device_ip6_ptr : zero+32 : offset(2624), littleendian } -> { net_device_name = net_device_name; - net_device_next = Some net_device_next; - net_device_dev_addr = net_device_dev_addr; - net_device_dev_list'prev = None; - net_device_dev_list'next = None } + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_6", match_err));; let parser_7 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+64 : offset(576), littleendian; - net_device_dev_list'prev : zero+64 : offset(640), littleendian; - net_device_dev_addr : 256 : offset(4416), string } -> + net_device_next : zero+64 : offset(576), littleendian; + net_device_flags : zero+32 : offset(1152), littleendian; + net_device_operstate : zero+8 : offset(1232), littleendian; + net_device_mtu : zero+32 : offset(1248), littleendian; + net_device_perm_addr : 256 : offset(1408), string; + net_device_addr_len : zero+8 : offset(1664), littleendian; + net_device_ip_ptr : zero+64 : offset(1984), littleendian; + net_device_ip6_ptr : zero+64 : offset(2112), littleendian } -> { net_device_name = net_device_name; - net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); - net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); - net_device_dev_addr = net_device_dev_addr; - net_device_next = None } + net_device_next = Some net_device_next; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_dev_list'prev = None; + net_device_dev_list'next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_7", match_err));; let parser_8 bits = @@ -443,34 +861,71 @@ let parser_8 bits = | { net_device_name : 128 : offset(0), string; net_device_dev_list'next : zero+64 : offset(576), littleendian; net_device_dev_list'prev : zero+64 : offset(640), littleendian; - net_device_dev_addr : 256 : offset(4288), string } -> + net_device_flags : zero+32 : offset(2688), littleendian; + net_device_operstate : zero+8 : offset(2768), littleendian; + net_device_mtu : zero+32 : offset(2784), littleendian; + net_device_perm_addr : 256 : offset(2944), string; + net_device_addr_len : zero+8 : offset(3200), littleendian; + net_device_ip_ptr : zero+64 : offset(3648), littleendian; + net_device_ip6_ptr : zero+64 : offset(3776), littleendian } -> { net_device_name = net_device_name; net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); - net_device_dev_addr = net_device_dev_addr; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_8", match_err));; let parser_9 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_next : zero+32 : offset(384), bigendian; - net_device_dev_addr : 256 : offset(1728), string } -> + net_device_dev_list'next : zero+64 : offset(576), littleendian; + net_device_dev_list'prev : zero+64 : offset(640), littleendian; + net_device_flags : zero+32 : offset(2880), littleendian; + net_device_operstate : zero+8 : offset(2960), littleendian; + net_device_mtu : zero+32 : offset(2976), littleendian; + net_device_perm_addr : 256 : offset(3136), string; + net_device_addr_len : zero+8 : offset(3392), littleendian; + net_device_ip_ptr : zero+64 : offset(3840), littleendian; + net_device_ip6_ptr : zero+64 : offset(3968), littleendian } -> { net_device_name = net_device_name; - net_device_next = Some net_device_next; - net_device_dev_addr = net_device_dev_addr; - net_device_dev_list'prev = None; - net_device_dev_list'next = None } + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_9", match_err));; let parser_10 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_next : zero+64 : offset(576), bigendian; - net_device_dev_addr : 256 : offset(3392), string } -> + net_device_next : zero+32 : offset(384), littleendian; + net_device_flags : zero+32 : offset(736), littleendian; + net_device_operstate : zero+8 : offset(816), littleendian; + net_device_mtu : zero+32 : offset(832), littleendian; + net_device_perm_addr : 256 : offset(928), string; + net_device_addr_len : zero+8 : offset(1184), littleendian; + net_device_ip_ptr : zero+32 : offset(1376), littleendian; + net_device_ip6_ptr : zero+32 : offset(1440), littleendian } -> { net_device_name = net_device_name; net_device_next = Some net_device_next; - net_device_dev_addr = net_device_dev_addr; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_dev_list'prev = None; net_device_dev_list'next = None } | { _ } -> @@ -479,10 +934,22 @@ let parser_11 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; net_device_next : zero+32 : offset(384), bigendian; - net_device_dev_addr : 256 : offset(1696), string } -> + net_device_flags : zero+32 : offset(736), bigendian; + net_device_operstate : zero+8 : offset(816), bigendian; + net_device_mtu : zero+32 : offset(832), bigendian; + net_device_perm_addr : 256 : offset(928), string; + net_device_addr_len : zero+8 : offset(1184), bigendian; + net_device_ip_ptr : zero+32 : offset(1376), bigendian; + net_device_ip6_ptr : zero+32 : offset(1440), bigendian } -> { net_device_name = net_device_name; net_device_next = Some net_device_next; - net_device_dev_addr = net_device_dev_addr; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_dev_list'prev = None; net_device_dev_list'next = None } | { _ } -> @@ -490,181 +957,374 @@ let parser_11 bits = let parser_12 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+32 : offset(384), bigendian; - net_device_dev_list'prev : zero+32 : offset(416), bigendian; - net_device_dev_addr : 256 : offset(2496), string } -> + net_device_next : zero+64 : offset(576), bigendian; + net_device_flags : zero+32 : offset(1216), bigendian; + net_device_operstate : zero+8 : offset(1296), bigendian; + net_device_mtu : zero+32 : offset(1312), bigendian; + net_device_perm_addr : 256 : offset(1472), string; + net_device_addr_len : zero+8 : offset(1728), bigendian; + net_device_ip_ptr : zero+64 : offset(2048), bigendian; + net_device_ip6_ptr : zero+64 : offset(2176), bigendian } -> { net_device_name = net_device_name; - net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); - net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); - net_device_dev_addr = net_device_dev_addr; - net_device_next = None } + net_device_next = Some net_device_next; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_dev_list'prev = None; + net_device_dev_list'next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_12", match_err));; let parser_13 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+64 : offset(576), bigendian; - net_device_dev_list'prev : zero+64 : offset(640), bigendian; - net_device_dev_addr : 256 : offset(4416), string } -> + net_device_next : zero+64 : offset(576), littleendian; + net_device_flags : zero+32 : offset(1216), littleendian; + net_device_operstate : zero+8 : offset(1296), littleendian; + net_device_mtu : zero+32 : offset(1312), littleendian; + net_device_perm_addr : 256 : offset(1472), string; + net_device_addr_len : zero+8 : offset(1728), littleendian; + net_device_ip_ptr : zero+64 : offset(2048), littleendian; + net_device_ip6_ptr : zero+64 : offset(2176), littleendian } -> { net_device_name = net_device_name; - net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); - net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); - net_device_dev_addr = net_device_dev_addr; - net_device_next = None } + net_device_next = Some net_device_next; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_dev_list'prev = None; + net_device_dev_list'next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_13", match_err));; let parser_14 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+32 : offset(384), bigendian; - net_device_dev_list'prev : zero+32 : offset(416), bigendian; - net_device_dev_addr : 256 : offset(2592), string } -> + net_device_next : zero+32 : offset(384), bigendian; + net_device_flags : zero+32 : offset(704), bigendian; + net_device_operstate : zero+8 : offset(784), bigendian; + net_device_mtu : zero+32 : offset(800), bigendian; + net_device_perm_addr : 256 : offset(896), string; + net_device_addr_len : zero+8 : offset(1152), bigendian; + net_device_ip_ptr : zero+32 : offset(1344), bigendian; + net_device_ip6_ptr : zero+32 : offset(1408), bigendian } -> { net_device_name = net_device_name; - net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); - net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); - net_device_dev_addr = net_device_dev_addr; - net_device_next = None } + net_device_next = Some net_device_next; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_dev_list'prev = None; + net_device_dev_list'next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_14", match_err));; let parser_15 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+32 : offset(384), bigendian; - net_device_dev_list'prev : zero+32 : offset(416), bigendian; - net_device_dev_addr : 256 : offset(2528), string } -> + net_device_next : zero+64 : offset(576), bigendian; + net_device_flags : zero+32 : offset(1152), bigendian; + net_device_operstate : zero+8 : offset(1232), bigendian; + net_device_mtu : zero+32 : offset(1248), bigendian; + net_device_perm_addr : 256 : offset(1408), string; + net_device_addr_len : zero+8 : offset(1664), bigendian; + net_device_ip_ptr : zero+64 : offset(1984), bigendian; + net_device_ip6_ptr : zero+64 : offset(2112), bigendian } -> { net_device_name = net_device_name; - net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); - net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); - net_device_dev_addr = net_device_dev_addr; - net_device_next = None } + net_device_next = Some net_device_next; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_dev_list'prev = None; + net_device_dev_list'next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_15", match_err));; let parser_16 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+64 : offset(576), bigendian; - net_device_dev_list'prev : zero+64 : offset(640), bigendian; - net_device_dev_addr : 256 : offset(4288), string } -> + net_device_dev_list'next : zero+32 : offset(384), bigendian; + net_device_dev_list'prev : zero+32 : offset(416), bigendian; + net_device_flags : zero+32 : offset(1472), bigendian; + net_device_operstate : zero+8 : offset(1552), bigendian; + net_device_mtu : zero+32 : offset(1568), bigendian; + net_device_perm_addr : 256 : offset(1664), string; + net_device_addr_len : zero+8 : offset(1920), bigendian; + net_device_ip_ptr : zero+32 : offset(2112), bigendian; + net_device_ip6_ptr : zero+32 : offset(2176), bigendian } -> { net_device_name = net_device_name; - net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); - net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); - net_device_dev_addr = net_device_dev_addr; + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_16", match_err));; let parser_17 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+32 : offset(384), bigendian; - net_device_dev_list'prev : zero+32 : offset(416), bigendian; - net_device_dev_addr : 256 : offset(2560), string } -> + net_device_dev_list'next : zero+64 : offset(576), bigendian; + net_device_dev_list'prev : zero+64 : offset(640), bigendian; + net_device_flags : zero+32 : offset(2688), bigendian; + net_device_operstate : zero+8 : offset(2768), bigendian; + net_device_mtu : zero+32 : offset(2784), bigendian; + net_device_perm_addr : 256 : offset(2944), string; + net_device_addr_len : zero+8 : offset(3200), bigendian; + net_device_ip_ptr : zero+64 : offset(3520), bigendian; + net_device_ip6_ptr : zero+64 : offset(3648), bigendian } -> { net_device_name = net_device_name; - net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); - net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); - net_device_dev_addr = net_device_dev_addr; + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_17", match_err));; let parser_18 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+32 : offset(384), bigendian; - net_device_dev_list'prev : zero+32 : offset(416), bigendian; - net_device_dev_addr : 256 : offset(2656), string } -> + net_device_dev_list'next : zero+64 : offset(576), littleendian; + net_device_dev_list'prev : zero+64 : offset(640), littleendian; + net_device_flags : zero+32 : offset(2688), littleendian; + net_device_operstate : zero+8 : offset(2768), littleendian; + net_device_mtu : zero+32 : offset(2784), littleendian; + net_device_perm_addr : 256 : offset(2944), string; + net_device_addr_len : zero+8 : offset(3200), littleendian; + net_device_ip_ptr : zero+64 : offset(3520), littleendian; + net_device_ip6_ptr : zero+64 : offset(3648), littleendian } -> { net_device_name = net_device_name; - net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); - net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); - net_device_dev_addr = net_device_dev_addr; + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_18", match_err));; let parser_19 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+64 : offset(576), bigendian; - net_device_dev_list'prev : zero+64 : offset(640), bigendian; - net_device_dev_addr : 256 : offset(4672), string } -> + net_device_dev_list'next : zero+32 : offset(384), bigendian; + net_device_dev_list'prev : zero+32 : offset(416), bigendian; + net_device_flags : zero+32 : offset(1472), bigendian; + net_device_operstate : zero+8 : offset(1552), bigendian; + net_device_mtu : zero+32 : offset(1568), bigendian; + net_device_perm_addr : 256 : offset(1664), string; + net_device_addr_len : zero+8 : offset(1920), bigendian; + net_device_ip_ptr : zero+32 : offset(2208), bigendian; + net_device_ip6_ptr : zero+32 : offset(2272), bigendian } -> { net_device_name = net_device_name; - net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); - net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); - net_device_dev_addr = net_device_dev_addr; + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_19", match_err));; let parser_20 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+64 : offset(576), littleendian; - net_device_dev_list'prev : zero+64 : offset(640), littleendian; - net_device_dev_addr : 256 : offset(4672), string } -> + net_device_dev_list'next : zero+64 : offset(576), bigendian; + net_device_dev_list'prev : zero+64 : offset(640), bigendian; + net_device_flags : zero+32 : offset(2688), bigendian; + net_device_operstate : zero+8 : offset(2768), bigendian; + net_device_mtu : zero+32 : offset(2784), bigendian; + net_device_perm_addr : 256 : offset(2944), string; + net_device_addr_len : zero+8 : offset(3200), bigendian; + net_device_ip_ptr : zero+64 : offset(3648), bigendian; + net_device_ip6_ptr : zero+64 : offset(3776), bigendian } -> { net_device_name = net_device_name; net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); - net_device_dev_addr = net_device_dev_addr; + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_20", match_err));; let parser_21 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_next : zero+32 : offset(384), littleendian; - net_device_dev_addr : 256 : offset(1728), string } -> + net_device_dev_list'next : zero+32 : offset(384), bigendian; + net_device_dev_list'prev : zero+32 : offset(416), bigendian; + net_device_flags : zero+32 : offset(1568), bigendian; + net_device_operstate : zero+8 : offset(1648), bigendian; + net_device_mtu : zero+32 : offset(1664), bigendian; + net_device_perm_addr : 256 : offset(1760), string; + net_device_addr_len : zero+8 : offset(2016), bigendian; + net_device_ip_ptr : zero+32 : offset(2304), bigendian; + net_device_ip6_ptr : zero+32 : offset(2368), bigendian } -> { net_device_name = net_device_name; - net_device_next = Some net_device_next; - net_device_dev_addr = net_device_dev_addr; - net_device_dev_list'prev = None; - net_device_dev_list'next = None } + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_21", match_err));; let parser_22 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_next : zero+64 : offset(576), littleendian; - net_device_dev_addr : 256 : offset(2688), string } -> + net_device_dev_list'next : zero+64 : offset(576), bigendian; + net_device_dev_list'prev : zero+64 : offset(640), bigendian; + net_device_flags : zero+32 : offset(2880), bigendian; + net_device_operstate : zero+8 : offset(2960), bigendian; + net_device_mtu : zero+32 : offset(2976), bigendian; + net_device_perm_addr : 256 : offset(3136), string; + net_device_addr_len : zero+8 : offset(3392), bigendian; + net_device_ip_ptr : zero+64 : offset(3840), bigendian; + net_device_ip6_ptr : zero+64 : offset(3968), bigendian } -> { net_device_name = net_device_name; - net_device_next = Some net_device_next; - net_device_dev_addr = net_device_dev_addr; - net_device_dev_list'prev = None; - net_device_dev_list'next = None } + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_22", match_err));; let parser_23 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_next : zero+32 : offset(384), littleendian; - net_device_dev_addr : 256 : offset(1696), string } -> + net_device_dev_list'next : zero+32 : offset(384), bigendian; + net_device_dev_list'prev : zero+32 : offset(416), bigendian; + net_device_flags : zero+32 : offset(1568), bigendian; + net_device_operstate : zero+8 : offset(1648), bigendian; + net_device_mtu : zero+32 : offset(1664), bigendian; + net_device_perm_addr : 256 : offset(1792), string; + net_device_addr_len : zero+8 : offset(2048), bigendian; + net_device_ip_ptr : zero+32 : offset(2336), bigendian; + net_device_ip6_ptr : zero+32 : offset(2400), bigendian } -> { net_device_name = net_device_name; - net_device_next = Some net_device_next; - net_device_dev_addr = net_device_dev_addr; - net_device_dev_list'prev = None; - net_device_dev_list'next = None } + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_23", match_err));; let parser_24 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_next : zero+64 : offset(576), littleendian; - net_device_dev_addr : 256 : offset(2624), string } -> + net_device_dev_list'next : zero+32 : offset(384), bigendian; + net_device_dev_list'prev : zero+32 : offset(416), bigendian; + net_device_flags : zero+32 : offset(1536), bigendian; + net_device_operstate : zero+8 : offset(1616), bigendian; + net_device_mtu : zero+32 : offset(1632), bigendian; + net_device_perm_addr : 256 : offset(1760), string; + net_device_addr_len : zero+8 : offset(2016), bigendian; + net_device_ip_ptr : zero+32 : offset(2432), bigendian; + net_device_ip6_ptr : zero+32 : offset(2496), bigendian } -> { net_device_name = net_device_name; - net_device_next = Some net_device_next; - net_device_dev_addr = net_device_dev_addr; - net_device_dev_list'prev = None; - net_device_dev_list'next = None } + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_24", match_err));; let parser_25 bits = bitmatch bits with | { net_device_name : 128 : offset(0), string; - net_device_dev_list'next : zero+32 : offset(384), bigendian; - net_device_dev_list'prev : zero+32 : offset(416), bigendian; - net_device_dev_addr : 256 : offset(2752), string } -> + net_device_dev_list'next : zero+64 : offset(576), bigendian; + net_device_dev_list'prev : zero+64 : offset(640), bigendian; + net_device_flags : zero+32 : offset(2816), bigendian; + net_device_operstate : zero+8 : offset(2896), bigendian; + net_device_mtu : zero+32 : offset(2912), bigendian; + net_device_perm_addr : 256 : offset(3072), string; + net_device_addr_len : zero+8 : offset(3328), bigendian; + net_device_ip_ptr : zero+64 : offset(4224), bigendian; + net_device_ip6_ptr : zero+64 : offset(4352), bigendian } -> { net_device_name = net_device_name; - net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 48L); - net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 52L); - net_device_dev_addr = net_device_dev_addr; + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; net_device_next = None } | { _ } -> raise (Virt_mem_types.ParseError (struct_name, "parser_25", match_err));; +let parser_26 bits = + bitmatch bits with + | { net_device_name : 128 : offset(0), string; + net_device_dev_list'next : zero+64 : offset(576), littleendian; + net_device_dev_list'prev : zero+64 : offset(640), littleendian; + net_device_flags : zero+32 : offset(2816), littleendian; + net_device_operstate : zero+8 : offset(2896), littleendian; + net_device_mtu : zero+32 : offset(2912), littleendian; + net_device_perm_addr : 256 : offset(3072), string; + net_device_addr_len : zero+8 : offset(3328), littleendian; + net_device_ip_ptr : zero+64 : offset(4224), littleendian; + net_device_ip6_ptr : zero+64 : offset(4352), littleendian } -> + { net_device_name = net_device_name; + net_device_dev_list'next = Some (Int64.sub net_device_dev_list'next 72L); + net_device_dev_list'prev = Some (Int64.sub net_device_dev_list'prev 80L); + net_device_flags = net_device_flags; + net_device_operstate = net_device_operstate; + net_device_mtu = net_device_mtu; + net_device_perm_addr = net_device_perm_addr; + net_device_addr_len = net_device_addr_len; + net_device_ip_ptr = net_device_ip_ptr; + net_device_ip6_ptr = net_device_ip6_ptr; + net_device_next = None } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_26", match_err));; module StringMap = Map.Make(String);; let map = StringMap.empty;; let v = (parser_1, 924, fieldsig_1);; @@ -697,25 +1357,25 @@ let v = (parser_1, 1200, fieldsig_1);; let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; let v = (parser_1, 1200, fieldsig_1);; let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; let v = (parser_1, 1116, fieldsig_1);; let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; let v = (parser_2, 1248, fieldsig_2);; let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; @@ -733,529 +1393,537 @@ let v = (parser_4, 1216, fieldsig_4);; let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; let v = (parser_4, 1216, fieldsig_4);; let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; let v = (parser_4, 1384, fieldsig_4);; let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; let v = (parser_1, 924, fieldsig_1);; let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; -let v = (parser_6, 1540, fieldsig_6);; +let v = (parser_7, 1540, fieldsig_7);; let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; -let v = (parser_6, 2196, fieldsig_6);; +let v = (parser_7, 2196, fieldsig_7);; let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; -let v = (parser_6, 2196, fieldsig_6);; +let v = (parser_7, 2196, fieldsig_7);; let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; -let v = (parser_6, 2196, fieldsig_6);; +let v = (parser_7, 2196, fieldsig_7);; let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; let v = (parser_2, 1444, fieldsig_2);; let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; -let v = (parser_7, 2392, fieldsig_7);; +let v = (parser_8, 2392, fieldsig_8);; let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; -let v = (parser_7, 2392, fieldsig_7);; +let v = (parser_8, 2392, fieldsig_8);; let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; let v = (parser_3, 1380, fieldsig_3);; let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_9, 2296, fieldsig_9);; +let map = StringMap.add "2.6.25.14-69.fc8.x86_64" v map;; let v = (parser_4, 1384, fieldsig_4);; let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; -let v = (parser_8, 2304, fieldsig_8);; +let v = (parser_9, 2304, fieldsig_9);; let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; let v = (parser_4, 1384, fieldsig_4);; let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; -let v = (parser_8, 2304, fieldsig_8);; +let v = (parser_9, 2304, fieldsig_9);; let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; -let v = (parser_1, 912, fieldsig_1);; +let v = (parser_10, 912, fieldsig_10);; let map = StringMap.add "2.6.18-1.2798.fc6.i586" v map;; -let v = (parser_1, 912, fieldsig_1);; +let v = (parser_10, 912, fieldsig_10);; let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; -let v = (parser_9, 672, fieldsig_9);; +let v = (parser_11, 672, fieldsig_11);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; -let v = (parser_10, 1260, fieldsig_10);; +let v = (parser_12, 1260, fieldsig_12);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; -let v = (parser_10, 1260, fieldsig_10);; +let v = (parser_12, 1260, fieldsig_12);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; -let v = (parser_6, 1260, fieldsig_6);; +let v = (parser_13, 1260, fieldsig_13);; let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; let v = (parser_1, 912, fieldsig_1);; let map = StringMap.add "2.6.20-1.2933.fc6.i586" v map;; let v = (parser_1, 912, fieldsig_1);; let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; -let v = (parser_11, 668, fieldsig_11);; +let v = (parser_14, 668, fieldsig_14);; let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; -let v = (parser_10, 1260, fieldsig_10);; +let v = (parser_15, 1260, fieldsig_15);; let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; -let v = (parser_6, 1260, fieldsig_6);; +let v = (parser_7, 1260, fieldsig_7);; let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3128.fc7.i586" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;; -let v = (parser_9, 996, fieldsig_9);; +let v = (parser_14, 996, fieldsig_14);; let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; -let v = (parser_6, 2196, fieldsig_6);; +let v = (parser_7, 2196, fieldsig_7);; let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3132.fc7.i586" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3132.fc7.i686" v map;; -let v = (parser_9, 996, fieldsig_9);; +let v = (parser_14, 996, fieldsig_14);; let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; -let v = (parser_6, 2196, fieldsig_6);; +let v = (parser_7, 2196, fieldsig_7);; let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3141.fc7.i586" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3141.fc7.i686" v map;; -let v = (parser_9, 996, fieldsig_9);; +let v = (parser_14, 996, fieldsig_14);; let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; -let v = (parser_6, 2196, fieldsig_6);; +let v = (parser_7, 2196, fieldsig_7);; let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3144.fc7.i586" v map;; let v = (parser_1, 1284, fieldsig_1);; let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;; -let v = (parser_9, 996, fieldsig_9);; +let v = (parser_14, 996, fieldsig_14);; let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; -let v = (parser_6, 2196, fieldsig_6);; +let v = (parser_7, 2196, fieldsig_7);; let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; let v = (parser_1, 1200, fieldsig_1);; let map = StringMap.add "2.6.21-1.3145.fc7.i586" v map;; let v = (parser_1, 1200, fieldsig_1);; let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; -let v = (parser_9, 996, fieldsig_9);; +let v = (parser_14, 996, fieldsig_14);; let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; -let v = (parser_6, 1900, fieldsig_6);; +let v = (parser_7, 1900, fieldsig_7);; let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; let v = (parser_1, 1200, fieldsig_1);; let map = StringMap.add "2.6.21-1.3190.fc7.i586" v map;; let v = (parser_1, 1200, fieldsig_1);; let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; -let v = (parser_9, 996, fieldsig_9);; +let v = (parser_14, 996, fieldsig_14);; let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; -let v = (parser_6, 1900, fieldsig_6);; +let v = (parser_7, 1900, fieldsig_7);; let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3209.fc8.i586" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; -let v = (parser_12, 1092, fieldsig_12);; +let v = (parser_16, 1092, fieldsig_16);; let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; -let v = (parser_7, 2316, fieldsig_7);; +let v = (parser_18, 2316, fieldsig_18);; let map = StringMap.add "2.6.21-1.3209.fc8.x86_64" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3218.fc8.i586" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; -let v = (parser_12, 1092, fieldsig_12);; +let v = (parser_16, 1092, fieldsig_16);; let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; -let v = (parser_7, 2316, fieldsig_7);; +let v = (parser_18, 2316, fieldsig_18);; let map = StringMap.add "2.6.21-1.3218.fc8.x86_64" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3221.fc8.i586" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; -let v = (parser_12, 1092, fieldsig_12);; +let v = (parser_16, 1092, fieldsig_16);; let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; -let v = (parser_7, 2316, fieldsig_7);; +let v = (parser_18, 2316, fieldsig_18);; let map = StringMap.add "2.6.21-1.3221.fc8.x86_64" v map;; let v = (parser_1, 1116, fieldsig_1);; let map = StringMap.add "2.6.21-1.3228.fc7.i586" v map;; let v = (parser_1, 1116, fieldsig_1);; let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; -let v = (parser_9, 836, fieldsig_9);; +let v = (parser_14, 836, fieldsig_14);; let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; -let v = (parser_10, 1684, fieldsig_10);; +let v = (parser_15, 1684, fieldsig_15);; let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; -let v = (parser_6, 1660, fieldsig_6);; +let v = (parser_7, 1660, fieldsig_7);; let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; -let v = (parser_12, 1092, fieldsig_12);; +let v = (parser_16, 1092, fieldsig_16);; let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; -let v = (parser_7, 2316, fieldsig_7);; +let v = (parser_18, 2316, fieldsig_18);; let map = StringMap.add "2.6.21-1.3234.fc8.x86_64" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; -let v = (parser_12, 1092, fieldsig_12);; +let v = (parser_16, 1092, fieldsig_16);; let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; -let v = (parser_7, 2316, fieldsig_7);; +let v = (parser_18, 2316, fieldsig_18);; let map = StringMap.add "2.6.21-1.3236.fc8.x86_64" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; -let v = (parser_12, 1092, fieldsig_12);; +let v = (parser_16, 1092, fieldsig_16);; let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; -let v = (parser_7, 2316, fieldsig_7);; +let v = (parser_18, 2316, fieldsig_18);; let map = StringMap.add "2.6.21-1.3238.fc8.x86_64" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; -let v = (parser_12, 1092, fieldsig_12);; +let v = (parser_16, 1092, fieldsig_16);; let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; -let v = (parser_7, 2316, fieldsig_7);; +let v = (parser_18, 2316, fieldsig_18);; let map = StringMap.add "2.6.21-1.3242.fc8.x86_64" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; -let v = (parser_12, 1092, fieldsig_12);; +let v = (parser_16, 1092, fieldsig_16);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; -let v = (parser_7, 2316, fieldsig_7);; +let v = (parser_18, 2316, fieldsig_18);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.x86_64" v map;; -let v = (parser_2, 1408, fieldsig_2);; +let v = (parser_5, 1408, fieldsig_5);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; -let v = (parser_12, 1092, fieldsig_12);; +let v = (parser_16, 1092, fieldsig_16);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; -let v = (parser_7, 2316, fieldsig_7);; +let v = (parser_18, 2316, fieldsig_18);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.x86_64" v map;; let v = (parser_2, 1248, fieldsig_2);; let map = StringMap.add "2.6.23.14-135.fc8.i586" v map;; let v = (parser_2, 1248, fieldsig_2);; let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; -let v = (parser_14, 952, fieldsig_14);; +let v = (parser_19, 952, fieldsig_19);; let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; -let v = (parser_13, 1824, fieldsig_13);; +let v = (parser_20, 1824, fieldsig_20);; let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; -let v = (parser_7, 1800, fieldsig_7);; +let v = (parser_8, 1800, fieldsig_8);; let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; let v = (parser_2, 1248, fieldsig_2);; let map = StringMap.add "2.6.23.14-78.fc7.i586" v map;; let v = (parser_2, 1248, fieldsig_2);; let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; -let v = (parser_14, 952, fieldsig_14);; +let v = (parser_19, 952, fieldsig_19);; let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; -let v = (parser_13, 1824, fieldsig_13);; +let v = (parser_20, 1824, fieldsig_20);; let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; -let v = (parser_7, 1800, fieldsig_7);; +let v = (parser_8, 1800, fieldsig_8);; let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; let v = (parser_3, 1244, fieldsig_3);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i586" v map;; let v = (parser_3, 1244, fieldsig_3);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i686" v map;; -let v = (parser_15, 1048, fieldsig_15);; +let v = (parser_21, 1048, fieldsig_21);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; -let v = (parser_16, 1984, fieldsig_16);; +let v = (parser_22, 1984, fieldsig_22);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; -let v = (parser_8, 2288, fieldsig_8);; +let v = (parser_9, 2288, fieldsig_9);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.x86_64" v map;; let v = (parser_3, 1244, fieldsig_3);; let map = StringMap.add "2.6.24-7.fc9.i586" v map;; let v = (parser_3, 1244, fieldsig_3);; let map = StringMap.add "2.6.24-7.fc9.i686" v map;; -let v = (parser_15, 1048, fieldsig_15);; +let v = (parser_21, 1048, fieldsig_21);; let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; -let v = (parser_16, 1984, fieldsig_16);; +let v = (parser_22, 1984, fieldsig_22);; let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; -let v = (parser_8, 2288, fieldsig_8);; +let v = (parser_9, 2288, fieldsig_9);; let map = StringMap.add "2.6.24-7.fc9.x86_64" v map;; let v = (parser_3, 1244, fieldsig_3);; let map = StringMap.add "2.6.24-9.fc9.i586" v map;; let v = (parser_3, 1244, fieldsig_3);; let map = StringMap.add "2.6.24-9.fc9.i686" v map;; -let v = (parser_15, 1048, fieldsig_15);; +let v = (parser_21, 1048, fieldsig_21);; let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; -let v = (parser_16, 1984, fieldsig_16);; +let v = (parser_22, 1984, fieldsig_22);; let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; -let v = (parser_8, 2288, fieldsig_8);; +let v = (parser_9, 2288, fieldsig_9);; let map = StringMap.add "2.6.24-9.fc9.x86_64" v map;; let v = (parser_3, 1212, fieldsig_3);; let map = StringMap.add "2.6.25.11-97.fc9.i686" v map;; -let v = (parser_8, 1752, fieldsig_8);; +let v = (parser_9, 1752, fieldsig_9);; let map = StringMap.add "2.6.25.11-97.fc9.x86_64" v map;; let v = (parser_3, 1212, fieldsig_3);; +let map = StringMap.add "2.6.25.14-69.fc8.i586" v map;; +let v = (parser_3, 1212, fieldsig_3);; let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_22, 1776, fieldsig_22);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; let v = (parser_4, 1216, fieldsig_4);; let map = StringMap.add "2.6.26.1-9.fc9.i586" v map;; let v = (parser_4, 1216, fieldsig_4);; let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; -let v = (parser_17, 920, fieldsig_17);; +let v = (parser_23, 920, fieldsig_23);; let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; -let v = (parser_16, 1776, fieldsig_16);; +let v = (parser_22, 1776, fieldsig_22);; let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; -let v = (parser_8, 1752, fieldsig_8);; +let v = (parser_9, 1752, fieldsig_9);; let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; let v = (parser_4, 1216, fieldsig_4);; let map = StringMap.add "2.6.26.2-2.fc8.i586" v map;; let v = (parser_4, 1216, fieldsig_4);; let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; -let v = (parser_17, 920, fieldsig_17);; +let v = (parser_23, 920, fieldsig_23);; let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; -let v = (parser_16, 1776, fieldsig_16);; +let v = (parser_22, 1776, fieldsig_22);; let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; -let v = (parser_8, 1752, fieldsig_8);; +let v = (parser_9, 1752, fieldsig_9);; let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i586" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; -let v = (parser_18, 1072, fieldsig_18);; +let v = (parser_24, 1072, fieldsig_24);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; -let v = (parser_20, 2316, fieldsig_20);; +let v = (parser_26, 2316, fieldsig_26);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.x86_64" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i586" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; -let v = (parser_18, 1072, fieldsig_18);; +let v = (parser_24, 1072, fieldsig_24);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; -let v = (parser_20, 2316, fieldsig_20);; +let v = (parser_26, 2316, fieldsig_26);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.x86_64" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i586" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; -let v = (parser_18, 1072, fieldsig_18);; +let v = (parser_24, 1072, fieldsig_24);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; -let v = (parser_20, 2316, fieldsig_20);; +let v = (parser_26, 2316, fieldsig_26);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.x86_64" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.i586" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; -let v = (parser_18, 1072, fieldsig_18);; +let v = (parser_24, 1072, fieldsig_24);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; -let v = (parser_20, 2316, fieldsig_20);; +let v = (parser_26, 2316, fieldsig_26);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.x86_64" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.i586" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; -let v = (parser_18, 1072, fieldsig_18);; +let v = (parser_24, 1072, fieldsig_24);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; -let v = (parser_20, 2316, fieldsig_20);; +let v = (parser_26, 2316, fieldsig_26);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.x86_64" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i586" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; -let v = (parser_18, 1072, fieldsig_18);; +let v = (parser_24, 1072, fieldsig_24);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; -let v = (parser_20, 2316, fieldsig_20);; +let v = (parser_26, 2316, fieldsig_26);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.x86_64" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i586" v map;; -let v = (parser_5, 1388, fieldsig_5);; +let v = (parser_6, 1388, fieldsig_6);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; -let v = (parser_18, 1072, fieldsig_18);; +let v = (parser_24, 1072, fieldsig_24);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; -let v = (parser_20, 2316, fieldsig_20);; +let v = (parser_26, 2316, fieldsig_26);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.x86_64" v map;; -let v = (parser_21, 672, fieldsig_21);; +let v = (parser_10, 672, fieldsig_10);; let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; -let v = (parser_10, 1260, fieldsig_10);; +let v = (parser_12, 1260, fieldsig_12);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; -let v = (parser_10, 1260, fieldsig_10);; +let v = (parser_12, 1260, fieldsig_12);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; -let v = (parser_22, 1108, fieldsig_22);; +let v = (parser_13, 1108, fieldsig_13);; let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; -let v = (parser_23, 668, fieldsig_23);; +let v = (parser_1, 668, fieldsig_1);; let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; -let v = (parser_10, 1260, fieldsig_10);; +let v = (parser_15, 1260, fieldsig_15);; let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; -let v = (parser_24, 1100, fieldsig_24);; +let v = (parser_7, 1100, fieldsig_7);; let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; -let v = (parser_22, 2124, fieldsig_22);; +let v = (parser_7, 2124, fieldsig_7);; let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; -let v = (parser_22, 2124, fieldsig_22);; +let v = (parser_7, 2124, fieldsig_7);; let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; -let v = (parser_22, 2124, fieldsig_22);; +let v = (parser_7, 2124, fieldsig_7);; let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; -let v = (parser_22, 2124, fieldsig_22);; +let v = (parser_7, 2124, fieldsig_7);; let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; -let v = (parser_22, 1644, fieldsig_22);; +let v = (parser_7, 1644, fieldsig_7);; let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; -let v = (parser_10, 1924, fieldsig_10);; +let v = (parser_15, 1924, fieldsig_15);; let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; -let v = (parser_22, 1644, fieldsig_22);; +let v = (parser_7, 1644, fieldsig_7);; let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; -let v = (parser_10, 1684, fieldsig_10);; +let v = (parser_15, 1684, fieldsig_15);; let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; -let v = (parser_22, 1404, fieldsig_22);; +let v = (parser_7, 1404, fieldsig_7);; let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; -let v = (parser_13, 2044, fieldsig_13);; +let v = (parser_17, 2044, fieldsig_17);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; -let v = (parser_13, 1824, fieldsig_13);; +let v = (parser_20, 1824, fieldsig_20);; let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; -let v = (parser_13, 1824, fieldsig_13);; +let v = (parser_20, 1824, fieldsig_20);; let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; -let v = (parser_16, 1984, fieldsig_16);; +let v = (parser_22, 1984, fieldsig_22);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; -let v = (parser_16, 1984, fieldsig_16);; +let v = (parser_22, 1984, fieldsig_22);; let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; -let v = (parser_16, 1984, fieldsig_16);; +let v = (parser_22, 1984, fieldsig_22);; let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; -let v = (parser_16, 1776, fieldsig_16);; +let v = (parser_22, 1776, fieldsig_22);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_22, 1776, fieldsig_22);; let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; -let v = (parser_16, 1776, fieldsig_16);; +let v = (parser_22, 1776, fieldsig_22);; let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; -let v = (parser_19, 2332, fieldsig_19);; +let v = (parser_25, 2332, fieldsig_25);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; -let v = (parser_9, 688, fieldsig_9);; +let v = (parser_11, 688, fieldsig_11);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; -let v = (parser_9, 688, fieldsig_9);; +let v = (parser_14, 688, fieldsig_14);; let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; -let v = (parser_9, 1020, fieldsig_9);; +let v = (parser_14, 1020, fieldsig_14);; let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; -let v = (parser_9, 1020, fieldsig_9);; +let v = (parser_14, 1020, fieldsig_14);; let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; -let v = (parser_9, 1020, fieldsig_9);; +let v = (parser_14, 1020, fieldsig_14);; let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; -let v = (parser_9, 1020, fieldsig_9);; +let v = (parser_14, 1020, fieldsig_14);; let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; -let v = (parser_9, 1020, fieldsig_9);; +let v = (parser_14, 1020, fieldsig_14);; let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; -let v = (parser_9, 1020, fieldsig_9);; +let v = (parser_14, 1020, fieldsig_14);; let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; -let v = (parser_12, 1116, fieldsig_12);; +let v = (parser_16, 1116, fieldsig_16);; let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; -let v = (parser_12, 1116, fieldsig_12);; +let v = (parser_16, 1116, fieldsig_16);; let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; -let v = (parser_12, 1116, fieldsig_12);; +let v = (parser_16, 1116, fieldsig_16);; let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; -let v = (parser_9, 936, fieldsig_9);; +let v = (parser_14, 936, fieldsig_14);; let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; -let v = (parser_12, 1116, fieldsig_12);; +let v = (parser_16, 1116, fieldsig_16);; let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; -let v = (parser_12, 1116, fieldsig_12);; +let v = (parser_16, 1116, fieldsig_16);; let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; -let v = (parser_12, 1116, fieldsig_12);; +let v = (parser_16, 1116, fieldsig_16);; let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; -let v = (parser_12, 1116, fieldsig_12);; +let v = (parser_16, 1116, fieldsig_16);; let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; -let v = (parser_12, 1116, fieldsig_12);; +let v = (parser_16, 1116, fieldsig_16);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; -let v = (parser_12, 1116, fieldsig_12);; +let v = (parser_16, 1116, fieldsig_16);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; -let v = (parser_25, 1064, fieldsig_25);; +let v = (parser_19, 1064, fieldsig_19);; let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; -let v = (parser_25, 1064, fieldsig_25);; +let v = (parser_19, 1064, fieldsig_19);; let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; -let v = (parser_15, 1072, fieldsig_15);; +let v = (parser_21, 1072, fieldsig_21);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; -let v = (parser_15, 1072, fieldsig_15);; +let v = (parser_21, 1072, fieldsig_21);; let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; -let v = (parser_15, 1072, fieldsig_15);; +let v = (parser_21, 1072, fieldsig_21);; let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; -let v = (parser_17, 1016, fieldsig_17);; +let v = (parser_23, 1016, fieldsig_23);; let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; -let v = (parser_17, 1016, fieldsig_17);; +let v = (parser_23, 1016, fieldsig_23);; let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; -let v = (parser_18, 1120, fieldsig_18);; +let v = (parser_24, 1120, fieldsig_24);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; -let v = (parser_18, 1120, fieldsig_18);; +let v = (parser_24, 1120, fieldsig_24);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; -let v = (parser_18, 1120, fieldsig_18);; +let v = (parser_24, 1120, fieldsig_24);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; -let v = (parser_18, 1120, fieldsig_18);; +let v = (parser_24, 1120, fieldsig_24);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; -let v = (parser_18, 1120, fieldsig_18);; +let v = (parser_24, 1120, fieldsig_24);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; -let v = (parser_18, 1120, fieldsig_18);; +let v = (parser_24, 1120, fieldsig_24);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; -let v = (parser_18, 1120, fieldsig_18);; +let v = (parser_24, 1120, fieldsig_24);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; -let v = (parser_1, 912, fieldsig_1);; +let v = (parser_10, 912, fieldsig_10);; let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; -let v = (parser_6, 1260, fieldsig_6);; +let v = (parser_13, 1260, fieldsig_13);; let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; let v = (parser_1, 912, fieldsig_1);; let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; -let v = (parser_6, 1260, fieldsig_6);; +let v = (parser_7, 1260, fieldsig_7);; let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; type kernel_version = string;; let net_device_known version = StringMap.mem version map;; @@ -1277,5 +1945,17 @@ let field_signature_of_net_device_next version = let (_, _, fs) = StringMap.find version map in fs.__fs_net_device_next;; let field_signature_of_net_device_name version = let (_, _, fs) = StringMap.find version map in fs.__fs_net_device_name;; -let field_signature_of_net_device_dev_addr version = - let (_, _, fs) = StringMap.find version map in fs.__fs_net_device_dev_addr;; +let field_signature_of_net_device_flags version = + let (_, _, fs) = StringMap.find version map in fs.__fs_net_device_flags;; +let field_signature_of_net_device_operstate version = + let (_, _, fs) = StringMap.find version map in fs.__fs_net_device_operstate;; +let field_signature_of_net_device_mtu version = + let (_, _, fs) = StringMap.find version map in fs.__fs_net_device_mtu;; +let field_signature_of_net_device_perm_addr version = + let (_, _, fs) = StringMap.find version map in fs.__fs_net_device_perm_addr;; +let field_signature_of_net_device_addr_len version = + let (_, _, fs) = StringMap.find version map in fs.__fs_net_device_addr_len;; +let field_signature_of_net_device_ip_ptr version = + let (_, _, fs) = StringMap.find version map in fs.__fs_net_device_ip_ptr;; +let field_signature_of_net_device_ip6_ptr version = + let (_, _, fs) = StringMap.find version map in fs.__fs_net_device_ip6_ptr;; diff --git a/lib/kernel_net_device.mli b/lib/kernel_net_device.mli index c469020..044de9c 100644 --- a/lib/kernel_net_device.mli +++ b/lib/kernel_net_device.mli @@ -2,7 +2,10 @@ type t = { net_device_dev_list'prev : Virt_mem_mmap.addr option; net_device_dev_list'next : Virt_mem_mmap.addr option; net_device_next : Virt_mem_mmap.addr option; net_device_name : string; - net_device_dev_addr : string + net_device_flags : int64; net_device_operstate : int64; + net_device_mtu : int64; net_device_perm_addr : string; + net_device_addr_len : int64; net_device_ip_ptr : Virt_mem_mmap.addr; + net_device_ip6_ptr : Virt_mem_mmap.addr };; val struct_name : string;; type kernel_version = string;; @@ -20,5 +23,17 @@ val field_signature_of_net_device_next : kernel_version -> Virt_mem_types.fieldsig;; val field_signature_of_net_device_name : kernel_version -> Virt_mem_types.fieldsig;; -val field_signature_of_net_device_dev_addr : +val field_signature_of_net_device_flags : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_net_device_operstate : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_net_device_mtu : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_net_device_perm_addr : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_net_device_addr_len : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_net_device_ip_ptr : + kernel_version -> Virt_mem_types.fieldsig;; +val field_signature_of_net_device_ip6_ptr : kernel_version -> Virt_mem_types.fieldsig;; diff --git a/lib/kernel_task_struct.ml b/lib/kernel_task_struct.ml index c8cf6f8..6f6f94a 100644 --- a/lib/kernel_task_struct.ml +++ b/lib/kernel_task_struct.ml @@ -313,6 +313,29 @@ let fieldsig_13 = __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; __fs_task_struct_prio = + { Virt_mem_types.field_available = true; field_offset = 28; }; + __fs_task_struct_static_prio = + { Virt_mem_types.field_available = true; field_offset = 32; }; + __fs_task_struct_normal_prio = + { Virt_mem_types.field_available = true; field_offset = 36; }; + __fs_task_struct_tasks'next = + { Virt_mem_types.field_available = true; field_offset = 480; }; + __fs_task_struct_tasks'prev = + { Virt_mem_types.field_available = true; field_offset = 488; }; + __fs_task_struct_mm = + { Virt_mem_types.field_available = true; field_offset = 496; }; + __fs_task_struct_active_mm = + { Virt_mem_types.field_available = true; field_offset = 504; }; + __fs_task_struct_pid = + { Virt_mem_types.field_available = true; field_offset = 544; }; + __fs_task_struct_comm = + { Virt_mem_types.field_available = true; field_offset = 1049; }; + };; +let fieldsig_14 = + { + __fs_task_struct_state = + { Virt_mem_types.field_available = true; field_offset = 0; }; + __fs_task_struct_prio = { Virt_mem_types.field_available = true; field_offset = 32; }; __fs_task_struct_static_prio = { Virt_mem_types.field_available = true; field_offset = 36; }; @@ -331,7 +354,7 @@ let fieldsig_13 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 1089; }; };; -let fieldsig_14 = +let fieldsig_15 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -354,7 +377,7 @@ let fieldsig_14 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 408; }; };; -let fieldsig_15 = +let fieldsig_16 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -377,7 +400,7 @@ let fieldsig_15 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 680; }; };; -let fieldsig_16 = +let fieldsig_17 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -400,7 +423,7 @@ let fieldsig_16 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 696; }; };; -let fieldsig_17 = +let fieldsig_18 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -423,7 +446,7 @@ let fieldsig_17 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 648; }; };; -let fieldsig_18 = +let fieldsig_19 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -446,7 +469,7 @@ let fieldsig_18 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 648; }; };; -let fieldsig_19 = +let fieldsig_20 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -469,7 +492,7 @@ let fieldsig_19 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 584; }; };; -let fieldsig_20 = +let fieldsig_21 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -492,7 +515,7 @@ let fieldsig_20 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 840; }; };; -let fieldsig_21 = +let fieldsig_22 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -515,7 +538,7 @@ let fieldsig_21 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 840; }; };; -let fieldsig_22 = +let fieldsig_23 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -538,7 +561,7 @@ let fieldsig_22 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 592; }; };; -let fieldsig_23 = +let fieldsig_24 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -561,7 +584,7 @@ let fieldsig_23 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 864; }; };; -let fieldsig_24 = +let fieldsig_25 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -584,7 +607,7 @@ let fieldsig_24 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 864; }; };; -let fieldsig_25 = +let fieldsig_26 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -607,7 +630,7 @@ let fieldsig_25 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 560; }; };; -let fieldsig_26 = +let fieldsig_27 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -630,7 +653,7 @@ let fieldsig_26 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 816; }; };; -let fieldsig_27 = +let fieldsig_28 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -653,7 +676,7 @@ let fieldsig_27 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 816; }; };; -let fieldsig_28 = +let fieldsig_29 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -676,7 +699,7 @@ let fieldsig_28 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 552; }; };; -let fieldsig_29 = +let fieldsig_30 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -699,7 +722,7 @@ let fieldsig_29 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 824; }; };; -let fieldsig_30 = +let fieldsig_31 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -722,7 +745,7 @@ let fieldsig_30 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 824; }; };; -let fieldsig_31 = +let fieldsig_32 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -745,7 +768,7 @@ let fieldsig_31 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 576; }; };; -let fieldsig_32 = +let fieldsig_33 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -768,7 +791,7 @@ let fieldsig_32 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 856; }; };; -let fieldsig_33 = +let fieldsig_34 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -791,7 +814,7 @@ let fieldsig_33 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 697; }; };; -let fieldsig_34 = +let fieldsig_35 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -814,7 +837,7 @@ let fieldsig_34 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 969; }; };; -let fieldsig_35 = +let fieldsig_36 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -837,7 +860,30 @@ let fieldsig_35 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 977; }; };; -let fieldsig_36 = +let fieldsig_37 = + { + __fs_task_struct_state = + { Virt_mem_types.field_available = true; field_offset = 0; }; + __fs_task_struct_prio = + { Virt_mem_types.field_available = true; field_offset = 20; }; + __fs_task_struct_static_prio = + { Virt_mem_types.field_available = true; field_offset = 24; }; + __fs_task_struct_normal_prio = + { Virt_mem_types.field_available = true; field_offset = 28; }; + __fs_task_struct_tasks'next = + { Virt_mem_types.field_available = true; field_offset = 400; }; + __fs_task_struct_tasks'prev = + { Virt_mem_types.field_available = true; field_offset = 404; }; + __fs_task_struct_mm = + { Virt_mem_types.field_available = true; field_offset = 408; }; + __fs_task_struct_active_mm = + { Virt_mem_types.field_available = true; field_offset = 412; }; + __fs_task_struct_pid = + { Virt_mem_types.field_available = true; field_offset = 444; }; + __fs_task_struct_comm = + { Virt_mem_types.field_available = true; field_offset = 737; }; + };; +let fieldsig_38 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -860,7 +906,7 @@ let fieldsig_36 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 1049; }; };; -let fieldsig_37 = +let fieldsig_39 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -883,7 +929,7 @@ let fieldsig_37 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 757; }; };; -let fieldsig_38 = +let fieldsig_40 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -906,7 +952,7 @@ let fieldsig_38 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 765; }; };; -let fieldsig_39 = +let fieldsig_41 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -929,7 +975,7 @@ let fieldsig_39 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 1089; }; };; -let fieldsig_40 = +let fieldsig_42 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -952,7 +998,7 @@ let fieldsig_40 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 784; }; };; -let fieldsig_41 = +let fieldsig_43 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -975,7 +1021,7 @@ let fieldsig_41 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 808; }; };; -let fieldsig_42 = +let fieldsig_44 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -998,7 +1044,7 @@ let fieldsig_42 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 1128; }; };; -let fieldsig_43 = +let fieldsig_45 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -1021,7 +1067,7 @@ let fieldsig_43 = __fs_task_struct_comm = { Virt_mem_types.field_available = true; field_offset = 1128; }; };; -let fieldsig_44 = +let fieldsig_46 = { __fs_task_struct_state = { Virt_mem_types.field_available = true; field_offset = 0; }; @@ -1335,6 +1381,30 @@ let parser_12 bits = let parser_13 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), littleendian; + task_struct_prio : zero+32 : offset(224), littleendian; + task_struct_static_prio : zero+32 : offset(256), littleendian; + task_struct_normal_prio : zero+32 : offset(288), littleendian; + task_struct_tasks'next : zero+64 : offset(3840), littleendian; + task_struct_tasks'prev : zero+64 : offset(3904), littleendian; + task_struct_mm : zero+64 : offset(3968), littleendian; + task_struct_active_mm : zero+64 : offset(4032), littleendian; + task_struct_pid : zero+32 : offset(4352), littleendian; + task_struct_comm : 128 : offset(8392), string } -> + { task_struct_state = task_struct_state; + task_struct_prio = task_struct_prio; + task_struct_static_prio = task_struct_static_prio; + task_struct_normal_prio = task_struct_normal_prio; + task_struct_tasks'next = Int64.sub task_struct_tasks'next 480L; + task_struct_tasks'prev = Int64.sub task_struct_tasks'prev 488L; + task_struct_mm = task_struct_mm; + task_struct_active_mm = task_struct_active_mm; + task_struct_pid = task_struct_pid; + task_struct_comm = task_struct_comm } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_13", match_err));; +let parser_14 bits = + bitmatch bits with + | { task_struct_state : zero+64 : offset(0), littleendian; task_struct_prio : zero+32 : offset(256), littleendian; task_struct_static_prio : zero+32 : offset(288), littleendian; task_struct_normal_prio : zero+32 : offset(320), littleendian; @@ -1355,8 +1425,8 @@ let parser_13 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_13", match_err));; -let parser_14 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_14", match_err));; +let parser_15 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), bigendian; task_struct_prio : zero+32 : offset(192), bigendian; @@ -1379,8 +1449,8 @@ let parser_14 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_14", match_err));; -let parser_15 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_15", match_err));; +let parser_16 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), bigendian; task_struct_prio : zero+32 : offset(320), bigendian; @@ -1403,8 +1473,8 @@ let parser_15 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_15", match_err));; -let parser_16 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_16", match_err));; +let parser_17 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), littleendian; task_struct_prio : zero+32 : offset(320), littleendian; @@ -1427,8 +1497,8 @@ let parser_16 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_16", match_err));; -let parser_17 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_17", match_err));; +let parser_18 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), bigendian; task_struct_prio : zero+32 : offset(256), bigendian; @@ -1451,8 +1521,8 @@ let parser_17 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_17", match_err));; -let parser_18 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_18", match_err));; +let parser_19 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), littleendian; task_struct_prio : zero+32 : offset(256), littleendian; @@ -1475,8 +1545,8 @@ let parser_18 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_18", match_err));; -let parser_19 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_19", match_err));; +let parser_20 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), bigendian; task_struct_prio : zero+32 : offset(192), bigendian; @@ -1499,8 +1569,8 @@ let parser_19 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_19", match_err));; -let parser_20 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_20", match_err));; +let parser_21 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), bigendian; task_struct_prio : zero+32 : offset(256), bigendian; @@ -1523,8 +1593,8 @@ let parser_20 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_20", match_err));; -let parser_21 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_21", match_err));; +let parser_22 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), littleendian; task_struct_prio : zero+32 : offset(256), littleendian; @@ -1547,8 +1617,8 @@ let parser_21 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_21", match_err));; -let parser_22 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_22", match_err));; +let parser_23 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), bigendian; task_struct_prio : zero+32 : offset(192), bigendian; @@ -1571,8 +1641,8 @@ let parser_22 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_22", match_err));; -let parser_23 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_23", match_err));; +let parser_24 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), bigendian; task_struct_prio : zero+32 : offset(256), bigendian; @@ -1595,8 +1665,8 @@ let parser_23 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_23", match_err));; -let parser_24 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_24", match_err));; +let parser_25 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), littleendian; task_struct_prio : zero+32 : offset(256), littleendian; @@ -1619,8 +1689,8 @@ let parser_24 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_24", match_err));; -let parser_25 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_25", match_err));; +let parser_26 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), bigendian; task_struct_prio : zero+32 : offset(160), bigendian; @@ -1643,8 +1713,8 @@ let parser_25 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_25", match_err));; -let parser_26 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_26", match_err));; +let parser_27 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), bigendian; task_struct_prio : zero+32 : offset(224), bigendian; @@ -1667,8 +1737,8 @@ let parser_26 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_26", match_err));; -let parser_27 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_27", match_err));; +let parser_28 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), littleendian; task_struct_prio : zero+32 : offset(224), littleendian; @@ -1691,8 +1761,8 @@ let parser_27 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_27", match_err));; -let parser_28 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_28", match_err));; +let parser_29 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), bigendian; task_struct_prio : zero+32 : offset(160), bigendian; @@ -1715,8 +1785,8 @@ let parser_28 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_28", match_err));; -let parser_29 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_29", match_err));; +let parser_30 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), bigendian; task_struct_prio : zero+32 : offset(224), bigendian; @@ -1739,8 +1809,8 @@ let parser_29 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_29", match_err));; -let parser_30 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_30", match_err));; +let parser_31 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), littleendian; task_struct_prio : zero+32 : offset(224), littleendian; @@ -1763,8 +1833,8 @@ let parser_30 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_30", match_err));; -let parser_31 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_31", match_err));; +let parser_32 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), bigendian; task_struct_prio : zero+32 : offset(160), bigendian; @@ -1787,8 +1857,8 @@ let parser_31 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_31", match_err));; -let parser_32 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_32", match_err));; +let parser_33 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), bigendian; task_struct_prio : zero+32 : offset(224), bigendian; @@ -1811,8 +1881,8 @@ let parser_32 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_32", match_err));; -let parser_33 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_33", match_err));; +let parser_34 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), bigendian; task_struct_prio : zero+32 : offset(160), bigendian; @@ -1835,8 +1905,8 @@ let parser_33 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_33", match_err));; -let parser_34 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_34", match_err));; +let parser_35 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), bigendian; task_struct_prio : zero+32 : offset(224), bigendian; @@ -1859,8 +1929,8 @@ let parser_34 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_34", match_err));; -let parser_35 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_35", match_err));; +let parser_36 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), littleendian; task_struct_prio : zero+32 : offset(224), littleendian; @@ -1883,18 +1953,42 @@ let parser_35 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_35", match_err));; -let parser_36 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_36", match_err));; +let parser_37 bits = bitmatch bits with - | { task_struct_state : zero+64 : offset(0), littleendian; - task_struct_prio : zero+32 : offset(224), littleendian; - task_struct_static_prio : zero+32 : offset(256), littleendian; - task_struct_normal_prio : zero+32 : offset(288), littleendian; - task_struct_tasks'next : zero+64 : offset(3840), littleendian; - task_struct_tasks'prev : zero+64 : offset(3904), littleendian; - task_struct_mm : zero+64 : offset(3968), littleendian; - task_struct_active_mm : zero+64 : offset(4032), littleendian; - task_struct_pid : zero+32 : offset(4352), littleendian; + | { task_struct_state : zero+32 : offset(0), littleendian; + task_struct_prio : zero+32 : offset(160), littleendian; + task_struct_static_prio : zero+32 : offset(192), littleendian; + task_struct_normal_prio : zero+32 : offset(224), littleendian; + task_struct_tasks'next : zero+32 : offset(3200), littleendian; + task_struct_tasks'prev : zero+32 : offset(3232), littleendian; + task_struct_mm : zero+32 : offset(3264), littleendian; + task_struct_active_mm : zero+32 : offset(3296), littleendian; + task_struct_pid : zero+32 : offset(3552), littleendian; + task_struct_comm : 128 : offset(5896), string } -> + { task_struct_state = task_struct_state; + task_struct_prio = task_struct_prio; + task_struct_static_prio = task_struct_static_prio; + task_struct_normal_prio = task_struct_normal_prio; + task_struct_tasks'next = Int64.sub task_struct_tasks'next 400L; + task_struct_tasks'prev = Int64.sub task_struct_tasks'prev 404L; + task_struct_mm = task_struct_mm; + task_struct_active_mm = task_struct_active_mm; + task_struct_pid = task_struct_pid; + task_struct_comm = task_struct_comm } + | { _ } -> + raise (Virt_mem_types.ParseError (struct_name, "parser_37", match_err));; +let parser_38 bits = + bitmatch bits with + | { task_struct_state : zero+64 : offset(0), bigendian; + task_struct_prio : zero+32 : offset(224), bigendian; + task_struct_static_prio : zero+32 : offset(256), bigendian; + task_struct_normal_prio : zero+32 : offset(288), bigendian; + task_struct_tasks'next : zero+64 : offset(3840), bigendian; + task_struct_tasks'prev : zero+64 : offset(3904), bigendian; + task_struct_mm : zero+64 : offset(3968), bigendian; + task_struct_active_mm : zero+64 : offset(4032), bigendian; + task_struct_pid : zero+32 : offset(4352), bigendian; task_struct_comm : 128 : offset(8392), string } -> { task_struct_state = task_struct_state; task_struct_prio = task_struct_prio; @@ -1907,8 +2001,8 @@ let parser_36 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_36", match_err));; -let parser_37 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_38", match_err));; +let parser_39 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), littleendian; task_struct_prio : zero+32 : offset(192), littleendian; @@ -1931,8 +2025,8 @@ let parser_37 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_37", match_err));; -let parser_38 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_39", match_err));; +let parser_40 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), bigendian; task_struct_prio : zero+32 : offset(192), bigendian; @@ -1955,8 +2049,8 @@ let parser_38 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_38", match_err));; -let parser_39 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_40", match_err));; +let parser_41 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), bigendian; task_struct_prio : zero+32 : offset(256), bigendian; @@ -1979,8 +2073,8 @@ let parser_39 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_39", match_err));; -let parser_40 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_41", match_err));; +let parser_42 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), littleendian; task_struct_prio : zero+32 : offset(192), littleendian; @@ -2003,8 +2097,8 @@ let parser_40 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_40", match_err));; -let parser_41 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_42", match_err));; +let parser_43 bits = bitmatch bits with | { task_struct_state : zero+32 : offset(0), bigendian; task_struct_prio : zero+32 : offset(192), bigendian; @@ -2027,8 +2121,8 @@ let parser_41 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_41", match_err));; -let parser_42 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_43", match_err));; +let parser_44 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), bigendian; task_struct_prio : zero+32 : offset(256), bigendian; @@ -2051,8 +2145,8 @@ let parser_42 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_42", match_err));; -let parser_43 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_44", match_err));; +let parser_45 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), littleendian; task_struct_prio : zero+32 : offset(256), littleendian; @@ -2075,8 +2169,8 @@ let parser_43 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_43", match_err));; -let parser_44 bits = + raise (Virt_mem_types.ParseError (struct_name, "parser_45", match_err));; +let parser_46 bits = bitmatch bits with | { task_struct_state : zero+64 : offset(0), littleendian; task_struct_prio : zero+32 : offset(320), littleendian; @@ -2099,7 +2193,7 @@ let parser_44 bits = task_struct_pid = task_struct_pid; task_struct_comm = task_struct_comm } | { _ } -> - raise (Virt_mem_types.ParseError (struct_name, "parser_44", match_err));; + raise (Virt_mem_types.ParseError (struct_name, "parser_46", match_err));; module StringMap = Map.Make(String);; let map = StringMap.empty;; let v = (parser_1, 2704, fieldsig_1);; @@ -2208,33 +2302,35 @@ let v = (parser_12, 4468, fieldsig_12);; let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; let v = (parser_3, 4684, fieldsig_3);; let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; +let v = (parser_13, 6232, fieldsig_13);; +let map = StringMap.add "2.6.25.14-69.fc8.x86_64" v map;; let v = (parser_4, 4180, fieldsig_4);; let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; -let v = (parser_13, 5808, fieldsig_13);; +let v = (parser_14, 5808, fieldsig_14);; let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; let v = (parser_4, 4180, fieldsig_4);; let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; -let v = (parser_13, 5808, fieldsig_13);; +let v = (parser_14, 5808, fieldsig_14);; let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; let v = (parser_1, 1384, fieldsig_1);; let map = StringMap.add "2.6.18-1.2798.fc6.i586" v map;; let v = (parser_1, 1384, fieldsig_1);; let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; -let v = (parser_14, 1576, fieldsig_14);; +let v = (parser_15, 1576, fieldsig_15);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; -let v = (parser_15, 2104, fieldsig_15);; +let v = (parser_16, 2104, fieldsig_16);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; -let v = (parser_15, 2088, fieldsig_15);; +let v = (parser_16, 2088, fieldsig_16);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; -let v = (parser_16, 1928, fieldsig_16);; +let v = (parser_17, 1928, fieldsig_17);; let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; let v = (parser_1, 1400, fieldsig_1);; let map = StringMap.add "2.6.20-1.2933.fc6.i586" v map;; let v = (parser_1, 1400, fieldsig_1);; let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; -let v = (parser_14, 1592, fieldsig_14);; +let v = (parser_15, 1592, fieldsig_15);; let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; -let v = (parser_15, 2112, fieldsig_15);; +let v = (parser_16, 2112, fieldsig_16);; let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; let v = (parser_11, 1920, fieldsig_11);; let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; @@ -2242,9 +2338,9 @@ let v = (parser_1, 2704, fieldsig_1);; let map = StringMap.add "2.6.21-1.3128.fc7.i586" v map;; let v = (parser_1, 2704, fieldsig_1);; let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;; -let v = (parser_14, 1604, fieldsig_14);; +let v = (parser_15, 1604, fieldsig_15);; let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; -let v = (parser_15, 2132, fieldsig_15);; +let v = (parser_16, 2132, fieldsig_16);; let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; let v = (parser_11, 3772, fieldsig_11);; let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; @@ -2252,9 +2348,9 @@ let v = (parser_1, 2704, fieldsig_1);; let map = StringMap.add "2.6.21-1.3132.fc7.i586" v map;; let v = (parser_1, 2704, fieldsig_1);; let map = StringMap.add "2.6.21-1.3132.fc7.i686" v map;; -let v = (parser_14, 1604, fieldsig_14);; +let v = (parser_15, 1604, fieldsig_15);; let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; -let v = (parser_15, 2132, fieldsig_15);; +let v = (parser_16, 2132, fieldsig_16);; let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; let v = (parser_11, 3772, fieldsig_11);; let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; @@ -2262,9 +2358,9 @@ let v = (parser_1, 2704, fieldsig_1);; let map = StringMap.add "2.6.21-1.3141.fc7.i586" v map;; let v = (parser_1, 2704, fieldsig_1);; let map = StringMap.add "2.6.21-1.3141.fc7.i686" v map;; -let v = (parser_14, 1604, fieldsig_14);; +let v = (parser_15, 1604, fieldsig_15);; let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; -let v = (parser_15, 2132, fieldsig_15);; +let v = (parser_16, 2132, fieldsig_16);; let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; let v = (parser_11, 3772, fieldsig_11);; let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; @@ -2272,9 +2368,9 @@ let v = (parser_1, 2704, fieldsig_1);; let map = StringMap.add "2.6.21-1.3144.fc7.i586" v map;; let v = (parser_1, 2704, fieldsig_1);; let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;; -let v = (parser_14, 1604, fieldsig_14);; +let v = (parser_15, 1604, fieldsig_15);; let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; -let v = (parser_15, 2132, fieldsig_15);; +let v = (parser_16, 2132, fieldsig_16);; let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; let v = (parser_11, 3772, fieldsig_11);; let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; @@ -2282,9 +2378,9 @@ let v = (parser_1, 1400, fieldsig_1);; let map = StringMap.add "2.6.21-1.3145.fc7.i586" v map;; let v = (parser_1, 1400, fieldsig_1);; let map = StringMap.add "2.6.21-1.3145.fc7.i686" v map;; -let v = (parser_14, 1592, fieldsig_14);; +let v = (parser_15, 1592, fieldsig_15);; let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; -let v = (parser_15, 2112, fieldsig_15);; +let v = (parser_16, 2112, fieldsig_16);; let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; let v = (parser_11, 1920, fieldsig_11);; let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; @@ -2292,9 +2388,9 @@ let v = (parser_1, 1400, fieldsig_1);; let map = StringMap.add "2.6.21-1.3190.fc7.i586" v map;; let v = (parser_1, 1400, fieldsig_1);; let map = StringMap.add "2.6.21-1.3190.fc7.i686" v map;; -let v = (parser_14, 1592, fieldsig_14);; +let v = (parser_15, 1592, fieldsig_15);; let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; -let v = (parser_15, 2112, fieldsig_15);; +let v = (parser_16, 2112, fieldsig_16);; let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; let v = (parser_11, 1920, fieldsig_11);; let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; @@ -2302,97 +2398,97 @@ let v = (parser_1, 2712, fieldsig_1);; let map = StringMap.add "2.6.21-1.3209.fc8.i586" v map;; let v = (parser_1, 2712, fieldsig_1);; let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;; -let v = (parser_14, 1612, fieldsig_14);; +let v = (parser_15, 1612, fieldsig_15);; let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; -let v = (parser_17, 2116, fieldsig_17);; +let v = (parser_18, 2116, fieldsig_18);; let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; -let v = (parser_18, 3756, fieldsig_18);; +let v = (parser_19, 3756, fieldsig_19);; let map = StringMap.add "2.6.21-1.3209.fc8.x86_64" v map;; let v = (parser_1, 2712, fieldsig_1);; let map = StringMap.add "2.6.21-1.3218.fc8.i586" v map;; let v = (parser_1, 2712, fieldsig_1);; let map = StringMap.add "2.6.21-1.3218.fc8.i686" v map;; -let v = (parser_14, 1612, fieldsig_14);; +let v = (parser_15, 1612, fieldsig_15);; let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; -let v = (parser_17, 2116, fieldsig_17);; +let v = (parser_18, 2116, fieldsig_18);; let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; -let v = (parser_18, 3756, fieldsig_18);; +let v = (parser_19, 3756, fieldsig_19);; let map = StringMap.add "2.6.21-1.3218.fc8.x86_64" v map;; let v = (parser_1, 2712, fieldsig_1);; let map = StringMap.add "2.6.21-1.3221.fc8.i586" v map;; let v = (parser_1, 2712, fieldsig_1);; let map = StringMap.add "2.6.21-1.3221.fc8.i686" v map;; -let v = (parser_14, 1612, fieldsig_14);; +let v = (parser_15, 1612, fieldsig_15);; let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; -let v = (parser_17, 2116, fieldsig_17);; +let v = (parser_18, 2116, fieldsig_18);; let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; -let v = (parser_18, 3756, fieldsig_18);; +let v = (parser_19, 3756, fieldsig_19);; let map = StringMap.add "2.6.21-1.3221.fc8.x86_64" v map;; let v = (parser_1, 1376, fieldsig_1);; let map = StringMap.add "2.6.21-1.3228.fc7.i586" v map;; let v = (parser_1, 1376, fieldsig_1);; let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;; -let v = (parser_14, 1560, fieldsig_14);; +let v = (parser_15, 1560, fieldsig_15);; let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; -let v = (parser_15, 2072, fieldsig_15);; +let v = (parser_16, 2072, fieldsig_16);; let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; let v = (parser_11, 1880, fieldsig_11);; let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; let v = (parser_5, 2880, fieldsig_5);; let map = StringMap.add "2.6.21-1.3234.fc8.i686" v map;; -let v = (parser_19, 1780, fieldsig_19);; +let v = (parser_20, 1780, fieldsig_20);; let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; -let v = (parser_20, 2292, fieldsig_20);; +let v = (parser_21, 2292, fieldsig_21);; let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; -let v = (parser_21, 3932, fieldsig_21);; +let v = (parser_22, 3932, fieldsig_22);; let map = StringMap.add "2.6.21-1.3234.fc8.x86_64" v map;; let v = (parser_6, 2880, fieldsig_6);; let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;; -let v = (parser_22, 1780, fieldsig_22);; +let v = (parser_23, 1780, fieldsig_23);; let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; -let v = (parser_23, 2308, fieldsig_23);; +let v = (parser_24, 2308, fieldsig_24);; let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; -let v = (parser_24, 3948, fieldsig_24);; +let v = (parser_25, 3948, fieldsig_25);; let map = StringMap.add "2.6.21-1.3236.fc8.x86_64" v map;; let v = (parser_7, 2872, fieldsig_7);; let map = StringMap.add "2.6.21-1.3238.fc8.i686" v map;; -let v = (parser_25, 1756, fieldsig_25);; +let v = (parser_26, 1756, fieldsig_26);; let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; -let v = (parser_26, 2276, fieldsig_26);; +let v = (parser_27, 2276, fieldsig_27);; let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; -let v = (parser_27, 3916, fieldsig_27);; +let v = (parser_28, 3916, fieldsig_28);; let map = StringMap.add "2.6.21-1.3238.fc8.x86_64" v map;; let v = (parser_7, 2872, fieldsig_7);; let map = StringMap.add "2.6.21-1.3242.fc8.i686" v map;; -let v = (parser_25, 1756, fieldsig_25);; +let v = (parser_26, 1756, fieldsig_26);; let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; -let v = (parser_26, 2276, fieldsig_26);; +let v = (parser_27, 2276, fieldsig_27);; let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; -let v = (parser_27, 3916, fieldsig_27);; +let v = (parser_28, 3916, fieldsig_28);; let map = StringMap.add "2.6.21-1.3242.fc8.x86_64" v map;; let v = (parser_8, 2856, fieldsig_8);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;; -let v = (parser_28, 1756, fieldsig_28);; +let v = (parser_29, 1756, fieldsig_29);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; -let v = (parser_29, 2292, fieldsig_29);; +let v = (parser_30, 2292, fieldsig_30);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; -let v = (parser_30, 3932, fieldsig_30);; +let v = (parser_31, 3932, fieldsig_31);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.x86_64" v map;; let v = (parser_7, 2872, fieldsig_7);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.i686" v map;; -let v = (parser_25, 1756, fieldsig_25);; +let v = (parser_26, 1756, fieldsig_26);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; -let v = (parser_26, 2276, fieldsig_26);; +let v = (parser_27, 2276, fieldsig_27);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; -let v = (parser_27, 3916, fieldsig_27);; +let v = (parser_28, 3916, fieldsig_28);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.x86_64" v map;; let v = (parser_2, 1548, fieldsig_2);; let map = StringMap.add "2.6.23.14-135.fc8.i586" v map;; let v = (parser_2, 1548, fieldsig_2);; let map = StringMap.add "2.6.23.14-135.fc8.i686" v map;; -let v = (parser_31, 1736, fieldsig_31);; +let v = (parser_32, 1736, fieldsig_32);; let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; -let v = (parser_32, 2272, fieldsig_32);; +let v = (parser_33, 2272, fieldsig_33);; let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; let v = (parser_12, 2080, fieldsig_12);; let map = StringMap.add "2.6.23.14-135.fc8.x86_64" v map;; @@ -2400,9 +2496,9 @@ let v = (parser_2, 1548, fieldsig_2);; let map = StringMap.add "2.6.23.14-78.fc7.i586" v map;; let v = (parser_2, 1548, fieldsig_2);; let map = StringMap.add "2.6.23.14-78.fc7.i686" v map;; -let v = (parser_31, 1736, fieldsig_31);; +let v = (parser_32, 1736, fieldsig_32);; let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; -let v = (parser_32, 2272, fieldsig_32);; +let v = (parser_33, 2272, fieldsig_33);; let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; let v = (parser_12, 2080, fieldsig_12);; let map = StringMap.add "2.6.23.14-78.fc7.x86_64" v map;; @@ -2410,283 +2506,289 @@ let v = (parser_9, 3540, fieldsig_9);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i586" v map;; let v = (parser_9, 3540, fieldsig_9);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.i686" v map;; -let v = (parser_33, 1936, fieldsig_33);; +let v = (parser_34, 1940, fieldsig_34);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; -let v = (parser_34, 2492, fieldsig_34);; +let v = (parser_35, 2504, fieldsig_35);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; -let v = (parser_35, 4684, fieldsig_35);; +let v = (parser_36, 4684, fieldsig_36);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.x86_64" v map;; let v = (parser_9, 3540, fieldsig_9);; let map = StringMap.add "2.6.24-7.fc9.i586" v map;; let v = (parser_9, 3540, fieldsig_9);; let map = StringMap.add "2.6.24-7.fc9.i686" v map;; -let v = (parser_33, 1936, fieldsig_33);; +let v = (parser_34, 1940, fieldsig_34);; let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; -let v = (parser_34, 2492, fieldsig_34);; +let v = (parser_35, 2504, fieldsig_35);; let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; -let v = (parser_35, 4684, fieldsig_35);; +let v = (parser_36, 4684, fieldsig_36);; let map = StringMap.add "2.6.24-7.fc9.x86_64" v map;; let v = (parser_9, 3540, fieldsig_9);; let map = StringMap.add "2.6.24-9.fc9.i586" v map;; let v = (parser_9, 3540, fieldsig_9);; let map = StringMap.add "2.6.24-9.fc9.i686" v map;; -let v = (parser_33, 1936, fieldsig_33);; +let v = (parser_34, 1940, fieldsig_34);; let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; -let v = (parser_34, 2492, fieldsig_34);; +let v = (parser_35, 2504, fieldsig_35);; let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; -let v = (parser_35, 4684, fieldsig_35);; +let v = (parser_36, 4684, fieldsig_36);; let map = StringMap.add "2.6.24-9.fc9.x86_64" v map;; let v = (parser_3, 1832, fieldsig_3);; let map = StringMap.add "2.6.25.11-97.fc9.i686" v map;; -let v = (parser_36, 2496, fieldsig_36);; +let v = (parser_13, 2496, fieldsig_13);; let map = StringMap.add "2.6.25.11-97.fc9.x86_64" v map;; +let v = (parser_37, 1832, fieldsig_37);; +let map = StringMap.add "2.6.25.14-69.fc8.i586" v map;; let v = (parser_3, 1832, fieldsig_3);; let map = StringMap.add "2.6.25.14-69.fc8.i686" v map;; -let v = (parser_37, 1324, fieldsig_37);; +let v = (parser_38, 2524, fieldsig_38);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_39, 1324, fieldsig_39);; let map = StringMap.add "2.6.26.1-9.fc9.i586" v map;; let v = (parser_4, 1328, fieldsig_4);; let map = StringMap.add "2.6.26.1-9.fc9.i686" v map;; -let v = (parser_38, 1968, fieldsig_38);; +let v = (parser_40, 1968, fieldsig_40);; let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; -let v = (parser_39, 2572, fieldsig_39);; +let v = (parser_41, 2572, fieldsig_41);; let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; -let v = (parser_13, 2072, fieldsig_13);; +let v = (parser_14, 2072, fieldsig_14);; let map = StringMap.add "2.6.26.1-9.fc9.x86_64" v map;; -let v = (parser_37, 1324, fieldsig_37);; +let v = (parser_39, 1324, fieldsig_39);; let map = StringMap.add "2.6.26.2-2.fc8.i586" v map;; let v = (parser_4, 1328, fieldsig_4);; let map = StringMap.add "2.6.26.2-2.fc8.i686" v map;; -let v = (parser_38, 1968, fieldsig_38);; +let v = (parser_40, 1968, fieldsig_40);; let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; -let v = (parser_39, 2572, fieldsig_39);; +let v = (parser_41, 2572, fieldsig_41);; let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; -let v = (parser_13, 2072, fieldsig_13);; +let v = (parser_14, 2072, fieldsig_14);; let map = StringMap.add "2.6.26.2-2.fc8.x86_64" v map;; -let v = (parser_40, 4200, fieldsig_40);; +let v = (parser_42, 4200, fieldsig_42);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i586" v map;; let v = (parser_10, 4204, fieldsig_10);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.i686" v map;; -let v = (parser_41, 2124, fieldsig_41);; +let v = (parser_43, 2124, fieldsig_43);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; -let v = (parser_43, 5824, fieldsig_43);; +let v = (parser_45, 5824, fieldsig_45);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.x86_64" v map;; -let v = (parser_40, 4200, fieldsig_40);; +let v = (parser_42, 4200, fieldsig_42);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i586" v map;; let v = (parser_10, 4204, fieldsig_10);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.i686" v map;; -let v = (parser_41, 2124, fieldsig_41);; +let v = (parser_43, 2124, fieldsig_43);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; -let v = (parser_43, 5824, fieldsig_43);; +let v = (parser_45, 5824, fieldsig_45);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.x86_64" v map;; -let v = (parser_40, 4200, fieldsig_40);; +let v = (parser_42, 4200, fieldsig_42);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i586" v map;; let v = (parser_10, 4204, fieldsig_10);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.i686" v map;; -let v = (parser_41, 2124, fieldsig_41);; +let v = (parser_43, 2124, fieldsig_43);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; -let v = (parser_43, 5824, fieldsig_43);; +let v = (parser_45, 5824, fieldsig_45);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.x86_64" v map;; -let v = (parser_40, 4200, fieldsig_40);; +let v = (parser_42, 4200, fieldsig_42);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.i586" v map;; let v = (parser_10, 4204, fieldsig_10);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.i686" v map;; -let v = (parser_41, 2124, fieldsig_41);; +let v = (parser_43, 2124, fieldsig_43);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; -let v = (parser_43, 5824, fieldsig_43);; +let v = (parser_45, 5824, fieldsig_45);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.x86_64" v map;; -let v = (parser_40, 4200, fieldsig_40);; +let v = (parser_42, 4200, fieldsig_42);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.i586" v map;; let v = (parser_10, 4204, fieldsig_10);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.i686" v map;; -let v = (parser_41, 2124, fieldsig_41);; +let v = (parser_43, 2124, fieldsig_43);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; -let v = (parser_43, 5824, fieldsig_43);; +let v = (parser_45, 5824, fieldsig_45);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.x86_64" v map;; -let v = (parser_40, 4200, fieldsig_40);; +let v = (parser_42, 4200, fieldsig_42);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i586" v map;; let v = (parser_10, 4204, fieldsig_10);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.i686" v map;; -let v = (parser_41, 2124, fieldsig_41);; +let v = (parser_43, 2124, fieldsig_43);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; -let v = (parser_43, 5824, fieldsig_43);; +let v = (parser_45, 5824, fieldsig_45);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.x86_64" v map;; -let v = (parser_40, 4200, fieldsig_40);; +let v = (parser_42, 4200, fieldsig_42);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i586" v map;; let v = (parser_10, 4204, fieldsig_10);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.i686" v map;; -let v = (parser_41, 2124, fieldsig_41);; +let v = (parser_43, 2124, fieldsig_43);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; -let v = (parser_43, 5824, fieldsig_43);; +let v = (parser_45, 5824, fieldsig_45);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.x86_64" v map;; let v = (parser_1, 1368, fieldsig_1);; let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; -let v = (parser_15, 2104, fieldsig_15);; +let v = (parser_16, 2104, fieldsig_16);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;; -let v = (parser_15, 2088, fieldsig_15);; +let v = (parser_16, 2088, fieldsig_16);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;; -let v = (parser_44, 1856, fieldsig_44);; +let v = (parser_46, 1856, fieldsig_46);; let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; let v = (parser_1, 1384, fieldsig_1);; let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; -let v = (parser_15, 2112, fieldsig_15);; +let v = (parser_16, 2112, fieldsig_16);; let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;; let v = (parser_11, 1880, fieldsig_11);; let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;; -let v = (parser_15, 2132, fieldsig_15);; +let v = (parser_16, 2132, fieldsig_16);; let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;; let v = (parser_11, 3780, fieldsig_11);; let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;; -let v = (parser_15, 2132, fieldsig_15);; +let v = (parser_16, 2132, fieldsig_16);; let map = StringMap.add "2.6.21-1.3132.fc7.ppc64" v map;; let v = (parser_11, 3780, fieldsig_11);; let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;; -let v = (parser_15, 2132, fieldsig_15);; +let v = (parser_16, 2132, fieldsig_16);; let map = StringMap.add "2.6.21-1.3141.fc7.ppc64" v map;; let v = (parser_11, 3780, fieldsig_11);; let map = StringMap.add "2.6.21-1.3141.fc7.x86_64" v map;; -let v = (parser_15, 2132, fieldsig_15);; +let v = (parser_16, 2132, fieldsig_16);; let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;; let v = (parser_11, 3780, fieldsig_11);; let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;; -let v = (parser_15, 2112, fieldsig_15);; +let v = (parser_16, 2112, fieldsig_16);; let map = StringMap.add "2.6.21-1.3145.fc7.ppc64" v map;; let v = (parser_11, 1880, fieldsig_11);; let map = StringMap.add "2.6.21-1.3145.fc7.x86_64" v map;; -let v = (parser_15, 2112, fieldsig_15);; +let v = (parser_16, 2112, fieldsig_16);; let map = StringMap.add "2.6.21-1.3190.fc7.ppc64" v map;; let v = (parser_11, 1880, fieldsig_11);; let map = StringMap.add "2.6.21-1.3190.fc7.x86_64" v map;; -let v = (parser_17, 2116, fieldsig_17);; +let v = (parser_18, 2116, fieldsig_18);; let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;; -let v = (parser_17, 2116, fieldsig_17);; +let v = (parser_18, 2116, fieldsig_18);; let map = StringMap.add "2.6.21-1.3218.fc8.ppc64" v map;; -let v = (parser_17, 2116, fieldsig_17);; +let v = (parser_18, 2116, fieldsig_18);; let map = StringMap.add "2.6.21-1.3221.fc8.ppc64" v map;; -let v = (parser_15, 2072, fieldsig_15);; +let v = (parser_16, 2072, fieldsig_16);; let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;; let v = (parser_11, 1832, fieldsig_11);; let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;; -let v = (parser_20, 2292, fieldsig_20);; +let v = (parser_21, 2292, fieldsig_21);; let map = StringMap.add "2.6.21-1.3234.fc8.ppc64" v map;; -let v = (parser_23, 2308, fieldsig_23);; +let v = (parser_24, 2308, fieldsig_24);; let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;; -let v = (parser_26, 2276, fieldsig_26);; +let v = (parser_27, 2276, fieldsig_27);; let map = StringMap.add "2.6.21-1.3238.fc8.ppc64" v map;; -let v = (parser_26, 2276, fieldsig_26);; +let v = (parser_27, 2276, fieldsig_27);; let map = StringMap.add "2.6.21-1.3242.fc8.ppc64" v map;; -let v = (parser_29, 2292, fieldsig_29);; +let v = (parser_30, 2292, fieldsig_30);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;; -let v = (parser_26, 2276, fieldsig_26);; +let v = (parser_27, 2276, fieldsig_27);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc64" v map;; -let v = (parser_32, 2272, fieldsig_32);; +let v = (parser_33, 2272, fieldsig_33);; let map = StringMap.add "2.6.23.14-135.fc8.ppc64" v map;; -let v = (parser_32, 2272, fieldsig_32);; +let v = (parser_33, 2272, fieldsig_33);; let map = StringMap.add "2.6.23.14-78.fc7.ppc64" v map;; -let v = (parser_34, 2492, fieldsig_34);; +let v = (parser_35, 2504, fieldsig_35);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc64" v map;; -let v = (parser_34, 2492, fieldsig_34);; +let v = (parser_35, 2504, fieldsig_35);; let map = StringMap.add "2.6.24-7.fc9.ppc64" v map;; -let v = (parser_34, 2492, fieldsig_34);; +let v = (parser_35, 2504, fieldsig_35);; let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;; -let v = (parser_39, 2572, fieldsig_39);; +let v = (parser_38, 2524, fieldsig_38);; +let map = StringMap.add "2.6.25.14-69.fc8.ppc64" v map;; +let v = (parser_41, 2572, fieldsig_41);; let map = StringMap.add "2.6.26.1-9.fc9.ppc64" v map;; -let v = (parser_39, 2572, fieldsig_39);; +let v = (parser_41, 2572, fieldsig_41);; let map = StringMap.add "2.6.26.2-2.fc8.ppc64" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc64" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc64" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc64" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc64" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc64" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc64" v map;; -let v = (parser_42, 6712, fieldsig_42);; +let v = (parser_44, 6712, fieldsig_44);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc64" v map;; -let v = (parser_14, 1592, fieldsig_14);; +let v = (parser_15, 1592, fieldsig_15);; let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;; -let v = (parser_14, 1608, fieldsig_14);; +let v = (parser_15, 1608, fieldsig_15);; let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;; -let v = (parser_14, 1620, fieldsig_14);; +let v = (parser_15, 1620, fieldsig_15);; let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;; -let v = (parser_14, 1620, fieldsig_14);; +let v = (parser_15, 1620, fieldsig_15);; let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;; -let v = (parser_14, 1620, fieldsig_14);; +let v = (parser_15, 1620, fieldsig_15);; let map = StringMap.add "2.6.21-1.3141.fc7.ppc" v map;; -let v = (parser_14, 1620, fieldsig_14);; +let v = (parser_15, 1620, fieldsig_15);; let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;; -let v = (parser_14, 1608, fieldsig_14);; +let v = (parser_15, 1608, fieldsig_15);; let map = StringMap.add "2.6.21-1.3145.fc7.ppc" v map;; -let v = (parser_14, 1608, fieldsig_14);; +let v = (parser_15, 1608, fieldsig_15);; let map = StringMap.add "2.6.21-1.3190.fc7.ppc" v map;; -let v = (parser_14, 1628, fieldsig_14);; +let v = (parser_15, 1628, fieldsig_15);; let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;; -let v = (parser_14, 1628, fieldsig_14);; +let v = (parser_15, 1628, fieldsig_15);; let map = StringMap.add "2.6.21-1.3218.fc8.ppc" v map;; -let v = (parser_14, 1628, fieldsig_14);; +let v = (parser_15, 1628, fieldsig_15);; let map = StringMap.add "2.6.21-1.3221.fc8.ppc" v map;; -let v = (parser_14, 1584, fieldsig_14);; +let v = (parser_15, 1584, fieldsig_15);; let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;; -let v = (parser_19, 1796, fieldsig_19);; +let v = (parser_20, 1796, fieldsig_20);; let map = StringMap.add "2.6.21-1.3234.fc8.ppc" v map;; -let v = (parser_22, 1796, fieldsig_22);; +let v = (parser_23, 1796, fieldsig_23);; let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;; -let v = (parser_25, 1772, fieldsig_25);; +let v = (parser_26, 1772, fieldsig_26);; let map = StringMap.add "2.6.21-1.3238.fc8.ppc" v map;; -let v = (parser_25, 1772, fieldsig_25);; +let v = (parser_26, 1772, fieldsig_26);; let map = StringMap.add "2.6.21-1.3242.fc8.ppc" v map;; -let v = (parser_28, 1772, fieldsig_28);; +let v = (parser_29, 1772, fieldsig_29);; let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;; -let v = (parser_25, 1772, fieldsig_25);; +let v = (parser_26, 1772, fieldsig_26);; let map = StringMap.add "2.6.22-0.rc7.2.fc8.ppc" v map;; -let v = (parser_31, 1760, fieldsig_31);; +let v = (parser_32, 1760, fieldsig_32);; let map = StringMap.add "2.6.23.14-135.fc8.ppc" v map;; -let v = (parser_31, 1760, fieldsig_31);; +let v = (parser_32, 1760, fieldsig_32);; let map = StringMap.add "2.6.23.14-78.fc7.ppc" v map;; -let v = (parser_33, 1948, fieldsig_33);; +let v = (parser_34, 1952, fieldsig_34);; let map = StringMap.add "2.6.24-0.167.rc8.git4.fc9.ppc" v map;; -let v = (parser_33, 1948, fieldsig_33);; +let v = (parser_34, 1952, fieldsig_34);; let map = StringMap.add "2.6.24-7.fc9.ppc" v map;; -let v = (parser_33, 1948, fieldsig_33);; +let v = (parser_34, 1952, fieldsig_34);; let map = StringMap.add "2.6.24-9.fc9.ppc" v map;; -let v = (parser_38, 1992, fieldsig_38);; +let v = (parser_40, 1992, fieldsig_40);; let map = StringMap.add "2.6.26.1-9.fc9.ppc" v map;; -let v = (parser_38, 1992, fieldsig_38);; +let v = (parser_40, 1992, fieldsig_40);; let map = StringMap.add "2.6.26.2-2.fc8.ppc" v map;; -let v = (parser_41, 2136, fieldsig_41);; +let v = (parser_43, 2136, fieldsig_43);; let map = StringMap.add "2.6.27-0.225.rc1.git5.fc10.ppc" v map;; -let v = (parser_41, 2136, fieldsig_41);; +let v = (parser_43, 2136, fieldsig_43);; let map = StringMap.add "2.6.27-0.226.rc1.git5.fc10.ppc" v map;; -let v = (parser_41, 2136, fieldsig_41);; +let v = (parser_43, 2136, fieldsig_43);; let map = StringMap.add "2.6.27-0.231.rc1.git6.fc10.ppc" v map;; -let v = (parser_41, 2136, fieldsig_41);; +let v = (parser_43, 2136, fieldsig_43);; let map = StringMap.add "2.6.27-0.237.rc2.fc10.ppc" v map;; -let v = (parser_41, 2136, fieldsig_41);; +let v = (parser_43, 2136, fieldsig_43);; let map = StringMap.add "2.6.27-0.238.rc2.fc10.ppc" v map;; -let v = (parser_41, 2136, fieldsig_41);; +let v = (parser_43, 2136, fieldsig_43);; let map = StringMap.add "2.6.27-0.241.rc2.git1.fc10.ppc" v map;; -let v = (parser_41, 2136, fieldsig_41);; +let v = (parser_43, 2136, fieldsig_43);; let map = StringMap.add "2.6.27-0.244.rc2.git1.fc10.ppc" v map;; let v = (parser_1, 1384, fieldsig_1);; let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;; -let v = (parser_16, 1928, fieldsig_16);; +let v = (parser_17, 1928, fieldsig_17);; let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;; let v = (parser_1, 1400, fieldsig_1);; let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;; diff --git a/lib/virt_mem_kernels.ml b/lib/virt_mem_kernels.ml index 2869905..a7b6a9b 100644 --- a/lib/virt_mem_kernels.ml +++ b/lib/virt_mem_kernels.ml @@ -102,9 +102,11 @@ let kernels = "2.6.24-9.fc9.i686"; "2.6.24-9.fc9.i686"; "2.6.24-9.fc9.ppc"; "2.6.24-9.fc9.ppc"; "2.6.24-9.fc9.ppc64"; "2.6.24-9.fc9.ppc64"; "2.6.24-9.fc9.x86_64"; "2.6.25.11-97.fc9.i686"; - "2.6.25.11-97.fc9.x86_64"; "2.6.25.14-69.fc8.i686"; + "2.6.25.11-97.fc9.x86_64"; "2.6.25.14-69.fc8.i586"; "2.6.25.14-69.fc8.i686"; "2.6.25.14-69.fc8.i686"; - "2.6.25.14-69.fc8.i686"; "2.6.26.1-9.fc9.i586"; "2.6.26.1-9.fc9.i686"; + "2.6.25.14-69.fc8.i686"; "2.6.25.14-69.fc8.i686"; + "2.6.25.14-69.fc8.ppc64"; "2.6.25.14-69.fc8.ppc64"; + "2.6.25.14-69.fc8.x86_64"; "2.6.26.1-9.fc9.i586"; "2.6.26.1-9.fc9.i686"; "2.6.26.1-9.fc9.i686"; "2.6.26.1-9.fc9.i686"; "2.6.26.1-9.fc9.i686"; "2.6.26.1-9.fc9.ppc"; "2.6.26.1-9.fc9.ppc"; "2.6.26.1-9.fc9.ppc64"; "2.6.26.1-9.fc9.ppc64"; "2.6.26.1-9.fc9.x86_64"; "2.6.26.1-9.fc9.x86_64"; -- 1.8.3.1