home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 3 / 3360 / p-cops.patch1 next >
Encoding:
Text File  |  1991-05-18  |  2.0 KB  |  78 lines
  1. *** pass.chk.old    Fri May 17 11:09:39 1991
  2. --- pass.chk    Fri May 17 11:07:07 1991
  3. ***************
  4. *** 6,12 ****
  5.   #
  6.   #  Usage: $0 [options] dictionary
  7.   #
  8. ! #    -P pfile    password file
  9.   #    -p        print found passwords (incompatible with -M)
  10.   #       -d        check prefix/suffix of digits [0-9]
  11.   #       -g        check all words in gcos, plan, project, signature files
  12. --- 6,12 ----
  13.   #
  14.   #  Usage: $0 [options] dictionary
  15.   #
  16. ! #    -P pfile    password file (not working)
  17.   #    -p        print found passwords (incompatible with -M)
  18.   #       -d        check prefix/suffix of digits [0-9]
  19.   #       -g        check all words in gcos, plan, project, signature files
  20. ***************
  21. *** 21,27 ****
  22.   # other cops stuff, and some things that just didn't fit, and added some
  23.   # code to finish the simulation of the old checker. -- dan
  24.   #
  25. - 
  26.   require "pass.cache.pl";
  27.   
  28.   $Passwd = "/etc/passwd";
  29. --- 21,26 ----
  30. ***************
  31. *** 34,48 ****
  32.   $Move = "/bin/mv";
  33.   $Create = "/bin/touch";
  34.   
  35. ! &Getopts("dgiprsuUvwyo:P:l:b:e:") || do {
  36.       print STDERR "Illegal arguments\n";
  37.       &usage();
  38.       exit(1);
  39.       };
  40.       
  41. ! sub usage {
  42. !     print STDERR "usage: pi -firuwyv -p <pwdfile> -l <logfile>\n          -o <nday> -b <bname> -e <ename>\n";
  43. !     }
  44.   
  45.   # sanity checks
  46.   $opt_P = $Passwd unless $opt_P;
  47. --- 33,45 ----
  48.   $Move = "/bin/mv";
  49.   $Create = "/bin/touch";
  50.   
  51. ! &Getopts("pdgrsuUv") || do {
  52.       print STDERR "Illegal arguments\n";
  53.       &usage();
  54.       exit(1);
  55.       };
  56.       
  57. ! sub usage { print STDERR "Usage: $0 -pdgrsuUv\n"; }
  58.   
  59.   # sanity checks
  60.   $opt_P = $Passwd unless $opt_P;
  61. ***************
  62. *** 69,75 ****
  63.       if ($try = &dopwd()) {
  64.           $pwd = ($opt_p) ? $try : "";
  65.           # printf "Username: %-8s  <password guessed>  $pwd\n",$P[0];
  66. !         printf "Warning!  Password Problem: Guessed: %s\t\t$pwd\n",$P[0];
  67.           }
  68.       $ndone++;
  69.       $time = time();
  70. --- 66,72 ----
  71.       if ($try = &dopwd()) {
  72.           $pwd = ($opt_p) ? $try : "";
  73.           # printf "Username: %-8s  <password guessed>  $pwd\n",$P[0];
  74. !         printf "Warning!  $uid password Problem: Guessed: %s\t\t$pwd\n",$P[0];
  75.           }
  76.       $ndone++;
  77.       $time = time();
  78.