bbs/deb-mbse
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

moved file index functions from mball to mbfile

Browse Source
This commit is contained in:
Michiel Broek 2001-11-25 20:13:26 +00:00
parent add976e618
commit 5d9e011343
4 changed files with 602 additions and 593 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
ChangeLog
View File

@ -4218,9 +4218,10 @@ v0.33.19 26-Oct-2001
Change the file /opt/mbse/etc/issue like the example in the Change the file /opt/mbse/etc/issue like the example in the
subdirectory mbtask. subdirectory mbtask.
Change the shell for user mbse to /opt/mbse/bin/mbnewusr Change the shell for user mbse to /opt/mbse/bin/mbnewusr
The make install fixes several permissions that are wrong for The make install fixes several permissions that are wrong for
the new style (not setuid) of mbsebbs. the new style (not setuid) of mbsebbs.
Remove /opt/mbse/etc/maint to let it replace with a new
version, or change it by hand.
general: general:
Made the Makefile system more simple. Made the Makefile system more simple.
@ -4328,11 +4329,13 @@ v0.33.19 26-Oct-2001
Added "mbfile toberep" function, this gives an overview of the Added "mbfile toberep" function, this gives an overview of the
toberep database. The program mbtoberep does this as well, but toberep database. The program mbtoberep does this as well, but
that one gives a complete dump and is for developer use. that one gives a complete dump and is for developer use.
The "mbfile index" function now also writes files.bbs files,
the index.html files for http download and 00index files in
all available areas.
mball: mball:
The index function now creates the web pages with the use of The index function is now obsolete, this is added to mbfile.
the long filenames instead of the uppercase dos 8.3 filenames. You may need to adjust your scripts that call "mball index".
Fixed html output for Konqueror browser.
mbfbgen: mbfbgen:
Obsolete and removed from the distribution. The function is Obsolete and removed from the distribution. The function is

708
mbfido/mbfindex.c
View File

