deb-mbse/mbsebbs/bbslist.c

/*****************************************************************************
 *
 * $Id$
 * Purpose ...............: Handle BBS lists
 * ToDo ..................: Add use of new fields
 *			    Verify check at logon
 *			    Intro New BBS at logon
 *
 *****************************************************************************
 * Copyright (C) 1997-2003
 *   
 * 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, 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
 *****************************************************************************/

#include "../config.h"
#include "../lib/libs.h"
#include "../lib/mbse.h"
#include "../lib/structs.h"
#include "../lib/users.h"
#include "../lib/records.h"
#include "../lib/clcomm.h"
#include "../lib/common.h"
#include "bbslist.h"
#include "funcs.h"
#include "input.h"
#include "language.h"



void BBS_Add(void)
{
	FILE 	*pBBSList;
	char	*sFileName;
	char	*temp;
	
	sFileName = calloc(PATH_MAX, sizeof(char));
	temp      = calloc(PATH_MAX, sizeof(char)); 
	
	sprintf(sFileName,"%s/etc/bbslist.data", getenv("MBSE_ROOT"));

	if((pBBSList = fopen(sFileName, "a+")) == NULL) {
		WriteError("Can't open file: %s", sFileName);
		free(temp);
		free(sFileName);
		return;
	}

	if (ftell(pBBSList) == 0) {
		/*
		 * The file looks new created, add header
		 */
		bbshdr.hdrsize = sizeof(bbshdr);
		bbshdr.recsize = sizeof(bbs);
		fwrite(&bbshdr, sizeof(bbshdr), 1, pBBSList);
	}

	if(exitinfo.GraphMode) {
		colour(9, 0);
		printf("\n\t\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n", 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177);
		printf("\t\t\t\t%c%c", 177, 177);
		colour(15, 0);
		/* Adding BBS */
		printf(" %s", (char *) Language(300));
		colour(9, 0);
		printf("%c%c %c\n", 177, 177, 219);
		printf("\t\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c %c\n", 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 219);
		printf("\t\t\t\t  %c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n\n", 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 219);
	} else {
		printf("\n\t\t\t\t+--------------+\n");
		/* Adding BBS */
		printf("\t\t\t\t|  %s |\n", (char *) Language(300));
		printf("\t\t\t\t+--------------+\n\n");
	}

	memset(&bbs, 0, sizeof(bbs));

	while (TRUE) {
		/* BBS Name: */
		pout(15, 0, (char *) Language(301));
		colour(CFG.InputColourF, CFG.InputColourB);
		fflush(stdout);
		GetstrC(bbs.BBSName, 40);

		if((strlen(bbs.BBSName)) > 3)
			break;
		else {
			Enter(1);
			pout(12, 0, (char *) Language(302));
			Enter(2);
			Pause();
			free(temp);
			free(sFileName);
			return;
		}
	}

	while (TRUE) {
		/* Phone Number: */
		pout(15, 0, (char *) Language(303));
		colour(CFG.InputColourF, CFG.InputColourB);
		fflush(stdout);
		GetstrC(bbs.Phone[0], 19);

		if((strlen(bbs.Phone[0])) > 3)
			break;
	}

	while (TRUE) {
		/* Sysop Name: */
		pout(15, 0, (char *) Language(304));
		colour(CFG.InputColourF, CFG.InputColourB);
		fflush(stdout);
		Getname(bbs.Sysop, 35);

		if((strlen(bbs.Sysop)) > 3)
			break;
	}

	while (TRUE) {
		/* BBS Software: */
		pout(15, 0, (char *) Language(305));
		colour(CFG.InputColourF, CFG.InputColourB);
		fflush(stdout);
		GetstrC(bbs.Software, 19);

		if((strlen(bbs.Software)) >= 2)
			break;
	}

	while (TRUE) {
		/* Storage (Gigabyte): */
		pout(15, 0, (char *) Language(306));
		colour(CFG.InputColourF, CFG.InputColourB);
		fflush(stdout);
		Getnum(temp, 8);

		if ((strlen(temp)) > 0) {
			bbs.Storage = atoi(temp);
			break;
		}
	}

	while (TRUE) {
		/* Speeds: */
		pout(15, 0, (char *) Language(307));
		colour(CFG.InputColourF, CFG.InputColourB);
		fflush(stdout);
		GetstrC(bbs.Speeds[0], 39);

		if((strlen(bbs.Speeds[0])) > 2)
			break;
	}

	Enter(1);
	/* Would you like to add a extended discription? [Y/n]: */
	pout(15, 0, (char *) Language(308));
	colour(CFG.InputColourF, CFG.InputColourB);
	GetstrC(temp, 80);
	if ((toupper(temp[0]) == Keystroke(308, 0)) || (strcmp(temp, "") == 0)) {
		colour(14, 0);
		/* Please a enter discription for */
		printf("\n%s%s (2 Lines)\n", (char *) Language(309), bbs.BBSName);
		pout(15, 0, (char *)": ");
		colour(CFG.InputColourF, CFG.InputColourB);
		fflush(stdout);
		GetstrC(bbs.Desc[0], 65);
		pout(15, 0, (char *)": ");
		colour(CFG.InputColourF, CFG.InputColourB);
		fflush(stdout);
		GetstrC(bbs.Desc[1], 65);
	} 

	printf("\n");
	Syslog('+', "User added BBS to list");

	sprintf(bbs.UserName,"%s", exitinfo.sUserName);
	sprintf(bbs.DateOfEntry,"%02d-%02d-%04d",l_date->tm_mday,l_date->tm_mon+1,l_date->tm_year+1900);
	sprintf(bbs.Verified,"%02d-%02d-%04d",l_date->tm_mday,l_date->tm_mon+1,l_date->tm_year+1900);
	bbs.Available = TRUE;

	fwrite(&bbs, sizeof(bbs), 1, pBBSList);
	fclose(pBBSList);
	chmod(sFileName, 0660);
	free(temp);
	free(sFileName);
}



