lenses/tests/test_pamconf.aug

   1 module Test_pamconf =
   2
   3   let example = "# Authentication management
   4 #
   5 # login service (explicit because of pam_dial_auth)
   6 #
   7 login   auth requisite      pam_authtok_get.so.1
   8 login   auth required       pam_dhkeys.so.1 arg
   9
  10 other   session required    pam_unix_session.so.1
  11 "
  12
  13   test PamConf.lns get example =
  14     { "#comment" = "Authentication management" }
  15     { }
  16     { "#comment" = "login service (explicit because of pam_dial_auth)" }
  17     { }
  18     { "1" { "service" = "login" }
  19           { "type" = "auth" }
  20           { "control" = "requisite" }
  21           { "module" = "pam_authtok_get.so.1" } }
  22     { "2" { "service" = "login" }
  23           { "type" = "auth" }
  24           { "control" = "required" }
  25           { "module" = "pam_dhkeys.so.1" }
  26           { "argument" = "arg" } }
  27     { }
  28     { "3" { "service" = "other" }
  29           { "type" = "session" }
  30           { "control" = "required" }
  31           { "module" = "pam_unix_session.so.1" } }
  32
  33 (* Local Variables: *)
  34 (* mode: caml       *)
  35 (* End:             *)