@ -39,7 +39,8 @@
extern int do_quiet; /* Supress screen output */ extern int do_quiet; /* Supress screen output */
int lastfile; /* Last file number */
typedef struct _Index { typedef struct _Index {
@ -48,6 +49,14 @@ typedef struct _Index {
} Findex; } Findex;
static char *wdays[]= {(char *)"Sun",(char *)"Mon",(char *)"Tue",
(char *)"Wed",(char *)"Thu",(char *)"Fri",
(char *)"Sat"};
static char *months[]= {(char *)"Jan",(char *)"Feb",(char *)"Mar",
(char *)"Apr",(char *)"May",(char *)"Jun",
(char *)"Jul",(char *)"Aug",(char *)"Sep",
(char *)"Oct",(char *)"Nov",(char *)"Dec"};
void tidy_index(Findex **); void tidy_index(Findex **);
void tidy_index(Findex **fap) void tidy_index(Findex **fap)
@ -122,129 +131,592 @@ int comp_index(Findex **fap1, Findex **fap2)
/* /*
* Build a sorted index for the file request processor. * Translate ISO 8859-1 characters to named character entities
*/ */
void Index(void) void html_massage(char *, char *);
void html_massage(char *inbuf, char *outbuf)
{ {
FILE *pAreas, *pFile, *pIndex; char *inptr = inbuf;
long i, iAreas, iAreasNew = 0, record; char *outptr = outbuf;
int iTotal = 0;
char *sAreas, *fAreas, *newdir = NULL, *sIndex;
Findex *fdx = NULL;
Findex *tmp;
struct FILEIndex idx;
sAreas = calloc(PATH_MAX, sizeof(char)); memset(outbuf, 0, sizeof(outbuf));
fAreas = calloc(PATH_MAX, sizeof(char));
sIndex = calloc(PATH_MAX, sizeof(char));
IsDoing("Index files"); while (*inptr) {
if (!do_quiet) {
colour(3, 0);
printf("Create filerequest index...\n");
}
sprintf(sAreas, "%s/etc/fareas.data", getenv("MBSE_ROOT")); switch ((unsigned char)*inptr) {
case '"': sprintf(outptr, """); break;
case '&': sprintf(outptr, "&"); break;
case '<': sprintf(outptr, "&lt;"); break;
case '>': sprintf(outptr, "&gt;"); break;
case 160: sprintf(outptr, "&nbsp;"); break;
case 161: sprintf(outptr, "&iexcl;"); break;
case 162: sprintf(outptr, "&cent;"); break;
case 163: sprintf(outptr, "&pound;"); break;
case 164: sprintf(outptr, "&curren;"); break;
case 165: sprintf(outptr, "&yen;"); break;
case 166: sprintf(outptr, "&brvbar;"); break;
case 167: sprintf(outptr, "&sect;"); break;
case 168: sprintf(outptr, "&uml;"); break;
case 169: sprintf(outptr, "&copy;"); break;
case 170: sprintf(outptr, "&ordf;"); break;
case 171: sprintf(outptr, "&laquo;"); break;
case 172: sprintf(outptr, "&not;"); break;
case 173: sprintf(outptr, "&shy;"); break;
case 174: sprintf(outptr, "&reg;"); break;
case 175: sprintf(outptr, "&macr;"); break;
case 176: sprintf(outptr, "&deg;"); break;
case 177: sprintf(outptr, "&plumn;"); break;
case 178: sprintf(outptr, "&sup2;"); break;
case 179: sprintf(outptr, "&sup3;"); break;
case 180: sprintf(outptr, "&acute;"); break;
case 181: sprintf(outptr, "&micro;"); break;
case 182: sprintf(outptr, "&para;"); break;
case 183: sprintf(outptr, "&middot;"); break;
case 184: sprintf(outptr, "&cedil;"); break;
case 185: sprintf(outptr, "&supl;"); break;
case 186: sprintf(outptr, "&ordm;"); break;
case 187: sprintf(outptr, "&raquo;"); break;
case 188: sprintf(outptr, "&frac14;"); break;
case 189: sprintf(outptr, "&frac12;"); break;
case 190: sprintf(outptr, "&frac34;"); break;
case 191: sprintf(outptr, "&iquest;"); break;
case 192: sprintf(outptr, "&Agrave;"); break;
case 193: sprintf(outptr, "&Aacute;"); break;
case 194: sprintf(outptr, "&Acirc;"); break;
case 195: sprintf(outptr, "&Atilde;"); break;
case 196: sprintf(outptr, "&Auml;"); break;
case 197: sprintf(outptr, "&Aring;"); break;
case 198: sprintf(outptr, "&AElig;"); break;
case 199: sprintf(outptr, "&Ccedil;"); break;
case 200: sprintf(outptr, "&Egrave;"); break;
case 201: sprintf(outptr, "&Eacute;"); break;
case 202: sprintf(outptr, "&Ecirc;"); break;
case 203: sprintf(outptr, "&Euml;"); break;
case 204: sprintf(outptr, "&Igrave;"); break;
case 205: sprintf(outptr, "&Iacute;"); break;
case 206: sprintf(outptr, "&Icirc;"); break;
case 207: sprintf(outptr, "&Iuml;"); break;
case 208: sprintf(outptr, "&ETH;"); break;
case 209: sprintf(outptr, "&Ntilde;"); break;
case 210: sprintf(outptr, "&Ograve;"); break;
case 211: sprintf(outptr, "&Oacute;"); break;
case 212: sprintf(outptr, "&Ocirc;"); break;
case 213: sprintf(outptr, "&Otilde;"); break;
case 214: sprintf(outptr, "&Ouml;"); break;
case 215: sprintf(outptr, "&times;"); break;
case 216: sprintf(outptr, "&Oslash;"); break;
case 217: sprintf(outptr, "&Ugrave;"); break;
case 218: sprintf(outptr, "&Uacute;"); break;
case 219: sprintf(outptr, "&Ucirc;"); break;
case 220: sprintf(outptr, "&Uuml;"); break;
case 221: sprintf(outptr, "&Yacute;"); break;
case 222: sprintf(outptr, "&THORN;"); break;
case 223: sprintf(outptr, "&szlig;"); break;
case 224: sprintf(outptr, "&agrave;"); break;
case 225: sprintf(outptr, "&aacute;"); break;
case 226: sprintf(outptr, "&acirc;"); break;
case 227: sprintf(outptr, "&atilde;"); break;
case 228: sprintf(outptr, "&auml;"); break;
case 229: sprintf(outptr, "&aring;"); break;
case 230: sprintf(outptr, "&aelig;"); break;
case 231: sprintf(outptr, "&ccedil;"); break;
case 232: sprintf(outptr, "&egrave;"); break;
case 233: sprintf(outptr, "&eacute;"); break;
case 234: sprintf(outptr, "&ecirc;"); break;
case 235: sprintf(outptr, "&euml;"); break;
case 236: sprintf(outptr, "&igrave;"); break;
case 237: sprintf(outptr, "&iacute;"); break;
case 238: sprintf(outptr, "&icirc;"); break;
case 239: sprintf(outptr, "&iuml;"); break;
case 240: sprintf(outptr, "&eth;"); break;
case 241: sprintf(outptr, "&ntilde;"); break;
case 242: sprintf(outptr, "&ograve;"); break;
case 243: sprintf(outptr, "&oacute;"); break;
case 244: sprintf(outptr, "&ocirc;"); break;
case 245: sprintf(outptr, "&otilde;"); break;
case 246: sprintf(outptr, "&ouml;"); break;
case 247: sprintf(outptr, "&divide;"); break;
case 248: sprintf(outptr, "&oslash;"); break;
case 249: sprintf(outptr, "&ugrave;"); break;
case 250: sprintf(outptr, "&uacute;"); break;
case 251: sprintf(outptr, "&ucirc;"); break;
case 252: sprintf(outptr, "&uuml;"); break;
case 253: sprintf(outptr, "&yacute;"); break;
case 254: sprintf(outptr, "&thorn;"); break;
case 255: sprintf(outptr, "&yuml;"); break;
default: *outptr++ = *inptr; *outptr = '\0'; break;
}
while (*outptr)
outptr++;
if ((pAreas = fopen (sAreas, "r")) == NULL) { inptr++;
WriteError("$Can't open %s", sAreas); }
die(0); *outptr = '\0';
} }
sprintf(sIndex, "%s/etc/request.index", getenv("MBSE_ROOT"));
if ((pIndex = fopen(sIndex, "w")) == NULL) {
WriteError("$Can't create %s", sIndex); char *rfcdate(time_t);
die(0); char *rfcdate(time_t now)
} {
static char buf[40];
fread(&areahdr, sizeof(areahdr), 1, pAreas); struct tm ptm;
fseek(pAreas, 0, SEEK_END);
iAreas = (ftell(pAreas) - areahdr.hdrsize) / areahdr.recsize; ptm = *gmtime(&now);
for (i = 1; i <= iAreas; i++) { sprintf(buf,"%s, %02d %s %04d %02d:%02d:%02d GMT",
wdays[ptm.tm_wday], ptm.tm_mday, months[ptm.tm_mon],
fseek(pAreas, ((i-1) * areahdr.recsize) + areahdr.hdrsize, SEEK_SET); ptm.tm_year + 1900, ptm.tm_hour, ptm.tm_min, ptm.tm_sec);
fread(&area, areahdr.recsize, 1, pAreas); return(buf);
}
if ((area.Available) && (area.FileReq)) {
if (!diskfree(CFG.freespace))
die(101); void pagelink(FILE *, char *, int, int);
void pagelink(FILE *fa, char *Path, int inArea, int Current)
if (!do_quiet) { {
printf("\r%4ld => %-44s \b\b\b\b", i, area.Name); char nr[20];
fflush(stdout);
} fprintf(fa, "<DIV align=center>\n");
/* if ((Current >= CFG.www_files_page) && (inArea >= CFG.www_files_page)) {
* Check if download directory exists, if (((Current / CFG.www_files_page) - 1) > 0)
* if not, create the directory. sprintf(nr, "%d", (Current / CFG.www_files_page) -1);
*/ else
if (access(area.Path, R_OK) == -1) { nr[0] = '\0';
Syslog('!', "Create dir: %s", area.Path); fprintf(fa, "<A HREF=\"%s/%s%s/index%s.html\"><IMG SRC=\"/icons/%s\" ALT=\"%s\" BORDER=0>%s</A>&nbsp;\n",
newdir = xstrcpy(area.Path); CFG.www_url, CFG.www_link2ftp, Path+strlen(CFG.ftp_base), nr,
newdir = xstrcat(newdir, (char *)"/"); CFG.www_icon_prev, CFG.www_name_prev, CFG.www_name_prev);
mkdirs(newdir); }
free(newdir);
newdir = NULL; fprintf(fa, "<A HREF=\"%s/index.html\"><IMG SRC=\"/icons/%s\" ALT=\"%s\" BORDER=0>%s</A>&nbsp;\n",
} CFG.www_url, CFG.www_icon_home, CFG.www_name_home, CFG.www_name_home);
fprintf(fa, "<A HREF=\"%s/%s/index.html\"><IMG SRC=\"/icons/%s\" ALT=\"%s\" BORDER=0>%s</A>\n",
sprintf(fAreas, "%s/fdb/fdb%ld.data", getenv("MBSE_ROOT"), i); CFG.www_url, CFG.www_link2ftp, CFG.www_icon_back, CFG.www_name_back, CFG.www_name_back);
/* if ((Current < (inArea - CFG.www_files_page)) && (inArea >= CFG.www_files_page)) {
* Open the file database, if it doesn't exist, fprintf(fa, "&nbsp;<A HREF=\"%s/%s%s/index%d.html\"><IMG SRC=\"/icons/%s\" ALT=\"%s\" BORDER=0>%s</A>\n",
* create an empty one. CFG.www_url, CFG.www_link2ftp, Path+strlen(CFG.ftp_base), (Current / CFG.www_files_page) + 1,
*/ CFG.www_icon_next, CFG.www_name_next, CFG.www_name_next);
if ((pFile = fopen(fAreas, "r+")) == NULL) { }
Syslog('!', "Creating new %s", fAreas);
if ((pFile = fopen(fAreas, "a+")) == NULL) { fprintf(fa, "</DIV><P>\n");
WriteError("$Can't create %s", fAreas); }
die(0);
}
}
FILE *newpage(char *, char *, time_t, int, int);
/* FILE *newpage(char *Path, char *Name, time_t later, int inArea, int Current)
* Now start creating the unsorted index. {
*/ char linebuf[1024], outbuf[1024];
record = 0; static FILE* fa;
while (fread(&file, sizeof(file), 1, pFile) == 1) {
iTotal++; lastfile = Current;
if ((iTotal % 10) == 0) if (Current)
Marker(); sprintf(linebuf, "%s/index%d.temp", Path, Current / CFG.www_files_page);
memset(&idx, 0, sizeof(idx)); else
sprintf(idx.Name, "%s", tu(file.Name)); sprintf(linebuf, "%s/index.temp", Path);
sprintf(idx.LName, "%s", tu(file.LName)); if ((fa = fopen(linebuf, "w")) == NULL) {
idx.AreaNum = i; WriteError("$Can't create %s", linebuf);
idx.Record = record; } else {
fill_index(idx, &fdx); sprintf(linebuf, "%s", Name);
record++; html_massage(linebuf, outbuf);
} fprintf(fa, "<HTML>\n");
fprintf(fa, "<META http-equiv=\"Expires\" content=\"%s\">\n", rfcdate(later));
fclose(pFile); fprintf(fa, "<META http-equiv=\"Cache-Control\" content=\"no-cache, must-revalidate\">\n");
iAreasNew++; fprintf(fa, "<META http-equiv=\"Content-Type\" content=\"text/html; charset=%s\">\n", CFG.www_charset);
fprintf(fa, "<META name=\"%s\" lang=\"en\" content=\"%s\">\n", CFG.www_author, outbuf);
} /* if area.Available */ fprintf(fa, "<HEAD><TITLE>%s</TITLE>\n", outbuf);
} fprintf(fa, "<LINK rel=stylesheet HREF=\"%s/css/files.css\">\n", CFG.www_url);
fprintf(fa, "<STYLE TYPE=\"text/css\">\n");
fclose(pAreas); fprintf(fa, "</STYLE>\n</HEAD>\n<BODY>\n");
pagelink(fa, Path, inArea, Current);
sort_index(&fdx); fprintf(fa, "<H1 align=center>File index of %s</H1><P>\n", outbuf);
for (tmp = fdx; tmp; tmp = tmp->next) fprintf(fa, "<TABLE align=center width=750>\n");
fwrite(&tmp->idx, sizeof(struct FILEIndex), 1, pIndex); fprintf(fa, "<TR><TH>Nr.</TH><TH>Filename</TH><TH>Date</TH><TH>Size</TH><TH>Downloads</TH><TH>Description</TH></TR>\n");
fclose(pIndex); return fa;
tidy_index(&fdx); }
return NULL;
Syslog('+', "Index Areas [%5d] Files [%5d]", iAreasNew, iTotal); }
if (!do_quiet) {
printf("\r \r");
fflush(stdout); void closepage(FILE *, char *, int, int);
} void closepage(FILE *fa, char *Path, int inArea, int Current)
{
free(sIndex); char *temp1, *temp2;
free(sAreas);
free(fAreas); if (fa == NULL)
RemoveSema((char *)"reqindex"); return;
temp1 = calloc(PATH_MAX, sizeof(char));
temp2 = calloc(PATH_MAX, sizeof(char));
fprintf(fa, "</TABLE><P>\n");
pagelink(fa, Path, inArea, lastfile);
fprintf(fa, "</BODY></HTML>\n");
fclose(fa);
if (lastfile) {
sprintf(temp1, "%s/index%d.html", Path, lastfile / CFG.www_files_page);
sprintf(temp2, "%s/index%d.temp", Path, lastfile / CFG.www_files_page);
} else {
sprintf(temp1, "%s/index.html", Path);
sprintf(temp2, "%s/index.temp", Path);
}
rename(temp2, temp1);
free(temp1);
free(temp2);
chmod(temp1, 0644);
fa = NULL;
}
/*
* Build a sorted index for the file request processor.
* Build html index pages for download.
*/
void Index(void)
{
FILE *pAreas, *pFile, *pIndex, *fa, *fm, *fp;
long i, iAreas, iAreasNew = 0, record, iSize = 0L, aSize = 0;
int iTotal = 0, AreaNr = 0, j, z, x = 0, Areas = 0;
int Total = 0, aTotal = 0, inArea = 0, filenr;
int fbAreas = 0, fbFiles = 0;
char *sAreas, *fAreas, *newdir = NULL, *sIndex, *fn, *temp;
char linebuf[1024], outbuf[1024];
time_t last = 0L, later;
Findex *fdx = NULL;
Findex *tmp;
struct FILEIndex idx;
sAreas = calloc(PATH_MAX, sizeof(char));
fAreas = calloc(PATH_MAX, sizeof(char));
sIndex = calloc(PATH_MAX, sizeof(char));
fn = calloc(PATH_MAX, sizeof(char));
temp = calloc(PATH_MAX, sizeof(char));
later = time(NULL) + 86400;
IsDoing("Index files");
if (!do_quiet) {
colour(3, 0);
printf("Create index files...\n");
}
sprintf(sAreas, "%s/etc/fareas.data", getenv("MBSE_ROOT"));
if ((pAreas = fopen (sAreas, "r")) == NULL) {
WriteError("$Can't open %s", sAreas);
die(0);
}
sprintf(sIndex, "%s/etc/request.index", getenv("MBSE_ROOT"));
if ((pIndex = fopen(sIndex, "w")) == NULL) {
WriteError("$Can't create %s", sIndex);
die(0);
}
fread(&areahdr, sizeof(areahdr), 1, pAreas);
fseek(pAreas, 0, SEEK_END);
iAreas = (ftell(pAreas) - areahdr.hdrsize) / areahdr.recsize;
/*
* Check if we are able to create the index.html pages in the
* download directories.
*/
if (strlen(CFG.ftp_base) && strlen(CFG.www_url) && strlen(CFG.www_author) && strlen(CFG.www_charset)) {
sprintf(fn, "%s/index.temp", CFG.ftp_base);
if ((fm = fopen(fn, "w")) == NULL) {
Syslog('+', "Can't open %s, skipping html pages creation", fn);
}
} else {
fm = NULL;
Syslog('+', "FTP/HTML not defined, skipping html pages creation");
}
if (fm) {
/*
* Because these web pages are dynamic, ie. they change everytime you
* receive new files and recreates these pages, extra HTTP headers are
* send to the client about these pages. It forbids proxy servers to
* cache these pages. The pages will expire within 24 hours. The pages
* also have an author name, this is the bbs name, and a content
* description for search engines. Automatic advertising.
*/
sprintf(linebuf, "File areas at %s", CFG.bbs_name);
html_massage(linebuf, outbuf);
fprintf(fm, "<HTML>\n");
fprintf(fm, "<META http-equiv=\"Expires\" content=\"%s\">\n", rfcdate(later));
fprintf(fm, "<META http-equiv=\"Cache-Control\" content=\"no-cache, must-revalidate\">\n");
fprintf(fm, "<META http-equiv=\"Content-Type\" content=\"text/html; charset=%s\">\n", CFG.www_charset);
fprintf(fm, "<META name=\"%s\" lang=\"en\" content=\"%s\">\n", CFG.www_author, outbuf);
fprintf(fm, "<HEAD><TITLE>%s</TITLE>\n", outbuf);
fprintf(fm, "<LINK rel=stylesheet HREF=\"%s/css/files.css\">\n", CFG.www_url);
fprintf(fm, "<STYLE TYPE=\"text/css\">\n");
fprintf(fm, "</STYLE>\n</HEAD>\n<BODY>\n");
fprintf(fm, "<H2 align=center>%s</H2><P>\n", outbuf);
fprintf(fm, "<TABLE align=center width=750>\n");
fprintf(fm, "<TR><TH>Area</TH><TH>Description</TH><TH>Files</TH><TH>Total size</TH><TH>Last added</TH></TR>\n");
}
for (i = 1; i <= iAreas; i++) {
fseek(pAreas, ((i-1) * areahdr.recsize) + areahdr.hdrsize, SEEK_SET);
fread(&area, areahdr.recsize, 1, pAreas);
if (area.Available) {
if (!diskfree(CFG.freespace))
die(101);
if (!do_quiet) {
printf("\r%4ld => %-44s \b\b\b\b", i, area.Name);
fflush(stdout);
}
/*
* Check if download directory exists,
* if not, create the directory.
*/
if (access(area.Path, W_OK) == -1) {
Syslog('!', "Create dir: %s", area.Path);
newdir = xstrcpy(area.Path);
newdir = xstrcat(newdir, (char *)"/");
mkdirs(newdir);
free(newdir);
newdir = NULL;
}
sprintf(fAreas, "%s/fdb/fdb%ld.data", getenv("MBSE_ROOT"), i);
/*
* Open the file database, if it doesn't exist,
* create an empty one.
*/
if ((pFile = fopen(fAreas, "r+")) == NULL) {
Syslog('!', "Creating new %s", fAreas);
if ((pFile = fopen(fAreas, "a+")) == NULL) {
WriteError("$Can't create %s", fAreas);
die(0);
}
}
/*
* Create file request index if requests are allowed in this area.
*/
if (area.FileReq) {
/*
* Now start creating the unsorted index.
*/
record = 0;
while (fread(&file, sizeof(file), 1, pFile) == 1) {
iTotal++;
if ((iTotal % 10) == 0)
Marker();
memset(&idx, 0, sizeof(idx));
sprintf(idx.Name, "%s", tu(file.Name));
sprintf(idx.LName, "%s", tu(file.LName));
idx.AreaNum = i;
idx.Record = record;
fill_index(idx, &fdx);
record++;
}
iAreasNew++;
} /* if area.Filereq */
/*
* Create files.bbs
*/
if (strlen(area.FilesBbs))
strcpy(temp, area.FilesBbs);
else
sprintf(temp, "%s/files.bbs", area.Path);
if ((fp = fopen(temp, "w")) == NULL) {
WriteError("$Can't create %s", temp);
} else {
fseek(pFile, 0, SEEK_SET);
fbAreas++;
while (fread(&file, sizeof(file), 1, pFile) == 1) {
if ((!file.Deleted) && (!file.Missing)) {
fbFiles++;
fprintf(fp, "%-12s %s\r\n", file.Name, file.Desc[0]);
for (j = 1; j < 25; j++)
if (strlen(file.Desc[j]))
fprintf(fp, " +%s\r\n", file.Desc[j]);
}
}
fclose(fp);
}
/*
* Create 00index file and index.html pages in each available download area.
*/
if (!area.CDrom && fm && (strncmp(CFG.ftp_base, area.Path, strlen(CFG.ftp_base)) == 0)) {
sprintf(temp, "%s/00index", area.Path);
if ((fp = fopen(temp, "w")) == NULL) {
WriteError("$Can't create %s", temp);
} else {
fseek(pFile, 0, SEEK_SET);
Areas++;
inArea = 0;
while (fread(&file, sizeof(file), 1, pFile) == 1) {
if ((!file.Deleted) && (!file.Missing))
inArea++;
}
fseek(pFile, 0, SEEK_SET);
aSize = 0L;
aTotal = 0;
last = 0L;
fa = newpage(area.Path, area.Name, later, inArea, aTotal);
while (fread(&file, sizeof(file), 1, pFile) == 1) {
if ((!file.Deleted) && (!file.Missing)) {
/*
* The next is to reduce system load
*/
x++;
Total++;
aTotal++;
if (CFG.slow_util && do_quiet && ((x % 3) == 0))
usleep(1);
for (z = 0; z <= 25; z++) {
if (strlen(file.Desc[z])) {
if (z == 0)
fprintf(fp, "%-12s %7luK %s ", file.Name, (long)(file.Size / 1024),
StrDateDMY(file.UploadDate));
else
fprintf(fp, " ");
if ((file.Desc[z][0] == '@') && (file.Desc[z][1] == 'X'))
fprintf(fp, "%s\n", file.Desc[z]+4);
else
fprintf(fp, "%s\n", file.Desc[z]);
}
}
fprintf(fa, "<TR><TD align=right valign=top>%d</TD>", aTotal);
/*
* Check if this is a .gif or .jpg file, if so then
* check if a thumbnail file exists. If not try to
* create a thumbnail file to add to the html listing.
*/
if (strstr(file.LName, ".gif") || strstr(file.LName, ".jpg")) {
sprintf(linebuf, "%s/%s", area.Path, file.LName);
sprintf(outbuf, "%s/.%s", area.Path, file.LName);
if (file_exist(outbuf, R_OK)) {
if ((j = execute(CFG.www_convert, linebuf, outbuf,
(char *)"/dev/null", (char *)"/dev/null", (char *)"/dev/null"))) {
Syslog('+', "Failed to create thumbnail for %s, rc=% d", file.LName, j);
}
}
fprintf(fa, "<TD align=center valign=top><A HREF=\"%s/%s%s/%s\">",
CFG.www_url, CFG.www_link2ftp,
area.Path+strlen(CFG.ftp_base), file.LName);
fprintf(fa, "<IMG SRC=\"%s/%s%s/.%s\" ALT=\"%s\" BORDER=0>",
CFG.www_url, CFG.www_link2ftp,
area.Path+strlen(CFG.ftp_base), file.LName, file.LName);
fprintf(fa, "</A></TD>");
} else {
fprintf(fa, "<TD valign=top><A HREF=\"%s/%s%s/%s\">%s</A></TD>",
CFG.www_url, CFG.www_link2ftp,
area.Path+strlen(CFG.ftp_base), file.LName, file.LName);
}
fprintf(fa, "<TD valign=top>%s</TD>", StrDateDMY(file.FileDate));
fprintf(fa, "<TD align=right valign=top>%lu Kb.</TD>",
(long)(file.Size / 1024));
fprintf(fa, "<TD valign=top>%8ld</TD>",
file.TimesDL + file.TimesFTP + file.TimesReq);
fprintf(fa, "<TD><PRE>");
for (j = 0; j < 25; j++)
if (strlen(file.Desc[j])) {
if (j)
fprintf(fa, "\n");
sprintf(linebuf, "%s", strkconv(file.Desc[j], CHRS_DEFAULT_FTN, CHRS_DEFAULT_RFC));
html_massage(linebuf, outbuf);
fprintf(fa, "%s", outbuf);
}
fprintf(fa, "</PRE></TD></TR>\n");
aSize += file.Size;
iSize += file.Size;
if (file.FileDate > last)
last = file.FileDate;
if ((aTotal % CFG.www_files_page) == 0) {
closepage(fa, area.Path, inArea, aTotal);
fa = newpage(area.Path, area.Name, later, inArea, aTotal);
}
} /* if (!file.deleted) */
}
closepage(fa, area.Path, inArea, aTotal);
fclose(fp);
/*
* If the time before there were more files in this area then now,
* the number of html pages may de decreased. We try to delete these
* files if they should exist.
*/
filenr = lastfile / CFG.www_files_page;
while (TRUE) {
filenr++;
sprintf(linebuf, "%s/index%d.html", area.Path, filenr);
if (unlink(linebuf))
break;
Syslog('+', "Removed obsolete %s", linebuf);
}
fprintf(fm, "<TR><TD align=right>%d</TD><TD><A HREF=\"%s/%s%s/index.html\">%s</A></TD>",
AreaNr, CFG.www_url, CFG.www_link2ftp, area.Path+strlen(CFG.ftp_base), area.Name);
fprintf(fm, "<TD align=right>%d</TD>", aTotal);
if (aSize > 1048576)
fprintf(fm, "<TD align=right>%ld Mb.</TD>", aSize / 1048576);
else
fprintf(fm, "<TD align=right>%ld Kb.</TD>", aSize / 1024);
if (last == 0L)
fprintf(fm, "<TD>&nbsp;</TD></TR>\n");
else
fprintf(fm, "<TD align=center>%s</TD></TR>\n", StrDateDMY(last));
}
}
fclose(pFile);
} /* if area.Available */
}
if (fm) {
fprintf(fm, "<TR align=right><TH>&nbsp;</TH><TH>Total</TH><TD>%d</TD><TD>%ld Mb.</TD><TD>&nbsp;</TD></TR>\n",
Total, iSize / 1048576);
fprintf(fm, "</TABLE><P>\n");
fprintf(fm, "<A HREF=\"/index.html\"><IMG SRC=\"/icons/%s\" ALT=\"%s\" BORDER=0>%s</A>\n",
CFG.www_icon_home, CFG.www_name_home, CFG.www_name_home);
fprintf(fm, "</BODY></HTML>\n");
fclose(fm);
sprintf(linebuf, "%s/index.html", CFG.ftp_base);
rename(fn, linebuf);
chmod(linebuf, 0644);
}
fclose(pAreas);
sort_index(&fdx);
for (tmp = fdx; tmp; tmp = tmp->next)
fwrite(&tmp->idx, sizeof(struct FILEIndex), 1, pIndex);
fclose(pIndex);
tidy_index(&fdx);
Syslog('+', "Index Areas [%5d] Files [%5d]", iAreasNew, iTotal);
Syslog('+', "Files Areas [%5d] Files [%5d]", fbAreas, fbFiles);
Syslog('+', "HTML Areas [%5d] Files [%5d]", Areas, Total);
if (!do_quiet) {
printf("\r \r");
fflush(stdout);
}
free(sIndex);
free(sAreas);
free(fAreas);
free(fn);
free(temp);
RemoveSema((char *)"reqindex");
} }

468
mbsebbs/mball.c
View File

@ -41,19 +41,11 @@
extern int do_quiet; /* Supress screen output */ extern int do_quiet; /* Supress screen output */
int do_zip = FALSE; /* Create ZIP archives */ int do_zip = FALSE; /* Create ZIP archives */
int do_list = FALSE; /* Create filelist */ int do_list = FALSE; /* Create filelist */
int do_index = FALSE; /* Create 00index files */
extern int e_pid; /* Pid of child */ extern int e_pid; /* Pid of child */
extern int show_log; /* Show logging */ extern int show_log; /* Show logging */
time_t t_start; /* Start time */ time_t t_start; /* Start time */
time_t t_end; /* End time */ time_t t_end; /* End time */
struct tm *l_date; /* Structure for Date */ struct tm *l_date; /* Structure for Date */
int lastfile; /* Last file number */
static char *wdays[]={(char *)"Sun",(char *)"Mon",(char *)"Tue",(char *)"Wed",(char *)"Thu",(char *)"Fri",(char *)"Sat"};
static char *months[]={(char *)"Jan",(char *)"Feb",(char *)"Mar",(char *)"Apr",(char *)"May",(char *)"Jun",
(char *)"Jul",(char *)"Aug",(char *)"Sep",(char *)"Oct",(char *)"Nov",(char *)"Dec"};
void ProgName() void ProgName()
@ -122,7 +114,6 @@ void Help()
printf(" Commands are:\n\n"); printf(" Commands are:\n\n");
colour(3, 0); colour(3, 0);
printf(" i index Create \"00index\" files and WWW pages in areas\n"); printf(" i index Create \"00index\" files and WWW pages in areas\n");
printf(" l list Create allfiles and newfiles lists\n");
colour(9, 0); colour(9, 0);
printf("\n Options are:\n\n"); printf("\n Options are:\n\n");
colour(3, 0); colour(3, 0);
@ -173,15 +164,13 @@ int main(int argc, char **argv)
if (!strncasecmp(argv[i], "l", 1)) if (!strncasecmp(argv[i], "l", 1))
do_list = TRUE; do_list = TRUE;
if (!strncasecmp(argv[i], "i", 1))
do_index = TRUE;
if (!strncasecmp(argv[i], "-q", 2)) if (!strncasecmp(argv[i], "-q", 2))
do_quiet = TRUE; do_quiet = TRUE;
if (!strncasecmp(argv[i], "-z", 2)) if (!strncasecmp(argv[i], "-z", 2))
do_zip = TRUE; do_zip = TRUE;
} }
if (!(do_list || do_index)) if (!do_list)
Help(); Help();
ProgName(); ProgName();
@ -202,13 +191,8 @@ int main(int argc, char **argv)
Masterlist(); Masterlist();
if (do_zip) if (do_zip)
MakeArc(); MakeArc();
}
if (do_index)
MakeIndex();
if (do_list)
CreateSema((char *)"mailin"); CreateSema((char *)"mailin");
}
if (!do_quiet) if (!do_quiet)
printf("Done!\n"); printf("Done!\n");
@ -219,454 +203,6 @@ int main(int argc, char **argv)
/*
* Translate ISO 8859-1 characters to named character entities
*/
void html_massage(char *, char *);
void html_massage(char *inbuf, char *outbuf)
{
char *inptr = inbuf;
char *outptr = outbuf;
memset(outbuf, 0, sizeof(outbuf));
while (*inptr) {
switch ((unsigned char)*inptr) {
case '"': sprintf(outptr, "&quot;"); break;
case '&': sprintf(outptr, "&amp;"); break;
case '<': sprintf(outptr, "&lt;"); break;
case '>': sprintf(outptr, "&gt;"); break;
case 160: sprintf(outptr, "&nbsp;"); break;
case 161: sprintf(outptr, "&iexcl;"); break;
case 162: sprintf(outptr, "&cent;"); break;
case 163: sprintf(outptr, "&pound;"); break;
case 164: sprintf(outptr, "&curren;"); break;
case 165: sprintf(outptr, "&yen;"); break;
case 166: sprintf(outptr, "&brvbar;"); break;
case 167: sprintf(outptr, "&sect;"); break;
case 168: sprintf(outptr, "&uml;"); break;
case 169: sprintf(outptr, "&copy;"); break;
case 170: sprintf(outptr, "&ordf;"); break;
case 171: sprintf(outptr, "&laquo;"); break;
case 172: sprintf(outptr, "&not;"); break;
case 173: sprintf(outptr, "&shy;"); break;
case 174: sprintf(outptr, "&reg;"); break;
case 175: sprintf(outptr, "&macr;"); break;
case 176: sprintf(outptr, "&deg;"); break;
case 177: sprintf(outptr, "&plumn;"); break;
case 178: sprintf(outptr, "&sup2;"); break;
case 179: sprintf(outptr, "&sup3;"); break;
case 180: sprintf(outptr, "&acute;"); break;
case 181: sprintf(outptr, "&micro;"); break;
case 182: sprintf(outptr, "&para;"); break;
case 183: sprintf(outptr, "&middot;"); break;
case 184: sprintf(outptr, "&cedil;"); break;
case 185: sprintf(outptr, "&supl;"); break;
case 186: sprintf(outptr, "&ordm;"); break;
case 187: sprintf(outptr, "&raquo;"); break;
case 188: sprintf(outptr, "&frac14;"); break;
case 189: sprintf(outptr, "&frac12;"); break;
case 190: sprintf(outptr, "&frac34;"); break;
case 191: sprintf(outptr, "&iquest;"); break;
case 192: sprintf(outptr, "&Agrave;"); break;
case 193: sprintf(outptr, "&Aacute;"); break;
case 194: sprintf(outptr, "&Acirc;"); break;
case 195: sprintf(outptr, "&Atilde;"); break;
case 196: sprintf(outptr, "&Auml;"); break;
case 197: sprintf(outptr, "&Aring;"); break;
case 198: sprintf(outptr, "&AElig;"); break;
case 199: sprintf(outptr, "&Ccedil;"); break;
case 200: sprintf(outptr, "&Egrave;"); break;
case 201: sprintf(outptr, "&Eacute;"); break;
case 202: sprintf(outptr, "&Ecirc;"); break;
case 203: sprintf(outptr, "&Euml;"); break;
case 204: sprintf(outptr, "&Igrave;"); break;
case 205: sprintf(outptr, "&Iacute;"); break;
case 206: sprintf(outptr, "&Icirc;"); break;
case 207: sprintf(outptr, "&Iuml;"); break;
case 208: sprintf(outptr, "&ETH;"); break;
case 209: sprintf(outptr, "&Ntilde;"); break;
case 210: sprintf(outptr, "&Ograve;"); break;
case 211: sprintf(outptr, "&Oacute;"); break;
case 212: sprintf(outptr, "&Ocirc;"); break;
case 213: sprintf(outptr, "&Otilde;"); break;
case 214: sprintf(outptr, "&Ouml;"); break;
case 215: sprintf(outptr, "&times;"); break;
case 216: sprintf(outptr, "&Oslash;"); break;
case 217: sprintf(outptr, "&Ugrave;"); break;
case 218: sprintf(outptr, "&Uacute;"); break;
case 219: sprintf(outptr, "&Ucirc;"); break;
case 220: sprintf(outptr, "&Uuml;"); break;
case 221: sprintf(outptr, "&Yacute;"); break;
case 222: sprintf(outptr, "&THORN;"); break;
case 223: sprintf(outptr, "&szlig;"); break;
case 224: sprintf(outptr, "&agrave;"); break;
case 225: sprintf(outptr, "&aacute;"); break;
case 226: sprintf(outptr, "&acirc;"); break;
case 227: sprintf(outptr, "&atilde;"); break;
case 228: sprintf(outptr, "&auml;"); break;
case 229: sprintf(outptr, "&aring;"); break;
case 230: sprintf(outptr, "&aelig;"); break;
case 231: sprintf(outptr, "&ccedil;"); break;
case 232: sprintf(outptr, "&egrave;"); break;
case 233: sprintf(outptr, "&eacute;"); break;
case 234: sprintf(outptr, "&ecirc;"); break;
case 235: sprintf(outptr, "&euml;"); break;
case 236: sprintf(outptr, "&igrave;"); break;
case 237: sprintf(outptr, "&iacute;"); break;
case 238: sprintf(outptr, "&icirc;"); break;
case 239: sprintf(outptr, "&iuml;"); break;
case 240: sprintf(outptr, "&eth;"); break;
case 241: sprintf(outptr, "&ntilde;"); break;
case 242: sprintf(outptr, "&ograve;"); break;
case 243: sprintf(outptr, "&oacute;"); break;
case 244: sprintf(outptr, "&ocirc;"); break;
case 245: sprintf(outptr, "&otilde;"); break;
case 246: sprintf(outptr, "&ouml;"); break;
case 247: sprintf(outptr, "&divide;"); break;
case 248: sprintf(outptr, "&oslash;"); break;
case 249: sprintf(outptr, "&ugrave;"); break;
case 250: sprintf(outptr, "&uacute;"); break;
case 251: sprintf(outptr, "&ucirc;"); break;
case 252: sprintf(outptr, "&uuml;"); break;
case 253: sprintf(outptr, "&yacute;"); break;
case 254: sprintf(outptr, "&thorn;"); break;
case 255: sprintf(outptr, "&yuml;"); break;
default: *outptr++ = *inptr; *outptr = '\0'; break;
}
while (*outptr)
outptr++;
inptr++;
}
*outptr = '\0';
}
char *rfcdate(time_t);
char *rfcdate(time_t now)
{
static char buf[40];
struct tm ptm;
ptm = *gmtime(&now);
sprintf(buf,"%s, %02d %s %04d %02d:%02d:%02d GMT",
wdays[ptm.tm_wday], ptm.tm_mday, months[ptm.tm_mon],
ptm.tm_year + 1900, ptm.tm_hour, ptm.tm_min, ptm.tm_sec);
return(buf);
}
void pagelink(FILE *, char *, int, int);
void pagelink(FILE *fa, char *Path, int inArea, int Current)
{
char nr[20];
fprintf(fa, "<DIV align=center>\n");
if ((Current >= CFG.www_files_page) && (inArea >= CFG.www_files_page)) {
if (((Current / CFG.www_files_page) - 1) > 0)
sprintf(nr, "%d", (Current / CFG.www_files_page) -1);
else
nr[0] = '\0';
fprintf(fa, "<A HREF=\"%s/%s%s/index%s.html\"><IMG SRC=\"/icons/%s\" ALT=\"%s\" BORDER=0>%s</A>&nbsp;\n",
CFG.www_url, CFG.www_link2ftp, Path+strlen(CFG.ftp_base), nr,
CFG.www_icon_prev, CFG.www_name_prev, CFG.www_name_prev);
}
fprintf(fa, "<A HREF=\"%s/index.html\"><IMG SRC=\"/icons/%s\" ALT=\"%s\" BORDER=0>%s</A>&nbsp;\n",
CFG.www_url, CFG.www_icon_home, CFG.www_name_home, CFG.www_name_home);
fprintf(fa, "<A HREF=\"%s/%s/index.html\"><IMG SRC=\"/icons/%s\" ALT=\"%s\" BORDER=0>%s</A>\n",
CFG.www_url, CFG.www_link2ftp, CFG.www_icon_back, CFG.www_name_back, CFG.www_name_back);
if ((Current < (inArea - CFG.www_files_page)) && (inArea >= CFG.www_files_page)) {
fprintf(fa, "&nbsp;<A HREF=\"%s/%s%s/index%d.html\"><IMG SRC=\"/icons/%s\" ALT=\"%s\" BORDER=0>%s</A>\n",
CFG.www_url, CFG.www_link2ftp, Path+strlen(CFG.ftp_base), (Current / CFG.www_files_page) + 1,
CFG.www_icon_next, CFG.www_name_next, CFG.www_name_next);
}
fprintf(fa, "</DIV><P>\n");
}
FILE *newpage(char *, char *, time_t, int, int);
FILE *newpage(char *Path, char *Name, time_t later, int inArea, int Current)
{
char linebuf[1024], outbuf[1024];
static FILE* fa;
lastfile = Current;
if (Current)
sprintf(linebuf, "%s/index%d.temp", Path, Current / CFG.www_files_page);
else
sprintf(linebuf, "%s/index.temp", Path);
if ((fa = fopen(linebuf, "w")) == NULL) {
WriteError("$Can't create %s", linebuf);
} else {
sprintf(linebuf, "%s", Name);
html_massage(linebuf, outbuf);
fprintf(fa, "<HTML>\n");
fprintf(fa, "<META http-equiv=\"Expires\" content=\"%s\">\n", rfcdate(later));
fprintf(fa, "<META http-equiv=\"Cache-Control\" content=\"no-cache, must-revalidate\">\n");
fprintf(fa, "<META http-equiv=\"Content-Type\" content=\"text/html; charset=%s\">\n", CFG.www_charset);
fprintf(fa, "<META name=\"%s\" lang=\"en\" content=\"%s\">\n", CFG.www_author, outbuf);
fprintf(fa, "<HEAD><TITLE>%s</TITLE>\n", outbuf);
fprintf(fa, "<LINK rel=stylesheet HREF=\"%s/css/files.css\">\n", CFG.www_url);
fprintf(fa, "<STYLE TYPE=\"text/css\">\n");
fprintf(fa, "</STYLE>\n</HEAD>\n<BODY>\n");
pagelink(fa, Path, inArea, Current);
fprintf(fa, "<H1 align=center>File index of %s</H1><P>\n", outbuf);
fprintf(fa, "<TABLE align=center width=750>\n");
fprintf(fa, "<TR><TH>Nr.</TH><TH>Filename</TH><TH>Date</TH><TH>Size</TH><TH>Downloads</TH><TH>Description</TH></TR>\n");
return fa;
}
return NULL;
}
void closepage(FILE *, char *, int, int);
void closepage(FILE *fa, char *Path, int inArea, int Current)
{
char *temp1, *temp2;
if (fa == NULL)
return;
temp1 = calloc(PATH_MAX, sizeof(char));
temp2 = calloc(PATH_MAX, sizeof(char));
fprintf(fa, "</TABLE><P>\n");
pagelink(fa, Path, inArea, lastfile);
fprintf(fa, "</BODY></HTML>\n");
fclose(fa);
if (lastfile) {
sprintf(temp1, "%s/index%d.html", Path, lastfile / CFG.www_files_page);
sprintf(temp2, "%s/index%d.temp", Path, lastfile / CFG.www_files_page);
} else {
sprintf(temp1, "%s/index.html", Path);
sprintf(temp2, "%s/index.temp", Path);
}
rename(temp2, temp1);
free(temp1);
free(temp2);
chmod(temp1, 0644);
fa = NULL;
}
void MakeIndex()
{
FILE *fp, *fm, *fa, *pAreas, *pFile;
int AreaNr = 0, j, z, x = 0, Areas = 0;
int iTotal = 0, aTotal = 0, inArea = 0;
long iSize = 0L, aSize = 0;
char *sAreas, *fAreas;
char temp[81], fn[PATH_MAX], linebuf[1024], outbuf[1024];
time_t last = 0L, later;
sAreas = calloc(PATH_MAX, sizeof(char));
fAreas = calloc(PATH_MAX, sizeof(char));
later = time(NULL) + 86400;
IsDoing("Create Indexes");
sprintf(sAreas, "%s/etc/fareas.data", getenv("MBSE_ROOT"));
if ((pAreas = fopen (sAreas, "r")) == NULL) {
WriteError("$Can't open File Areas File: %s", sAreas);
colour(7,0);
die(1);
}
fread(&areahdr, sizeof(areahdr), 1, pAreas);
if (!do_quiet)
printf("Processing index lists\n");
sprintf(fn, "%s/index.temp", CFG.ftp_base);
if ((fm = fopen(fn, "w")) == NULL) {
WriteError("$Can't create %s", fn);
die(0);
}
/*
* Because these web pages are dynamic, ie. they change everytime you
* receive new files and recreates these pages, extra HTTP headers are
* send to the client about these pages. It forbids proxy servers to
* cache these pages. The pages will expire within 24 hours. The pages
* also have an author name, this is the bbs name, and a content
* description for search engines. Automatic advertising.
*/
sprintf(linebuf, "File areas at %s", CFG.bbs_name);
html_massage(linebuf, outbuf);
fprintf(fm, "<HTML>\n");
fprintf(fm, "<META http-equiv=\"Expires\" content=\"%s\">\n", rfcdate(later));
fprintf(fm, "<META http-equiv=\"Cache-Control\" content=\"no-cache, must-revalidate\">\n");
fprintf(fm, "<META http-equiv=\"Content-Type\" content=\"text/html; charset=%s\">\n", CFG.www_charset);
fprintf(fm, "<META name=\"%s\" lang=\"en\" content=\"%s\">\n", CFG.www_author, outbuf);
fprintf(fm, "<HEAD><TITLE>%s</TITLE>\n", outbuf);
fprintf(fm, "<LINK rel=stylesheet HREF=\"%s/css/files.css\">\n", CFG.www_url);
fprintf(fm, "<STYLE TYPE=\"text/css\">\n");
fprintf(fm, "</STYLE>\n</HEAD>\n<BODY>\n");
fprintf(fm, "<H2 align=center>%s</H2><P>\n", outbuf);
fprintf(fm, "<TABLE align=center width=750>\n");
fprintf(fm, "<TR><TH>Area</TH><TH>Description</TH><TH>Files</TH><TH>Total size</TH><TH>Last added</TH></TR>\n");
while (fread(&area, areahdr.recsize, 1, pAreas) == 1) {
AreaNr++;
if (area.Available && !area.CDrom &&
(strncmp(CFG.ftp_base, area.Path, strlen(CFG.ftp_base)) == 0)) {
sprintf(temp, "%s/00index", area.Path);
if ((fp = fopen(temp, "w")) == NULL) {
WriteError("$Can't create %s", temp);
} else {
sprintf(fAreas, "%s/fdb/fdb%d.data", getenv("MBSE_ROOT"), AreaNr);
if ((pFile = fopen (fAreas, "r")) == NULL) {
WriteError("$Can't open Area %d (%s)! Skipping ...", AreaNr, area.Name);
} else {
Areas++;
inArea = 0;
while (fread(&file, sizeof(file), 1, pFile) == 1) {
if ((!file.Deleted) && (!file.Missing))
inArea++;
}
fseek(pFile, 0, SEEK_SET);
aSize = 0L;
aTotal = 0;
last = 0L;
fa = newpage(area.Path, area.Name, later, inArea, aTotal);
while (fread(&file, sizeof(file), 1, pFile) == 1) {
if ((!file.Deleted) && (!file.Missing)) {
/*
* The next is to reduce system
* loading.
*/
x++;
iTotal++;
aTotal++;
if (CFG.slow_util && do_quiet && ((x % 3) == 0))
usleep(1);
for (z = 0; z <= 25; z++) {
if (strlen(file.Desc[z])) {
if (z == 0)
fprintf(fp, "%-12s %7luK %s ", file.Name,
(long)(file.Size / 1024),
StrDateDMY(file.UploadDate));
else
fprintf(fp, " ");
if ((file.Desc[z][0] == '@') && (file.Desc[z][1] == 'X'))
fprintf(fp, "%s\n", file.Desc[z]+4);
else
fprintf(fp, "%s\n", file.Desc[z]);
}
}
fprintf(fa, "<TR><TD align=right valign=top>%d</TD>", aTotal);
/*
* Check if this is a .gif or .jpg file, if so then
* check if a thumbnail file exists. If not try to
* create a thumbnail file to add to the html listing.
*/
if (strstr(file.LName, ".gif") || strstr(file.LName, ".jpg")) {
sprintf(linebuf, "%s/%s", area.Path, file.LName);
sprintf(outbuf, "%s/.%s", area.Path, file.LName);
if (file_exist(outbuf, R_OK)) {
if ((j = execute(CFG.www_convert, linebuf, outbuf,
(char *)"/dev/null", (char *)"/dev/null",
(char *)"/dev/null"))) {
Syslog('+', "Failed to create thumbnail for %s, rc=%d", file.LName, j);
}
}
fprintf(fa, "<TD align=center valign=top><A HREF=\"%s/%s%s/%s\">",
CFG.www_url, CFG.www_link2ftp,
area.Path+strlen(CFG.ftp_base), file.LName);
fprintf(fa, "<IMG SRC=\"%s/%s%s/.%s\" ALT=\"%s\" BORDER=0>",
CFG.www_url, CFG.www_link2ftp,
area.Path+strlen(CFG.ftp_base), file.LName, file.LName);
fprintf(fa, "</A></TD>");
} else {
fprintf(fa, "<TD valign=top><A HREF=\"%s/%s%s/%s\">%s</A></TD>",
CFG.www_url, CFG.www_link2ftp,
area.Path+strlen(CFG.ftp_base), file.LName, file.LName);
}
fprintf(fa, "<TD valign=top>%s</TD>", StrDateDMY(file.FileDate));
fprintf(fa, "<TD align=right valign=top>%lu Kb.</TD>",
(long)(file.Size / 1024));
fprintf(fa, "<TD valign=top>%8ld</TD>",
file.TimesDL + file.TimesFTP + file.TimesReq);
fprintf(fa, "<TD><PRE>");
for (j = 0; j < 25; j++)
if (strlen(file.Desc[j])) {
if (j)
fprintf(fa, "\n");
sprintf(linebuf, "%s", strkconv(file.Desc[j], CHRS_DEFAULT_FTN, CHRS_DEFAULT_RFC));
html_massage(linebuf, outbuf);
fprintf(fa, "%s", outbuf);
}
fprintf(fa, "</PRE></TD></TR>\n");
aSize += file.Size;
iSize += file.Size;
if (file.FileDate > last)
last = file.FileDate;
if ((aTotal % CFG.www_files_page) == 0) {
closepage(fa, area.Path, inArea, aTotal);
fa = newpage(area.Path, area.Name, later, inArea, aTotal);
}
} /* if (!file.deletd) */
}
fclose(pFile);
closepage(fa, area.Path, inArea, aTotal);
}
fclose(fp);
fprintf(fm, "<TR><TD align=right>%d</TD><TD><A HREF=\"%s/%s%s/index.html\">%s</A></TD>",
AreaNr, CFG.www_url, CFG.www_link2ftp, area.Path+strlen(CFG.ftp_base), area.Name);
fprintf(fm, "<TD align=right>%d</TD>", aTotal);
if (aSize > 1048576)
fprintf(fm, "<TD align=right>%ld Mb.</TD>", aSize / 1048576);
else
fprintf(fm, "<TD align=right>%ld Kb.</TD>", aSize / 1024);
if (last == 0L)
fprintf(fm, "<TD>&nbsp;</TD></TR>\n");
else
fprintf(fm, "<TD align=center>%s</TD></TR>\n", StrDateDMY(last));
}
}
} /* End of While Loop Checking for Areas Done */
fprintf(fm, "<TR align=right><TH>&nbsp;</TH><TH>Total</TH><TD>%d</TD><TD>%ld Mb.</TD><TD>&nbsp;</TD></TR>\n",
iTotal, iSize / 1048576);
fprintf(fm, "</TABLE><P>\n");
fprintf(fm, "<A HREF=\"/index.html\"><IMG SRC=\"/icons/%s\" ALT=\"%s\" BORDER=0>%s</A>\n",
CFG.www_icon_home, CFG.www_name_home, CFG.www_name_home);
fprintf(fm, "</BODY></HTML>\n");
fclose(fm);
sprintf(linebuf, "%s/index.html", CFG.ftp_base);
rename(fn, linebuf);
chmod(linebuf, 0644);
fclose(pAreas);
free(sAreas);
free(fAreas);
Syslog('+', "Created %d indexes with %d files", Areas, iTotal);
}
void MidLine(char *txt, FILE *fp, int doit) void MidLine(char *txt, FILE *fp, int doit)
{ {
char temp[81]; char temp[81];

8
script/maint
View File

@ -1,8 +1,8 @@
#!/bin/sh #!/bin/sh
# #
# MBSE BBS Maintenance - Should be run from cron. # $Id$
# #
# 18-Mar-2000 MB. # MBSE BBS Maintenance - Should be run from cron.
if [ -z "$MBSE_ROOT" ]; then if [ -z "$MBSE_ROOT" ]; then
export MBSE_ROOT=`cat /etc/passwd | grep mbse: | awk -F ':' '{ print $6}'` export MBSE_ROOT=`cat /etc/passwd | grep mbse: | awk -F ':' '{ print $6}'`
@ -17,10 +17,8 @@ fi
$MBSE_ROOT/bin/mbuser pack kill 180 50 -quiet $MBSE_ROOT/bin/mbuser pack kill 180 50 -quiet
$MBSE_ROOT/bin/mbmsg kill pack link -quiet $MBSE_ROOT/bin/mbmsg kill pack link -quiet
$MBSE_ROOT/bin/mbfile kill check pack index -quiet $MBSE_ROOT/bin/mbfile kill check pack index -quiet
# $MBSE_ROOT/bin/mbfile kill check pack index web -quiet
$MBSE_ROOT/bin/mbtoberep >$MBSE_ROOT/doc/toberep.doc
$MBSE_ROOT/bin/mbaff announce filefind -quiet $MBSE_ROOT/bin/mbaff announce filefind -quiet
cd $MBSE_ROOT/tmp cd $MBSE_ROOT/tmp
$MBSE_ROOT/bin/mball list index -zip -quiet $MBSE_ROOT/bin/mball list -zip -quiet