void BBS_List(void)
{
	FILE	*pBBSList;
	int	recno = 0;
	char	*sFileName;

	sFileName = calloc(PATH_MAX, sizeof(char));
	sprintf(sFileName,"%s/etc/bbslist.data", getenv("MBSE_ROOT"));

	if((pBBSList = fopen(sFileName, "r+")) == NULL) {
		WriteError("BBSList: Can't open file: %s", sFileName);
		free(sFileName);
		return;
	}

	fread(&bbshdr, sizeof(bbshdr), 1, pBBSList);

	if(exitinfo.GraphMode) {
		colour(9, 0);
		printf("\n\t\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n", 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177);
		printf("\t\t\t\t%c%c", 177, 177);
		colour(15, 0);
		printf(" %s", (char *) Language(310));
		colour(9, 0);
		printf("%c%c %c\n", 177, 177, 219);
		printf("\t\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c %c\n", 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 219);
		printf("\t\t\t\t  %c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n\n", 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 219);
	} else {
		printf("\n\t\t\t\t+---------------+\n");
		/* BBS Listing */
		printf("\t\t\t\t|  %s |\n", (char *) Language(310));
		printf("\t\t\t\t+---------------+\n\n");
	}

	/* #    BBS Name               Number         Software        Gigabyte   Speed*/
	colour(15, 0);
	printf("%s\n", Language(311));
	colour(12, 0);
	sLine();

	while (fread(&bbs, bbshdr.recsize, 1, pBBSList) == 1) {
		if ((bbs.Available)) {
			colour(15, 0);
			printf("%-5d", recno);

			colour(10, 0);
			bbs.BBSName[22] = '\0';
			printf("%-23s", bbs.BBSName);

			colour(11, 0);
			bbs.Phone[0][14] = '\0';
			printf("%-15s", bbs.Phone[0]);

			colour(14, 0);
			bbs.Software[15] = '\0';
			printf("%-16s", bbs.Software);

			colour(13, 0);
			printf("%-11d", bbs.Storage);

			colour(8, 0);
			bbs.Speeds[0][9] = '\0';
			printf("%s\n", bbs.Speeds[0]);
		}
		recno++;
	}
	colour(12, 0);
	sLine();
	fclose(pBBSList);
	free(sFileName);
	Pause();
}



