/* mfp_travatudin.c (c)oded by m4rc3l0 in 092003 *
 *                    *
 * Compile with:          *
 *  gcc -w -o mfp_travatudin travatudin.c    *
 *             *
 * Run:            *
 *      ./mfp_travatudin -h             *
 *             *
 * Greetz: Julie, bashx, decodi, r0ot, esc2, br, *
 * damita, mor_PH_eus, habeas, brun3rz, acubidu, *
 * deadsckt, ag_volfi, reignu, unistldu, sinner, *
 * japex, joshua, fingulino, portinari.........  *
 *                                               *
 * www.binaryrebels.cjb.net                      *
 * www.m4rc3l0rlz.hpg.ig.com.br                  *
 *                                               *
 * Mail-eu: m4rc3l0rlz@yahoo.com.br              */
 
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <unistd.h>
#include <getopt.h>
#include <signal.h>
#include <term.h>

#define TAG "\x6d\x66\x70"
#define UND "\x5f"

/* Change the BANNER */
#define BANNER "mfp_travatudin.c (c)oded by m4rc3l0\n\n"

#define DPASS "catacutianaum"  /* PASSW DEFAULT */
#define DTIME 120     /* DEFAULT TIME */

void use(char *s);
void retorna(void);
void trava_porra(char *passw, int tts);

struct catar {
    char *pass;
    int tempo;
};

int bflag = 0;

int main(int argc, char *argv[]) {
    int i, dflag=0, nflag=0;
    char *temp1, *temp2, *bufi, c;
    char alfa[] = "abcdefghijklmnopqrswxyz"; // ordem certa ?

    struct catar uia;
    
    if((argc < 2) || (argc > 5))
  use(argv[0]); 

    while((i=getopt(argc, argv, "bdn:h")) != EOF) {
  switch(i) {
      case 'd': 
    dflag=1; break;
      case 'n': nflag=1; uia.pass = optarg; break;
      case 'b': bflag=1; break;
      case '?':
      case 'h': use(argv[0]);
  }
    }
    
    if(dflag == 1)
  trava_porra(DPASS, DTIME);
    if(nflag == 1) {
  if(strstr(uia.pass, ":") != NULL) {
          temp1 = uia.pass;
      while(*uia.pass != ':') uia.pass++;
          *uia.pass = '\0'; 
      uia.pass++;
      bufi = uia.pass;
      temp2 = atoi(bufi);
      uia.pass = temp1;
      for(c = (*bufi); c != '\0'; c = (*++bufi)) {
    if(!isdigit(c) || strchr(alfa, c)) {
        fprintf(stderr, "Time invalid\n");
        exit(-1);
    }
      }
      uia.tempo = temp2;
      if(uia.tempo >= (int)65535)
    uia.tempo = DTIME;
  } else { uia.tempo = DTIME; }
  trava_porra(uia.pass, uia.tempo);
    }
  
    return(0);
}

void trava_porra(char *passw, int tts) {
    int k, ch;
    char pass2[1024];
    struct termios term, oldterm;

    alarm(tts);
    signal(SIGINT, retorna);
    signal(SIGTERM, retorna);
    signal(SIGTSTP, retorna);
    signal(SIGQUIT, retorna);
    signal(SIGSEGV, retorna); 
    tcgetattr(STDIN_FILENO, &oldterm);
    term = oldterm;
    term.c_lflag &= ~(ECHO|ECHOE|ECHOK|ECHONL|ICANON);
    tcsetattr(STDIN_FILENO, TCSAFLUSH, &term);

    while(1) {
  k = 0;
  if(bflag==1) {
      printf("\033[2J\033[01;01H");
      printf("%s", BANNER);
      printf("Enter Password: ");
  }
  while((ch = getchar()) != '\n')
      pass2[k++] = ch;
  pass2[k] = 0;

        if(!(strcmp(passw, pass2))) {
      printf("\nOkey! Leaving...\n");
      printf("\n");
      tcsetattr(STDIN_FILENO, TCSAFLUSH, &oldterm);
      fflush(stdin); fflush(stdout);
      exit(0);
  }
  else { 
      printf("\nPassword error\n");
      sleep(1);
      fflush(stdin); fflush(stdout);
      bzero(pass2, sizeof(pass2));
  }
    }
}

void retorna(void) { return; }

void use(char *s) {
    printf("%s%stravatudin.c (c)oded by m4rc3l0\n", TAG, UND);
    printf("\nOptions: %s -d || -n <pass>[:<tts>] [-b] || [-h]\n", s);
    printf("Usage: \n");
    printf("          %s -d                              Default Mode\n", s);
    printf("          %s -n <password>[:<time-to-sleep>] Change pass AND tts\n", s);
    printf("          %s -d || -n <pass>[:<tts>] -b      Show BANNER\n", s);
    printf("          %s -h                              This help!\n", s);
    printf("Examples: \n          %s -n tefodeleso:1000\n", s);
    exit(-1);
}