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
126
127
128
129
130
131
132
133
134
|
/* fib, but the cache is a directory of files
* cache/
* 0 -> 0
* 1 -> 1
* 2 -> 1
* 3 -> 2
* ...
* unix filesystem required
*/
#include <dirent.h>
#include <string.h>
#include <stdio.h>
#include <sys/stat.h>
#include <sys/types.h>
#include <fcntl.h>
#include <unistd.h>
#include <stdlib.h>
static const char CACHE_DIR[] = "cache";
static const int BUF_SIZE = 30;
static const int PATH_SIZE = 30;
static const int N_STR_SIZE = 30;
static const int LOF_INITIAL_SIZE = 1;
long read_from_cache(char* path) {
char buf[BUF_SIZE];
int fd = open(path, O_RDONLY);
if (fd == -1) {
close(fd);
return 0;
}
if (!read(fd, buf, BUF_SIZE)) {
close(fd);
return 0;
}
close(fd);
return strtol(buf, NULL, 10);
}
long write_to_cache(char* path, long result) {
char buf[BUF_SIZE];
int fd = open(path, O_CREAT | O_RDWR, S_IRUSR | S_IWUSR);
sprintf(buf, "%ld", result);
if (fd == -1) {
close(fd);
return 0;
}
if (!write(fd, buf, strlen(buf))) {
close(fd);
return 0;
}
close(fd);
return 1;
}
long init_cache() {
char path_to_0[PATH_SIZE];
char path_to_1[PATH_SIZE];
sprintf(path_to_0, "%s/%s", CACHE_DIR, "0");
sprintf(path_to_1, "%s/%s", CACHE_DIR, "1");
if (!write_to_cache(path_to_0, 0)) {
return 0;
}
if (!write_to_cache(path_to_1, 1)) {
return 0;
}
return 1;
}
long get_list_of_files(long** list_of_files, long curr_size) {
mkdir("cache", 0777);
struct dirent *d;
DIR* cache_dir = opendir(CACHE_DIR);
if (!cache_dir) {
closedir(cache_dir);
return 0;
}
init_cache();
while ((d = readdir(cache_dir)) != NULL) {
if (d->d_type == DT_REG) {
*((*list_of_files) + curr_size - 1) = strtol(d->d_name, NULL, 10);
curr_size++;
*list_of_files = realloc(*list_of_files, curr_size * sizeof(long));
}
}
closedir(cache_dir);
return curr_size - 1;
}
int is_in_cache(long* list_of_files, long size_of_lof, long n) {
for (int i = 0; i < size_of_lof; i++) {
if (list_of_files[i] == n) return 1;
}
return 0;
}
long fib(long n) {
char n_str[N_STR_SIZE];
char path[PATH_SIZE];
long* list_of_files = malloc(sizeof(long));
long size_of_lof = get_list_of_files(&list_of_files, LOF_INITIAL_SIZE);
sprintf(n_str, "%ld", n);
sprintf(path, "%s/%s", CACHE_DIR, n_str);
if (is_in_cache(list_of_files, size_of_lof, n)) {
free(list_of_files);
return read_from_cache(path);
}
free(list_of_files);
long to_cache = fib(n-1) + fib(n-2);
write_to_cache(path, to_cache);
return to_cache;
}
int main() {
printf("FIB RESULT: %ld\n", fib(13));
}
|