void BBS_Search(void)
{
	FILE	*pBBSList;
	int	recno = 0;
	int	iFoundBBS = FALSE;
	char	*sFileName;
	char	*Name;
	char	*sTemp;
	long	offset;

	sFileName = calloc(PATH_MAX, sizeof(char));
	sprintf(sFileName,"%s/etc/bbslist.data", getenv("MBSE_ROOT"));

	if((pBBSList = fopen(sFileName, "r+")) == NULL) {
		WriteError("BBSList: Can't open file: %s", sFileName);
		free(sFileName);
		return;
	}

	fread(&bbshdr, sizeof(bbshdr), 1, pBBSList);
	Name  = calloc(30, sizeof(char));
	sTemp = calloc(81, sizeof(char));

	if(exitinfo.GraphMode) {
		colour(9, 0);
		printf("\n\t\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n", 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177);
		printf("\t\t\t\t%c%c ", 177, 177);
		colour(15, 0);
		printf("%s", (char *) Language(312));
		colour(9, 0);
		printf("%c%c %c\n", 177, 177, 219);
		printf("\t\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c %c\n", 177, 177, 177, 177, 177, 177, 177, 177, 177, 177,177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177,219);
		printf("\t\t\t\t  %c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n\n", 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220,219);
	} else {
		printf("\n\t\t\t\t+--------------------+\n");
		/* Search for a BBS */
		printf("\t\t\t\t  |  %s |\n", (char *) Language(312));
		printf("\t\t\t\t  +--------------------+\n\n");
	}

	while (TRUE) {
		/* Please enter 3 letters of BBS to search for: */
		pout(15, 0, (char *) Language(313));
		colour(CFG.InputColourF, CFG.InputColourB);
		GetstrC(Name, 29);

		if((strcmp(Name,"")) == 0) {
			fflush(stdin);
			fclose(pBBSList);
			free(sFileName);
			free(sTemp);
			free(Name);
			return;
		}

		if((strlen(Name)) > 2)
			break;
		else {
			Enter(1);
			/* I need at least 3 letters ...*/
			pout(12, 0, (char *) Language(314));
			Enter(2);
		}
	}

	while (fread(&bbs, bbshdr.recsize, 1, pBBSList) == 1) {
		if((strstr(tl(bbs.BBSName), tl(Name)) != NULL)) {
			tlf(bbs.BBSName);
			colour(14, 0);
			/* BBS Name: */
			printf("\n%s%s\n\n", (char *) Language(301), bbs.BBSName);
			/* View this BBS? [Y/n]: */
			pout(15, 0, (char *) Language(315));
			colour(CFG.InputColourF, CFG.InputColourB);
			GetstrC(sTemp, 80);
			if ((toupper(sTemp[0]) == Keystroke(315, 0)) || (strcmp(sTemp,"") == 0)) {
				iFoundBBS = TRUE;
				break;
			} else
				recno++;
		} else {
			recno++;
		}
	}

	if(!iFoundBBS) {
		Enter(1);
		/* Could not find the BBS Listed ... */
		pout(12, 0, (char *) Language(316));
		Enter(2);
		fclose(pBBSList);
		Pause();
		free(sFileName);
		free(Name);
		free(sTemp);
		return;
	}

	offset = bbshdr.hdrsize + (recno * bbshdr.recsize);
	if(fseek(pBBSList, offset, 0) != 0) 
		WriteError("Can't move pointer there. %s",sFileName); 

	fread(&bbs, bbshdr.recsize, 1, pBBSList);
	if(exitinfo.GraphMode) {
		colour(9, 0);
		printf("\n\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n", 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177);
		printf("\t\t\t%c%c ", 177, 177);
		colour(15, 0);
		/* Search for a BBS */
		printf("%s", (char *) Language(312));
		colour(9, 0);
		printf("%c%c %c\n", 177, 177, 219);
		printf("\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c %c\n", 177, 177, 177, 177, 177, 177, 177, 177, 177, 177,177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177,219);
		printf("\t\t\t  %c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n\n", 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220,219);
	} else {
		printf("\n\t\t\t+--------------------+\n");
		/* Search for a BBS */
		printf("\t\t\t|  %s |\n", (char *) Language(312));
		printf("\t\t\t+--------------------+\n\n");
	}

	/* #    BBS Name               Number         Software        Storage    Speed */
	colour(15, 0);
	printf("%s\n", Language(311));

	colour(12, 0);
	sLine();

	colour(15, 0);
	printf("%-5d", recno);

	colour(10, 0);
	bbs.BBSName[22] = '\0';
	printf("%-23s", bbs.BBSName);

	colour(11, 0);
	bbs.Phone[0][14] = '\0';
	printf("%-15s", bbs.Phone[0]);

	colour(14, 0);
	bbs.Software[15] = '\0';
	printf("%-16s", bbs.Software);

	colour(13, 0);
	printf("%-11d", bbs.Storage);

	colour(8, 0);
	bbs.Speeds[0][9] = '\0';
	printf("%s\n", bbs.Speeds[0]);

	colour(12, 0);
	sLine();
	fclose(pBBSList);
	Pause();
	free(sFileName);
	free(sTemp);
	free(Name);
}



