| buf0 = buf, n0 = n, 2 * NODE_HEADER_SIZE ≤ m1, n + m1 ≤ # buf, n + NODE_HEADER_SIZE ≤ # buf ⊦ [decode_header#(n, buf; ndhd; err)] ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → is-encoded(ndhd, subarray(buf0, n0, NODE_HEADER_SIZE))) → ⟪if err = ESUCCESS ∧ ndhd.ispadding then {debug#("persistence: decode_node got padding node"); err := EIO}; m := m1; if err = ESUCCESS ∧ align↑(ndhd.size, 2 * NODE_HEADER_SIZE) + 2 * NODE_HEADER_SIZE ≠ m then {debug#("persistence: decode_node node of wrong size"); err := EIO}; m0 := n; if err = ESUCCESS then {decode_node_headerless#(m0 + NODE_HEADER_SIZE, buf; nd, m; err); if err ≠ ESUCCESS then debug#("persistence: decode_node decoding failed") else if m ≠ ndhd.size then {debug#("persistence: decode_node size of node unexpected"); err := EINVAL}}; if err = ESUCCESS ∧ ¬ range=(buf, m0 + NODE_HEADER_SIZE + align↑(ndhd.size, 2 * NODE_HEADER_SIZE), validtrailer, 0, NODE_HEADER_SIZE) then {debug#("persistence: decode_node no validtrailer"); err := EIO}⟫ ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ( err = ESUCCESS → (∃ buf0, buf1. subarray(buf, n, 2 * NODE_HEADER_SIZE + nd.alignedsize) = buf0 + buf1 + validtrailer ∧ is-encoded(nodeheader(node-size-headerless(nd), false), buf0) ∧ is-encoded(nd, subarray(buf1, 0, node-size-headerless(nd))) ∧ # buf1 = nd.alignedsize) ∧ m1 = 2 * NODE_HEADER_SIZE + nd.alignedsize))) |
n + NODE_HEADER_SIZE ≤ # buf, n + m1 ≤ # buf, 2 * NODE_HEADER_SIZE ≤ m1 ⊦ [decode_header#(n, buf; ndhd; err)] ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → is-encoded(ndhd, subarray(buf, n, NODE_HEADER_SIZE))) → ⟪if err = ESUCCESS ∧ ndhd.ispadding then {debug#("persistence: decode_node got padding node"); err := EIO}; m := m1; if err = ESUCCESS ∧ align↑(ndhd.size, 2 * NODE_HEADER_SIZE) + 2 * NODE_HEADER_SIZE ≠ m then {debug#("persistence: decode_node node of wrong size"); err := EIO}; m0 := n; if err = ESUCCESS then {decode_node_headerless#(m0 + NODE_HEADER_SIZE, buf; nd, m; err); if err ≠ ESUCCESS then debug#("persistence: decode_node decoding failed") else if m ≠ ndhd.size then {debug#("persistence: decode_node size of node unexpected"); err := EINVAL}}; if err = ESUCCESS ∧ ¬ range=(buf, m0 + NODE_HEADER_SIZE + align↑(ndhd.size, 2 * NODE_HEADER_SIZE), validtrailer, 0, NODE_HEADER_SIZE) then {debug#("persistence: decode_node no validtrailer"); err := EIO}⟫ ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ( err = ESUCCESS → (∃ buf0, buf1. subarray(buf, n, 2 * NODE_HEADER_SIZE + nd.alignedsize) = buf0 + buf1 + validtrailer ∧ is-encoded(nodeheader(node-size-headerless(nd), false), buf0) ∧ is-encoded(nd, subarray(buf1, 0, node-size-headerless(nd))) ∧ # buf1 = nd.alignedsize) ∧ m1 = 2 * NODE_HEADER_SIZE + nd.alignedsize)))