File: list.gdb

package info (click to toggle)
haproxy 3.2.8-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 23,880 kB
  • sloc: ansic: 267,692; sh: 3,277; xml: 1,756; python: 1,345; makefile: 1,155; perl: 168; cpp: 21
file content (26 lines) | stat: -rw-r--r-- 499 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
# lists entries starting at list head $arg0
define list_dump
  set $h = $arg0
  set $p = *(void **)$h
  while ($p != $h)
    printf "%#lx\n", $p
    if ($p == 0)
      loop_break
    end
    set $p = *(void **)$p
  end
end

# list all entries starting at list head $arg0 until meeting $arg1
define list_find
  set $h = $arg0
  set $k = $arg1
  set $p = *(void **)$h
  while ($p != $h)
    printf "%#lx\n", $p
    if ($p == 0 || $p == $k)
      loop_break
    end
    set $p = *(void **)$p
  end
end