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

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