qbit/nixpkgs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

nixos/dokuwiki: factor out toPhpString

Browse Source
This commit is contained in:
ash 2024-09-07 15:30:54 +01:00
parent 345c8a7310
commit 2bab9e4eba
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
nixos/modules/services/web-apps/dokuwiki.nix
View File

@ -17,6 +17,10 @@ let
extraConfig = mkPhpIni cfg.phpOptions; extraConfig = mkPhpIni cfg.phpOptions;
}; };
# "you're escaped" -> "'you\'re escaped'"
# https://www.php.net/manual/en/language.types.string.php#language.types.string.syntax.single
toPhpString = s: "'${escape [ "'" "\\" ] s}'";
dokuwikiAclAuthConfig = hostName: cfg: let dokuwikiAclAuthConfig = hostName: cfg: let
inherit (cfg) acl; inherit (cfg) acl;
acl_gen = concatMapStringsSep "\n" (l: "${l.page} \t ${l.actor} \t ${toString l.level}"); acl_gen = concatMapStringsSep "\n" (l: "${l.page} \t ${l.actor} \t ${toString l.level}");
@ -43,12 +47,12 @@ let
mkPhpValue = v: let mkPhpValue = v: let
isHasAttr = s: isAttrs v && hasAttr s v; isHasAttr = s: isAttrs v && hasAttr s v;
in in
if isString v then "'${escape [ "'" "\\" ] v}'" if isString v then toPhpString v
# NOTE: If any value contains a , (comma) this will not get escaped # NOTE: If any value contains a , (comma) this will not get escaped
else if isList v && any lib.strings.isCoercibleToString v then "'${escape [ "'" "\\" ] (concatMapStringsSep "," toString v)}'" else if isList v && any lib.strings.isCoercibleToString v then toPhpString (concatMapStringsSep "," toString v)
else if isInt v then toString v else if isInt v then toString v
else if isBool v then toString (if v then 1 else 0) else if isBool v then toString (if v then 1 else 0)
else if isHasAttr "_file" then "trim(file_get_contents('${escape [ "'" "\\" ] v._file}'))" else if isHasAttr "_file" then "trim(file_get_contents(${toPhpString v._file}))"
else if isHasAttr "_raw" then v._raw else if isHasAttr "_raw" then v._raw
else abort "The dokuwiki localConf value ${lib.generators.toPretty {} v} can not be encoded." else abort "The dokuwiki localConf value ${lib.generators.toPretty {} v} can not be encoded."
; ;
@ -59,7 +63,7 @@ let
[" = ${mkPhpValue v};"] [" = ${mkPhpValue v};"]
else else
mkPhpAttrVals v; mkPhpAttrVals v;
in map (e: "['${escape [ "'" "\\" ] k}']${e}") (flatten values); in map (e: "[${toPhpString k}]${e}") (flatten values);
dokuwikiLocalConfig = hostName: cfg: let dokuwikiLocalConfig = hostName: cfg: let
conf_gen = c: map (v: "$conf${v}") (mkPhpAttrVals c); conf_gen = c: map (v: "$conf${v}") (mkPhpAttrVals c);