summaryrefslogtreecommitdiffstats
path: root/mbbsd/file.c
blob: a59376738f8b1bc5cadd54886962ab49dfc723c9 (plain) (blame)
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
/* $Id$ */

#include "bbs.h"

/**
 * file.c 是針對以"行"為單位的檔案所定義的一些 operation。
 */

/**
 * 傳回 file 檔的行數
 * @param file
 */
int file_count_line(const char *file)
{
    FILE           *fp;
    int             count = 0;
    char            buf[200];

    if ((fp = fopen(file, "r"))) {
    while (fgets(buf, sizeof(buf), fp)) {
        if (strchr(buf, '\n') == NULL)
        continue;
        count++;
    }
    fclose(fp);
    }
    return count;
}

/**
 * 將 string append 到檔案 file 後端
 * @param file 要被 append 的檔
 * @param string
 * @return 成功傳回 0,失敗傳回 -1。
 */
int file_append_line(const char *file, const char *string)
{
    FILE *fp;
    if ((fp = fopen(file, "a")) == NULL)
    return -1;
    flock(fileno(fp), LOCK_EX);
    fputs(string, fp);
    flock(fileno(fp), LOCK_UN);
    fclose(fp);
    return 0;
}

#ifndef _BBS_UTIL_C_
/**
 * 從檔案 file 中刪除 prefix 為 string 的每一行。(小心 race)
 * @param file
 * @param string
 * @param case_sensitive 字串比對是否 case sensitive
 */
int file_delete_line(const char *file, const char *string, int  case_sensitive)
{
    FILE           *fp, *nfp = NULL;
    char            fnew[80];
    char            genbuf[STRLEN + 1];

    sprintf(fnew, "%s.%3.3X", file, (unsigned int)(random() & 0xFFF));
    if ((fp = fopen(file, "r")) && (nfp = fopen(fnew, "w"))) {
    int             length = strlen(string);

    while (fgets(genbuf, sizeof(genbuf), fp))
        if ((genbuf[0] > ' ')) {
        if (((case_sensitive && strncmp(genbuf, string, length)) ||
            (!case_sensitive && strncasecmp(genbuf, string, length))))
                fputs(genbuf, nfp);
        }
    Rename(fnew, file);
    }
    if(fp)
    fclose(fp);
    if(nfp)
    fclose(nfp);
    return 0;
}
#endif

/**
 * 傳回檔案 file 中是否有 string 這個字串。
 */
int file_exist_record(const char *file, const char *string)
{
    FILE           *fp;
    char            buf[STRLEN], *ptr;

    if ((fp = fopen(file, "r")) == NULL)
    return 0;

    while (fgets(buf, STRLEN, fp)) {
    if ((ptr = strtok(buf, str_space)) && !strcasecmp(ptr, string)) {
        fclose(fp);
        return 1;
    }
    }
    fclose(fp);
    return 0;
}

/**
 * 對每一筆 record 做 func 這件事。
 * @param file
 * @param func 處理每筆 record 的 handler,為一 function pointer。
 *        第一個參數是檔案中的一行,第二個參數為 info。
 * @param info 一個額外的參數。
 */
int file_foreach_entry(const char *file, int (*func)(char *, int), int info)
{
    char line[80];
    FILE *fp;

    if ((fp = fopen(file, "r")) == NULL)
    return -1;

    while (fgets(line, sizeof(line), fp)) {
    (*func)(line, info);
    }

    fclose(fp);
    return 0;
}