void BBS_Show(void)
{
	FILE		*pBBSList;
	int		recno  = 0;
	int		nrecno = 0;
	long int	offset;
	char		*sFileName;
	char		srecno[10];

	sFileName = calloc(PATH_MAX, sizeof(char));
	sprintf(sFileName,"%s/etc/bbslist.data", getenv("MBSE_ROOT"));

	if((pBBSList = fopen(sFileName, "r+")) == NULL) {
		WriteError("Can't open file: %s", sFileName);
		free(sFileName);
		return;
	}
	free(sFileName);
	fread(&bbshdr, sizeof(bbshdr), 1, pBBSList);

	if(exitinfo.GraphMode) {
		colour(9, 0);
		printf("\n\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n", 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177);
		printf("\t\t\t%c%c ", 177, 177);
		colour(15, 0);
		/* Show a BBS */
		printf("%s", (char *) Language(317));
		colour(9, 0);
		printf("%c%c %c\n", 177, 177, 219); 
		printf("\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c %c\n", 177, 177, 177, 177, 177,177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 219);
		printf("\t\t\t  %c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n\n", 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220,219);
	} else {
		printf("\n\t\t\t+--------------+\n");
		/* Show a BBS */
		printf("\t\t\t|  %s |\n", (char *) Language(317));
		printf("\t\t\t+--------------+\n\n");
	}

	Enter(1);
	/* Please enter number to list: */
	pout(15, 0, (char *) Language(318));
	colour(CFG.InputColourF, CFG.InputColourB);
	GetstrC(srecno, 9);

	if((strcmp(srecno,"")) == 0)
		return;

	recno = atoi(srecno);
	nrecno = recno;
	recno = 0;

	while (fread(&bbs, bbshdr.recsize, 1, pBBSList) == 1) 
		recno++;

	if(nrecno >= recno) {
		Enter(1);
		/* Record does not exist */
		pout(12, 0, (char *) Language(319));
		Enter(2);
		fclose(pBBSList);
		Pause();
		return;
	} else {
		offset = bbshdr.hdrsize + (nrecno * bbshdr.recsize);
		if(fseek(pBBSList, offset, 0) != 0)
			WriteError("Can't move pointer there. %s",sFileName);
                                                             
		fread(&bbs, bbshdr.recsize, 1, pBBSList);

		colour(12, 0);
		sLine();

		/*  Record        : */
		pout(15, 0, (char *) Language(320));
		colour(10, 0);
		printf("%d\n", nrecno);

		/*  BBS Name      : */
		pout(15, 0, (char *) Language(321));
		colour(10, 0);	
		printf("%s\n", bbs.BBSName);

		/*  Number        : */
		pout(15, 0, (char *) Language(322));
		colour(10, 0);
		printf("%s\n", bbs.Phone[0]);

		/* Software      : */
		pout(15, 0, (char *) Language(323));
		colour(10, 0);
		printf("%s\n", bbs.Software);

		/* Storage       : */
		pout(15, 0, (char *) Language(324));
		colour(10, 0);
		printf("%d\n", bbs.Storage);

		/*  Speeds        : */
		pout(15, 0, (char *) Language(325));
		colour(10, 0);
		printf("%s\n", bbs.Speeds[0]);

		/*  Sysop Name    : */
		pout(15, 0, (char *) Language(326));
		colour(10, 0);
		printf("%s\n", bbs.Sysop);

		if((strcmp(bbs.Desc[0],"")) != 0) {
			pout(15, 0, (char *)" Description   : ");
			colour(13, 0);
			bbs.Desc[0][62] = '\0';
			printf("%s\n", bbs.Desc[0]);
		}
		if((strcmp(bbs.Desc[1],"")) != 0) {
			pout(15, 0, (char *)"               : ");
			colour(13, 0);
			bbs.Desc[1][62] = '\0';
			printf("%s\n", bbs.Desc[1]);
		}

		colour(12, 0);
		sLine();

		if((SYSOP == TRUE) || (exitinfo.Security.level >= CFG.sysop_access)) {
			pout(15, 0, (char *)"Sysop extra information\n");
			colour(12, 0);
			sLine();

			/*  Available     : */
			pout(15, 0, (char *) Language(327));
			colour(10, 0);
			printf("%d\n", bbs.Available);

			/*  Date of Entry : */
			pout(15, 0, (char *) Language(328));
			colour(10, 0);
			printf("%s\n", bbs.DateOfEntry);

			/*  Entry Name    : */
			pout(15, 0, (char *) Language(329));
			colour(10, 0);
			printf("%s\n", bbs.UserName);

			colour(12, 0);
			sLine();
		}
		Pause();
	}
	fclose(pBBSList);
}



