lib/kernel_task_struct.ml

   1 let warning =
   2   "This code is automatically generated from the kernel database by kerneldb-to-parser program.  Any edits you make will be lost.";;
   3 exception ParseError of string;;
   4 type t =
   5   { comm : string; normal_prio : int; prio : int; state : int;
   6     static_prio : int; tasks'next : [ | `list_head ] int64;
   7     tasks'prev : [ | `list_head ] int64
   8   };;
   9 let parser_1 bits = "parser_1";;
  10 let parser_2 bits = "parser_2";;
  11 let parser_3 bits = "parser_3";;
  12 let parser_4 bits = "parser_4";;
  13 let parser_5 bits = "parser_5";;
  14 let parser_6 bits = "parser_6";;
  15 let parser_7 bits = "parser_7";;
  16 let parser_8 bits = "parser_8";;
  17 let parser_9 bits = "parser_9";;
  18 let parser_10 bits = "parser_10";;
  19 let parser_11 bits = "parser_11";;
  20 let parser_12 bits = "parser_12";;
  21 let parser_13 bits = "parser_13";;
  22 let parser_14 bits = "parser_14";;
  23 let parser_15 bits = "parser_15";;
  24 let parser_16 bits = "parser_16";;
  25 let parser_17 bits = "parser_17";;
  26 let parser_18 bits = "parser_18";;
  27 let parser_19 bits = "parser_19";;
  28 let parser_20 bits = "parser_20";;
  29 let parser_21 bits = "parser_21";;
  30 let parser_22 bits = "parser_22";;
  31 module StringMap = Map.Make(String);;
  32 let map = StringMap.empty;;
  33 let v = (parser_1, 2704);;
  34 let map = StringMap.add "2.6.21-1.3128.fc7.i586" v map;;
  35 let v = (parser_2, 1756);;
  36 let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;;
  37 let v = (parser_1, 2704);;
  38 let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;;
  39 let v = (parser_3, 1780);;
  40 let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;;
  41 let v = (parser_1, 1376);;
  42 let map = StringMap.add "2.6.21-1.3228.fc7.i586" v map;;
  43 let v = (parser_4, 1856);;
  44 let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;;
  45 let v = (parser_5, 3948);;
  46 let map = StringMap.add "2.6.21-1.3236.fc8.x86_64" v map;;
  47 let v = (parser_6, 2072);;
  48 let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;;
  49 let v = (parser_7, 1832);;
  50 let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;;
  51 let v = (parser_8, 3932);;
  52 let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.x86_64" v map;;
  53 let v = (parser_6, 2132);;
  54 let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;;
  55 let v = (parser_9, 2292);;
  56 let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;;
  57 let v = (parser_10, 2880);;
  58 let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;;
  59 let v = (parser_1, 1376);;
  60 let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;;
  61 let v = (parser_11, 4684);;
  62 let map = StringMap.add "2.6.24-9.fc9.x86_64" v map;;
  63 let v = (parser_9, 2292);;
  64 let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc64" v map;;
  65 let v = (parser_1, 1384);;
  66 let map = StringMap.add "2.6.18-1.2798.fc6.i586" v map;;
  67 let v = (parser_12, 1620);;
  68 let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;;
  69 let v = (parser_1, 1384);;
  70 let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;;
  71 let v = (parser_13, 2496);;
  72 let map = StringMap.add "2.6.25.11-97.fc9.x86_64" v map;;
  73 let v = (parser_1, 1368);;
  74 let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;;
  75 let v = (parser_14, 3540);;
  76 let map = StringMap.add "2.6.24-9.fc9.i686" v map;;
  77 let v = (parser_15, 2856);;
  78 let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;;
  79 let v = (parser_16, 2308);;
  80 let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;;
  81 let v = (parser_12, 1628);;
  82 let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;;
  83 let v = (parser_16, 2308);;
  84 let map = StringMap.add "2.6.21-1.3236.fc8.ppc64" v map;;
  85 let v = (parser_6, 2072);;
  86 let map = StringMap.add "2.6.21-1.3228.fc7.ppc64" v map;;
  87 let v = (parser_6, 2132);;
  88 let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;;
  89 let v = (parser_1, 2712);;
  90 let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;;
  91 let v = (parser_7, 3772);;
  92 let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;;
  93 let v = (parser_7, 3772);;
  94 let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;;
  95 let v = (parser_17, 1948);;
  96 let map = StringMap.add "2.6.24-9.fc9.ppc" v map;;
  97 let v = (parser_12, 1576);;
  98 let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;;
  99 let v = (parser_12, 1620);;
 100 let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;;
 101 let v = (parser_1, 2712);;
 102 let map = StringMap.add "2.6.21-1.3209.fc8.i686" v map;;
 103 let v = (parser_7, 3772);;
 104 let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;;
 105 let v = (parser_12, 1620);;
 106 let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;;
 107 let v = (parser_6, 2132);;
 108 let map = StringMap.add "2.6.21-1.3144.fc7.ppc64" v map;;
 109 let v = (parser_18, 2492);;
 110 let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;;
 111 let v = (parser_12, 1604);;
 112 let map = StringMap.add "2.6.21-1.3128.fc7.ppc" v map;;
 113 let v = (parser_19, 1928);;
 114 let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;;
 115 let v = (parser_12, 1604);;
 116 let map = StringMap.add "2.6.21-1.3132.fc7.ppc" v map;;
 117 let v = (parser_12, 1584);;
 118 let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;;
 119 let v = (parser_18, 2492);;
 120 let map = StringMap.add "2.6.24-9.fc9.ppc64" v map;;
 121 let v = (parser_6, 2104);;
 122 let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;;
 123 let v = (parser_7, 3780);;
 124 let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;;
 125 let v = (parser_1, 1400);;
 126 let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
 127 let v = (parser_7, 3772);;
 128 let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;;
 129 let v = (parser_6, 2112);;
 130 let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;;
 131 let v = (parser_2, 1772);;
 132 let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.ppc" v map;;
 133 let v = (parser_12, 1612);;
 134 let map = StringMap.add "2.6.21-1.3209.fc8.ppc" v map;;
 135 let v = (parser_7, 1920);;
 136 let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;;
 137 let v = (parser_1, 2704);;
 138 let map = StringMap.add "2.6.21-1.3132.fc7.i586" v map;;
 139 let v = (parser_1, 2704);;
 140 let map = StringMap.add "2.6.21-1.3144.fc7.i586" v map;;
 141 let v = (parser_7, 1880);;
 142 let map = StringMap.add "2.6.21-1.3228.fc7.x86_64" v map;;
 143 let v = (parser_6, 2088);;
 144 let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;;
 145 let v = (parser_12, 1592);;
 146 let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;;
 147 let v = (parser_1, 2704);;
 148 let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;;
 149 let v = (parser_1, 1376);;
 150 let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;;
 151 let v = (parser_1, 2712);;
 152 let map = StringMap.add "2.6.21-1.3209.fc8.i586" v map;;
 153 let v = (parser_6, 2088);;
 154 let map = StringMap.add "2.6.18-1.2798.fc6.ppc64iseries" v map;;
 155 let v = (parser_1, 2704);;
 156 let map = StringMap.add "2.6.21-1.3144.fc7.i686" v map;;
 157 let v = (parser_7, 1880);;
 158 let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;;
 159 let v = (parser_7, 1920);;
 160 let map = StringMap.add "2.6.20-1.2933.fc6.x86_64" v map;;
 161 let v = (parser_19, 1928);;
 162 let map = StringMap.add "2.6.18-1.2798.fc6.x86_64" v map;;
 163 let v = (parser_7, 3780);;
 164 let map = StringMap.add "2.6.21-1.3144.fc7.x86_64" v map;;
 165 let v = (parser_12, 1608);;
 166 let map = StringMap.add "2.6.20-1.2933.fc6.ppc" v map;;
 167 let v = (parser_14, 3540);;
 168 let map = StringMap.add "2.6.24-9.fc9.i686" v map;;
 169 let v = (parser_1, 2704);;
 170 let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
 171 let v = (parser_20, 1832);;
 172 let map = StringMap.add "2.6.25.11-97.fc9.i686" v map;;
 173 let v = (parser_1, 2704);;
 174 let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;;
 175 let v = (parser_1, 2704);;
 176 let map = StringMap.add "2.6.21-1.3228.fc7.i686" v map;;
 177 let v = (parser_1, 2704);;
 178 let map = StringMap.add "2.6.21-1.3128.fc7.i686" v map;;
 179 let v = (parser_12, 1604);;
 180 let map = StringMap.add "2.6.21-1.3144.fc7.ppc" v map;;
 181 let v = (parser_1, 1400);;
 182 let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
 183 let v = (parser_21, 3756);;
 184 let map = StringMap.add "2.6.21-1.3209.fc8.x86_64" v map;;
 185 let v = (parser_1, 1400);;
 186 let map = StringMap.add "2.6.20-1.2933.fc6.i586" v map;;
 187 let v = (parser_7, 3780);;
 188 let map = StringMap.add "2.6.21-1.3132.fc7.x86_64" v map;;
 189 let v = (parser_1, 1400);;
 190 let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
 191 let v = (parser_6, 2104);;
 192 let map = StringMap.add "2.6.18-1.2798.fc6.ppc64" v map;;
 193 let v = (parser_1, 1384);;
 194 let map = StringMap.add "2.6.18-1.2798.fc6.i686" v map;;
 195 let v = (parser_12, 1560);;
 196 let map = StringMap.add "2.6.21-1.3228.fc7.ppc" v map;;
 197 let v = (parser_10, 2880);;
 198 let map = StringMap.add "2.6.21-1.3236.fc8.i686" v map;;
 199 let v = (parser_3, 1796);;
 200 let map = StringMap.add "2.6.21-1.3236.fc8.ppc" v map;;
 201 let v = (parser_1, 1384);;
 202 let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
 203 let v = (parser_14, 3540);;
 204 let map = StringMap.add "2.6.24-9.fc9.i586" v map;;
 205 let v = (parser_7, 3772);;
 206 let map = StringMap.add "2.6.21-1.3128.fc7.x86_64" v map;;
 207 let v = (parser_6, 2112);;
 208 let map = StringMap.add "2.6.20-1.2933.fc6.ppc64" v map;;
 209 let v = (parser_17, 1936);;
 210 let map = StringMap.add "2.6.24-9.fc9.ppc" v map;;
 211 let v = (parser_6, 2132);;
 212 let map = StringMap.add "2.6.21-1.3128.fc7.ppc64" v map;;
 213 let v = (parser_22, 2116);;
 214 let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;;
 215 let v = (parser_12, 1592);;
 216 let map = StringMap.add "2.6.18-1.2798.fc6.ppc" v map;;
 217 let v = (parser_15, 2856);;
 218 let map = StringMap.add "2.6.22-0.23.rc7.git6.fc8.i686" v map;;
 219 let v = (parser_1, 2704);;
 220 let map = StringMap.add "2.6.20-1.2933.fc6.i686" v map;;
 221 let v = (parser_22, 2116);;
 222 let map = StringMap.add "2.6.21-1.3209.fc8.ppc64" v map;;
 223 type kernel_version = string;;
 224 let known version = StringMap.mem version map;;
 225 let size version = let (_, size) = StringMap.find version map in size;;
 226 let get version bits =
 227   let (parsefn, _) = StringMap.find version map in parsefn bits;;