dan/liminix
1
0
Fork 5
Code

devout: support search for sysfs attributes

Browse Source
This commit is contained in:
Daniel Barlow 2024-06-01 21:20:41 +01:00
parent 7d00b39249
commit 19aba0d873
1422 changed files with 1505 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

61
pkgs/devout/devout.fnl
View File

@ -26,10 +26,27 @@
(string.format "%s=%s" (string.upper k) v )) (string.format "%s=%s" (string.upper k) v ))
"\n"))) "\n")))
(fn attrs-match? [event expected]
(accumulate [match? true
name value (pairs expected)]
(and match? (= value (event:attr name)))))
(fn event-matches? [e terms] (fn event-matches? [e terms]
(accumulate [match? true (accumulate [match? true
name value (pairs terms)] name value (pairs terms)]
(and match? (= value (. e.properties name))))) (and match?
(case name
:attr (attrs-match? e value)
:attrs true
other (= value (. e.properties name))))))
(fn read-if-exists [pathname]
(match (ll.open pathname 0 0)
fd (let [s (ll.read fd 4096)
s1 (string.gsub s "[ \n]*(.-)[ \n]*" "%1")]
(ll.close fd)
s1)
nil nil))
(fn parse-event [s] (fn parse-event [s]
(let [at (string.find s "@" 1 true) (let [at (string.find s "@" 1 true)
@ -44,6 +61,8 @@
:action (string.sub s 1 (- at 1)) :action (string.sub s 1 (- at 1))
:format format-event :format format-event
:matches? event-matches? :matches? event-matches?
:attr (fn [self name]
(read-if-exists (.. self.sys-path "/" self.path "/" name)))
})) }))
(fn find-in-database [db terms] (fn find-in-database [db terms]
@ -53,24 +72,28 @@
(doto found (table.insert e)) (doto found (table.insert e))
found))) found)))
(fn record-event [db subscribers str] (fn record-event [db subscribers e]
(let [e (parse-event str)] (match e.action
(match e.action :add (tset db e.path e)
:add (tset db e.path e) :change (tset db e.path e)
:change (tset db e.path e) ;; should we do something for bind?
;; should we do something for bind? :remove (tset db e.path nil)
:remove (tset db e.path nil) )
) (each [_ { : terms : callback } (pairs subscribers)]
(each [_ { : terms : callback } (pairs subscribers)] (if (e:matches? terms) (callback e)))
(if (e:matches? terms) (callback e))) e)
e))
(fn database [] (fn database [options]
(let [db {} (let [db {}
subscribers []] subscribers []
{ : sys-path } (or options {:sysfs-path "/sys" })]
{ {
:find (fn [_ terms] (find-in-database db terms)) :find (fn [_ terms] (find-in-database db terms))
:add (fn [_ event-string] (when event-string (record-event db subscribers event-string))) :add (fn [_ event-string]
(when event-string
(let [e (doto (parse-event event-string)
(tset :sys-path sys-path))]
(record-event db subscribers e))))
:at-path (fn [_ path] (. db path)) :at-path (fn [_ path] (. db path))
:subscribe (fn [_ id callback terms] :subscribe (fn [_ id callback terms]
(let [past-events (find-in-database db terms)] (let [past-events (find-in-database db terms)]
@ -146,13 +169,7 @@
:_tbl #(do fds) ;exposed for tests :_tbl #(do fds) ;exposed for tests
})) }))
(fn read-if-exists [pathname]
(match (ll.open pathname 0 0)
fd (let [s (ll.read fd 4096)
s1 (string.gsub s "[ \n]*(.-)[ \n]*" "%1")]
(ll.close fd)
s1)
nil nil))
(fn sysfs [fspath] (fn sysfs [fspath]
{ {

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/ari_enabled Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/broken_parity_status Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/class Normal file
View File

@ -0,0 +1 @@
0x0c0330

BIN
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/config Normal file
View File

Binary file not shown.

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/consistent_dma_mask_bits Normal file
View File

@ -0,0 +1 @@
64

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/d3cold_allowed Normal file
View File

@ -0,0 +1 @@
1

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/device Normal file
View File

@ -0,0 +1 @@
0x9d2f

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/dma_mask_bits Normal file
View File

@ -0,0 +1 @@
64

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/driver_override Normal file
View File

@ -0,0 +1 @@
(null)

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/enable Normal file
View File

@ -0,0 +1 @@
1

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/driver_override Normal file
View File

@ -0,0 +1 @@
(null)

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/modalias Normal file
View File

@ -0,0 +1 @@
platform:intel_xhci_usb_sw

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/power/async Normal file
View File

@ -0,0 +1 @@
disabled

0
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/power/autosuspend_delay_ms Normal file
View File

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/power/control Normal file
View File

@ -0,0 +1 @@
auto

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/power/runtime_active_kids Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/power/runtime_active_time Normal file
View File

@ -0,0 +1 @@
2

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/power/runtime_enabled Normal file
View File

@ -0,0 +1 @@
enabled

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/power/runtime_status Normal file
View File

@ -0,0 +1 @@
suspended

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/power/runtime_suspended_time Normal file
View File

@ -0,0 +1 @@
1962025517

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/power/runtime_usage Normal file
View File

@ -0,0 +1 @@
0

2
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/uevent Normal file
View File

@ -0,0 +1,2 @@
DRIVER=intel_xhci_usb_sw
MODALIAS=platform:intel_xhci_usb_sw

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/power/async Normal file
View File

@ -0,0 +1 @@
disabled

0
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/power/autosuspend_delay_ms Normal file
View File

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/power/control Normal file
View File

@ -0,0 +1 @@
auto

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/power/runtime_active_kids Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/power/runtime_active_time Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/power/runtime_enabled Normal file
View File

@ -0,0 +1 @@
disabled

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/power/runtime_status Normal file
View File

@ -0,0 +1 @@
unsupported

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/power/runtime_suspended_time Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/power/runtime_usage Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/role Normal file
View File

@ -0,0 +1 @@
host

2
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/uevent Normal file
View File

@ -0,0 +1,2 @@
DEVTYPE=usb_role_switch
USB_ROLE_SWITCH=intel_xhci_usb_sw-role-switch

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/intel_xhci_usb_sw/usb_role/intel_xhci_usb_sw-role-switch/waiting_for_supplier Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/irq Normal file
View File

@ -0,0 +1 @@
131

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/local_cpulist Normal file
View File

@ -0,0 +1 @@
0-3

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/local_cpus Normal file
View File

@ -0,0 +1 @@
f

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/modalias Normal file
View File

@ -0,0 +1 @@
pci:v00008086d00009D2Fsv000017AAsd00002238bc0Csc03i30

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/msi_bus Normal file
View File

@ -0,0 +1 @@
1

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/msi_irqs/131 Normal file
View File

@ -0,0 +1 @@
msi

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/numa_node Normal file
View File

@ -0,0 +1 @@
-1

13
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/pools Normal file
View File

@ -0,0 +1,13 @@
poolinfo - 0.1
buffer-2048 0 0 2048 0
buffer-512 0 0 512 0
buffer-128 0 32 128 1
buffer-32 0 0 32 0
xHCI 1KB stream ctx arrays 0 0 1024 0
xHCI 256 byte stream ctx arrays 0 0 256 0
xHCI input/output contexts 6 11 2112 11
xHCI ring segments 26 42 4096 42
buffer-2048 0 0 2048 0
buffer-512 0 0 512 0
buffer-128 0 32 128 1
buffer-32 0 0 32 0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/async Normal file
View File

@ -0,0 +1 @@
enabled

0
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/autosuspend_delay_ms Normal file
View File

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/control Normal file
View File

@ -0,0 +1 @@
auto

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/runtime_active_kids Normal file
View File

@ -0,0 +1 @@
1

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/runtime_active_time Normal file
View File

@ -0,0 +1 @@
1962059779

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/runtime_enabled Normal file
View File

@ -0,0 +1 @@
enabled

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/runtime_status Normal file
View File

@ -0,0 +1 @@
active

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/runtime_suspended_time Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/runtime_usage Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/wakeup Normal file
View File

@ -0,0 +1 @@
enabled

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/wakeup_abort_count Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/wakeup_active Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/wakeup_active_count Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/wakeup_count Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/wakeup_expire_count Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/wakeup_last_time_ms Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/wakeup_max_time_ms Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power/wakeup_total_time_ms Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/power_state Normal file
View File

@ -0,0 +1 @@
D0

13
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/resource Normal file
View File

@ -0,0 +1,13 @@
0x00000000e1320000 0x00000000e132ffff 0x0000000000140204
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000
0x0000000000000000 0x0000000000000000 0x0000000000000000

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/revision Normal file
View File

@ -0,0 +1 @@
0x21

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/subsystem_device Normal file
View File

@ -0,0 +1 @@
0x2238

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/subsystem_vendor Normal file
View File

@ -0,0 +1 @@
0x17aa

6
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/uevent Normal file
View File

@ -0,0 +1,6 @@
DRIVER=xhci_hcd
PCI_CLASS=C0330
PCI_ID=8086:9D2F
PCI_SUBSYS_ID=17AA:2238
PCI_SLOT_NAME=0000:00:14.0
MODALIAS=pci:v00008086d00009D2Fsv000017AAsd00002238bc0Csc03i30

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/authorized Normal file
View File

@ -0,0 +1 @@
1

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/bAlternateSetting Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/bInterfaceClass Normal file
View File

@ -0,0 +1 @@
09

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/bInterfaceNumber Normal file
View File

@ -0,0 +1 @@
00

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/bInterfaceProtocol Normal file
View File

@ -0,0 +1 @@
00

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/bInterfaceSubClass Normal file
View File

@ -0,0 +1 @@
00

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/bNumEndpoints Normal file
View File

@ -0,0 +1 @@
01

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/bEndpointAddress Normal file
View File

@ -0,0 +1 @@
81

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/bInterval Normal file
View File

@ -0,0 +1 @@
0c

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/bLength Normal file
View File

@ -0,0 +1 @@
07

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/bmAttributes Normal file
View File

@ -0,0 +1 @@
03

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/direction Normal file
View File

@ -0,0 +1 @@
in

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/interval Normal file
View File

@ -0,0 +1 @@
256ms

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/power/async Normal file
View File

@ -0,0 +1 @@
enabled

0
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/power/autosuspend_delay_ms Normal file
View File

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/power/control Normal file
View File

@ -0,0 +1 @@
auto

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/power/runtime_active_kids Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/power/runtime_active_time Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/power/runtime_enabled Normal file
View File

@ -0,0 +1 @@
disabled

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/power/runtime_status Normal file
View File

@ -0,0 +1 @@
unsupported

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/power/runtime_suspended_time Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/power/runtime_usage Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/type Normal file
View File

@ -0,0 +1 @@
Interrupt

0
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/uevent Normal file
View File

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/ep_81/wMaxPacketSize Normal file
View File

@ -0,0 +1 @@
0004

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/modalias Normal file
View File

@ -0,0 +1 @@
usb:v1D6Bp0002d0601dc09dsc00dp01ic09isc00ip00in00

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/power/async Normal file
View File

@ -0,0 +1 @@
enabled

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/power/runtime_active_kids Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/power/runtime_enabled Normal file
View File

@ -0,0 +1 @@
enabled

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/power/runtime_status Normal file
View File

@ -0,0 +1 @@
suspended

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/power/runtime_usage Normal file
View File

@ -0,0 +1 @@
0

1
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/supports_autosuspend Normal file
View File

@ -0,0 +1 @@
1

6
pkgs/devout/fixtures/sys/devices/pci0000:00/0000:00:14.0/usb1/1-0:1.0/uevent Normal file
View File

@ -0,0 +1,6 @@
DEVTYPE=usb_interface
DRIVER=hub
PRODUCT=1d6b/2/601
TYPE=9/0/1
INTERFACE=9/0/0
MODALIAS=usb:v1D6Bp0002d0601dc09dsc00dp01ic09isc00ip00in00

Some files were not shown because too many files have changed in this diff Show More