diff options
| author | Hanketsu <hanketsu@egregore.fun> | 2025-03-15 00:49:24 +0100 |
|---|---|---|
| committer | Hanketsu <hanketsu@egregore.fun> | 2025-06-13 00:04:50 +0200 |
| commit | ca94eb40aee8646057284488d950b08d38498229 (patch) | |
| tree | 19aec0d3e2dbf08dc1fd39c071c04b11f8870db8 | |
| parent | ebb882b2bfbb7763e866795b518d9cd1a027270f (diff) | |
battering: services: Handle user by names
* battering/services/opensnitch.scm: User user name instead of uid for the
user field.
| -rw-r--r-- | battering/services/opensnitch.scm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/battering/services/opensnitch.scm b/battering/services/opensnitch.scm index af0ca38..300f1fe 100644 --- a/battering/services/opensnitch.scm +++ b/battering/services/opensnitch.scm @@ -85,10 +85,10 @@ "Outside interface") (protocol maybe-string - "Protocol") + "Transport Layer protocol") (user maybe-string - "User ID") + "User") (hosts-file maybe-string "List of domains") @@ -154,7 +154,10 @@ ("dest.port" . ,#$(parse-port dest-port)) ("iface.out" . ,#$dest-iface) ("protocol" . ,#$protocol) - ("user.id" . ,#$user) + ("user.id" . + #$(if (eq? user '%unset-marker%) + user + (number->string (passwd:uid (getpw user))))) (#$(if hosts-regex? "lists.domain_regexp" "lists.domain") . ,#$hosts-file)))) |