tv pinentry-urxvt: init

This commit is contained in:
tv 2021-01-13 04:54:29 +01:00
parent 2aab7aea07
commit e7116bc68e
1 changed files with 56 additions and 0 deletions

View File

@ -0,0 +1,56 @@
{ pkgs, ... }@args:
let
lib = import <stockholm/lib>;
# config cannot be declared in the input attribute set because that would
# cause callPackage to inject the wrong config. Instead, get it from ...
# via args.
config = args.config or {};
cfg = eval.config;
eval = lib.evalModules {
modules = lib.singleton {
_file = toString ./default.nix;
imports = lib.singleton config;
options = {
appName = lib.mkOption {
default = "pinentry-urxvt";
type = lib.types.str;
};
display = lib.mkOption {
default = ":0";
type = lib.types.str;
};
};
};
};
in
pkgs.write "pinentry-urxvt" {
"/bin/pinentry".link = pkgs.writeDash "pinentry-urxvt-wrapper" ''
set -efu
exec 3<&0 4>&1 5>&2
export DISPLAY=${lib.shell.escape cfg.display}
exec ${pkgs.rxvt_unicode}/bin/urxvt \
-name ${lib.shell.escape cfg.appName} \
-e ${pkgs.writeDash "pinentry-urxvt-tty" ''
set -efu
exec 2>&5
TTY=$(${pkgs.coreutils}/bin/tty)
while read -r line <&3; do
case $line in
'OPTION ttyname='*)
echo "OPTION ttyname=$TTY"
;;
*)
echo "$line"
esac
done | ${pkgs.pinentry.tty}/bin/pinentry-tty "$@" >&4
''} \
"$@"
'';
}