/[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.10 by sysadm, Fri May 23 00:12:59 2025 UTC Revision 1.36 by sysadm, Tue Jun 24 10:01:24 2025 UTC
# Line 14  Line 14 
14   *                                                                         *   *                                                                         *
15   ***************************************************************************/   ***************************************************************************/
16    
 #include "section_list.h"  
17  #include "log.h"  #include "log.h"
18    #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>
26  #include <stdlib.h>  #include <sys/ipc.h>
 #include <errno.h>  
27  #include <sys/param.h>  #include <sys/param.h>
28    #include <sys/sem.h>
29  #include <sys/shm.h>  #include <sys/shm.h>
 #include <sys/ipc.h>  
30    
31  #define ARTICLE_BLOCK_PER_SHM 400                 // sizeof(ARTICLE_BLOCK) * ARTICLE_BLOCK_PER_SHM is the size of each shm segment to allocate  #ifdef _SEM_SEMUN_UNDEFINED
32  #define ARTICLE_BLOCK_SHM_COUNT_LIMIT 256 // limited by length (8-bit) of proj_id in ftok(path, proj_id)  union semun
33    {
34            int val;                           /* Value for SETVAL */
35            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)  #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_t  struct article_block_t
54  {  {
55          ARTICLE articles[ARTICLE_PER_BLOCK];          ARTICLE articles[ARTICLE_PER_BLOCK];
56          int32_t article_count;          int article_count;
57          struct article_block_t *p_next_block;          struct article_block_t *p_next_block;
58  };  };
59  typedef struct article_block_t ARTICLE_BLOCK;  typedef struct article_block_t ARTICLE_BLOCK;
60    
 struct article_block_shm_t  
 {  
         int shmid;  
         void *p_shm;  
 };  
 typedef struct article_block_shm_t ARTICLE_BLOCK_SHM;  
   
61  struct article_block_pool_t  struct article_block_pool_t
62  {  {
63          ARTICLE_BLOCK_SHM shm_pool[ARTICLE_BLOCK_SHM_COUNT_LIMIT];          int shmid;
64            struct
65            {
66                    int shmid;
67                    void *p_shm;
68            } shm_pool[ARTICLE_BLOCK_SHM_COUNT_LIMIT];
69          int shm_count;          int shm_count;
70          ARTICLE_BLOCK *p_block_free_list;          ARTICLE_BLOCK *p_block_free_list;
71          ARTICLE_BLOCK *p_block[ARTICLE_BLOCK_PER_POOL];          ARTICLE_BLOCK *p_block[ARTICLE_BLOCK_PER_POOL];
72          int32_t block_count;          int block_count;
73  };  };
74  typedef struct article_block_pool_t ARTICLE_BLOCK_POOL;  typedef struct article_block_pool_t ARTICLE_BLOCK_POOL;
75    
76  static ARTICLE_BLOCK_POOL *p_article_block_pool = NULL;  static ARTICLE_BLOCK_POOL *p_article_block_pool = NULL;
77    
78  static SECTION_LIST *p_section_list_pool = NULL;  struct section_list_pool_t
79  static int section_list_count = 0;  {
80  static TRIE_NODE *p_trie_dict_section_list = NULL;          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    static SECTION_LIST_POOL *p_section_list_pool = NULL;
90    
91  int article_block_init(const char *filename, int block_count)  int article_block_init(const char *filename, int block_count)
92  {  {
# Line 80  int article_block_init(const char *filen Line 106  int article_block_init(const char *filen
106                  return -1;                  return -1;
107          }          }
108    
109          if (block_count > ARTICLE_BLOCK_PER_POOL)          if (block_count <= 0 || block_count > ARTICLE_BLOCK_PER_POOL)
110          {          {
111                  log_error("article_block_count exceed limit %d\n", ARTICLE_BLOCK_PER_POOL);                  log_error("article_block_count exceed limit %d\n", ARTICLE_BLOCK_PER_POOL);
112                  return -2;                  return -2;
113          }          }
114    
115          p_article_block_pool = calloc(1, sizeof(ARTICLE_BLOCK_POOL));          // Allocate shared memory
116          if (p_article_block_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(ARTICLE_BLOCK_POOL) OOM\n");                  log_error("ftok(%s, %d) error (%d)\n", filename, proj_id, errno);
121                  return -2;                  return -3;
122          }          }
123    
124          // Allocate shared memory          size = sizeof(ARTICLE_BLOCK_POOL);
125            shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600);
126            if (shmid == -1)
127            {
128                    log_error("shmget(article_block_pool_shm, size = %d) error (%d)\n", size, errno);
129                    return -3;
130            }
131            p_shm = shmat(shmid, NULL, 0);
132            if (p_shm == (void *)-1)
133            {
134                    log_error("shmat(shmid = %d) error (%d)\n", shmid, errno);
135                    return -3;
136            }
137    
138            p_article_block_pool = p_shm;
139            p_article_block_pool->shmid = shmid;
140    
141          p_article_block_pool->shm_count = 0;          p_article_block_pool->shm_count = 0;
142          pp_block_next = &(p_article_block_pool->p_block_free_list);          pp_block_next = &(p_article_block_pool->p_block_free_list);
143    
# Line 102  int article_block_init(const char *filen Line 146  int article_block_init(const char *filen
146                  block_count_in_shm = MIN(block_count, ARTICLE_BLOCK_PER_SHM);                  block_count_in_shm = MIN(block_count, ARTICLE_BLOCK_PER_SHM);
147                  block_count -= block_count_in_shm;                  block_count -= block_count_in_shm;
148    
149                  proj_id = getpid() + p_article_block_pool->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                  {                  {
# Line 111  int article_block_init(const char *filen Line 155  int article_block_init(const char *filen
155                          return -3;                          return -3;
156                  }                  }
157    
158                  size = sizeof(shmid) + sizeof(ARTICLE_BLOCK) * (size_t)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                  {                  {
# Line 155  int article_block_init(const char *filen Line 199  int article_block_init(const char *filen
199    
200  void article_block_cleanup(void)  void article_block_cleanup(void)
201  {  {
202          if (p_article_block_pool != NULL)          int shmid;
203    
204            if (p_article_block_pool == NULL)
205          {          {
206                  for (int i = 0; i < p_article_block_pool->shm_count; i++)                  return;
207            }
208    
209            for (int i = 0; i < p_article_block_pool->shm_count; i++)
210            {
211                    if (shmdt((p_article_block_pool->shm_pool + i)->p_shm) == -1)
212                  {                  {
213                          if (shmdt((p_article_block_pool->shm_pool + i)->p_shm) == -1)                          log_error("shmdt(shmid = %d) error (%d)\n", (p_article_block_pool->shm_pool + i)->shmid, errno);
214                          {                  }
                                 log_error("shmdt(shmid = %d) error (%d)\n", (p_article_block_pool->shm_pool + i)->shmid, errno);  
                         }  
215    
216                          if (shmctl((p_article_block_pool->shm_pool + i)->shmid, IPC_RMID, NULL) == -1)                  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);                          log_error("shmctl(shmid = %d, IPC_RMID) error (%d)\n", (p_article_block_pool->shm_pool + i)->shmid, errno);
219                          }                  }
220            }
221    
222            shmid = p_article_block_pool->shmid;
223    
224            if (shmdt(p_article_block_pool) == -1)
225            {
226                    log_error("shmdt(shmid = %d) error (%d)\n", shmid, errno);
227            }
228    
229            if (shmctl(shmid, IPC_RMID, NULL) == -1)
230            {
231                    log_error("shmctl(shmid = %d, IPC_RMID) error (%d)\n", shmid, errno);
232            }
233    
234            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                    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                            log_error("shmat(article_block_pool shmid = %d) error (%d)\n", shmid, errno);
258                            return -2;
259                    }
260            }
261    
262            return 0;
263    }
264    
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                  free(p_article_block_pool);          shmid = p_article_block_pool->shmid;
284                  p_article_block_pool = NULL;  
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)
# Line 279  ARTICLE *article_block_find_by_aid(int32 Line 397  ARTICLE *article_block_find_by_aid(int32
397                  }                  }
398          }          }
399    
400          return (p_block->articles + left);          if (aid != p_block->articles[left].aid) // not found
401            {
402                    return NULL;
403            }
404    
405            return (p_block->articles + left); // found
406  }  }
407    
408  ARTICLE *article_block_find_by_index(int index)  ARTICLE *article_block_find_by_index(int index)
# Line 294  ARTICLE *article_block_find_by_index(int Line 417  ARTICLE *article_block_find_by_index(int
417    
418          if (index < 0 || index / ARTICLE_PER_BLOCK >= p_article_block_pool->block_count)          if (index < 0 || index / ARTICLE_PER_BLOCK >= p_article_block_pool->block_count)
419          {          {
420                  log_error("section_data_find_article_by_index(%d) is out of boundary of block [0, %d)\n", index, p_article_block_pool->block_count);                  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;                  return NULL;
422          }          }
423    
# Line 302  ARTICLE *article_block_find_by_index(int Line 425  ARTICLE *article_block_find_by_index(int
425    
426          if (index % ARTICLE_PER_BLOCK >= p_block->article_count)          if (index % ARTICLE_PER_BLOCK >= p_block->article_count)
427          {          {
428                  log_error("section_data_find_article_by_index(%d) is out of boundary of article [0, %d)\n", index, p_block->article_count);                  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;                  return NULL;
430          }          }
431    
432          return (p_block->articles + (index % ARTICLE_PER_BLOCK));          return (p_block->articles + (index % ARTICLE_PER_BLOCK));
433  }  }
434    
435  SECTION_LIST *section_list_create(const char *sname, const char *stitle, const char *master_name)  extern int section_list_init(const char *filename)
436  {  {
437          SECTION_LIST *p_section;          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)          if (p_section_list_pool != NULL)
447          {          {
448                  p_section_list_pool = calloc(BBS_max_section, sizeof(SECTION_LIST));                  section_list_cleanup();
449                  if (p_section_list_pool == NULL)          }
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("calloc(%d SECTION_LIST) OOM\n", BBS_max_section);                          log_error("semctl(section_list_pool_sem, SETVAL) error (%d)\n", errno);
494                          return NULL;                          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                  section_list_count = 0;          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          if (p_trie_dict_section_list == NULL)          p_section_list_pool = NULL;
556    }
557    
558    void section_list_ex_menu_set_cleanup(void)
559    {
560            int i;
561    
562            for (i = 0; i < p_section_list_pool->section_count; i++)
563          {          {
564                  p_trie_dict_section_list = trie_dict_create();                  if (p_section_list_pool->sections[i].ex_menu_tm > 0)
                 if (p_trie_dict_section_list == NULL)  
565                  {                  {
566                          log_error("trie_dict_create() OOM\n", BBS_max_section);                          unload_menu(&(p_section_list_pool->sections[i].ex_menu_set));
                         return NULL;  
567                  }                  }
568          }          }
569    }
570    
571          if (section_list_count >= BBS_max_section)  int set_section_list_shm_readonly(void)
572    {
573            int shmid;
574            void *p_shm;
575    
576            if (p_section_list_pool == NULL)
577          {          {
578                  log_error("section_list_count exceed limit %d\n", BBS_max_section);                  log_error("p_section_list_pool not initialized\n");
579                    return -1;
580            }
581    
582            shmid = p_section_list_pool->shmid;
583    
584            // Remap shared memory in read-only mode
585            p_shm = shmat(shmid, p_section_list_pool, SHM_RDONLY | SHM_REMAP);
586            if (p_shm == (void *)-1)
587            {
588                    log_error("shmat(section_list_pool shmid = %d) error (%d)\n", shmid, errno);
589                    return -3;
590            }
591    
592            p_section_list_pool = p_shm;
593    
594            return 0;
595    }
596    
597    int detach_section_list_shm(void)
598    {
599            if (p_section_list_pool != NULL && shmdt(p_section_list_pool) == -1)
600            {
601                    log_error("shmdt(section_list_pool) error (%d)\n", errno);
602                    return -1;
603            }
604    
605            p_section_list_pool = NULL;
606    
607            return 0;
608    }
609    
610    inline static void sid_to_str(int32_t sid, char *p_sid_str)
611    {
612            uint32_t u_sid;
613            int i;
614    
615            u_sid = (uint32_t)sid;
616            for (i = 0; i < SID_STR_LEN - 1; i++)
617            {
618                    p_sid_str[i] = (char)(u_sid % 255 + 1);
619                    u_sid /= 255;
620            }
621            p_sid_str[i] = '\0';
622    }
623    
624    SECTION_LIST *section_list_create(int32_t sid, const char *sname, const char *stitle, const char *master_list)
625    {
626            SECTION_LIST *p_section;
627            char sid_str[SID_STR_LEN];
628    
629            if (p_section_list_pool == NULL)
630            {
631                    log_error("session_list_pool not initialized\n");
632                  return NULL;                  return NULL;
633          }          }
634    
635          p_section = p_section_list_pool + section_list_count;          if (p_section_list_pool->section_count >= BBS_max_section)
636            {
637                    log_error("section_count reach limit %d >= %d\n", p_section_list_pool->section_count, BBS_max_section);
638                    return NULL;
639            }
640    
641            sid_to_str(sid, sid_str);
642    
643            p_section = p_section_list_pool->sections + p_section_list_pool->section_count;
644    
645            p_section->sid = sid;
646            p_section->ex_menu_tm = 0;
647    
648          strncpy(p_section->sname, sname, sizeof(p_section->sname - 1));          strncpy(p_section->sname, sname, sizeof(p_section->sname) - 1);
649          p_section->sname[sizeof(p_section->sname - 1)] = '\0';          p_section->sname[sizeof(p_section->sname) - 1] = '\0';
650    
651          strncpy(p_section->stitle, stitle, sizeof(p_section->stitle - 1));          strncpy(p_section->stitle, stitle, sizeof(p_section->stitle) - 1);
652          p_section->stitle[sizeof(p_section->stitle - 1)] = '\0';          p_section->stitle[sizeof(p_section->stitle) - 1] = '\0';
653    
654          strncpy(p_section->master_name, master_name, sizeof(p_section->master_name - 1));          strncpy(p_section->master_list, master_list, sizeof(p_section->master_list) - 1);
655          p_section->master_name[sizeof(p_section->master_name - 1)] = '\0';          p_section->master_list[sizeof(p_section->master_list) - 1] = '\0';
656    
657          if (trie_dict_set(p_trie_dict_section_list, sname, section_list_count) != 1)          if (trie_dict_set(p_section_list_pool->p_trie_dict_section_by_name, sname, p_section_list_pool->section_count) != 1)
658          {          {
659                  log_error("trie_dict_set(section_data, %s, %d) error\n", sname, section_list_count);                  log_error("trie_dict_set(section, %s, %d) error\n", sname, p_section_list_pool->section_count);
660                    return NULL;
661            }
662    
663            if (trie_dict_set(p_section_list_pool->p_trie_dict_section_by_sid, sid_str, p_section_list_pool->section_count) != 1)
664            {
665                    log_error("trie_dict_set(section, %d, %d) error\n", sid, p_section_list_pool->section_count);
666                  return NULL;                  return NULL;
667          }          }
668    
669          section_list_reset_articles(p_section);          section_list_reset_articles(p_section);
670    
671          section_list_count++;          p_section_list_pool->section_count++;
672    
673          return p_section;          return p_section;
674  }  }
# Line 376  void section_list_reset_articles(SECTION Line 684  void section_list_reset_articles(SECTION
684    
685          p_section->page_count = 0;          p_section->page_count = 0;
686          p_section->last_page_visible_article_count = 0;          p_section->last_page_visible_article_count = 0;
687    
688            p_section->ontop_article_count = 0;
689  }  }
690    
691  void section_list_cleanup(void)  SECTION_LIST *section_list_find_by_name(const char *sname)
692  {  {
693          if (p_trie_dict_section_list != NULL)          int64_t index;
694            int ret;
695    
696            if (p_section_list_pool == NULL)
697          {          {
698                  trie_dict_destroy(p_trie_dict_section_list);                  log_error("section_list not initialized\n");
699                  p_trie_dict_section_list = NULL;                  return NULL;
700          }          }
701    
702          if (p_section_list_pool != NULL)          ret = trie_dict_get(p_section_list_pool->p_trie_dict_section_by_name, sname, &index);
703            if (ret < 0)
704          {          {
705                  free(p_section_list_pool);                  log_error("trie_dict_get(section, %s) error\n", sname);
706                  p_section_list_pool = NULL;                  return NULL;
707            }
708            else if (ret == 0)
709            {
710                    return NULL;
711          }          }
712    
713          section_list_count = 0;          return (p_section_list_pool->sections + index);
714  }  }
715    
716  SECTION_LIST *section_list_find_by_name(const char *sname)  SECTION_LIST *section_list_find_by_sid(int32_t sid)
717  {  {
718          int64_t index;          int64_t index;
719            int ret;
720            char sid_str[SID_STR_LEN];
721    
722          if (p_section_list_pool == NULL || p_trie_dict_section_list == NULL)          if (p_section_list_pool == NULL)
723          {          {
724                  log_error("section_list not initialized\n");                  log_error("section_list not initialized\n");
725                  return NULL;                  return NULL;
726          }          }
727    
728          if (trie_dict_get(p_trie_dict_section_list, sname, &index) != 1)          sid_to_str(sid, sid_str);
729    
730            ret = trie_dict_get(p_section_list_pool->p_trie_dict_section_by_sid, sid_str, &index);
731            if (ret < 0)
732            {
733                    log_error("trie_dict_get(section, %d) error\n", sid);
734                    return NULL;
735            }
736            else if (ret == 0)
737          {          {
                 log_error("trie_dict_get(section_data, %s) error\n", sname);  
738                  return NULL;                  return NULL;
739          }          }
740    
741          return (p_section_list_pool + index);          return (p_section_list_pool->sections + index);
742  }  }
743    
744  int section_list_append_article(SECTION_LIST *p_section, const ARTICLE *p_article_src)  int section_list_append_article(SECTION_LIST *p_section, const ARTICLE *p_article_src)
# Line 434  int section_list_append_article(SECTION_ Line 761  int section_list_append_article(SECTION_
761                  return -1;                  return -1;
762          }          }
763    
764            if (p_section->sid != p_article_src->sid)
765            {
766                    log_error("section_list_append_article() error: section sid %d != article sid %d\n", p_section->sid, p_article_src->sid);
767                    return -2;
768            }
769    
770          if (p_section->article_count >= BBS_article_limit_per_section)          if (p_section->article_count >= BBS_article_limit_per_section)
771          {          {
772                  log_error("section_list_append_article() error: article_count reach limit in section %d\n", p_section->sid);                  log_error("section_list_append_article() error: article_count reach limit in section %d\n", p_section->sid);
# Line 466  int section_list_append_article(SECTION_ Line 799  int section_list_append_article(SECTION_
799          // AID of articles should be strictly ascending          // AID of articles should be strictly ascending
800          if (p_article_src->aid <= last_aid)          if (p_article_src->aid <= last_aid)
801          {          {
802                  log_error("section_data_append_article(aid=%d) error: last_aid=%d\n", p_article_src->aid, last_aid);                  log_error("section_list_append_article(aid=%d) error: last_aid=%d\n", p_article_src->aid, last_aid);
803                  return -3;                  return -3;
804          }          }
805    
# Line 530  int section_list_append_article(SECTION_ Line 863  int section_list_append_article(SECTION_
863          p_section->p_article_tail = p_article;          p_section->p_article_tail = p_article;
864    
865          // Update page          // Update page
866          if (p_article->visible && p_section->last_page_visible_article_count % BBS_article_limit_per_page == 0)          if ((p_article->visible && p_section->last_page_visible_article_count % BBS_article_limit_per_page == 0) ||
867                    p_section->article_count == 1)
868          {          {
869                  p_section->p_page_first_article[p_section->page_count] = p_article;                  p_section->p_page_first_article[p_section->page_count] = p_article;
870                  p_section->page_count++;                  p_section->page_count++;
# Line 542  int section_list_append_article(SECTION_ Line 876  int section_list_append_article(SECTION_
876                  p_section->last_page_visible_article_count++;                  p_section->last_page_visible_article_count++;
877          }          }
878    
879            if (p_article->ontop && section_list_update_article_ontop(p_section, p_article) < 0)
880            {
881                    log_error("section_list_update_article_ontop(sid=%d, aid=%d) error\n",
882                                      p_section->sid, p_article->aid);
883                    return -5;
884            }
885    
886          return 0;          return 0;
887  }  }
888    
# Line 553  int section_list_set_article_visible(SEC Line 894  int section_list_set_article_visible(SEC
894    
895          if (p_section == NULL)          if (p_section == NULL)
896          {          {
897                  log_error("section_list_set_article_visible() NULL pointer error\n");                  log_error("NULL pointer error\n");
898                  return -2;                  return -1;
899          }          }
900    
901          p_article = article_block_find_by_aid(aid);          p_article = article_block_find_by_aid(aid);
# Line 563  int section_list_set_article_visible(SEC Line 904  int section_list_set_article_visible(SEC
904                  return -1; // Not found                  return -1; // Not found
905          }          }
906    
907            if (p_section->sid != p_article->sid)
908            {
909                    log_error("Inconsistent section sid %d != article sid %d\n", p_section->sid, p_article->sid);
910                    return -2;
911            }
912    
913          if (p_article->visible == visible)          if (p_article->visible == visible)
914          {          {
915                  return 0; // Already set                  return 0; // Already set
# Line 610  int section_list_set_article_visible(SEC Line 957  int section_list_set_article_visible(SEC
957          return affected_count;          return affected_count;
958  }  }
959    
960  ARTICLE *section_list_find_article_with_offset(SECTION_LIST *p_section, int32_t aid, int32_t *p_page, int32_t *p_offset)  int section_list_update_article_ontop(SECTION_LIST *p_section, ARTICLE *p_article)
961    {
962            int i;
963    
964            if (p_section == NULL || p_article == NULL)
965            {
966                    log_error("NULL pointer error\n");
967                    return -1;
968            }
969    
970            if (p_section->sid != p_article->sid)
971            {
972                    log_error("Inconsistent section sid %d != article sid %d\n", p_section->sid, p_article->sid);
973                    return -2;
974            }
975    
976            if (p_article->ontop)
977            {
978                    for (i = 0; i < p_section->ontop_article_count; i++)
979                    {
980                            if (p_section->p_ontop_articles[i]->aid == p_article->aid)
981                            {
982                                    log_error("Inconsistent state found: article %d already ontop in section %d\n", p_article->aid, p_section->sid);
983                                    return 0;
984                            }
985                            else if (p_section->p_ontop_articles[i]->aid > p_article->aid)
986                            {
987                                    break;
988                            }
989                    }
990    
991                    // Remove the oldest one if the array of ontop articles is full
992                    if (p_section->ontop_article_count >= BBS_ontop_article_limit_per_section)
993                    {
994                            if (i == 0) // p_article is the oldest one
995                            {
996                                    return 0;
997                            }
998                            memmove((void *)(p_section->p_ontop_articles),
999                                            (void *)(p_section->p_ontop_articles + 1),
1000                                            sizeof(ARTICLE *) * (size_t)(i - 1));
1001                            p_section->ontop_article_count--;
1002                            i--;
1003                    }
1004                    else
1005                    {
1006                            memmove((void *)(p_section->p_ontop_articles + i + 1),
1007                                            (void *)(p_section->p_ontop_articles + i),
1008                                            sizeof(ARTICLE *) * (size_t)(p_section->ontop_article_count - i));
1009                    }
1010    
1011                    p_section->p_ontop_articles[i] = p_article;
1012                    p_section->ontop_article_count++;
1013    
1014                    // TODO: debug
1015            }
1016            else // ontop == 0
1017            {
1018                    for (i = 0; i < p_section->ontop_article_count; i++)
1019                    {
1020                            if (p_section->p_ontop_articles[i]->aid == p_article->aid)
1021                            {
1022                                    break;
1023                            }
1024                    }
1025                    if (i == p_section->ontop_article_count) // not found
1026                    {
1027                            log_error("Inconsistent state found: article %d not ontop in section %d\n", p_article->aid, p_section->sid);
1028                            return 0;
1029                    }
1030    
1031                    memmove((void *)(p_section->p_ontop_articles + i),
1032                                    (void *)(p_section->p_ontop_articles + i + 1),
1033                                    sizeof(ARTICLE *) * (size_t)(p_section->ontop_article_count - i - 1));
1034                    p_section->ontop_article_count--;
1035            }
1036    
1037            return 0;
1038    }
1039    
1040    int section_list_page_count_with_ontop(SECTION_LIST *p_section)
1041    {
1042            int page_count;
1043    
1044            if (p_section == NULL)
1045            {
1046                    log_error("NULL pointer error\n");
1047                    return -1;
1048            }
1049    
1050            page_count = p_section->page_count - 1 +
1051                                     (p_section->last_page_visible_article_count + p_section->ontop_article_count) / BBS_article_limit_per_page +
1052                                     ((p_section->last_page_visible_article_count + p_section->ontop_article_count) % BBS_article_limit_per_page == 0 ? 0 : 1);
1053    
1054            return page_count;
1055    }
1056    
1057    int section_list_page_article_count_with_ontop(SECTION_LIST *p_section, int32_t page_id)
1058    {
1059            if (p_section == NULL)
1060            {
1061                    log_error("NULL pointer error\n");
1062                    return -1;
1063            }
1064    
1065            if (page_id < p_section->page_count - 1)
1066            {
1067                    return BBS_article_limit_per_page;
1068            }
1069            else // if (page_id >= p_section->page_count - 1)
1070            {
1071                    return MAX(0, (p_section->last_page_visible_article_count + p_section->ontop_article_count -
1072                                               BBS_article_limit_per_page * (page_id - p_section->page_count + 1)));
1073            }
1074    }
1075    
1076    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)
1077  {  {
1078          ARTICLE *p_article;          ARTICLE *p_article;
1079          int left;          int left;
# Line 619  ARTICLE *section_list_find_article_with_ Line 1082  ARTICLE *section_list_find_article_with_
1082    
1083          *p_page = -1;          *p_page = -1;
1084          *p_offset = -1;          *p_offset = -1;
1085            *pp_next = NULL;
1086    
1087          if (p_section == NULL)          if (p_section == NULL)
1088          {          {
# Line 663  ARTICLE *section_list_find_article_with_ Line 1127  ARTICLE *section_list_find_article_with_
1127          p_article = p_section->p_page_first_article[*p_page];          p_article = p_section->p_page_first_article[*p_page];
1128    
1129          // p_section->p_page_first_article[*p_page]->aid <= aid < p_section->p_page_first_article[*p_page + 1]->aid          // p_section->p_page_first_article[*p_page]->aid <= aid < p_section->p_page_first_article[*p_page + 1]->aid
1130          right = (*p_page == MAX(1, p_section->page_count) - 1 ? INT32_MAX : p_section->p_page_first_article[*p_page + 1]->aid);          right = (*p_page == MAX(0, p_section->page_count - 1) ? INT32_MAX : p_section->p_page_first_article[*p_page + 1]->aid);
1131    
1132          // left will be the offset of article found or offset to insert          // left will be the offset of article found or offset to insert
1133          left = 0;          left = 0;
1134    
1135          while (aid > p_article->aid)          while (aid > p_article->aid)
1136          {          {
                 // aid > p_article->aid  
1137                  p_article = p_article->p_next;                  p_article = p_article->p_next;
1138                  left++;                  left++;
1139    
1140                    if (aid == p_article->aid)
1141                    {
1142                            *pp_next = p_article->p_next;
1143                            break;
1144                    }
1145    
1146                  // over last article in the page                  // over last article in the page
1147                  if (p_article == p_section->p_article_head || p_article->aid >= right)                  if (p_article == p_section->p_article_head || p_article->aid >= right)
1148                  {                  {
1149                          break;                          *pp_next = (p_article == p_section->p_article_head ? p_section->p_article_head : p_section->p_page_first_article[*p_page + 1]);
1150                            *p_offset = left;
1151                            return NULL; // not found
1152                  }                  }
1153          }          }
1154    
1155          if (aid != p_article->aid) // not exist          if (aid < p_article->aid)
1156          {          {
1157                  p_article = NULL;                  *pp_next = p_article;
1158                    p_article = NULL; // not found
1159            }
1160            else // aid == p_article->aid
1161            {
1162                    *pp_next = p_article->p_next;
1163          }          }
1164    
1165          *p_offset = left;          *p_offset = left;
# Line 694  ARTICLE *section_list_find_article_with_ Line 1170  ARTICLE *section_list_find_article_with_
1170  int section_list_calculate_page(SECTION_LIST *p_section, int32_t start_aid)  int section_list_calculate_page(SECTION_LIST *p_section, int32_t start_aid)
1171  {  {
1172          ARTICLE *p_article;          ARTICLE *p_article;
1173            ARTICLE *p_next;
1174          int32_t page;          int32_t page;
1175          int32_t offset;          int32_t offset;
1176          int visible_article_count;          int visible_article_count;
# Line 705  int section_list_calculate_page(SECTION_ Line 1182  int section_list_calculate_page(SECTION_
1182                  return -1;                  return -1;
1183          }          }
1184    
1185          p_article = section_list_find_article_with_offset(p_section, start_aid, &page, &offset);          if (p_section->article_count == 0) // empty
         if (p_article == NULL)  
1186          {          {
1187                  if (page < 0)                  p_section->page_count = 0;
1188                    p_section->last_page_visible_article_count = 0;
1189    
1190                    return 0;
1191            }
1192    
1193            if (start_aid > 0)
1194            {
1195                    p_article = article_block_find_by_aid(start_aid);
1196                    if (p_article == NULL)
1197                  {                  {
1198                          return 0;                          return -1; // Not found
1199                  }                  }
1200    
1201                  log_error("section_list_calculate_page() aid = %d not found in section sid = %d\n", start_aid, p_section->sid);                  if (p_section->sid != p_article->sid)
1202          }                  {
1203                            log_error("section_list_calculate_page() error: section sid %d != start article sid %d\n", p_section->sid, p_article->sid);
1204                            return -2;
1205                    }
1206    
1207          if (offset > 0)                  p_article = section_list_find_article_with_offset(p_section, start_aid, &page, &offset, &p_next);
1208                    if (p_article == NULL)
1209                    {
1210                            if (page < 0)
1211                            {
1212                                    return -1;
1213                            }
1214                            log_error("section_list_calculate_page() aid = %d not found in section sid = %d\n",
1215                                              start_aid, p_section->sid);
1216                            return -2;
1217                    }
1218    
1219                    if (offset > 0)
1220                    {
1221                            p_article = p_section->p_page_first_article[page];
1222                    }
1223            }
1224            else
1225          {          {
1226                  p_article = p_section->p_page_first_article[page];                  p_article = p_section->p_article_head;
1227                    page = 0;
1228                    offset = 0;
1229          }          }
1230    
1231          visible_article_count = 0;          visible_article_count = 0;
# Line 764  int section_list_calculate_page(SECTION_ Line 1271  int section_list_calculate_page(SECTION_
1271    
1272          return 0;          return 0;
1273  }  }
1274    
1275    int32_t article_block_last_aid(void)
1276    {
1277            ARTICLE_BLOCK *p_block = p_article_block_pool->p_block[p_article_block_pool->block_count - 1];
1278            int32_t last_aid = p_block->articles[p_block->article_count - 1].aid;
1279    
1280            return last_aid;
1281    }
1282    
1283    int article_block_article_count(void)
1284    {
1285            int ret;
1286    
1287            if (p_article_block_pool == NULL || p_article_block_pool->block_count <= 0)
1288            {
1289                    return -1;
1290            }
1291    
1292            ret = (p_article_block_pool->block_count - 1) * ARTICLE_PER_BLOCK +
1293                      p_article_block_pool->p_block[p_article_block_pool->block_count - 1]->article_count;
1294    
1295            return ret;
1296    }
1297    
1298    int article_count_of_topic(int32_t aid)
1299    {
1300            ARTICLE *p_article;
1301            int article_count;
1302    
1303            p_article = article_block_find_by_aid(aid);
1304            if (p_article == NULL)
1305            {
1306                    return 0; // Not found
1307            }
1308    
1309            article_count = 0;
1310    
1311            do
1312            {
1313                    if (p_article->tid != 0 && p_article->tid != aid)
1314                    {
1315                            log_error("article_count_of_topic(%d) error: article %d not linked to the topic\n", aid, p_article->aid);
1316                            break;
1317                    }
1318    
1319                    article_count++;
1320                    p_article = p_article->p_topic_next;
1321            } while (p_article->aid != aid);
1322    
1323            return article_count;
1324    }
1325    
1326    int section_list_move_topic(SECTION_LIST *p_section_src, SECTION_LIST *p_section_dest, int32_t aid)
1327    {
1328            ARTICLE *p_article;
1329            ARTICLE *p_next;
1330            int32_t page;
1331            int32_t offset;
1332            int32_t move_article_count;
1333            int32_t dest_article_count_old;
1334            int32_t last_unaffected_aid_src;
1335            int32_t first_inserted_aid_dest;
1336            int move_counter;
1337    
1338            if (p_section_src == NULL || p_section_dest == NULL)
1339            {
1340                    log_error("section_list_move_topic() NULL pointer error\n");
1341                    return -1;
1342            }
1343    
1344            if (p_section_src->sid == p_section_dest->sid)
1345            {
1346                    log_error("section_list_move_topic() src and dest section are the same\n");
1347                    return -1;
1348            }
1349    
1350            if ((p_article = article_block_find_by_aid(aid)) == NULL)
1351            {
1352                    log_error("article_block_find_by_aid(aid = %d) error: article not found\n", aid);
1353                    return -2;
1354            }
1355    
1356            if (p_section_src->sid != p_article->sid)
1357            {
1358                    log_error("section_list_move_topic() error: src section sid %d != article %d sid %d\n",
1359                                      p_section_src->sid, p_article->aid, p_article->sid);
1360                    return -2;
1361            }
1362    
1363            if (p_article->tid != 0)
1364            {
1365                    log_error("section_list_move_topic(aid = %d) error: article is not head of topic, tid = %d\n", aid, p_article->tid);
1366                    return -2;
1367            }
1368    
1369            last_unaffected_aid_src = (p_article == p_section_src->p_article_head ? 0 : p_article->p_prior->aid);
1370    
1371            move_article_count = article_count_of_topic(aid);
1372            if (move_article_count <= 0)
1373            {
1374                    log_error("article_count_of_topic(aid = %d) <= 0\n", aid);
1375                    return -2;
1376            }
1377    
1378            if (p_section_dest->article_count + move_article_count > BBS_article_limit_per_section)
1379            {
1380                    log_error("section_list_move_topic() error: article_count %d reach limit in section %d\n",
1381                                      p_section_dest->article_count + move_article_count, p_section_dest->sid);
1382                    return -3;
1383            }
1384    
1385            dest_article_count_old = p_section_dest->article_count;
1386            move_counter = 0;
1387            first_inserted_aid_dest = p_article->aid;
1388    
1389            do
1390            {
1391                    if (p_section_src->sid != p_article->sid)
1392                    {
1393                            log_error("section_list_move_topic() warning: src section sid %d != article %d sid %d\n",
1394                                              p_section_src->sid, p_article->aid, p_article->sid);
1395                            p_article = p_article->p_topic_next;
1396                            continue;
1397                    }
1398    
1399                    // Remove from bi-directional article list of src section
1400                    if (p_section_src->p_article_head == p_article)
1401                    {
1402                            p_section_src->p_article_head = p_article->p_next;
1403                    }
1404                    if (p_section_src->p_article_tail == p_article)
1405                    {
1406                            p_section_src->p_article_tail = p_article->p_prior;
1407                    }
1408                    if (p_section_src->p_article_head == p_article) // || p_section_src->p_article_tail == p_article
1409                    {
1410                            p_section_src->p_article_head = NULL;
1411                            p_section_src->p_article_tail = NULL;
1412                    }
1413    
1414                    p_article->p_prior->p_next = p_article->p_next;
1415                    p_article->p_next->p_prior = p_article->p_prior;
1416    
1417                    // Update sid of article
1418                    p_article->sid = p_section_dest->sid;
1419    
1420                    if (section_list_find_article_with_offset(p_section_dest, p_article->aid, &page, &offset, &p_next) != NULL)
1421                    {
1422                            log_error("section_list_move_topic() warning: article %d already in section %d\n", p_article->aid, p_section_dest->sid);
1423                            p_article = p_article->p_topic_next;
1424                            continue;
1425                    }
1426    
1427                    // Insert into bi-directional article list of dest section
1428                    if (p_next == NULL) // empty section
1429                    {
1430                            p_section_dest->p_article_head = p_article;
1431                            p_section_dest->p_article_tail = p_article;
1432                            p_article->p_prior = p_article;
1433                            p_article->p_next = p_article;
1434                    }
1435                    else
1436                    {
1437                            if (p_section_dest->p_article_head == p_next)
1438                            {
1439                                    if (p_article->aid < p_next->aid)
1440                                    {
1441                                            p_section_dest->p_article_head = p_article;
1442                                    }
1443                                    else // p_article->aid > p_next->aid
1444                                    {
1445                                            p_section_dest->p_article_tail = p_article;
1446                                    }
1447                            }
1448    
1449                            p_article->p_prior = p_next->p_prior;
1450                            p_article->p_next = p_next;
1451                            p_next->p_prior->p_next = p_article;
1452                            p_next->p_prior = p_article;
1453                    }
1454    
1455                    // Update article / topic counter of src / desc section
1456                    p_section_src->article_count--;
1457                    p_section_dest->article_count++;
1458                    if (p_article->tid == 0)
1459                    {
1460                            p_section_src->topic_count--;
1461                            p_section_dest->topic_count++;
1462                    }
1463    
1464                    // Update visible article / topic counter of src / desc section
1465                    if (p_article->visible)
1466                    {
1467                            p_section_src->visible_article_count--;
1468                            p_section_dest->visible_article_count++;
1469                            if (p_article->tid == 0)
1470                            {
1471                                    p_section_src->visible_topic_count--;
1472                                    p_section_dest->visible_topic_count++;
1473                            }
1474                    }
1475    
1476                    // Update page for empty dest section
1477                    if (p_section_dest->article_count == 1)
1478                    {
1479                            p_section_dest->p_page_first_article[0] = p_article;
1480                            p_section_dest->page_count = 1;
1481                            p_section_dest->last_page_visible_article_count = (p_article->visible ? 1 : 0);
1482                    }
1483    
1484                    p_article = p_article->p_topic_next;
1485    
1486                    move_counter++;
1487                    if (move_counter % CALCULATE_PAGE_THRESHOLD == 0)
1488                    {
1489                            // Re-calculate pages of desc section
1490                            if (section_list_calculate_page(p_section_dest, first_inserted_aid_dest) < 0)
1491                            {
1492                                    log_error("section_list_calculate_page(dest section = %d, aid = %d) error\n",
1493                                                      p_section_dest->sid, first_inserted_aid_dest);
1494                            }
1495    
1496                            first_inserted_aid_dest = p_article->aid;
1497                    }
1498            } while (p_article->aid != aid);
1499    
1500            if (p_section_dest->article_count - dest_article_count_old != move_article_count)
1501            {
1502                    log_error("section_list_move_topic() warning: count of moved articles %d != %d\n",
1503                                      p_section_dest->article_count - dest_article_count_old, move_article_count);
1504            }
1505    
1506            // Re-calculate pages of src section
1507            if (section_list_calculate_page(p_section_src, last_unaffected_aid_src) < 0)
1508            {
1509                    log_error("section_list_calculate_page(src section = %d, aid = %d) error at aid = %d\n",
1510                                      p_section_src->sid, last_unaffected_aid_src, aid);
1511            }
1512    
1513            if (move_counter % CALCULATE_PAGE_THRESHOLD != 0)
1514            {
1515                    // Re-calculate pages of desc section
1516                    if (section_list_calculate_page(p_section_dest, first_inserted_aid_dest) < 0)
1517                    {
1518                            log_error("section_list_calculate_page(dest section = %d, aid = %d) error\n",
1519                                              p_section_dest->sid, first_inserted_aid_dest);
1520                    }
1521            }
1522    
1523            return move_article_count;
1524    }
1525    
1526    int get_section_index(SECTION_LIST *p_section)
1527    {
1528            int index;
1529    
1530            if (p_section_list_pool == NULL)
1531            {
1532                    log_error("get_section_index() error: uninitialized\n");
1533                    return -1;
1534            }
1535    
1536            if (p_section == NULL)
1537            {
1538                    index = BBS_max_section;
1539            }
1540            else
1541            {
1542                    index = (int)(p_section - p_section_list_pool->sections);
1543                    if (index < 0 || index >= BBS_max_section)
1544                    {
1545                            log_error("get_section_index(%d) error: index out of range\n", index);
1546                            return -2;
1547                    }
1548            }
1549    
1550            return index;
1551    }
1552    
1553    int section_list_try_rd_lock(SECTION_LIST *p_section, int wait_sec)
1554    {
1555            int index;
1556            struct sembuf sops[4];
1557            struct timespec timeout;
1558            int ret;
1559    
1560            index = get_section_index(p_section);
1561            if (index < 0)
1562            {
1563                    return -2;
1564            }
1565    
1566            sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1567            sops[0].sem_op = 0;                                                                // wait until unlocked
1568            sops[0].sem_flg = 0;
1569    
1570            sops[1].sem_num = (unsigned short)(index * 2); // r_sem of section index
1571            sops[1].sem_op = 1;                                                        // lock
1572            sops[1].sem_flg = SEM_UNDO;                                        // undo on terminate
1573    
1574            // Read lock on any specific section will also acquire single read lock on "all section"
1575            // so that write lock on all section only need to acquire single write on on "all section"
1576            // rather than to acquire multiple write locks on all the available sections.
1577            if (index != BBS_max_section)
1578            {
1579                    sops[2].sem_num = BBS_max_section * 2 + 1; // w_sem of all section
1580                    sops[2].sem_op = 0;                                                // wait until unlocked
1581                    sops[2].sem_flg = 0;
1582    
1583                    sops[3].sem_num = BBS_max_section * 2; // r_sem of all section
1584                    sops[3].sem_op = 1;                                        // lock
1585                    sops[3].sem_flg = SEM_UNDO;                        // undo on terminate
1586            }
1587    
1588            timeout.tv_sec = wait_sec;
1589            timeout.tv_nsec = 0;
1590    
1591            ret = semtimedop(p_section_list_pool->semid, sops, (index == BBS_max_section ? 2 : 4), &timeout);
1592            if (ret == -1 && errno != EAGAIN && errno != EINTR)
1593            {
1594                    log_error("semtimedop(index = %d, lock read) error %d\n", index, errno);
1595            }
1596    
1597            return ret;
1598    }
1599    
1600    int section_list_try_rw_lock(SECTION_LIST *p_section, int wait_sec)
1601    {
1602            int index;
1603            struct sembuf sops[3];
1604            struct timespec timeout;
1605            int ret;
1606    
1607            index = get_section_index(p_section);
1608            if (index < 0)
1609            {
1610                    return -2;
1611            }
1612    
1613            sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1614            sops[0].sem_op = 0;                                                                // wait until unlocked
1615            sops[0].sem_flg = 0;
1616    
1617            sops[1].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1618            sops[1].sem_op = 1;                                                                // lock
1619            sops[1].sem_flg = SEM_UNDO;                                                // undo on terminate
1620    
1621            sops[2].sem_num = (unsigned short)(index * 2); // r_sem of section index
1622            sops[2].sem_op = 0;                                                        // wait until unlocked
1623            sops[2].sem_flg = 0;
1624    
1625            timeout.tv_sec = wait_sec;
1626            timeout.tv_nsec = 0;
1627    
1628            ret = semtimedop(p_section_list_pool->semid, sops, 3, &timeout);
1629            if (ret == -1 && errno != EAGAIN && errno != EINTR)
1630            {
1631                    log_error("semtimedop(index = %d, lock write) error %d\n", index, errno);
1632            }
1633    
1634            return ret;
1635    }
1636    
1637    int section_list_rd_unlock(SECTION_LIST *p_section)
1638    {
1639            int index;
1640            struct sembuf sops[2];
1641            int ret;
1642    
1643            index = get_section_index(p_section);
1644            if (index < 0)
1645            {
1646                    return -2;
1647            }
1648    
1649            sops[0].sem_num = (unsigned short)(index * 2); // r_sem of section index
1650            sops[0].sem_op = -1;                                               // unlock
1651            sops[0].sem_flg = IPC_NOWAIT | SEM_UNDO;           // no wait
1652    
1653            if (index != BBS_max_section)
1654            {
1655                    sops[1].sem_num = BBS_max_section * 2;   // r_sem of all section
1656                    sops[1].sem_op = -1;                                     // unlock
1657                    sops[1].sem_flg = IPC_NOWAIT | SEM_UNDO; // no wait
1658            }
1659    
1660            ret = semop(p_section_list_pool->semid, sops, (index == BBS_max_section ? 1 : 2));
1661            if (ret == -1 && errno != EAGAIN && errno != EINTR)
1662            {
1663                    log_error("semop(index = %d, unlock read) error %d\n", index, errno);
1664            }
1665    
1666            return ret;
1667    }
1668    
1669    int section_list_rw_unlock(SECTION_LIST *p_section)
1670    {
1671            int index;
1672            struct sembuf sops[1];
1673            int ret;
1674    
1675            index = get_section_index(p_section);
1676            if (index < 0)
1677            {
1678                    return -2;
1679            }
1680    
1681            sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1682            sops[0].sem_op = -1;                                                       // unlock
1683            sops[0].sem_flg = IPC_NOWAIT | SEM_UNDO;                   // no wait
1684    
1685            ret = semop(p_section_list_pool->semid, sops, 1);
1686            if (ret == -1 && errno != EAGAIN && errno != EINTR)
1687            {
1688                    log_error("semop(index = %d, unlock write) error %d\n", index, errno);
1689            }
1690    
1691            return ret;
1692    }
1693    
1694    int section_list_rd_lock(SECTION_LIST *p_section)
1695    {
1696            int timer = 0;
1697            int sid = (p_section == NULL ? 0 : p_section->sid);
1698            int ret = -1;
1699    
1700            while (!SYS_server_exit)
1701            {
1702                    ret = section_list_try_rd_lock(p_section, SECTION_TRY_LOCK_WAIT_TIME);
1703                    if (ret == 0) // success
1704                    {
1705                            break;
1706                    }
1707                    else if (errno == EAGAIN || errno == EINTR) // retry
1708                    {
1709                            timer++;
1710                            if (timer % SECTION_TRY_LOCK_TIMES == 0)
1711                            {
1712                                    log_error("section_list_rd_lock() tried %d times on section %d\n", sid, timer);
1713                            }
1714                    }
1715                    else // failed
1716                    {
1717                            log_error("section_list_rd_lock() failed on section %d\n", sid);
1718                            break;
1719                    }
1720            }
1721    
1722            return ret;
1723    }
1724    
1725    int section_list_rw_lock(SECTION_LIST *p_section)
1726    {
1727            int timer = 0;
1728            int sid = (p_section == NULL ? 0 : p_section->sid);
1729            int ret = -1;
1730    
1731            while (!SYS_server_exit)
1732            {
1733                    ret = section_list_try_rw_lock(p_section, SECTION_TRY_LOCK_WAIT_TIME);
1734                    if (ret == 0) // success
1735                    {
1736                            break;
1737                    }
1738                    else if (errno == EAGAIN || errno == EINTR) // retry
1739                    {
1740                            timer++;
1741                            if (timer % SECTION_TRY_LOCK_TIMES == 0)
1742                            {
1743                                    log_error("acquire_section_rw_lock() tried %d times on section %d\n", sid, timer);
1744                            }
1745                    }
1746                    else // failed
1747                    {
1748                            log_error("acquire_section_rw_lock() failed on section %d\n", sid);
1749                            break;
1750                    }
1751            }
1752    
1753            return ret;
1754    }

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