This repository has been archived on 2024-04-08. You can view files and clone it, but cannot push or open issues or pull requests.
deb-mbse/mbsebbs/newuser.c

539 lines
13 KiB
C
Raw Normal View History

2001-08-17 05:46:24 +00:00
/*****************************************************************************
*
* $Id$
2001-08-17 05:46:24 +00:00
* Purpose ...............: New User login under Unix, creates both
* BBS and unix accounts.
*
*****************************************************************************
* Copyright (C) 1997-2001
*
* Michiel Broek FIDO: 2:280/2802
* Beekmansbos 10
* 1971 BV IJmuiden
* the Netherlands
*
* This file is part of MBSE BBS.
*
* This BBS is free software; you can redistribute it and/or modify it
* under the terms of the GNU General Public License as published by the
* Free Software Foundation; either version 2, or (at your option) any
* later version.
*
* MBSE BBS is distributed in the hope that it will be useful, but
* WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with MBSE BBS; see the file COPYING. If not, write to the Free
* Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
*****************************************************************************/
#include "../lib/libs.h"
#include "../lib/mbse.h"
#include "../lib/structs.h"
#include "../lib/records.h"
#include "../lib/clcomm.h"
#include "../lib/common.h"
//#include "funcs.h"
2001-08-17 05:46:24 +00:00
#include "funcs4.h"
#include "input.h"
2001-08-17 05:46:24 +00:00
#include "pwcheck.h"
#include "newuser.h"
#include "language.h"
#include "timeout.h"
#include "change.h"
#include "bye.h"
#include "dispfile.h"
2001-08-17 05:46:24 +00:00
extern int do_quiet; /* No logging to the screen */
extern pid_t mypid; /* Pid of this program */
char UnixName[9]; /* Unix Name */
extern char *ieHandle; /* Users Handle */
int newuser()
2001-08-17 05:46:24 +00:00
{
FILE *pUsrConfig;
int i, x, Found, iLang, recno = 0, Count = 0;
2001-08-17 05:46:24 +00:00
unsigned long crc;
char temp[PATH_MAX], *FullName;
2001-08-17 05:46:24 +00:00
char *temp1, *temp2;
char *Phone1, *Phone2;
long offset;
struct userrec us;
int badname;
2001-08-17 05:46:24 +00:00
IsDoing("New user login");
Syslog('+', "Newuser registration");
clear();
DisplayFile((char *)"newuser");
2001-08-17 05:46:24 +00:00
iLang = Chg_Language(TRUE);
Enter(1);
/* MBSE BBS - NEW USER REGISTRATION */
2001-11-02 22:34:32 +00:00
language(CYAN, BLACK, 37);
2001-08-17 05:46:24 +00:00
Enter(2);
memset(&usrconfig, 0, sizeof(usrconfig));
memset(&exitinfo, 0, sizeof(exitinfo));
temp1 = calloc(81, sizeof(char));
temp2 = calloc(81, sizeof(char));
Phone1 = calloc(81, sizeof(char));
Phone2 = calloc(81, sizeof(char));
FullName = calloc(81, sizeof(char));
2001-08-17 05:46:24 +00:00
usrconfig.iLanguage = iLang;
usrconfig.FsMsged = TRUE;
do {
/* Please enter your First and Last name: */
language(CYAN, BLACK, 0);
fflush(stdout);
alarm_on();
Getname(temp, 35);
strcpy(FullName, tlcap(temp));
Syslog('+', "Name entered: %s", FullName);
/*
* Secret escape name
*/
if ((strcasecmp(temp, "off")) == 0) {
Syslog('+', "Quick \"off\" logout");
Quick_Bye(0);
}
Count++;
if (Count >= CFG.iCRLoginCount) {
Enter(1);
/* Disconnecting user ... */
language(CFG.HiliteF, CFG.HiliteB, 2);
Enter(2);
Syslog('!', "Exceeded maximum login attempts");
Quick_Bye(0);
}
2001-08-17 05:46:24 +00:00
/*
* Check name, duplicate names, unwanted names, single names, they all get
* the same errormessage.
*/
badname = (BadNames(temp) || (CheckName(temp) || (strchr(temp, ' ') == NULL)));
if (badname) {
language(LIGHTRED, BLACK, 386);
Enter(1);
}
2001-08-17 05:46:24 +00:00
} while (badname);
strcpy(FullName, tlcap(temp));
UserCity(mypid, FullName, (char *)"Unknown");
while (TRUE) {
Enter(1);
/* Please enter new password : */
language(LIGHTCYAN, BLACK, 39);
fflush(stdout);
alarm_on();
Getpass(temp1);
if((x = strlen(temp1)) >= CFG.password_length) {
2001-08-17 05:46:24 +00:00
Enter(1);
/* Please enter password again : */
language(LIGHTCYAN, BLACK, 40);
2001-08-17 05:46:24 +00:00
fflush(stdout);
alarm_on();
Getpass(temp2);
if((i = strcmp(temp1,temp2)) != 0) {
2001-08-17 05:46:24 +00:00
Enter(2);
/* Your passwords do not match! Try again. */
language(LIGHTRED, BLACK, 41);
2001-08-17 05:46:24 +00:00
Enter(1);
} else {
crc = StringCRC32(tu(temp1));
break;
}
} else {
Enter(2);
/* Your password must contain at least */
language(LIGHTRED, BLACK, 42);
printf("%d ", CFG.password_length);
/* characters! Try again. */
language(WHITE, BLACK, 43);
Enter(1);
2001-08-17 05:46:24 +00:00
}
}
memset(&usrconfig.Password, 0, sizeof(usrconfig.Password));
sprintf(usrconfig.Password, "%s", temp2);
usrconfig.iPassword = crc;
alarm_on();
sprintf(UnixName, "%s", (char *) NameCreate(NameGen(FullName), FullName, temp2));
2001-08-17 05:46:24 +00:00
strcpy(usrconfig.sUserName, FullName);
strcpy(usrconfig.Name, UnixName);
Time_Now = time(NULL);
l_date = localtime(&Time_Now);
ltime = time(NULL);
if(CFG.iAnsi) {
Enter(2);
/* Do you want ANSI and graphics mode [Y/n]: */
2001-11-02 22:34:32 +00:00
language(LIGHTGRAY, BLACK, 44);
2001-08-17 05:46:24 +00:00
alarm_on();
i = toupper(getchar());
if (i == Keystroke(44, 0) || i == '\n')
usrconfig.GraphMode = TRUE;
else
usrconfig.GraphMode = FALSE;
} else {
usrconfig.GraphMode = TRUE; /* Default set it to ANSI */
Enter(1);
}
exitinfo.GraphMode = usrconfig.GraphMode;
TermInit(exitinfo.GraphMode);
if (CFG.iVoicePhone) {
while (1) {
Enter(1);
/* Please enter you Voice Number */
2001-11-02 22:34:32 +00:00
language(LIGHTGREEN, BLACK, 45);
2001-08-17 05:46:24 +00:00
Enter(1);
2001-11-02 22:34:32 +00:00
pout(LIGHTGREEN, BLACK, (char *)": ");
2001-08-17 05:46:24 +00:00
colour(CFG.InputColourF, CFG.InputColourB);
fflush(stdout);
alarm_on();
GetPhone(temp, 16);
if (strlen(temp) < 6) {
Enter(1);
2001-11-02 22:34:32 +00:00
/* Please enter a proper phone number */
language(LIGHTRED, BLACK, 47);
2001-08-17 05:46:24 +00:00
Enter(1);
} else {
strcpy(usrconfig.sVoicePhone, temp);
strcpy(Phone1, temp);
break;
}
}
} /* End of first if statement */
if (CFG.iDataPhone) {
while (TRUE) {
Enter(1);
/* Please enter you Data Number */
2001-11-02 22:34:32 +00:00
language(LIGHTGREEN, BLACK, 48);
2001-08-17 05:46:24 +00:00
Enter(1);
2001-11-02 22:34:32 +00:00
pout(LIGHTGREEN, BLACK, (char *)": ");
2001-08-17 05:46:24 +00:00
colour(CFG.InputColourF, CFG.InputColourB);
alarm_on();
GetPhone(temp, 16);
/*
* If no dataphone, copy voicephone.
*/
if (strcmp(temp, "") == 0) {
strcpy(usrconfig.sDataPhone, usrconfig.sVoicePhone);
break;
}
if( strlen(temp) < 6) {
Enter(1);
/* Please enter a proper phone number */
2001-11-02 22:34:32 +00:00
language(LIGHTRED, BLACK, 47);
2001-08-17 05:46:24 +00:00
Enter(1);
} else {
strcpy(usrconfig.sDataPhone, temp);
strcpy(Phone2, temp);
break;
}
}
} /* End of if Statement */
if(!CFG.iDataPhone)
printf("\n");
if (CFG.iLocation) {
2001-08-17 05:46:24 +00:00
while (TRUE) {
Enter(1);
/* Enter your location */
language(YELLOW, BLACK, 49);
2001-08-17 05:46:24 +00:00
colour(CFG.InputColourF, CFG.InputColourB);
alarm_on();
if (CFG.iCapLocation) { /* Cap Location is turn on, Capitalise first letter */
fflush(stdout);
GetnameNE(temp, 24);
} else
GetstrC(temp, 80);
if( strlen(temp) < CFG.CityLen) {
Enter(1);
/* Please enter a longer location */
2001-11-02 22:34:32 +00:00
language(LIGHTRED, BLACK, 50);
2001-08-17 05:46:24 +00:00
Enter(1);
printf("%s%d)", (char *) Language(74), CFG.CityLen);
Enter(1);
} else {
strcpy(usrconfig.sLocation, temp);
UserCity(mypid, FullName, temp);
break;
}
}
2001-11-02 22:34:32 +00:00
}
if (CFG.AskAddress) {
while (TRUE) {
Enter(1);
/* Your address, maximum 3 lines (only visible for the sysop): */
language(LIGHTMAGENTA, BLACK, 474);
2001-11-02 22:34:32 +00:00
Enter(1);
for (i = 0; i < 3; i++) {
colour(YELLOW, BLACK);
printf("%d: ", i+1);
colour(CFG.InputColourF, CFG.InputColourB);
fflush(stdout);
alarm_on();
GetstrC(usrconfig.address[i], 40);
}
if (strlen(usrconfig.address[0]) || strlen(usrconfig.address[1]) || strlen(usrconfig.address[2]))
break;
Enter(1);
/* You need to enter your address here */
language(LIGHTRED, BLACK, 475);
2001-11-02 22:34:32 +00:00
Enter(1);
}
2001-08-17 05:46:24 +00:00
}
2001-11-02 22:34:32 +00:00
if (CFG.iHandle) {
2001-08-17 05:46:24 +00:00
Enter(1);
/* Enter a handle (Enter to Quit): */
language(LIGHTRED, BLACK, 412);
2001-08-17 05:46:24 +00:00
colour(CFG.InputColourF, CFG.InputColourB);
fflush(stdout);
alarm_on();
Getname(temp, 34);
if(strcmp(temp, "") == 0)
strcpy(usrconfig.sHandle, "");
else
strcpy(usrconfig.sHandle, temp);
}
/*
* Note, the users database always contains the english sex
*/
if(CFG.iSex) {
while (TRUE) {
Enter(1);
/* What is your sex? (M)ale or (F)emale: */
2001-11-02 22:34:32 +00:00
language(LIGHTBLUE, BLACK, 51);
2001-08-17 05:46:24 +00:00
colour(CFG.InputColourF, CFG.InputColourB);
fflush(stdout);
alarm_on();
i = toupper(Getone());
if (i == Keystroke(51, 0)) {
/* Male */
sprintf(usrconfig.sSex, "Male");
pout(CFG.InputColourF, CFG.InputColourB, (char *) Language(52));
Enter(1);
break;
} else
if (i == Keystroke(51, 1)) {
/* Female */
sprintf(usrconfig.sSex, "Female");
pout(CFG.InputColourF, CFG.InputColourB, (char *) Language(53));
Enter(1);
break;
} else {
Enter(2);
/* Please answer M or F */
2001-11-02 22:34:32 +00:00
language(LIGHTRED, BLACK, 54);
2001-08-17 05:46:24 +00:00
Enter(1);
}
}
} else /* End of if Statement */
sprintf(usrconfig.sSex, "Unknown"); /* If set off, set to Unknown */
while (TRUE) {
Enter(1);
/* Please enter your Date of Birth DD-MM-YYYY: */
2001-11-02 22:34:32 +00:00
pout(CYAN, BLACK, (char *) Language(56));
2001-08-17 05:46:24 +00:00
colour(CFG.InputColourF, CFG.InputColourB);
fflush(stdout);
alarm_on();
GetDate(temp, 10);
sprintf(temp1, "%c%c%c%c", temp[6], temp[7], temp[8], temp[9]);
sprintf(temp2, "%02d", l_date->tm_year);
iLang = atoi(temp2) + 1900;
sprintf(temp2, "%04d", iLang);
Syslog('-', "DOB: test %s %s", temp1, temp2);
if ((strcmp(temp1,temp2)) == 0) {
Enter(1);
/* Sorry you entered this year by mistake. */
2001-11-02 22:34:32 +00:00
pout(LIGHTRED, BLACK, (char *) Language(57));
2001-08-17 05:46:24 +00:00
Enter(1);
} else
if((strlen(temp)) != 10) {
Enter(1);
/* Please enter the correct date format */
2001-11-02 22:34:32 +00:00
pout(LIGHTRED, BLACK, (char *) Language(58));
2001-08-17 05:46:24 +00:00
Enter(1);
} else {
strcpy(usrconfig.sDateOfBirth,temp);
break;
}
}
usrconfig.tFirstLoginDate = ltime; /* Set first login date to current date */
usrconfig.tLastLoginDate = (time_t)0; /* To force setting new limits */
strcpy(usrconfig.sExpiryDate,"00-00-0000");
usrconfig.ExpirySec = CFG.newuser_access;
usrconfig.Security = CFG.newuser_access;
usrconfig.Email = CFG.GiveEmail;
if (CFG.iHotkeys) {
while (TRUE) {
Enter(1);
/* Would you like hot-keyed menus [Y/n]: */
pout(LIGHTRED, BLACK, (char *) Language(62));
colour(CFG.InputColourF, CFG.InputColourB);
alarm_on();
GetstrC(temp, 8);
2001-08-17 05:46:24 +00:00
if ((toupper(temp[0]) == Keystroke(62, 0)) || (strcmp(temp,"") == 0)) {
usrconfig.HotKeys = TRUE;
break;
2001-08-17 05:46:24 +00:00
}
if (toupper(temp[0]) == Keystroke(62, 1)) {
usrconfig.HotKeys = FALSE;
break;
} else {
/* Please answer Y or N */
pout(WHITE, BLACK, (char *) Language(63));
}
}
} else
usrconfig.HotKeys = TRUE; /* Default set it to Hotkeys */
2001-08-17 05:46:24 +00:00
usrconfig.iTimeLeft = 20; /* Set Timeleft in users file to 20 */
Enter(1);
/* Please enter your Screen Length [24]: */
pout(LIGHTMAGENTA, BLACK, (char *) Language(64));
colour(CFG.InputColourF, CFG.InputColourB);
fflush(stdout);
alarm_on();
Getnum(temp, 3);
2001-08-17 05:46:24 +00:00
if(strlen(temp) == 0)
usrconfig.iScreenLen = 24;
else
usrconfig.iScreenLen = atoi(temp);
2001-08-17 05:46:24 +00:00
alarm_on();
usrconfig.tLastPwdChange = ltime; /* Days Since Last Password Change */
usrconfig.iLastFileArea = 1;
sprintf(usrconfig.sProtocol, "%s", (char *) Language(65));
usrconfig.DoNotDisturb = FALSE;
usrconfig.MailScan = TRUE;
usrconfig.ieFILE = TRUE;
usrconfig.ieNEWS = TRUE;
usrconfig.Cls = TRUE;
usrconfig.More = TRUE;
usrconfig.ieASCII8 = TRUE;
/*
* Search a free slot in the users datafile
*/
sprintf(temp, "%s/etc/users.data", getenv("MBSE_ROOT"));
if ((pUsrConfig = fopen(temp, "r+")) == NULL) {
WriteError("Can't open file: %s", temp);
ExitClient(1);
}
fread(&usrconfighdr, sizeof(usrconfighdr), 1, pUsrConfig);
offset = ftell(pUsrConfig);
Found = FALSE;
while ((fread(&us, usrconfighdr.recsize, 1, pUsrConfig) == 1) && (!Found)) {
if (us.sUserName[0] == '\0') {
Found = TRUE;
} else {
offset = ftell(pUsrConfig);
recno++;
}
}
if (Found)
fseek(pUsrConfig, offset, SEEK_SET);
else
fseek(pUsrConfig, 0, SEEK_END);
fwrite(&usrconfig, sizeof(usrconfig), 1, pUsrConfig);
fclose(pUsrConfig);
Enter(2);
/* Your user account has been created: */
2001-11-02 22:34:32 +00:00
pout(YELLOW, BLACK, (char *) Language(67));
2001-08-17 05:46:24 +00:00
Enter(2);
/* Login Name : */
2001-11-02 22:34:32 +00:00
pout(LIGHTBLUE, BLACK, (char *) Language(68));
colour(CYAN, BLACK);
printf("%s (%s)\n", UnixName, FullName);
2001-08-17 05:46:24 +00:00
/* Password : */
2001-11-02 22:34:32 +00:00
pout(LIGHTBLUE, BLACK, (char *) Language(69));
pout(CYAN, BLACK, (char *)"<");
2001-08-17 05:46:24 +00:00
/* not displayed */
2001-11-02 22:34:32 +00:00
pout(WHITE, BLACK, (char *) Language(70));
pout(CYAN, BLACK, (char *)">\n\n");
2001-08-17 05:46:24 +00:00
fflush(stdout);
fflush(stdin);
if(CFG.iVoicePhone) {
if(TelephoneScan(Phone1, FullName))
Syslog('!', "Duplicate phone numbers found");
}
if(CFG.iDataPhone) {
if(TelephoneScan(Phone2, FullName))
Syslog('!', "Duplicate phone numbers found");
}
free(temp1);
free(temp2);
free(Phone1);
free(Phone2);
DisplayFile((char *)"registered");
2001-08-17 05:46:24 +00:00
Syslog('+', "Completed new-user procedure");
/* New user registration completed. */
2001-11-02 22:34:32 +00:00
pout(LIGHTGREEN, BLACK, (char *) Language(71));
Enter(1);
/* You need to login again with the name: */
pout(LIGHTRED, BLACK, (char *) Language(5));
pout(YELLOW, BLACK, UnixName);
2001-08-17 05:46:24 +00:00
Enter(2);
alarm_on();
Pause();
alarm_off();
printf("\n");
return 0;
2001-08-17 05:46:24 +00:00
}