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

Diff of /lbbs/src/section_list.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.3 by sysadm, Wed May 21 06:17:52 2025 UTC Revision 1.34 by sysadm, Sat Jun 21 02:15:18 2025 UTC
# Line 14  Line 14 
14   *                                                                         *   *                                                                         *
15   ***************************************************************************/   ***************************************************************************/
16    
 #include "section_list.h"  
17  #include "log.h"  #include "log.h"
18  #include "io.h"  #include "section_list.h"
19  #include "trie_dict.h"  #include "trie_dict.h"
20    #include <errno.h>
21    #include <signal.h>
22  #include <stdio.h>  #include <stdio.h>
23    #include <stdlib.h>
24  #include <string.h>  #include <string.h>
 #include <signal.h>  
25  #include <unistd.h>  #include <unistd.h>
 #include <stdlib.h>  
 #include <errno.h>  
 #include <sys/shm.h>  
26  #include <sys/ipc.h>  #include <sys/ipc.h>
27    #include <sys/param.h>
28    #include <sys/sem.h>
29    #include <sys/shm.h>
30    
31  // ARTICLE_BLOCK_PER_SHM * ARTICLE_BLOCK_SHM_COUNT_LIMIT should be  #ifdef _SEM_SEMUN_UNDEFINED
32  // no less than BBS_article_block_limit_per_section * BBS_max_section,  union semun
33  // in order to allocate enough memory for blocks  {
34  #define ARTICLE_BLOCK_PER_SHM 50 // sizeof(ARTICLE_BLOCK) * ARTICLE_BLOCK_PER_SHM is the size of each shm segment to allocate          int val;                           /* Value for SETVAL */
35  #define ARTICLE_BLOCK_SHM_COUNT_LIMIT 256 // limited by length (8-bit) of proj_id in ftok(path, proj_id)          struct semid_ds *buf;  /* Buffer for IPC_STAT, IPC_SET */
36            unsigned short *array; /* Array for GETALL, SETALL */
37            struct seminfo *__buf; /* Buffer for IPC_INFO
38                                                              (Linux-specific) */
39    };
40    #endif // #ifdef _SEM_SEMUN_UNDEFINED
41    
42    #define SECTION_TRY_LOCK_WAIT_TIME 1 // second
43    #define SECTION_TRY_LOCK_TIMES 10
44    
45    #define ARTICLE_BLOCK_PER_SHM 1000                // sizeof(ARTICLE_BLOCK) * ARTICLE_BLOCK_PER_SHM is the size of each shm segment to allocate
46    #define ARTICLE_BLOCK_SHM_COUNT_LIMIT 80 // limited by length (8-bit) of proj_id in ftok(path, proj_id)
47    #define ARTICLE_BLOCK_PER_POOL (ARTICLE_BLOCK_PER_SHM * ARTICLE_BLOCK_SHM_COUNT_LIMIT)
48    
49    #define CALCULATE_PAGE_THRESHOLD 100 // Adjust to tune performance of moving topic between sections
50    
51    #define SID_STR_LEN 5 // 32-bit + NULL
52    
53  struct article_block_shm_t  struct article_block_t
54    {
55            ARTICLE articles[ARTICLE_PER_BLOCK];
56            int article_count;
57            struct article_block_t *p_next_block;
58    };
59    typedef struct article_block_t ARTICLE_BLOCK;
60    
61    struct article_block_pool_t
62  {  {
63          int shmid;          int shmid;
64          void *p_shm;          struct
65            {
66                    int shmid;
67                    void *p_shm;
68            } shm_pool[ARTICLE_BLOCK_SHM_COUNT_LIMIT];
69            int shm_count;
70            ARTICLE_BLOCK *p_block_free_list;
71            ARTICLE_BLOCK *p_block[ARTICLE_BLOCK_PER_POOL];
72            int block_count;
73  };  };
74  typedef struct article_block_shm_t ARTICLE_BLOCK_SHM;  typedef struct article_block_pool_t ARTICLE_BLOCK_POOL;
75    
76  static ARTICLE_BLOCK_SHM *p_article_block_shm_pool;  static ARTICLE_BLOCK_POOL *p_article_block_pool = NULL;
 static int article_block_shm_count;  
 static ARTICLE_BLOCK *p_article_block_free_list;  
