1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
|
/* $Id$ */
#include <stdio.h>
#include <stdlib.h>
#include <dirent.h>
#include <fcntl.h>
#include <time.h>
#include <string.h>
#include <unistd.h>
#include <sys/param.h>
#include <sys/types.h>
#include <sys/stat.h>
#include "config.h"
#include "pttstruct.h"
#include "proto.h"
int dirselect(struct dirent *dir) {
return strchr("MDSGH", dir->d_name[0]) && dir->d_name[1] == '.';
}
int mysort(const void *a, const void *b)
{
return atoi(((*((struct dirent **)a))->d_name+2))-atoi(((*((struct dirent **)b))->d_name+2));
}
int main(int argc, char **argv) {
int k;
if(argc < 2) {
fprintf(stderr, "Usage: %s <path1> [<path2> ...]\n", argv[0]);
return 1;
}
for(k = 1; k < argc; k++) {
int fdir, count, total;
char *ptr, path[MAXPATHLEN];
struct dirent **dirlist;
sprintf(path, "%s/.DIR", argv[k]);
if((fdir = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644)) == -1) {
perror(path);
continue;
}
if((total = scandir(argv[k], &dirlist, dirselect, mysort)) == -1) {
fprintf(stderr, "scandir failed!\n");
close(fdir);
continue;
}
ptr = strrchr(path, '.');
for(count = 0; count < total; count++) {
FILE *fp;
struct stat st;
strcpy(ptr, dirlist[count]->d_name);
if(stat(path, &st) == 0 && st.st_size > 0 &&
(fp = fopen(path, "r")) != NULL) {
char buf[512];
time_t filetime;
fileheader_t fhdr;
memset(&fhdr, 0, sizeof(fhdr));
/* set file name */
strcpy(fhdr.filename, dirlist[count]->d_name);
/* set file time */
filetime = atoi(dirlist[count]->d_name + 2);
if(filetime > 740000000) {
struct tm *ptime = localtime(&filetime);
sprintf(fhdr.date, "%2d/%02d", ptime->tm_mon + 1,
ptime->tm_mday);
} else
strcpy(fhdr.date, " ");
/* set file mode */
fhdr.filemode = FILE_READ;
/* set article owner */
fgets(buf, sizeof(buf), fp);
if(strncmp(buf, "作者: ", 6) == 0 ||
strncmp(buf, "發信人: ", 8) == 0) {
int i, j;
for(i = 5; buf[i] != ' '; i++);
for(; buf[i] == ' '; i++);
for(j = i + 1; buf[j] != ' '; j++);
j -= i;
if(j > IDLEN + 1)
j = IDLEN + 1;
strncpy(fhdr.owner, buf + i, j);
fhdr.owner[IDLEN + 1] = '\0';
strtok(fhdr.owner, " .@\t\n\r");
if(strtok(NULL, " .@\t\n\r"))
strcat(fhdr.owner, ".");
/* set article title */
while(fgets(buf, sizeof(buf), fp))
if(strncmp(buf, "標題: ", 6) == 0 ||
strncmp(buf, "標 題: ", 8) == 0) {
for(i = 5; buf[i] != ' '; i++);
for(; buf[i] == ' '; i++);
strtok(buf + i-1, "\n");
strncpy(fhdr.title, buf + i, TTLEN);
fhdr.title[TTLEN] = '\0';
break;
}
} else if(strncmp(buf, "⊙ 歡迎光臨", 11) == 0) {
strcpy(fhdr.title, "會議記錄");
} else if(strncmp(buf, "\33[1;33;46m★", 12) == 0||
strncmp(buf, "To", 2) == 0) {
strcpy(fhdr.title, "熱線記錄");
}
// if(!fhdr.title[0])
// strcpy(fhdr.title, dirlist[count]->d_name);
fclose(fp);
write(fdir, &fhdr, sizeof(fhdr));
}
}
close(fdir);
for(total--; total >= 0; total--)
free(dirlist[total]);
free(dirlist);
}
return 0;
}
|
