Initial revision

git-svn-id: http://opensvn.csie.org/pttbbs/pttbbs/trunk/pttbbs@1 63ad8ddf-47c3-0310-b6dd-a9e9d9715204

1 files changed, 263 insertions, 0 deletions

diff --git a/util/mandex.c b/util/mandex.c
new file mode 100644
index 00000000..9373f814
--- /dev/null
+++ b/util/mandex.c
@@ -0,0 +1,263 @@
+/* $Id: mandex.c,v 1.1 2002/03/07 15:13:46 in2 Exp $ */
+
+/*
+  target : 精華區索引程式 (man index)
+  
+  syntax : mandex [board]
+  [board] 有值 ==> 只跑該 board
+  空的 ==> 所有的 boards 都跑
+*/
+
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <dirent.h>
+#include <unistd.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include "config.h"
+#include "pttstruct.h"
+#include "util.h"
+
+#ifndef MAXPATHLEN
+#define MAXPATHLEN  1024
+#endif
+
+extern int numboards;
+extern boardheader_t *bcache;
+
+char color[4][10] =
+{"", "", "", ""};
+char fn_index[] = ".index";
+char fn_new[] = ".index.new";
+char index_title[] = "◎ 精華區目錄索引";
+FILE *fndx;
+int ndir;
+int nfile;
+int index_pos;
+char topdir[128], pgem[512], pndx[512];
+
+int nb = 0;			/* board 數 */
+
+struct boardinfo
+{
+    char bname[40];
+    int ndir;
+    int nfile;
+    int k;
+};
+typedef struct boardinfo boardinfo;
+
+boardinfo
+board[MAX_BOARD];
+
+int k_cmp(b, a)
+    boardinfo *b, *a;
+{
+    return ((a->k / 100 + a->ndir + a->nfile) - (b->k / 100 + b->ndir + b->nfile));
+}
+
+int dashd(fname)
+    char *fname;
+{
+    struct stat st;
+
+    return (stat(fname, &st) == 0 && S_ISDIR(st.st_mode));
+}
+
+
+/* visit the hierarchy recursively */
+
+void
+mandex(level, num_header, fpath)
+    int level;
+    char *fpath, *num_header;
+{
+    FILE *fgem;
+    char *fname, buf[256];
+    struct stat st;
+    int count;
+    fileheader_t fhdr;
+
+    fgem = fopen(fpath, "r+");
+    if (fgem == NULL)
+	return;
+
+    fname = strrchr(fpath, '.');
+    if (!level)
+    {
+
+        printf("%s\r\n",fpath);
+	strcpy(pgem, fpath);
+
+	strcpy(fname, fn_new);
+	fndx = fopen(fpath, "w");
+	if (fndx == NULL)
+	{
+	    fclose(fgem);
+	    return;
+	}
+	fprintf(fndx, "序號\t\t\t精華區主題\n"
+		"──────────────────────────────────────\n");
+	strcpy(pndx, fpath);
+	ndir = nfile = 0;
+	index_pos = -1;
+    }
+
+    count = 0;
+    while (fread(&fhdr, sizeof(fhdr), 1, fgem) == 1)
+    {
+	strcpy(fname, fhdr.filename);
+        if (!fname[0]) continue;
+	if (!level && !strncmp(fhdr.title, index_title, strlen(index_title))
+	    && index_pos < 0)
+	{
+	    index_pos = count;
+	    unlink(fpath);
+	}
+	st.st_size = 0;
+	stat(fpath, &st);
+
+	sprintf(buf, "%.*s%s%3d. %s \n",
+
+		11 * level, num_header, color[level % 4], ++count, fhdr.title);	/* Ptt */
+	fputs(buf, fndx);
+	if (dashd(fpath))
+	{
+	    ++ndir;
+	    if (*fhdr.title != '#' && level < 10)
+	    {
+		strcat(fpath, "/.DIR");
+		mandex(level + 1, buf, fpath);
+	    }
+	}
+	else
+	    ++nfile;
+    }
+
+    if (!level)
+    {
+	char lpath[MAXPATHLEN];
+
+	fclose(fndx);
+	strcpy(fname, fn_index);
+	rename(pndx, fpath);
+	strcpy(pndx, fpath);
+
+	sprintf(buf, "%s.new", pgem);
+	if (index_pos >= 0 || (fndx = fopen(buf, "w")))
+	{
+	    fname[-1] = 0;
+	    stamplink(fpath, &fhdr);
+	    unlink(fpath);
+	    strcpy(fhdr.owner, "每天自動更新");
+	    sprintf(lpath, "%s/%s", topdir, pndx);
+	    st.st_size = 0;
+	    stat(lpath, &st);
+	    sprintf(fhdr.title, "%s (%.1fk)", index_title, st.st_size / 1024.);
+	    board[nb].k = st.st_size;	/* Ptt */
+	    printf("(%d)[%dK]", nb, board[nb].k);
+	    symlink(lpath, fpath);
+	    if (index_pos < 0)
+	    {
+		fwrite(&fhdr, sizeof(fhdr), 1, fndx);
+		rewind(fgem);
+		while (fread(&fhdr, sizeof(fhdr), 1, fgem) == 1)
+		    fwrite(&fhdr, sizeof(fhdr), 1, fndx);
+		fclose(fndx);
+		fclose(fgem);
+		rename(buf, pgem);
+	    }
+	    else
+	    {
+		fseek(fgem, index_pos * sizeof(fhdr), 0);
+		fwrite(&fhdr, sizeof(fhdr), 1, fgem);
+		fclose(fgem);
+	    }
+	    return;
+	}
+    }
+    fclose(fgem);
+}
+
+
+int main(int argc, char* argv[]){
+    boardheader_t *bptr;
+    DIR *dirp;
+    struct dirent *de;
+    int ch, n;
+    int place = 0;
+    char *fname, fpath[MAXPATHLEN];
+    
+    resolve_boards();
+    nb = 0;
+    if(argc == 1){
+	puts("Creating the whole index...");
+	chdir(strcpy(topdir, BBSHOME));
+	strcpy(fpath, "man/.DIR");
+	mandex(0, "", fpath);
+    }
+    
+    
+    chdir(strcpy(topdir, BBSHOME "/man/boards"));
+
+    if(argc > 1) {
+	sprintf(fpath, "%s/.DIR",  argv[1]);
+	mandex(0, "", fpath);
+	exit(0);
+    }
+
+    /* process all boards */
+	
+	if(!(dirp = opendir(topdir))) {
+	    printf("## unable to enter [man/boards]\n");
+	    exit(-1);
+	}
+	
+	while((de = readdir(dirp))){
+	    fname = de->d_name;
+	    ch = fname[0];
+	    if (ch != '.'){
+		board[nb].k = 0;
+		strcpy(board[nb].bname, fname);
+		sprintf(fpath, "%s/.DIR", fname);
+		mandex(0, "", fpath);
+		printf("%-14sd: %d\tf: %d\n", fname, ndir, nfile); /* report */
+		board[nb].ndir = ndir;
+		board[nb].nfile = nfile;
+		if (board[nb].k)
+		    nb++;
+	    }
+	}
+	closedir(dirp);
+
+    qsort(board, nb, sizeof(boardinfo), k_cmp);
+    
+    if (!(fndx = fopen(BBSHOME "/etc/topboardman", "w")))
+	exit(0);
+    
+    fprintf(fndx, "排名        看 版  目錄數   檔案數"
+	    "     byte數   總 分     版   主          \n");
+    
+    for (ch = 0; ch < nb; ch++){
+	for (n = 0; n < numboards; n++){
+	    bptr = &bcache[n];
+	    if (!strcmp(bptr->brdname, board[ch].bname))
+		break;
+	}
+	if (n >= numboards ||
+	    (bptr->brdattr & (BRD_BAD | BRD_NOCOUNT | BRD_HIDE))) 
+	    continue;
+	if (board[ch].ndir + board[ch].nfile < 5)
+	    break;
+	fprintf(fndx, "%3d.%15s %5d %7d %10d   %6d %-24.24s\n",
+		++place,
+		board[ch].bname,
+		board[ch].ndir, board[ch].nfile, board[ch].k
+		,board[ch].k / 100 + board[ch].nfile + board[ch].ndir
+		,bptr->BM);
+    }
+    fclose(fndx);
+    exit(0);
+}