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/mbfido/cookie.c
2001-08-17 05:46:24 +00:00

91 lines
2.2 KiB
C

/*****************************************************************************
*
* File ..................: mbfido/cookie.h
* Purpose ...............: Create a cookie
* Last modification date : 19-Mar-1999
*
*****************************************************************************
* Copyright (C) 1997-1999
*
* Michiel Broek FIDO: 2:2801/16
* Beekmansbos 10 Internet: mbroek@ux123.pttnwb.nl
* 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/structs.h"
#include "../lib/records.h"
#include "../lib/common.h"
#include "../lib/clcomm.h"
#include "cookie.h"
char *Cookie()
{
FILE *olf;
char fname[81];
int i, j, in, id;
int recno = 0;
long offset;
int nrecno;
static char temp[81];
sprintf(fname, "%s/etc/oneline.data", getenv("MBSE_ROOT"));
if ((olf = fopen(fname, "r")) == NULL) {
WriteError("$Can't open %s", fname);
return '\0';
}
fread(&olhdr, sizeof(olhdr), 1, olf);
while (fread(&ol, olhdr.recsize, 1, olf) == 1) {
recno++;
}
nrecno = recno;
/*
* Generate random record number
*/
while (TRUE) {
in = nrecno;
id = getpid();
i = rand();
j = i % id;
if ((j <= in))
break;
}
offset = olhdr.hdrsize + (j * olhdr.recsize);
if (fseek(olf, offset, SEEK_SET) != 0) {
WriteError("$Can't move pointer in %s", fname);
return '\0';
}
fread(&ol, olhdr.recsize, 1, olf);
fclose(olf);
memset(&temp, 0, sizeof(temp));
strcpy(temp, ol.Oneline);
return temp;
}