#include <stdio.h>
#include <string.h>
#include <unistd.h>
#include <crypt.h>

int 
main(void)
@{
  /* @r{Hashed form of "GNU libc manual".} */
  const char *const pass = "$1$/iSaq7rB$EoUw5jJPPvAPECNaaWzMK/";

  char *result;
  int ok;
  
@group
  /* @r{Read in the user's password and encrypt it,
     passing the expected password in as the salt.} */
  result = crypt(getpass("Password:"), pass);
@end group

  /* @r{Test the result.} */
  ok = strcmp (result, pass) == 0;

  puts(ok ? "Access granted." : "Access denied.");
  return ok ? 0 : 1;
@}