77    
78  static SECTION_DATA *p_section_data_pool;  struct section_list_pool_t
79  static int section_data_count;  {
80  static TRIE_NODE *p_trie_dict_section_data;          int shmid;
81            SECTION_LIST sections[BBS_max_section];
82            int section_count;
83            int semid;
84            TRIE_NODE *p_trie_dict_section_by_name;
85            TRIE_NODE *p_trie_dict_section_by_sid;
86    };
87    typedef struct section_list_pool_t SECTION_LIST_POOL;
88    
89  int section_data_pool_init(const char *filename, int article_block_count)  static SECTION_LIST_POOL *p_section_list_pool = NULL;
90    
91    int article_block_init(const char *filename, int block_count)
92  {  {
93          int shmid;          int shmid;
94          int proj_id;          int proj_id;
# Line 56  int section_data_pool_init(const char *f Line 96  int section_data_pool_init(const char *f
96          size_t size;          size_t size;
97          void *p_shm;          void *p_shm;
98          int i;          int i;
99          int article_block_count_in_shm;          int block_count_in_shm;
100          ARTICLE_BLOCK *p_article_block_in_shm;          ARTICLE_BLOCK *p_block_in_shm;
101          ARTICLE_BLOCK **pp_article_block_next;          ARTICLE_BLOCK **pp_block_next;
102    
103          if (p_article_block_shm_pool != NULL ||          if (p_article_block_pool != NULL)
                 p_article_block_free_list != NULL ||  
                 p_section_data_pool != NULL ||  
                 p_trie_dict_section_data != NULL)  
104          {          {
105                  log_error("section_data_pool already initialized\n");                  log_error("article_block_pool already initialized\n");
106                  return -1;                  return -1;
107          }          }
108    
109          if (article_block_count > ARTICLE_BLOCK_PER_SHM * ARTICLE_BLOCK_SHM_COUNT_LIMIT)          if (block_count <= 0 || block_count > ARTICLE_BLOCK_PER_POOL)
110          {          {
111                  log_error("article_block_count exceed limit %d\n", ARTICLE_BLOCK_PER_SHM * ARTICLE_BLOCK_SHM_COUNT_LIMIT);                  log_error("article_block_count exceed limit %d\n", ARTICLE_BLOCK_PER_POOL);
112                  return -2;                  return -2;
113          }          }
114    
115          p_article_block_shm_pool = calloc((size_t)article_block_count / ARTICLE_BLOCK_PER_SHM + 1, sizeof(ARTICLE_BLOCK_SHM));          // Allocate shared memory
116          if (p_article_block_shm_pool == NULL)          proj_id = ARTICLE_BLOCK_SHM_COUNT_LIMIT; // keep different from proj_id used to create block shm
117            key = ftok(filename, proj_id);
118            if (key == -1)
119          {          {
120                  log_error("calloc(%d ARTICLE_BLOCK_SHM) OOM\n", article_block_count / ARTICLE_BLOCK_PER_SHM + 1);                  log_error("ftok(%s, %d) error (%d)\n", filename, proj_id, errno);
121                  return -2;                  return -3;
122          }          }
123    
124          p_section_data_pool = calloc(BBS_max_section, sizeof(SECTION_DATA));          size = sizeof(ARTICLE_BLOCK_POOL);
125          if (p_section_data_pool == NULL)          shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600);
126            if (shmid == -1)
127          {          {
128                  log_error("calloc(%d SECTION_DATA) OOM\n", BBS_max_section);                  log_error("shmget(article_block_pool_shm, size = %d) error (%d)\n", size, errno);
129                  return -2;                  return -3;
130          }          }
131          section_data_count = 0;          p_shm = shmat(shmid, NULL, 0);
132            if (p_shm == (void *)-1)
         p_trie_dict_section_data = trie_dict_create();  
         if (p_trie_dict_section_data == NULL)  
133          {          {
134                  log_error("trie_dict_create() OOM\n", BBS_max_section);                  log_error("shmat(shmid = %d) error (%d)\n", shmid, errno);
135                  return -2;                  return -3;
136          }          }
137    
138          // Allocate shared memory          p_article_block_pool = p_shm;
139          article_block_shm_count = 0;          p_article_block_pool->shmid = shmid;
         pp_article_block_next = &p_article_block_free_list;  
140    
141          while (article_block_count > 0)          p_article_block_pool->shm_count = 0;
142            pp_block_next = &(p_article_block_pool->p_block_free_list);
143    
144            while (block_count > 0)
145          {          {
146                  article_block_count_in_shm =                  block_count_in_shm = MIN(block_count, ARTICLE_BLOCK_PER_SHM);
147                          (article_block_count < ARTICLE_BLOCK_PER_SHM ? article_block_count : ARTICLE_BLOCK_PER_SHM);                  block_count -= block_count_in_shm;
                 article_block_count -= article_block_count_in_shm;  
148    
149                  proj_id = getpid() + article_block_shm_count;                  proj_id = p_article_block_pool->shm_count;
150                  key = ftok(filename, proj_id);                  key = ftok(filename, proj_id);
151                  if (key == -1)                  if (key == -1)
152                  {                  {
153                          log_error("ftok(%s, %d) error (%d)\n", filename, proj_id, errno);                          log_error("ftok(%s, %d) error (%d)\n", filename, proj_id, errno);
154                          section_data_pool_cleanup();                          article_block_cleanup();
155                          return -3;                          return -3;
156                  }                  }
157    
158                  size = sizeof(shmid) + sizeof(ARTICLE_BLOCK) * (size_t)article_block_count_in_shm;                  size = sizeof(ARTICLE_BLOCK) * (size_t)block_count_in_shm;
159                  shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600);                  shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600);
160                  if (shmid == -1)                  if (shmid == -1)
161                  {                  {
162                          log_error("shmget(shm_index = %d, size = %d) error (%d)\n", article_block_shm_count, size, errno);                          log_error("shmget(shm_index = %d, size = %d) error (%d)\n", p_article_block_pool->shm_count, size, errno);
163                          section_data_pool_cleanup();                          article_block_cleanup();
164                          return -3;                          return -3;
165                  }                  }
166                  p_shm = shmat(shmid, NULL, 0);                  p_shm = shmat(shmid, NULL, 0);
167                  if (p_shm == (void *)-1)                  if (p_shm == (void *)-1)
168                  {                  {
169                          log_error("shmat(shmid = %d) error (%d)\n", shmid, errno);                          log_error("shmat(shmid = %d) error (%d)\n", shmid, errno);
170                          section_data_pool_cleanup();                          article_block_cleanup();
171                          return -3;                          return -3;
172                  }                  }
173    
174                  (p_article_block_shm_pool + article_block_shm_count)->shmid = shmid;                  (p_article_block_pool->shm_pool + p_article_block_pool->shm_count)->shmid = shmid;
175                  (p_article_block_shm_pool + article_block_shm_count)->p_shm = p_shm;                  (p_article_block_pool->shm_pool + p_article_block_pool->shm_count)->p_shm = p_shm;
176                  article_block_shm_count++;                  p_article_block_pool->shm_count++;
177    
178                  p_article_block_in_shm = p_shm;                  p_block_in_shm = p_shm;
179                  *pp_article_block_next = p_article_block_in_shm;                  *pp_block_next = p_block_in_shm;
180    
181                  for (i = 0; i < article_block_count_in_shm; i++)                  for (i = 0; i < block_count_in_shm; i++)
182                  {                  {
183                          if (i < article_block_count_in_shm - 1)                          if (i < block_count_in_shm - 1)
184                          {                          {
185                                  (p_article_block_in_shm + i)->p_next_block = (p_article_block_in_shm + i + 1);                                  (p_block_in_shm + i)->p_next_block = (p_block_in_shm + i + 1);
186                          }                          }
187                          else                          else
188                          {                          {
189                                  (p_article_block_in_shm + i)->p_next_block = NULL;                                  (p_block_in_shm + i)->p_next_block = NULL;
190                                  pp_article_block_next = &((p_article_block_in_shm + i)->p_next_block);                                  pp_block_next = &((p_block_in_shm + i)->p_next_block);
191                          }                          }
192                  }                  }
193          }          }
194    
195            p_article_block_pool->block_count = 0;
196    
197          return 0;          return 0;
198  }  }
199    
200  void section_data_pool_cleanup(void)  void article_block_cleanup(void)
201  {  {
202          int i;          int shmid;
203    
204            if (p_article_block_pool == NULL)
205            {
206                    return;
207            }
208    
209          if (p_trie_dict_section_data != NULL)          for (int i = 0; i < p_article_block_pool->shm_count; i++)
210          {          {
211                  trie_dict_destroy(p_trie_dict_section_data);                  if (shmdt((p_article_block_pool->shm_pool + i)->p_shm) == -1)
212                  p_trie_dict_section_data = NULL;                  {
213                  section_data_count = 0;                          log_error("shmdt(shmid = %d) error (%d)\n", (p_article_block_pool->shm_pool + i)->shmid, errno);
214                    }
215    
216                    if (shmctl((p_article_block_pool->shm_pool + i)->shmid, IPC_RMID, NULL) == -1)
217                    {
218                            log_error("shmctl(shmid = %d, IPC_RMID) error (%d)\n", (p_article_block_pool->shm_pool + i)->shmid, errno);
219                    }
220          }          }
221    
222          if (p_section_data_pool != NULL)          shmid = p_article_block_pool->shmid;
223    
224            if (shmdt(p_article_block_pool) == -1)
225          {          {
226                  free(p_section_data_pool);                  log_error("shmdt(shmid = %d) error (%d)\n", shmid, errno);
                 p_section_data_pool = NULL;  
227          }          }
228    
229          if (p_article_block_free_list != NULL)          if (shmctl(shmid, IPC_RMID, NULL) == -1)
230          {          {
231                  p_article_block_free_list = NULL;                  log_error("shmctl(shmid = %d, IPC_RMID) error (%d)\n", shmid, errno);
232          }          }
233    
234          if (p_article_block_shm_pool != NULL)          p_article_block_pool = NULL;
235    }
236    
237    int set_article_block_shm_readonly(void)
238    {
239            int shmid;
240            void *p_shm;
241            int i;
242    
243            if (p_article_block_pool == NULL)
244            {
245                    log_error("article_block_pool not initialized\n");
246                    return -1;
247            }
248    
249            for (i = 0; i < p_article_block_pool->shm_count; i++)
250          {          {
251                  for (i = 0; i < article_block_shm_count; i++)                  shmid = (p_article_block_pool->shm_pool + i)->shmid;
252    
253                    // Remap shared memory in read-only mode
254                    p_shm = shmat(shmid, (p_article_block_pool->shm_pool + i)->p_shm, SHM_RDONLY | SHM_REMAP);
255                    if (p_shm == (void *)-1)
256                  {                  {
257                          if (shmdt((p_article_block_shm_pool + i)->p_shm) == -1)                          log_error("shmat(article_block_pool shmid = %d) error (%d)\n", shmid, errno);
258                          {                          return -2;
259                                  log_error("shmdt(shmid = %d) error (%d)\n", (p_article_block_shm_pool + i)->shmid, errno);                  }
260                          }          }
261    
262                          if (shmctl((p_article_block_shm_pool + i)->shmid, IPC_RMID, NULL) == -1)          return 0;
263                          {  }
264                                  log_error("shmctl(shmid = %d, IPC_RMID) error (%d)\n", (p_article_block_shm_pool + i)->shmid, errno);  
265                          }  int detach_article_block_shm(void)
266    {
267            int shmid;
268    
269            if (p_article_block_pool == NULL)
270            {
271                    return -1;
272            }
273    
274            for (int i = 0; i < p_article_block_pool->shm_count; i++)
275            {
276                    if ((p_article_block_pool->shm_pool + i)->p_shm != NULL && shmdt((p_article_block_pool->shm_pool + i)->p_shm) == -1)
277                    {
278                            log_error("shmdt(shmid = %d) error (%d)\n", (p_article_block_pool->shm_pool + i)->shmid, errno);
279                            return -2;
280                  }                  }
281            }
282    
283                  p_article_block_shm_pool = NULL;          shmid = p_article_block_pool->shmid;
284                  article_block_shm_count = 0;  
285            if (shmdt(p_article_block_pool) == -1)
286            {
287                    log_error("shmdt(shmid = %d) error (%d)\n", shmid, errno);
288                    return -3;
289          }          }
290    
291            p_article_block_pool = NULL;
292    
293            return 0;
294  }  }
295    
296  inline static ARTICLE_BLOCK *pop_free_article_block(void)  inline static ARTICLE_BLOCK *pop_free_article_block(void)
297  {  {
298          ARTICLE_BLOCK *p_article_block = NULL;          ARTICLE_BLOCK *p_block = NULL;
299    
300          if (p_article_block_free_list != NULL)          if (p_article_block_pool->p_block_free_list != NULL)
301          {          {
302                  p_article_block = p_article_block_free_list;                  p_block = p_article_block_pool->p_block_free_list;
303                  p_article_block_free_list = p_article_block_free_list->p_next_block;                  p_article_block_pool->p_block_free_list = p_block->p_next_block;
304                    p_block->p_next_block = NULL;
305                    p_block->article_count = 0;
306          }          }
307    
308          return p_article_block;          return p_block;
309  }  }
310    
311  inline static void push_free_article_block(ARTICLE_BLOCK *p_article_block)  inline static void push_free_article_block(ARTICLE_BLOCK *p_block)
312  {  {
313          p_article_block->p_next_block = p_article_block_free_list;          p_block->p_next_block = p_article_block_pool->p_block_free_list;
314          p_article_block_free_list = p_article_block;          p_article_block_pool->p_block_free_list = p_block;
315  }  }
316    
317  SECTION_DATA *section_data_create(const char *sname, const char *stitle, const char *master_name)  int article_block_reset(void)
318  {  {
319          SECTION_DATA *p_section;          ARTICLE_BLOCK *p_block;
320          int index;  
321            if (p_article_block_pool == NULL)
322            {
323                    log_error("article_block_pool not initialized\n");
324                    return -1;
325            }
326    
327            while (p_article_block_pool->block_count > 0)
328            {
329                    p_article_block_pool->block_count--;
330                    p_block = p_article_block_pool->p_block[p_article_block_pool->block_count];
331                    push_free_article_block(p_block);
332            }
333    
334            return 0;
335    }
336    
337    ARTICLE *article_block_find_by_aid(int32_t aid)
338    {
339            ARTICLE_BLOCK *p_block;
340            int left;
341            int right;
342            int mid;
343    
344          if (p_section_data_pool == NULL || p_trie_dict_section_data == NULL)          if (p_article_block_pool == NULL)
345          {          {
346                  log_error("section_data not initialized\n");                  log_error("article_block_pool not initialized\n");
347                  return NULL;                  return NULL;
348          }          }
349    
350          if (section_data_count >= BBS_max_section)          if (p_article_block_pool->block_count == 0) // empty
351          {          {
                 log_error("section_data_count exceed limit %d\n", BBS_max_section);  
352                  return NULL;                  return NULL;
353          }          }
354    
355          index = section_data_count;          left = 0;
356          p_section = p_section_data_pool + index;          right = p_article_block_pool->block_count;
357    
358          strncpy(p_section->sname, sname, sizeof(p_section->sname - 1));          // aid in the range [ head aid of blocks[left], tail aid of blocks[right - 1] ]
359          p_section->sname[sizeof(p_section->sname - 1)] = '\0';          while (left < right - 1)
360            {
361                    // get block offset no less than mid value of left and right block offsets
362                    mid = (left + right) / 2 + (right - left) % 2;
363    
364          strncpy(p_section->stitle, stitle, sizeof(p_section->stitle - 1));                  if (mid >= p_article_block_pool->block_count)
365          p_section->stitle[sizeof(p_section->stitle - 1)] = '\0';                  {
366                            log_error("block(mid = %d) is out of boundary\n", mid);
367                            return NULL;
368                    }
369    
370          strncpy(p_section->master_name, master_name, sizeof(p_section->master_name - 1));                  if (aid < p_article_block_pool->p_block[mid]->articles[0].aid)
371          p_section->master_name[sizeof(p_section->master_name - 1)] = '\0';                  {
372                            right = mid;
373                    }
374                    else
375                    {
376                            left = mid;
377                    }
378            }
379    
380          p_section->p_head_block = NULL;          p_block = p_article_block_pool->p_block[left];
381          p_section->p_tail_block = NULL;  
382          p_section->block_count = 0;          left = 0;
383          p_section->article_count = 0;          right = p_block->article_count - 1;
         p_section->delete_count = 0;  
384    
385          if (trie_dict_set(p_trie_dict_section_data, sname, index) != 1)          // aid in the range [ aid of articles[left], aid of articles[right] ]
386            while (left < right)
387          {          {
388                  log_error("trie_dict_set(section_data, %s, %d) error\n", sname, index);                  mid = (left + right) / 2;
389                  return NULL;  
390                    if (aid <= p_block->articles[mid].aid)
391                    {
392                            right = mid;
393                    }
394                    else
395                    {
396                            left = mid + 1;
397                    }
398          }          }
399    
400          section_data_count++;          if (aid != p_block->articles[left].aid) // not found
401            {
402                    return NULL;
403            }
404    
405          return p_section;          return (p_block->articles + left); // found
406  }  }
407    
408  int section_data_free_block(SECTION_DATA *p_section)  ARTICLE *article_block_find_by_index(int index)
409  {  {
410          ARTICLE_BLOCK *p_block;          ARTICLE_BLOCK *p_block;
411    
412          if (p_section == NULL)          if (p_article_block_pool == NULL)
413            {
414                    log_error("article_block_pool not initialized\n");
415                    return NULL;
416            }
417    
418            if (index < 0 || index / ARTICLE_PER_BLOCK >= p_article_block_pool->block_count)
419            {
420                    log_error("article_block_find_by_index(%d) is out of boundary of block [0, %d)\n", index, p_article_block_pool->block_count);
421                    return NULL;
422            }
423    
424            p_block = p_article_block_pool->p_block[index / ARTICLE_PER_BLOCK];
425    
426            if (index % ARTICLE_PER_BLOCK >= p_block->article_count)
427          {          {
428                  log_error("section_data_free_block() NULL pointer error\n");                  log_error("article_block_find_by_index(%d) is out of boundary of article [0, %d)\n", index, p_block->article_count);
429                    return NULL;
430            }
431    
432            return (p_block->articles + (index % ARTICLE_PER_BLOCK));
433    }
434    
435    extern int section_list_init(const char *filename)
436    {
437            int semid;
438            int shmid;
439            int proj_id;
440            key_t key;
441            size_t size;
442            void *p_shm;
443            union semun arg;
444            int i;
445    
446            if (p_section_list_pool != NULL)
447            {
448                    section_list_cleanup();
449            }
450    
451            proj_id = (int)(time(NULL) % getpid());
452            key = ftok(filename, proj_id);
453            if (key == -1)
454            {
455                    log_error("ftok(%s, %d) error (%d)\n", filename, proj_id, errno);
456                    return -3;
457            }
458    
459            // Allocate shared memory
460            size = sizeof(SECTION_LIST_POOL);
461            shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600);
462            if (shmid == -1)
463            {
464                    log_error("shmget(section_list_pool_shm, size = %d) error (%d)\n", size, errno);
465                    return -3;
466            }
467            p_shm = shmat(shmid, NULL, 0);
468            if (p_shm == (void *)-1)
469            {
470                    log_error("shmat(shmid = %d) error (%d)\n", shmid, errno);
471                    return -3;
472            }
473    
474            p_section_list_pool = p_shm;
475            p_section_list_pool->shmid = shmid;
476            p_section_list_pool->section_count = 0;
477    
478            // Allocate semaphore as section locks
479            size = 2 * (BBS_max_section + 1); // r_sem and w_sem per section, the last pair for all sections
480            semid = semget(key, (int)size, IPC_CREAT | IPC_EXCL | 0600);
481            if (semid == -1)
482            {
483                    log_error("semget(section_list_pool_sem, size = %d) error (%d)\n", size, errno);
484                    return -3;
485            }
486    
487            // Initialize sem value to 0
488            arg.val = 0;
489            for (i = 0; i < size; i++)
490            {
491                    if (semctl(semid, i, SETVAL, arg) == -1)
492                    {
493                            log_error("semctl(section_list_pool_sem, SETVAL) error (%d)\n", errno);
494                            return -3;
495                    }
496            }
497    
498            p_section_list_pool->semid = semid;
499    
500            p_section_list_pool->p_trie_dict_section_by_name = trie_dict_create();
501            if (p_section_list_pool->p_trie_dict_section_by_name == NULL)
502            {
503                    log_error("trie_dict_create() OOM\n", BBS_max_section);
504                    return -2;
505            }
506    
507            p_section_list_pool->p_trie_dict_section_by_sid = trie_dict_create();
508            if (p_section_list_pool->p_trie_dict_section_by_sid == NULL)
509            {
510                    log_error("trie_dict_create() OOM\n", BBS_max_section);
511                    return -2;
512            }
513    
514            return 0;
515    }
516    
517    void section_list_cleanup(void)
518    {
519            int shmid;
520    
521            if (p_section_list_pool == NULL)
522            {
523                    return;
524            }
525    
526            if (p_section_list_pool->p_trie_dict_section_by_name != NULL)
527            {
528                    trie_dict_destroy(p_section_list_pool->p_trie_dict_section_by_name);
529                    p_section_list_pool->p_trie_dict_section_by_name = NULL;
530            }
531    
532            if (p_section_list_pool->p_trie_dict_section_by_sid != NULL)
533            {
534                    trie_dict_destroy(p_section_list_pool->p_trie_dict_section_by_sid);
535                    p_section_list_pool->p_trie_dict_section_by_sid = NULL;
536            }
537    
538            shmid = p_section_list_pool->shmid;
539    
540            if (semctl(p_section_list_pool->semid, 0, IPC_RMID) == -1)
541            {
542                    log_error("semctl(semid = %d, IPC_RMID) error (%d)\n", p_section_list_pool->semid, errno);
543            }
544    
545            if (shmdt(p_section_list_pool) == -1)
546            {
547                    log_error("shmdt(shmid = %d) error (%d)\n", shmid, errno);
548            }
549    
550            if (shmctl(shmid, IPC_RMID, NULL) == -1)
551            {
552                    log_error("shmctl(shmid = %d, IPC_RMID) error (%d)\n", shmid, errno);
553            }
554    
555            p_section_list_pool = NULL;
556    }
557    
558    int set_section_list_shm_readonly(void)
559    {
560            int shmid;
561            void *p_shm;
562    
563            if (p_section_list_pool == NULL)
564            {
565                    log_error("p_section_list_pool not initialized\n");
566                  return -1;                  return -1;
567          }          }
568    
569          if (p_section_data_pool == NULL)          shmid = p_section_list_pool->shmid;
570    
571            // Remap shared memory in read-only mode
572            p_shm = shmat(shmid, p_section_list_pool, SHM_RDONLY | SHM_REMAP);
573            if (p_shm == (void *)-1)
574            {
575                    log_error("shmat(section_list_pool shmid = %d) error (%d)\n", shmid, errno);
576                    return -3;
577            }
578    
579            p_section_list_pool = p_shm;
580    
581            return 0;
582    }
583    
584    int detach_section_list_shm(void)
585    {
586            if (p_section_list_pool != NULL && shmdt(p_section_list_pool) == -1)
587          {          {
588                  log_error("section_data not initialized\n");                  log_error("shmdt(section_list_pool) error (%d)\n", errno);
589                  return -1;                  return -1;
590          }          }
591    
592          while (p_section->p_head_block != NULL)          p_section_list_pool = NULL;
593    
594            return 0;
595    }
596    
597    inline static void sid_to_str(int32_t sid, char *p_sid_str)
598    {
599            uint32_t u_sid;
600            int i;
601    
602            u_sid = (uint32_t)sid;
603            for (i = 0; i < SID_STR_LEN - 1; i++)
604            {
605                    p_sid_str[i] = (char)(u_sid % 255 + 1);
606                    u_sid /= 255;
607            }
608            p_sid_str[i] = '\0';
609    }
610    
611    SECTION_LIST *section_list_create(int32_t sid, const char *sname, const char *stitle, const char *master_list)
612    {
613            SECTION_LIST *p_section;
614            char sid_str[SID_STR_LEN];
615    
616            if (p_section_list_pool == NULL)
617          {          {
618                  p_block = p_section->p_head_block;                  log_error("session_list_pool not initialized\n");
619                  p_section->p_head_block = p_block->p_next_block;                  return NULL;
620                  push_free_article_block(p_block);          }
621    
622            if (p_section_list_pool->section_count >= BBS_max_section)
623            {
624                    log_error("section_count reach limit %d >= %d\n", p_section_list_pool->section_count, BBS_max_section);
625                    return NULL;
626            }
627    
628            sid_to_str(sid, sid_str);
629    
630            p_section = p_section_list_pool->sections + p_section_list_pool->section_count;
631    
632            p_section->sid = sid;
633    
634            strncpy(p_section->sname, sname, sizeof(p_section->sname) - 1);
635            p_section->sname[sizeof(p_section->sname) - 1] = '\0';
636    
637            strncpy(p_section->stitle, stitle, sizeof(p_section->stitle) - 1);
638            p_section->stitle[sizeof(p_section->stitle) - 1] = '\0';
639    
640            strncpy(p_section->master_list, master_list, sizeof(p_section->master_list) - 1);
641            p_section->master_list[sizeof(p_section->master_list) - 1] = '\0';
642    
643            if (trie_dict_set(p_section_list_pool->p_trie_dict_section_by_name, sname, p_section_list_pool->section_count) != 1)
644            {
645                    log_error("trie_dict_set(section, %s, %d) error\n", sname, p_section_list_pool->section_count);
646                    return NULL;
647          }          }
648    
649          p_section->p_tail_block = NULL;          if (trie_dict_set(p_section_list_pool->p_trie_dict_section_by_sid, sid_str, p_section_list_pool->section_count) != 1)
650          p_section->block_count = 0;          {
651                    log_error("trie_dict_set(section, %d, %d) error\n", sid, p_section_list_pool->section_count);
652                    return NULL;
653            }
654    
655            section_list_reset_articles(p_section);
656    
657            p_section_list_pool->section_count++;
658    
659            return p_section;
660    }
661    
662    void section_list_reset_articles(SECTION_LIST *p_section)
663    {
664          p_section->article_count = 0;          p_section->article_count = 0;
665          p_section->delete_count = 0;          p_section->topic_count = 0;
666            p_section->visible_article_count = 0;
667            p_section->visible_topic_count = 0;
668            p_section->p_article_head = NULL;
669            p_section->p_article_tail = NULL;
670    
671          return 0;          p_section->page_count = 0;
672            p_section->last_page_visible_article_count = 0;
673  }  }
674    
675  SECTION_DATA *section_data_find_by_name(const char *sname)  SECTION_LIST *section_list_find_by_name(const char *sname)
676  {  {
677          int64_t index;          int64_t index;
678            int ret;
679    
680          if (p_section_data_pool == NULL || p_trie_dict_section_data == NULL)          if (p_section_list_pool == NULL)
681          {          {
682                  log_error("section_data not initialized\n");                  log_error("section_list not initialized\n");
683                  return NULL;                  return NULL;
684          }          }
685    
686          if (trie_dict_get(p_trie_dict_section_data, sname, &index) != 1)          ret = trie_dict_get(p_section_list_pool->p_trie_dict_section_by_name, sname, &index);
687            if (ret < 0)
688            {
689                    log_error("trie_dict_get(section, %s) error\n", sname);
690                    return NULL;
691            }
692            else if (ret == 0)
693          {          {
                 log_error("trie_dict_get(section_data, %s) error\n", sname);  
694                  return NULL;                  return NULL;
695          }          }
696    
697          return (p_section_data_pool + index);          return (p_section_list_pool->sections + index);
698  }  }
699    
700  int section_data_append_article(SECTION_DATA *p_section, const ARTICLE *p_article)  SECTION_LIST *section_list_find_by_sid(int32_t sid)
701    {
702            int64_t index;
703            int ret;
704            char sid_str[SID_STR_LEN];
705    
706            if (p_section_list_pool == NULL)
707            {
708                    log_error("section_list not initialized\n");
709                    return NULL;
710            }
711    
712            sid_to_str(sid, sid_str);
713    
714            ret = trie_dict_get(p_section_list_pool->p_trie_dict_section_by_sid, sid_str, &index);
715            if (ret < 0)
716            {
717                    log_error("trie_dict_get(section, %d) error\n", sid);
718                    return NULL;
719            }
720            else if (ret == 0)
721            {
722                    return NULL;
723            }
724    
725            return (p_section_list_pool->sections + index);
726    }
727    
728    int section_list_append_article(SECTION_LIST *p_section, const ARTICLE *p_article_src)
729  {  {
730          ARTICLE_BLOCK *p_block;          ARTICLE_BLOCK *p_block;
731          int32_t last_aid = 0;          int32_t last_aid = 0;
732            ARTICLE *p_article;
733          ARTICLE *p_topic_head;          ARTICLE *p_topic_head;
734          ARTICLE *p_topic_tail;          ARTICLE *p_topic_tail;
735    
736          if (p_section == NULL || p_article == NULL)          if (p_section == NULL || p_article_src == NULL)
737          {          {
738                  log_error("section_data_append_article() NULL pointer error\n");                  log_error("section_list_append_article() NULL pointer error\n");
739                  return -1;                  return -1;
740          }          }
741    
742          if (p_section_data_pool == NULL)          if (p_article_block_pool == NULL)
743          {          {
744                  log_error("section_data not initialized\n");                  log_error("article_block_pool not initialized\n");
745                  return -1;                  return -1;
746          }          }
747    
748          if (p_section->p_tail_block == NULL || p_section->p_tail_block->article_count >= BBS_article_limit_per_block)          if (p_section->sid != p_article_src->sid)
749          {          {
750                  if (p_section->block_count >= BBS_article_block_limit_per_section)                  log_error("section_list_append_article() error: section sid %d != article sid %d\n", p_section->sid, p_article_src->sid);
751                  {                  return -2;
752                          log_error("section block count %d reach limit\n", p_section->block_count);          }
753                          return -2;  
754                  }          if (p_section->article_count >= BBS_article_limit_per_section)
755            {
756                    log_error("section_list_append_article() error: article_count reach limit in section %d\n", p_section->sid);
757                    return -2;
758            }
759    
760            if (p_article_block_pool->block_count == 0 ||
761                    p_article_block_pool->p_block[p_article_block_pool->block_count - 1]->article_count >= ARTICLE_PER_BLOCK)
762            {
763                  if ((p_block = pop_free_article_block()) == NULL)                  if ((p_block = pop_free_article_block()) == NULL)
764                  {                  {
765                          log_error("pop_free_article_block() error\n");                          log_error("pop_free_article_block() error\n");
766                          return -2;                          return -2;
767                  }                  }
768    
769                  p_block->article_count = 0;                  if (p_article_block_pool->block_count > 0)
                 p_block->p_next_block = NULL;  
   
                 if (p_section->p_tail_block == NULL)  
                 {  
                         p_section->p_head_block = p_block;  
                         last_aid = 0;  
                 }  
                 else  
770                  {                  {
771                          p_section->p_tail_block->p_next_block = p_block;                          last_aid = p_article_block_pool->p_block[p_article_block_pool->block_count - 1]->articles[ARTICLE_PER_BLOCK - 1].aid;
                         last_aid = p_section->p_tail_block->articles[BBS_article_limit_per_block - 1].aid;  
772                  }                  }
773                  p_section->p_tail_block = p_block;  
774                  p_section->p_block[p_section->block_count] = p_block;                  p_article_block_pool->p_block[p_article_block_pool->block_count] = p_block;
775                  p_section->block_count++;                  p_article_block_pool->block_count++;
776          }          }
777          else          else
778          {          {
779                  p_block = p_section->p_tail_block;                  p_block = p_article_block_pool->p_block[p_article_block_pool->block_count - 1];
780                  last_aid = p_block->articles[p_block->article_count - 1].aid;                  last_aid = p_block->articles[p_block->article_count - 1].aid;
781          }          }
782    
783          // AID of articles should be strictly ascending          // AID of articles should be strictly ascending
784          if (p_article->aid <= last_aid)          if (p_article_src->aid <= last_aid)
785          {          {
786                  log_error("section_data_append_article(aid=%d) error: last_aid=%d\n", p_article->aid, last_aid);                  log_error("section_list_append_article(aid=%d) error: last_aid=%d\n", p_article_src->aid, last_aid);
787                  return -3;                  return -3;
788          }          }
789    
790          if (p_block->article_count == 0)          p_article = (p_block->articles + p_block->article_count);
791            p_block->article_count++;
792            p_section->article_count++;
793    
794            // Copy article data
795            *p_article = *p_article_src;
796    
797            if (p_article->visible)
798          {          {
799                  p_section->block_head_aid[p_section->block_count - 1] = p_article->aid;                  p_section->visible_article_count++;
800          }          }
801    
802            // Link appended article as tail node of topic bi-directional list
803          if (p_article->tid != 0)          if (p_article->tid != 0)
804          {          {
805                  p_topic_head = section_data_find_article_by_aid(p_section, p_article->tid);                  p_topic_head = article_block_find_by_aid(p_article->tid);
806                  if (p_topic_head == NULL)                  if (p_topic_head == NULL)
807                  {                  {
808                          log_error("search head of topic (aid=%d) error\n", p_article->tid);                          log_error("search head of topic (aid=%d) error\n", p_article->tid);
809                          return -4;                          return -4;
810                  }                  }
811    
812                  p_topic_tail = section_data_find_article_by_aid(p_section, p_topic_head->prior_aid);                  p_topic_tail = p_topic_head->p_topic_prior;
813                  if (p_topic_tail == NULL)                  if (p_topic_tail == NULL)
814                  {                  {
815                          log_error("search tail of topic (aid=%d) error\n", p_topic_head->prior_aid);                          log_error("tail of topic (aid=%d) is NULL\n", p_article->tid);
816                          return -4;                          return -4;
817                  }                  }
818          }          }
819          else          else
820          {          {
821                  p_topic_head = &(p_block->articles[p_block->article_count]);                  p_section->topic_count++;
822                  p_topic_tail = p_topic_head;  
823                    if (p_article->visible)
824                    {
825                            p_section->visible_topic_count++;
826                    }
827    
828                    p_topic_head = p_article;
829                    p_topic_tail = p_article;
830          }          }
831    
832          // Copy article data          p_article->p_topic_prior = p_topic_tail;
833          p_block->articles[p_block->article_count] = *p_article;          p_article->p_topic_next = p_topic_head;
834            p_topic_head->p_topic_prior = p_article;
835            p_topic_tail->p_topic_next = p_article;
836    
837          // Link appended article as tail node of topic bi-directional list;          // Link appended article as tail node of article bi-directional list
838          p_block->articles[p_block->article_count].prior_aid = p_topic_tail->aid;          if (p_section->p_article_head == NULL)
839          p_block->articles[p_block->article_count].next_aid = p_topic_head->aid;          {
840          p_topic_head->prior_aid = p_article->aid;                  p_section->p_article_head = p_article;
841          p_topic_tail->next_aid = p_article->aid;                  p_section->p_article_tail = p_article;
842            }
843            p_article->p_prior = p_section->p_article_tail;
844            p_article->p_next = p_section->p_article_head;
845            p_section->p_article_head->p_prior = p_article;
846            p_section->p_article_tail->p_next = p_article;
847            p_section->p_article_tail = p_article;
848    
849          p_block->article_count++;          // Update page
850          p_section->article_count++;          if ((p_article->visible && p_section->last_page_visible_article_count % BBS_article_limit_per_page == 0) ||
851                    p_section->article_count == 1)
852            {
853                    p_section->p_page_first_article[p_section->page_count] = p_article;
854                    p_section->page_count++;
855                    p_section->last_page_visible_article_count = 0;
856            }
857    
858            if (p_article->visible)
859            {
860                    p_section->last_page_visible_article_count++;
861            }
862    
863          return 0;          return 0;
864  }  }
865    
866  ARTICLE *section_data_find_article_by_aid(SECTION_DATA *p_section, int32_t aid)  int section_list_set_article_visible(SECTION_LIST *p_section, int32_t aid, int8_t visible)
867    {
868            ARTICLE *p_article;
869            ARTICLE *p_reply;
870            int affected_count = 0;
871    
872            if (p_section == NULL)
873            {
874                    log_error("section_list_set_article_visible() NULL pointer error\n");
875                    return -2;
876            }
877    
878            p_article = article_block_find_by_aid(aid);
879            if (p_article == NULL)
880            {
881                    return -1; // Not found
882            }
883    
884            if (p_section->sid != p_article->sid)
885            {
886                    log_error("section_list_set_article_visible() error: section sid %d != article sid %d\n", p_section->sid, p_article->sid);
887                    return -2;
888            }
889    
890            if (p_article->visible == visible)
891            {
892                    return 0; // Already set
893            }
894    
895            if (visible == 0) // 1 -> 0
896            {
897                    p_section->visible_article_count--;
898    
899                    if (p_article->tid == 0)
900                    {
901                            p_section->visible_topic_count--;
902    
903                            // Set related visible replies to invisible
904                            for (p_reply = p_article->p_topic_next; p_reply->tid != 0; p_reply = p_reply->p_topic_next)
905                            {
906                                    if (p_reply->tid != aid)
907                                    {
908                                            log_error("Inconsistent tid = %d found in reply %d of topic %d\n", p_reply->tid, p_reply->aid, aid);
909                                            continue;
910                                    }
911    
912                                    if (p_reply->visible == 1)
913                                    {
914                                            p_reply->visible = 0;
915                                            p_section->visible_article_count--;
916                                            affected_count++;
917                                    }
918                            }
919                    }
920            }
921            else // 0 -> 1
922            {
923                    p_section->visible_article_count++;
924    
925                    if (p_article->tid == 0)
926                    {
927                            p_section->visible_topic_count++;
928                    }
929            }
930    
931            p_article->visible = visible;
932            affected_count++;
933    
934            return affected_count;
935    }
936    
937    ARTICLE *section_list_find_article_with_offset(SECTION_LIST *p_section, int32_t aid, int32_t *p_page, int32_t *p_offset, ARTICLE **pp_next)
938  {  {
939          ARTICLE *p_article;          ARTICLE *p_article;
         ARTICLE_BLOCK *p_block;  
940          int left;          int left;
941          int right;          int right;
942          int mid;          int mid;
943    
944            *p_page = -1;
945            *p_offset = -1;
946            *pp_next = NULL;
947    
948          if (p_section == NULL)          if (p_section == NULL)
949          {          {
950                  log_error("section_data_find_article_by_aid() NULL pointer error\n");                  log_error("section_list_find_article_with_offset() NULL pointer error\n");
951                  return NULL;                  return NULL;
952          }          }
953    
954          if (p_section->block_count == 0) // empty section          if (p_section->article_count == 0) // empty
955          {          {
956                    *p_page = 0;
957                    *p_offset = 0;
958                  return NULL;                  return NULL;
959          }          }
960    
961          left = 0;          left = 0;
962          right = p_section->block_count;          right = p_section->page_count;
963    
964          // aid in the range [ head aid of blocks[left], tail aid of blocks[right - 1] ]          // aid in the range [ head aid of pages[left], tail aid of pages[right - 1] ]
965          while (left < right - 1)          while (left < right - 1)
966          {          {
967                  // get block offset no less than mid value of left and right block offsets                  // get page id no less than mid value of left page id and right page id
968                  mid = (left + right) / 2 + (right - left) % 2;                  mid = (left + right) / 2 + (right - left) % 2;
969                    
970                  if (mid >= BBS_article_block_limit_per_section)                  if (mid >= p_section->page_count)
971                  {                  {
972                          log_error("block_m(%d) is out of boundary\n", mid);                          log_error("page id (mid = %d) is out of boundary\n", mid);
973                          return NULL;                          return NULL;
974                  }                  }
975    
976                  if (aid < p_section->block_head_aid[mid])                  if (aid < p_section->p_page_first_article[mid]->aid)
977                  {                  {
978                          right = mid;                          right = mid;
979                  }                  }
# Line 462  ARTICLE *section_data_find_article_by_ai Line 983  ARTICLE *section_data_find_article_by_ai
983                  }                  }
984          }          }
985    
986          p_block = p_section->p_block[left];          *p_page = left;
987    
988            p_article = p_section->p_page_first_article[*p_page];
989    
990            // p_section->p_page_first_article[*p_page]->aid <= aid < p_section->p_page_first_article[*p_page + 1]->aid
991            right = (*p_page == MAX(0, p_section->page_count - 1) ? INT32_MAX : p_section->p_page_first_article[*p_page + 1]->aid);
992    
993            // left will be the offset of article found or offset to insert
994          left = 0;          left = 0;
         right = p_block->article_count - 1;  
