/[LeafOK_CVS]/lbbs/src/file_loader.c
ViewVC logotype

Contents of /lbbs/src/file_loader.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.14 - (show annotations)
Mon Jun 16 01:36:56 2025 UTC (9 months ago) by sysadm
Branch: MAIN
Changes since 1.13: +1 -1 lines
Content type: text/x-csrc
Fix issue of display / edit control sequence in editor

1 /***************************************************************************
2 file_loader.c - description
3 -------------------
4 Copyright : (C) 2004-2025 by Leaflet
5 Email : leaflet@leafok.com
6 ***************************************************************************/
7
8 /***************************************************************************
9 * *
10 * This program is free software; you can redistribute it and/or modify *
11 * it under the terms of the GNU General Public License as published by *
12 * the Free Software Foundation; either version 3 of the License, or *
13 * (at your option) any later version. *
14 * *
15 ***************************************************************************/
16
17 #include "file_loader.h"
18 #include "trie_dict.h"
19 #include "str_process.h"
20 #include "log.h"
21 #include <fcntl.h>
22 #include <errno.h>
23 #include <unistd.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <time.h>
27 #include <sys/mman.h>
28 #include <sys/stat.h>
29 #include <sys/shm.h>
30 #include <sys/ipc.h>
31
32 struct shm_header_t
33 {
34 int shmid;
35 size_t data_len;
36 long line_total;
37 };
38
39 static TRIE_NODE *p_trie_file_dict = NULL;
40
41 int file_loader_init()
42 {
43 if (p_trie_file_dict != NULL)
44 {
45 log_error("File loader already initialized\n");
46 return -1;
47 }
48
49 p_trie_file_dict = trie_dict_create();
50 if (p_trie_file_dict == NULL)
51 {
52 log_error("trie_dict_create() error\n");
53 return -2;
54 }
55
56 return 0;
57 }
58
59 static void trie_file_dict_cleanup_cb(const char *filename, int64_t value)
60 {
61 int shmid = (int)value;
62
63 if (shmctl(shmid, IPC_RMID, NULL) == -1)
64 {
65 log_error("shmctl(shmid=%d, IPC_RMID) error (%d)\n", shmid, errno);
66 }
67 }
68
69 void file_loader_cleanup(void)
70 {
71 if (p_trie_file_dict == NULL)
72 {
73 return;
74 }
75
76 trie_dict_traverse(p_trie_file_dict, trie_file_dict_cleanup_cb);
77 trie_dict_destroy(p_trie_file_dict);
78
79 p_trie_file_dict = NULL;
80 }
81
82 int load_file(const char *filename)
83 {
84 int fd;
85 struct stat sb;
86 void *p_data;
87 size_t data_len;
88 int proj_id;
89 key_t key;
90 size_t size;
91 int shmid;
92 void *p_shm;
93 long line_total;
94 long line_offsets[MAX_SPLIT_FILE_LINES];
95 long *p_line_offsets;
96 int64_t shmid_old;
97
98 if ((fd = open(filename, O_RDONLY)) < 0)
99 {
100 log_error("open(%s) error (%d)\n", filename, errno);
101 return -1;
102 }
103
104 if (fstat(fd, &sb) < 0)
105 {
106 log_error("fstat(fd) error (%d)\n", errno);
107 return -1;
108 }
109
110 data_len = (size_t)sb.st_size;
111 p_data = mmap(NULL, data_len, PROT_READ, MAP_SHARED, fd, 0L);
112 if (p_data == MAP_FAILED)
113 {
114 log_error("mmap() error (%d)\n", errno);
115 return -2;
116 }
117
118 if (close(fd) < 0)
119 {
120 log_error("close(fd) error (%d)\n", errno);
121 return -1;
122 }
123
124 line_total = split_data_lines(p_data, SCREEN_COLS, line_offsets, MAX_SPLIT_FILE_LINES, 1);
125
126 // Allocate shared memory
127 proj_id = (int)(time(NULL) % getpid());
128 key = ftok(filename, proj_id);
129 if (key == -1)
130 {
131 log_error("ftok(%s %d) error (%d)\n", filename, proj_id, errno);
132 return -2;
133 }
134
135 size = sizeof(struct shm_header_t) + data_len + 1 + sizeof(long) * (size_t)(line_total + 1);
136 shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600);
137 if (shmid == -1)
138 {
139 log_error("shmget(size = %d) error (%d)\n", size, errno);
140 return -3;
141 }
142 p_shm = shmat(shmid, NULL, 0);
143 if (p_shm == (void *)-1)
144 {
145 log_error("shmat(shmid=%d) error (%d)\n", shmid, errno);
146 return -3;
147 }
148
149 ((struct shm_header_t *)p_shm)->shmid = shmid;
150 ((struct shm_header_t *)p_shm)->data_len = data_len;
151 ((struct shm_header_t *)p_shm)->line_total = line_total;
152 memcpy(p_shm + sizeof(struct shm_header_t), p_data, data_len);
153
154 if (munmap(p_data, data_len) < 0)
155 {
156 log_error("munmap() error (%d)\n", errno);
157 return -2;
158 }
159
160 p_data = p_shm + sizeof(struct shm_header_t);
161 p_line_offsets = p_data + data_len + 1;
162 memcpy(p_line_offsets, line_offsets, sizeof(long) * (size_t)(line_total + 1));
163
164 if (shmdt(p_shm) == -1)
165 {
166 log_error("shmdt(shmid=%d) error (%d)\n", shmid, errno);
167 return -3;
168 }
169
170 if (trie_dict_get(p_trie_file_dict, filename, &shmid_old) == 1)
171 {
172 if (shmctl((int)shmid_old, IPC_RMID, NULL) == -1)
173 {
174 log_error("shmctl(shmid=%d, IPC_RMID) error (%d)\n", (int)shmid_old, errno);
175 return -2;
176 }
177 }
178
179 if (trie_dict_set(p_trie_file_dict, filename, (int64_t)shmid) != 1)
180 {
181 log_error("trie_dict_set(%s) error\n", filename);
182
183 if (shmctl(shmid, IPC_RMID, NULL) == -1)
184 {
185 log_error("shmctl(shmid=%d, IPC_RMID) error (%d)\n", shmid, errno);
186 }
187
188 return -4;
189 }
190
191 return 0;
192 }
193
194 int unload_file(const char *filename)
195 {
196 int64_t shmid;
197
198 if (trie_dict_get(p_trie_file_dict, filename, &shmid) != 1)
199 {
200 log_error("trie_dict_get(%s) not found\n", filename);
201 return -1;
202 }
203
204 if (shmctl((int)shmid, IPC_RMID, NULL) == -1)
205 {
206 log_error("shmctl(shmid=%d, IPC_RMID) error (%d)\n", (int)shmid, errno);
207 }
208
209 if (trie_dict_del(p_trie_file_dict, filename) != 1)
210 {
211 log_error("trie_dict_del(%s) error\n", filename);
212 return -2;
213 }
214
215 return 0;
216 }
217
218 const void *get_file_shm_readonly(const char *filename, size_t *p_data_len, long *p_line_total, const void **pp_data, const long **pp_line_offsets)
219 {
220 int64_t shmid;
221 const void *p_shm;
222
223 if (p_trie_file_dict == NULL)
224 {
225 log_error("File loader not initialized\n");
226 return NULL;
227 }
228
229 if (trie_dict_get(p_trie_file_dict, filename, &shmid) != 1) // Not exist
230 {
231 log_error("trie_dict_get(%s) not found\n", filename);
232 return NULL;
233 }
234
235 p_shm = shmat((int)shmid, NULL, SHM_RDONLY);
236 if (p_shm == (void *)-1)
237 {
238 log_error("shmat(shmid=%d) error (%d)\n", (int)shmid, errno);
239 return NULL;
240 }
241
242 *p_data_len = ((struct shm_header_t *)p_shm)->data_len;
243 *p_line_total = ((struct shm_header_t *)p_shm)->line_total;
244 *pp_data = p_shm + sizeof(struct shm_header_t);
245 *pp_line_offsets = *pp_data + *p_data_len + 1;
246
247 return p_shm;
248 }
249
250 int detach_file_shm(const void *p_shm)
251 {
252 if (p_shm == NULL)
253 {
254 return -2;
255 }
256
257 if (shmdt(p_shm) == -1)
258 {
259 log_error("shmdt() error (%d)\n", errno);
260 return -1;
261 }
262
263 return 0;
264 }

webmaster@leafok.com
ViewVC Help
Powered by ViewVC 1.3.0-beta1