void BBS_Delete(void)
{
    FILE    *pBBSLine;
    int	    recno = 0, nrecno = 0;
    long    offset;
    char    srecno[7], *sFileName, stemp[50], sUser[35];

    sFileName = calloc(PATH_MAX, sizeof(char));
    sprintf(sFileName,"%s/etc/bbslist.data", getenv("MBSE_ROOT"));

    if ((pBBSLine = fopen(sFileName, "r+")) == NULL) {
	WriteError("Can't open file: %s", sFileName);
	free(sFileName);
	return;
    }
    fread(&bbshdr, sizeof(bbshdr),1 , pBBSLine);

    if (exitinfo.GraphMode) {
	colour(9, 0);
	printf("\n\t\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n", 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177);
	printf("\t\t\t\t%c%c", 177, 177);
	colour(15, 0);
	/* Delete BBS */
	printf(" %s", (char *) Language(330));
	colour(9, 0);
	printf("%c%c %c\n", 177, 177, 219);
	printf("\t\t\t\t%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c %c\n",  177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 177, 219);
	printf("\t\t\t\t  %c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c\n\n", 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 220, 219);
    } else {
	printf("\n\t\t\t\t+--------------+\n");
	/* Delete BBS */
	printf("\t\t\t\t|  %s |\n", (char *) Language(330));
	printf("\t\t\t\t+--------------+\n\n");
    }

    Enter(1);
    /* Please enter number to delete: */
    pout(15, 0, (char *) Language(331));
    colour(CFG.InputColourF, CFG.InputColourB);
    GetstrC(srecno, 9);

    if ((strcmp(srecno,"")) == 0)
	return;

    recno = atoi(srecno);
    nrecno = recno;
    recno = 0;
		                                                                                           
    while (fread(&bbs, bbshdr.recsize, 1, pBBSLine) == 1)
	recno++;

    if (nrecno >= recno) {
	Enter(1);
	/* Record does not exist */
	pout(12, 0, (char *) Language(319));
	Enter(2);
	fclose(pBBSLine);
	free(sFileName);
	Pause();
	return;
    } else {
	offset = bbshdr.hdrsize + (nrecno * bbshdr.recsize);
	if (fseek(pBBSLine, offset, 0) != 0)
	    WriteError("Can't move pointer there. %s",sFileName); 

	fread(&bbs, sizeof(bbs), 1, pBBSLine);
	                                                                                            
	/* Convert Record Int to string, so we can print to logfiles */
	sprintf(stemp,"%d", nrecno);

	/* Print UserName to String, so we can compare for deletion */
	sprintf(sUser,"%s", exitinfo.sUserName);

	if ((strcmp(sUser, bbs.UserName)) != 0) {
	    if ((!SYSOP) && (exitinfo.Security.level < CFG.sysop_access)) {
		/* Record */ /* does not belong to you.*/
		printf("\n%s%s %s\n\n", (char *) Language(332), stemp, (char *) Language(333));
		Syslog('!', "User tried to delete somebody else's bbslist record: %s", stemp);
		free(sFileName);
		fclose(pBBSLine);
		return;
	    }
	}

	if ((bbs.Available == FALSE)) {
	    colour(12, 0);
	    /* Record */
	    printf("\n%s%d %s\n\n", (char *) Language(332), nrecno, (char *) Language(334));
	    Syslog('!', "User tried to mark an already marked bbslist record: %s", stemp);
	} else {
	    bbs.Available = FALSE;
	    colour(10, 0);
	    /* Record: */
	    printf("\n%s%d %s\n\n", (char *) Language(332), nrecno, (char *) Language(335));
	    Syslog('+', "User marked bbslist record for deletion: %s", stemp);
	    colour(15, 2);
	    /* The Sysop will purge the list once he has *//* seen you have marked a record for deletion. */
	    printf("%s\n%s\n\n", (char *) Language(336), (char *) Language(337));
	    Pause();
	}

	offset = bbshdr.hdrsize + (nrecno * bbshdr.recsize);
	if (fseek(pBBSLine, offset, 0) != 0)
	    WriteError("Can't move pointer there. %s",sFileName); 
	fwrite(&bbs, sizeof(bbs), 1, pBBSLine);
    }

    fclose(pBBSLine);
    chmod(sFileName, 0660);
    free(sFileName);
}