995    
996          // aid in the range [ aid of articles[left], aid of articles[right] ]          while (aid > p_article->aid)
         while (left < right)  
997          {          {
998                  mid = (left + right) / 2;                  p_article = p_article->p_next;
999                    left++;
1000    
1001                  if (aid <= p_block->articles[mid].aid)                  if (aid == p_article->aid)
1002                  {                  {
1003                          right = mid;                          *pp_next = p_article->p_next;
1004                            break;
1005                  }                  }
1006                  else  
1007                    // over last article in the page
1008                    if (p_article == p_section->p_article_head || p_article->aid >= right)
1009                  {                  {
1010                          left = mid + 1;                          *pp_next = (p_article == p_section->p_article_head ? p_section->p_article_head : p_section->p_page_first_article[*p_page + 1]);
1011                            *p_offset = left;
1012                            return NULL; // not found
1013                  }                  }
1014          }          }
1015    
1016          p_article = &(p_block->articles[left]);          if (aid < p_article->aid)
1017            {
1018                    *pp_next = p_article;
1019                    p_article = NULL; // not found
1020            }
1021            else // aid == p_article->aid
1022            {
1023                    *pp_next = p_article->p_next;
1024            }
1025    
1026            *p_offset = left;
1027    
1028          return p_article;          return p_article;
1029  }  }
1030    
1031  ARTICLE *section_data_find_article_by_index(SECTION_DATA *p_section, int index)  int section_list_calculate_page(SECTION_LIST *p_section, int32_t start_aid)
1032  {  {
1033          ARTICLE *p_article;          ARTICLE *p_article;
1034          ARTICLE_BLOCK *p_block;          ARTICLE *p_next;
1035            int32_t page;
1036            int32_t offset;
1037            int visible_article_count;
1038            int page_head_set;
1039    
1040          if (p_section == NULL)          if (p_section == NULL)
1041          {          {
1042                  log_error("section_data_find_article_by_index() NULL pointer error\n");                  log_error("section_list_calculate_page() NULL pointer error\n");
1043                  return NULL;                  return -1;
1044          }          }
1045    
1046          if (index < 0 || index >= p_section->article_count)          if (p_section->article_count == 0) // empty
1047          {          {
1048                  log_error("section_data_find_article_by_index(%d) is out of boundary [0, %d)\n", index, p_section->article_count);                  p_section->page_count = 0;
1049                  return NULL;                  p_section->last_page_visible_article_count = 0;
1050    
1051                    return 0;
1052          }          }
1053    
1054          p_block = p_section->p_block[index / BBS_article_limit_per_block];          if (start_aid > 0)
1055          p_article = &(p_block->articles[index % BBS_article_limit_per_block]);          {
1056                    p_article = article_block_find_by_aid(start_aid);
1057                    if (p_article == NULL)
1058                    {
1059                            return -1; // Not found
1060                    }
1061    
1062                    if (p_section->sid != p_article->sid)
1063                    {
1064                            log_error("section_list_calculate_page() error: section sid %d != start article sid %d\n", p_section->sid, p_article->sid);
1065                            return -2;
1066                    }
1067    
1068          return p_article;                  p_article = section_list_find_article_with_offset(p_section, start_aid, &page, &offset, &p_next);
1069                    if (p_article == NULL)
1070                    {
1071                            if (page < 0)
1072                            {
1073                                    return -1;
1074                            }
1075                            log_error("section_list_calculate_page() aid = %d not found in section sid = %d\n",
1076                                              start_aid, p_section->sid);
1077                            return -2;
1078                    }
1079    
1080                    if (offset > 0)
1081                    {
1082                            p_article = p_section->p_page_first_article[page];
1083                    }
1084            }
1085            else
1086            {
1087                    p_article = p_section->p_article_head;
1088                    page = 0;
1089                    offset = 0;
1090            }
1091    
1092            visible_article_count = 0;
1093            page_head_set = 0;
1094    
1095            do
1096            {
1097                    if (!page_head_set && visible_article_count == 0)
1098                    {
1099                            p_section->p_page_first_article[page] = p_article;
1100                            page_head_set = 1;
1101                    }
1102    
1103                    if (p_article->visible)
1104                    {
1105                            visible_article_count++;
1106                    }
1107    
1108                    p_article = p_article->p_next;
1109    
1110                    // skip remaining invisible articles
1111                    while (p_article->visible == 0 && p_article != p_section->p_article_head)
1112                    {
1113                            p_article = p_article->p_next;
1114                    }
1115    
1116                    if (visible_article_count >= BBS_article_limit_per_page && p_article != p_section->p_article_head)
1117                    {
1118                            page++;
1119                            visible_article_count = 0;
1120                            page_head_set = 0;
1121    
1122                            if (page >= BBS_article_limit_per_section / BBS_article_limit_per_page && p_article != p_section->p_article_head)
1123                            {
1124                                    log_error("Count of page exceed limit in section %d\n", p_section->sid);
1125                                    break;
1126                            }
1127                    }
1128            } while (p_article != p_section->p_article_head);
1129    
1130            p_section->page_count = page + (visible_article_count > 0 ? 1 : 0);
1131            p_section->last_page_visible_article_count = visible_article_count;
1132    
1133            return 0;
1134    }
1135    
1136    int32_t article_block_last_aid(void)
1137    {
1138            ARTICLE_BLOCK *p_block = p_article_block_pool->p_block[p_article_block_pool->block_count - 1];
1139            int32_t last_aid = p_block->articles[p_block->article_count - 1].aid;
1140    
1141            return last_aid;
1142  }  }
1143    
1144  int section_data_mark_del_article(SECTION_DATA *p_section, int32_t aid)  int article_block_article_count(void)
1145    {
1146            int ret;
1147    
1148            if (p_article_block_pool == NULL || p_article_block_pool->block_count <= 0)
1149            {
1150                    return -1;
1151            }
1152    
1153            ret = (p_article_block_pool->block_count - 1) * ARTICLE_PER_BLOCK +
1154                      p_article_block_pool->p_block[p_article_block_pool->block_count - 1]->article_count;
1155    
1156            return ret;
1157    }
1158    
1159    int article_count_of_topic(int32_t aid)
1160  {  {
1161          ARTICLE *p_article;          ARTICLE *p_article;
1162            int article_count;
1163    
1164            p_article = article_block_find_by_aid(aid);
1165            if (p_article == NULL)
1166            {
1167                    return 0; // Not found
1168            }
1169    
1170            article_count = 0;
1171    
1172            do
1173            {
1174                    if (p_article->tid != 0 && p_article->tid != aid)
1175                    {
1176                            log_error("article_count_of_topic(%d) error: article %d not linked to the topic\n", aid, p_article->aid);
1177                            break;
1178                    }
1179    
1180                    article_count++;
1181                    p_article = p_article->p_topic_next;
1182            } while (p_article->aid != aid);
1183    
1184            return article_count;
1185    }
1186    
1187    int section_list_move_topic(SECTION_LIST *p_section_src, SECTION_LIST *p_section_dest, int32_t aid)
1188    {
1189            ARTICLE *p_article;
1190            ARTICLE *p_next;
1191            int32_t page;
1192            int32_t offset;
1193            int32_t move_article_count;
1194            int32_t dest_article_count_old;
1195            int32_t last_unaffected_aid_src;
1196            int32_t first_inserted_aid_dest;
1197            int move_counter;
1198    
1199            if (p_section_src == NULL || p_section_dest == NULL)
1200            {
1201                    log_error("section_list_move_topic() NULL pointer error\n");
1202                    return -1;
1203            }
1204    
1205            if (p_section_src->sid == p_section_dest->sid)
1206            {
1207                    log_error("section_list_move_topic() src and dest section are the same\n");
1208                    return -1;
1209            }
1210    
1211            if ((p_article = article_block_find_by_aid(aid)) == NULL)
1212            {
1213                    log_error("article_block_find_by_aid(aid = %d) error: article not found\n", aid);
1214                    return -2;
1215            }
1216    
1217            if (p_section_src->sid != p_article->sid)
1218            {
1219                    log_error("section_list_move_topic() error: src section sid %d != article %d sid %d\n",
1220                                      p_section_src->sid, p_article->aid, p_article->sid);
1221                    return -2;
1222            }
1223    
1224            if (p_article->tid != 0)
1225            {
1226                    log_error("section_list_move_topic(aid = %d) error: article is not head of topic, tid = %d\n", aid, p_article->tid);
1227                    return -2;
1228            }
1229    
1230            last_unaffected_aid_src = (p_article == p_section_src->p_article_head ? 0 : p_article->p_prior->aid);
1231    
1232            move_article_count = article_count_of_topic(aid);
1233            if (move_article_count <= 0)
1234            {
1235                    log_error("article_count_of_topic(aid = %d) <= 0\n", aid);
1236                    return -2;
1237            }
1238    
1239            if (p_section_dest->article_count + move_article_count > BBS_article_limit_per_section)
1240            {
1241                    log_error("section_list_move_topic() error: article_count %d reach limit in section %d\n",
1242                                      p_section_dest->article_count + move_article_count, p_section_dest->sid);
1243                    return -3;
1244            }
1245    
1246            dest_article_count_old = p_section_dest->article_count;
1247            move_counter = 0;
1248            first_inserted_aid_dest = p_article->aid;
1249    
1250            do
1251            {
1252                    if (p_section_src->sid != p_article->sid)
1253                    {
1254                            log_error("section_list_move_topic() warning: src section sid %d != article %d sid %d\n",
1255                                              p_section_src->sid, p_article->aid, p_article->sid);
1256                            p_article = p_article->p_topic_next;
1257                            continue;
1258                    }
1259    
1260                    // Remove from bi-directional article list of src section
1261                    if (p_section_src->p_article_head == p_article)
1262                    {
1263                            p_section_src->p_article_head = p_article->p_next;
1264                    }
1265                    if (p_section_src->p_article_tail == p_article)
1266                    {
1267                            p_section_src->p_article_tail = p_article->p_prior;
1268                    }
1269                    if (p_section_src->p_article_head == p_article) // || p_section_src->p_article_tail == p_article
1270                    {
1271                            p_section_src->p_article_head = NULL;
1272                            p_section_src->p_article_tail = NULL;
1273                    }
1274    
1275                    p_article->p_prior->p_next = p_article->p_next;
1276                    p_article->p_next->p_prior = p_article->p_prior;
1277    
1278                    // Update sid of article
1279                    p_article->sid = p_section_dest->sid;
1280    
1281                    if (section_list_find_article_with_offset(p_section_dest, p_article->aid, &page, &offset, &p_next) != NULL)
1282                    {
1283                            log_error("section_list_move_topic() warning: article %d already in section %d\n", p_article->aid, p_section_dest->sid);
1284                            p_article = p_article->p_topic_next;
1285                            continue;
1286                    }
1287    
1288                    // Insert into bi-directional article list of dest section
1289                    if (p_next == NULL) // empty section
1290                    {
1291                            p_section_dest->p_article_head = p_article;
1292                            p_section_dest->p_article_tail = p_article;
1293                            p_article->p_prior = p_article;
1294                            p_article->p_next = p_article;
1295                    }
1296                    else
1297                    {
1298                            if (p_section_dest->p_article_head == p_next)
1299                            {
1300                                    if (p_article->aid < p_next->aid)
1301                                    {
1302                                            p_section_dest->p_article_head = p_article;
1303                                    }
1304                                    else // p_article->aid > p_next->aid
1305                                    {
1306                                            p_section_dest->p_article_tail = p_article;
1307                                    }
1308                            }
1309    
1310                            p_article->p_prior = p_next->p_prior;
1311                            p_article->p_next = p_next;
1312                            p_next->p_prior->p_next = p_article;
1313                            p_next->p_prior = p_article;
1314                    }
1315    
1316                    // Update article / topic counter of src / desc section
1317                    p_section_src->article_count--;
1318                    p_section_dest->article_count++;
1319                    if (p_article->tid == 0)
1320                    {
1321                            p_section_src->topic_count--;
1322                            p_section_dest->topic_count++;
1323                    }
1324    
1325                    // Update visible article / topic counter of src / desc section
1326                    if (p_article->visible)
1327                    {
1328                            p_section_src->visible_article_count--;
1329                            p_section_dest->visible_article_count++;
1330                            if (p_article->tid == 0)
1331                            {
1332                                    p_section_src->visible_topic_count--;
1333                                    p_section_dest->visible_topic_count++;
1334                            }
1335                    }
1336    
1337                    // Update page for empty dest section
1338                    if (p_section_dest->article_count == 1)
1339                    {
1340                            p_section_dest->p_page_first_article[0] = p_article;
1341                            p_section_dest->page_count = 1;
1342                            p_section_dest->last_page_visible_article_count = (p_article->visible ? 1 : 0);
1343                    }
1344    
1345                    p_article = p_article->p_topic_next;
1346    
1347                    move_counter++;
1348                    if (move_counter % CALCULATE_PAGE_THRESHOLD == 0)
1349                    {
1350                            // Re-calculate pages of desc section
1351                            if (section_list_calculate_page(p_section_dest, first_inserted_aid_dest) < 0)
1352                            {
1353                                    log_error("section_list_calculate_page(dest section = %d, aid = %d) error\n",
1354                                                      p_section_dest->sid, first_inserted_aid_dest);
1355                            }
1356    
1357                            first_inserted_aid_dest = p_article->aid;
1358                    }
1359            } while (p_article->aid != aid);
1360    
1361            if (p_section_dest->article_count - dest_article_count_old != move_article_count)
1362            {
1363                    log_error("section_list_move_topic() warning: count of moved articles %d != %d\n",
1364                                      p_section_dest->article_count - dest_article_count_old, move_article_count);
1365            }
1366    
1367            // Re-calculate pages of src section
1368            if (section_list_calculate_page(p_section_src, last_unaffected_aid_src) < 0)
1369            {
1370                    log_error("section_list_calculate_page(src section = %d, aid = %d) error at aid = %d\n",
1371                                      p_section_src->sid, last_unaffected_aid_src, aid);
1372            }
1373    
1374            if (move_counter % CALCULATE_PAGE_THRESHOLD != 0)
1375            {
1376                    // Re-calculate pages of desc section
1377                    if (section_list_calculate_page(p_section_dest, first_inserted_aid_dest) < 0)
1378                    {
1379                            log_error("section_list_calculate_page(dest section = %d, aid = %d) error\n",
1380                                              p_section_dest->sid, first_inserted_aid_dest);
1381                    }
1382            }
1383    
1384            return move_article_count;
1385    }
1386    
1387    int get_section_index(SECTION_LIST *p_section)
1388    {
1389            int index;
1390    
1391            if (p_section_list_pool == NULL)
1392            {
1393                    log_error("get_section_index() error: uninitialized\n");
1394                    return -1;
1395            }
1396    
1397          if (p_section == NULL)          if (p_section == NULL)
1398          {          {
1399                  log_error("section_data_mark_del_article() NULL pointer error\n");                  index = BBS_max_section;
1400            }
1401            else
1402            {
1403                    index = (int)(p_section - p_section_list_pool->sections);
1404                    if (index < 0 || index >= BBS_max_section)
1405                    {
1406                            log_error("get_section_index(%d) error: index out of range\n", index);
1407                            return -2;
1408                    }
1409            }
1410    
1411            return index;
1412    }
1413    
1414    int section_list_try_rd_lock(SECTION_LIST *p_section, int wait_sec)
1415    {
1416            int index;
1417            struct sembuf sops[4];
1418            struct timespec timeout;
1419            int ret;
1420    
1421            index = get_section_index(p_section);
1422            if (index < 0)
1423            {
1424                  return -2;                  return -2;
1425          }          }
1426    
1427          p_article = section_data_find_article_by_aid(p_section, aid);          sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1428          if (p_article == NULL)          sops[0].sem_op = 0;                                                                // wait until unlocked
1429            sops[0].sem_flg = 0;
1430    
1431            sops[1].sem_num = (unsigned short)(index * 2); // r_sem of section index
1432            sops[1].sem_op = 1;                                                        // lock
1433            sops[1].sem_flg = SEM_UNDO;                                        // undo on terminate
1434    
1435            // Read lock on any specific section will also acquire single read lock on "all section"
1436            // so that write lock on all section only need to acquire single write on on "all section"
1437            // rather than to acquire multiple write locks on all the available sections.
1438            if (index != BBS_max_section)
1439          {          {
1440                  return -1; // Not found                  sops[2].sem_num = BBS_max_section * 2 + 1; // w_sem of all section
1441                    sops[2].sem_op = 0;                                                // wait until unlocked
1442                    sops[2].sem_flg = 0;
1443    
1444                    sops[3].sem_num = BBS_max_section * 2; // r_sem of all section
1445                    sops[3].sem_op = 1;                                        // lock
1446                    sops[3].sem_flg = SEM_UNDO;                        // undo on terminate
1447            }
1448    
1449            timeout.tv_sec = wait_sec;
1450            timeout.tv_nsec = 0;
1451    
1452            ret = semtimedop(p_section_list_pool->semid, sops, (index == BBS_max_section ? 2 : 4), &timeout);
1453            if (ret == -1 && errno != EAGAIN && errno != EINTR)
1454            {
1455                    log_error("semtimedop(index = %d, lock read) error %d\n", index, errno);
1456            }
1457    
1458            return ret;
1459    }
1460    
1461    int section_list_try_rw_lock(SECTION_LIST *p_section, int wait_sec)
1462    {
1463            int index;
1464            struct sembuf sops[3];
1465            struct timespec timeout;
1466            int ret;
1467    
1468            index = get_section_index(p_section);
1469            if (index < 0)
1470            {
1471                    return -2;
1472          }          }
1473    
1474          if (p_article->visible == 0)          sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1475            sops[0].sem_op = 0;                                                                // wait until unlocked
1476            sops[0].sem_flg = 0;
1477    
1478            sops[1].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1479            sops[1].sem_op = 1;                                                                // lock
1480            sops[1].sem_flg = SEM_UNDO;                                                // undo on terminate
1481    
1482            sops[2].sem_num = (unsigned short)(index * 2); // r_sem of section index
1483            sops[2].sem_op = 0;                                                        // wait until unlocked
1484            sops[2].sem_flg = 0;
1485    
1486            timeout.tv_sec = wait_sec;
1487            timeout.tv_nsec = 0;
1488    
1489            ret = semtimedop(p_section_list_pool->semid, sops, 3, &timeout);
1490            if (ret == -1 && errno != EAGAIN && errno != EINTR)
1491          {          {
1492                  return 0; // Already deleted                  log_error("semtimedop(index = %d, lock write) error %d\n", index, errno);
1493          }          }
1494    
1495          p_article->visible = 0;          return ret;
1496          p_section->delete_count++;  }
1497    
1498    int section_list_rd_unlock(SECTION_LIST *p_section)
1499    {
1500            int index;
1501            struct sembuf sops[2];
1502            int ret;
1503    
1504            index = get_section_index(p_section);
1505            if (index < 0)
1506            {
1507                    return -2;
1508            }
1509    
1510            sops[0].sem_num = (unsigned short)(index * 2); // r_sem of section index
1511            sops[0].sem_op = -1;                                               // unlock
1512            sops[0].sem_flg = IPC_NOWAIT | SEM_UNDO;           // no wait
1513    
1514            if (index != BBS_max_section)
1515            {
1516                    sops[1].sem_num = BBS_max_section * 2;   // r_sem of all section
1517                    sops[1].sem_op = -1;                                     // unlock
1518                    sops[1].sem_flg = IPC_NOWAIT | SEM_UNDO; // no wait
1519            }
1520    
1521            ret = semop(p_section_list_pool->semid, sops, (index == BBS_max_section ? 1 : 2));
1522            if (ret == -1 && errno != EAGAIN && errno != EINTR)
1523            {
1524                    log_error("semop(index = %d, unlock read) error %d\n", index, errno);
1525            }
1526    
1527            return ret;
1528    }
1529    
1530    int section_list_rw_unlock(SECTION_LIST *p_section)
1531    {
1532            int index;
1533            struct sembuf sops[1];
1534            int ret;
1535    
1536            index = get_section_index(p_section);
1537            if (index < 0)
1538            {
1539                    return -2;
1540            }
1541    
1542            sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1543            sops[0].sem_op = -1;                                                       // unlock
1544            sops[0].sem_flg = IPC_NOWAIT | SEM_UNDO;                   // no wait
1545    
1546            ret = semop(p_section_list_pool->semid, sops, 1);
1547            if (ret == -1 && errno != EAGAIN && errno != EINTR)
1548            {
1549                    log_error("semop(index = %d, unlock write) error %d\n", index, errno);
1550            }
1551    
1552            return ret;
1553    }
1554    
1555    int section_list_rd_lock(SECTION_LIST *p_section)
1556    {
1557            int timer = 0;
1558            int sid = (p_section == NULL ? 0 : p_section->sid);
1559            int ret = -1;
1560    
1561            while (!SYS_server_exit)
1562            {
1563                    ret = section_list_try_rd_lock(p_section, SECTION_TRY_LOCK_WAIT_TIME);
1564                    if (ret == 0) // success
1565                    {
1566                            break;
1567                    }
1568                    else if (errno == EAGAIN || errno == EINTR) // retry
1569                    {
1570                            timer++;
1571                            if (timer % SECTION_TRY_LOCK_TIMES == 0)
1572                            {
1573                                    log_error("section_list_rd_lock() tried %d times on section %d\n", sid, timer);
1574                            }
1575                    }
1576                    else // failed
1577                    {
1578                            log_error("section_list_rd_lock() failed on section %d\n", sid);
1579                            break;
1580                    }
1581            }
1582    
1583            return ret;
1584    }
1585    
1586    int section_list_rw_lock(SECTION_LIST *p_section)
1587    {
1588            int timer = 0;
1589            int sid = (p_section == NULL ? 0 : p_section->sid);
1590            int ret = -1;
1591    
1592            while (!SYS_server_exit)
1593            {
1594                    ret = section_list_try_rw_lock(p_section, SECTION_TRY_LOCK_WAIT_TIME);
1595                    if (ret == 0) // success
1596                    {
1597                            break;
1598                    }
1599                    else if (errno == EAGAIN || errno == EINTR) // retry
1600                    {
1601                            timer++;
1602                            if (timer % SECTION_TRY_LOCK_TIMES == 0)
1603                            {
1604                                    log_error("acquire_section_rw_lock() tried %d times on section %d\n", sid, timer);
1605                            }
1606                    }
1607                    else // failed
1608                    {
1609                            log_error("acquire_section_rw_lock() failed on section %d\n", sid);
1610                            break;
1611                    }
1612            }
1613    
1614          return 1;          return ret;
1615  }  }

Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters
webmaster@leafok.com
 ViewVC Help
Powered by ViewVC 1.3.0-beta1