/[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.28 by sysadm, Tue May 27 07:21:43 2025 UTC Revision 1.68 by sysadm, Wed Jan 7 14:39:16 2026 UTC
# Line 1  Line 1 
1  /***************************************************************************  /* SPDX-License-Identifier: GPL-3.0-or-later */
2                                             section_list.c  -  description  /*
3                                                           -------------------   * section_list
4          Copyright            : (C) 2004-2025 by Leaflet   *   - data models and basic operations of section and article
5          Email                : leaflet@leafok.com   *
6   ***************************************************************************/   * Copyright (C) 2004-2026  Leaflet <leaflet@leafok.com>
7     */
8  /***************************************************************************  
9   *                                                                         *  #ifdef HAVE_CONFIG_H
10   *   This program is free software; you can redistribute it and/or modify  *  #include "config.h"
11   *   it under the terms of the GNU General Public License as published by  *  #endif
  *   the Free Software Foundation; either version 3 of the License, or     *  
  *   (at your option) any later version.                                   *  
  *                                                                         *  
  ***************************************************************************/  
12    
 #define _GNU_SOURCE  
   
 #include "section_list.h"  
13  #include "log.h"  #include "log.h"
14    #include "section_list.h"
15  #include "trie_dict.h"  #include "trie_dict.h"
16    #include "user_list.h"
17    #include <errno.h>
18    #include <fcntl.h>
19    #include <signal.h>
20  #include <stdio.h>  #include <stdio.h>
21    #include <stdlib.h>
22  #include <string.h>  #include <string.h>
 #include <signal.h>  
23  #include <unistd.h>  #include <unistd.h>
24  #include <stdlib.h>  #include <sys/mman.h>
 #include <errno.h>  
25  #include <sys/param.h>  #include <sys/param.h>
26  #include <sys/sem.h>  #include <sys/sem.h>
27  #include <sys/shm.h>  #include <sys/stat.h>
 #include <sys/ipc.h>  
28    
29  #ifdef _SEM_SEMUN_UNDEFINED  #if defined(_SEM_SEMUN_UNDEFINED) || defined(__CYGWIN__)
30  union semun  union semun
31  {  {
32          int val;                           /* Value for SETVAL */          int val;                           /* Value for SETVAL */
# Line 39  union semun Line 35  union semun
35          struct seminfo *__buf; /* Buffer for IPC_INFO          struct seminfo *__buf; /* Buffer for IPC_INFO
36                                                            (Linux-specific) */                                                            (Linux-specific) */
37  };  };
38  #endif // #ifdef _SEM_SEMUN_UNDEFINED  #endif // #if defined(_SEM_SEMUN_UNDEFINED)
39    
40  #define SECTION_TRY_LOCK_WAIT_TIME 1 // second  enum _section_list_constant_t
41  #define SECTION_TRY_LOCK_TIMES 10  {
42            SECTION_TRY_LOCK_WAIT_TIME = 1, // second
43            SECTION_TRY_LOCK_TIMES = 10,
44            SECTION_DEAD_LOCK_TIMEOUT = 15, // second
45    
46  #define ARTICLE_BLOCK_PER_SHM 400                 // sizeof(ARTICLE_BLOCK) * ARTICLE_BLOCK_PER_SHM is the size of each shm segment to allocate          ARTICLE_BLOCK_PER_SHM = 1000,           // sizeof(ARTICLE_BLOCK) * ARTICLE_BLOCK_PER_SHM is the size of each shm segment to allocate
47  #define ARTICLE_BLOCK_SHM_COUNT_LIMIT 200 // limited by length (8-bit) of proj_id in ftok(path, proj_id)          ARTICLE_BLOCK_SHM_COUNT_LIMIT = 80, // limited by length (8-bit) of proj_id in ftok(path, proj_id)
48  #define ARTICLE_BLOCK_PER_POOL (ARTICLE_BLOCK_PER_SHM * ARTICLE_BLOCK_SHM_COUNT_LIMIT)          ARTICLE_BLOCK_PER_POOL = (ARTICLE_BLOCK_PER_SHM * ARTICLE_BLOCK_SHM_COUNT_LIMIT),
49    
50  #define CALCULATE_PAGE_THRESHOLD 100 // Adjust to tune performance of move topic          CALCULATE_PAGE_THRESHOLD = 100, // Adjust to tune performance of moving topic between sections
51    
52  #define SID_STR_LEN 5 // 32-bit + NULL          SID_STR_LEN = 5, // 32-bit + NULL
53    };
54    
55  struct article_block_t  struct article_block_t
56  {  {
57          ARTICLE articles[ARTICLE_PER_BLOCK];          ARTICLE articles[BBS_article_count_per_block];
58          int article_count;          int article_count;
59          struct article_block_t *p_next_block;          struct article_block_t *p_next_block;
60  };  };
# Line 62  typedef struct article_block_t ARTICLE_B Line 62  typedef struct article_block_t ARTICLE_B
62    
63  struct article_block_pool_t  struct article_block_pool_t
64  {  {
65          int shmid;          size_t shm_size;
66          struct          struct
67          {          {
68                  int shmid;                  size_t shm_size;
69                  void *p_shm;                  void *p_shm;
70          } shm_pool[ARTICLE_BLOCK_SHM_COUNT_LIMIT];          } shm_pool[ARTICLE_BLOCK_SHM_COUNT_LIMIT];
71          int shm_count;          int shm_count;
# Line 75  struct article_block_pool_t Line 75  struct article_block_pool_t
75  };  };
76  typedef struct article_block_pool_t ARTICLE_BLOCK_POOL;  typedef struct article_block_pool_t ARTICLE_BLOCK_POOL;
77    
78    static char article_block_shm_name[FILE_NAME_LEN];
79  static ARTICLE_BLOCK_POOL *p_article_block_pool = NULL;  static ARTICLE_BLOCK_POOL *p_article_block_pool = NULL;
80    
81  struct section_list_pool_t  static char section_list_shm_name[FILE_NAME_LEN];
82  {  SECTION_LIST_POOL *p_section_list_pool = NULL;
         int shmid;  
         SECTION_LIST sections[BBS_max_section];  
         int section_count;  
         int semid;  
         TRIE_NODE *p_trie_dict_section_by_name;  
         TRIE_NODE *p_trie_dict_section_by_sid;  
 };  
 typedef struct section_list_pool_t SECTION_LIST_POOL;  
83    
84  static SECTION_LIST_POOL *p_section_list_pool = NULL;  #ifndef HAVE_SYSTEM_V
85    static int section_list_reset_lock(SECTION_LIST *p_section);
86    #endif
87    
88  int article_block_init(const char *filename, int block_count)  int article_block_init(const char *filename, int block_count)
89  {  {
90          int shmid;          char filepath[FILE_PATH_LEN];
91          int proj_id;          int fd;
         key_t key;  
92          size_t size;          size_t size;
93          void *p_shm;          void *p_shm;
94          int i;          int i;
# Line 104  int article_block_init(const char *filen Line 98  int article_block_init(const char *filen
98    
99          if (p_article_block_pool != NULL)          if (p_article_block_pool != NULL)
100          {          {
101                  log_error("article_block_pool already initialized\n");                  log_error("article_block_pool already initialized");
102                  return -1;                  return -1;
103          }          }
104    
105          if (block_count <= 0 || block_count > ARTICLE_BLOCK_PER_POOL)          if (block_count <= 0 || block_count > ARTICLE_BLOCK_PER_POOL)
106          {          {
107                  log_error("article_block_count exceed limit %d\n", ARTICLE_BLOCK_PER_POOL);                  log_error("article_block_count exceed limit %d", ARTICLE_BLOCK_PER_POOL);
108                  return -2;                  return -2;
109          }          }
110    
111            strncpy(filepath, filename, sizeof(filepath) - 1);
112            filepath[sizeof(filepath) - 1] = '\0';
113            snprintf(article_block_shm_name, sizeof(article_block_shm_name), "/ARTICLE_BLOCK_SHM_%s", basename(filepath));
114    
115          // Allocate shared memory          // Allocate shared memory
116          proj_id = ARTICLE_BLOCK_SHM_COUNT_LIMIT; // keep different from proj_id used to create block shm          size = sizeof(ARTICLE_BLOCK_POOL);
117          key = ftok(filename, proj_id);          snprintf(filepath, sizeof(filepath), "%s_%d", article_block_shm_name, ARTICLE_BLOCK_SHM_COUNT_LIMIT);
118          if (key == -1)  
119            if (shm_unlink(filepath) == -1 && errno != ENOENT)
120          {          {
121                  log_error("ftok(%s, %d) error (%d)\n", filename, proj_id, errno);                  log_error("shm_unlink(%s) error (%d)", filepath, errno);
122                  return -3;                  return -2;
123          }          }
124    
125          size = sizeof(ARTICLE_BLOCK_POOL);          if ((fd = shm_open(filepath, O_CREAT | O_EXCL | O_RDWR, 0600)) == -1)
         shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600);  
         if (shmid == -1)  
126          {          {
127                  log_error("shmget(article_block_pool_shm, size = %d) error (%d)\n", size, errno);                  log_error("shm_open(%s) error (%d)", filepath, errno);
128                  return -3;                  return -2;
129          }          }
130          p_shm = shmat(shmid, NULL, 0);          if (ftruncate(fd, (off_t)size) == -1)
         if (p_shm == (void *)-1)  
131          {          {
132                  log_error("shmat(shmid = %d) error (%d)\n", shmid, errno);                  log_error("ftruncate(size=%d) error (%d)", size, errno);
133                  return -3;                  close(fd);
134                    return -2;
135            }
136    
137            p_shm = mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0L);
138            if (p_shm == MAP_FAILED)
139            {
140                    log_error("mmap() error (%d)", errno);
141                    close(fd);
142                    return -2;
143            }
144    
145            if (close(fd) < 0)
146            {
147                    log_error("close(fd) error (%d)", errno);
148                    return -1;
149          }          }
150    
151          p_article_block_pool = p_shm;          p_article_block_pool = p_shm;
152          p_article_block_pool->shmid = shmid;          p_article_block_pool->shm_size = size;
153    
154          p_article_block_pool->shm_count = 0;          p_article_block_pool->shm_count = 0;
155          pp_block_next = &(p_article_block_pool->p_block_free_list);          pp_block_next = &(p_article_block_pool->p_block_free_list);
# Line 148  int article_block_init(const char *filen Line 159  int article_block_init(const char *filen
159                  block_count_in_shm = MIN(block_count, ARTICLE_BLOCK_PER_SHM);                  block_count_in_shm = MIN(block_count, ARTICLE_BLOCK_PER_SHM);
160                  block_count -= block_count_in_shm;                  block_count -= block_count_in_shm;
161    
162                  proj_id = p_article_block_pool->shm_count;                  size = sizeof(ARTICLE_BLOCK) * (size_t)block_count_in_shm;
163                  key = ftok(filename, proj_id);                  snprintf(filepath, sizeof(filepath), "%s_%d", article_block_shm_name, p_article_block_pool->shm_count);
164                  if (key == -1)  
165                    if (shm_unlink(filepath) == -1 && errno != ENOENT)
166                  {                  {
167                          log_error("ftok(%s, %d) error (%d)\n", filename, proj_id, errno);                          log_error("shm_unlink(%s) error (%d)", filepath, errno);
168                          article_block_cleanup();                          return -2;
                         return -3;  
169                  }                  }
170    
171                  size = sizeof(ARTICLE_BLOCK) * (size_t)block_count_in_shm;                  if ((fd = shm_open(filepath, O_CREAT | O_EXCL | O_RDWR, 0600)) == -1)
                 shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600);  
                 if (shmid == -1)  
172                  {                  {
173                          log_error("shmget(shm_index = %d, size = %d) error (%d)\n", p_article_block_pool->shm_count, size, errno);                          log_error("shm_open(%s) error (%d)", filepath, errno);
174                          article_block_cleanup();                          return -2;
                         return -3;  
175                  }                  }
176                  p_shm = shmat(shmid, NULL, 0);                  if (ftruncate(fd, (off_t)size) == -1)
                 if (p_shm == (void *)-1)  
177                  {                  {
178                          log_error("shmat(shmid = %d) error (%d)\n", shmid, errno);                          log_error("ftruncate(size=%d) error (%d)", size, errno);
179                          article_block_cleanup();                          close(fd);
180                          return -3;                          return -2;
181                    }
182    
183                    p_shm = mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0L);
184                    if (p_shm == MAP_FAILED)
185                    {
186                            log_error("mmap() error (%d)", errno);
187                            close(fd);
188                            return -2;
189                    }
190    
191                    if (close(fd) < 0)
192                    {
193                            log_error("close(fd) error (%d)", errno);
194                            return -1;
195                  }                  }
196    
197                  (p_article_block_pool->shm_pool + p_article_block_pool->shm_count)->shmid = shmid;                  (p_article_block_pool->shm_pool + p_article_block_pool->shm_count)->shm_size = size;
198                  (p_article_block_pool->shm_pool + p_article_block_pool->shm_count)->p_shm = p_shm;                  (p_article_block_pool->shm_pool + p_article_block_pool->shm_count)->p_shm = p_shm;
199                  p_article_block_pool->shm_count++;                  p_article_block_pool->shm_count++;
200    
# Line 201  int article_block_init(const char *filen Line 222  int article_block_init(const char *filen
222    
223  void article_block_cleanup(void)  void article_block_cleanup(void)
224  {  {
225          int shmid;          char filepath[FILE_PATH_LEN];
226    
227          if (p_article_block_pool == NULL)          if (p_article_block_pool == NULL)
228          {          {
# Line 210  void article_block_cleanup(void) Line 231  void article_block_cleanup(void)
231    
232          for (int i = 0; i < p_article_block_pool->shm_count; i++)          for (int i = 0; i < p_article_block_pool->shm_count; i++)
233          {          {
234                  if (shmdt((p_article_block_pool->shm_pool + i)->p_shm) == -1)                  snprintf(filepath, sizeof(filepath), "%s_%d", article_block_shm_name, i);
                 {  
                         log_error("shmdt(shmid = %d) error (%d)\n", (p_article_block_pool->shm_pool + i)->shmid, errno);  
                 }  
235    
236                  if (shmctl((p_article_block_pool->shm_pool + i)->shmid, IPC_RMID, NULL) == -1)                  if (shm_unlink(filepath) == -1 && errno != ENOENT)
237                  {                  {
238                          log_error("shmctl(shmid = %d, IPC_RMID) error (%d)\n", (p_article_block_pool->shm_pool + i)->shmid, errno);                          log_error("shm_unlink(%s) error (%d)", filepath, errno);
239                  }                  }
240          }          }
241    
242          shmid = p_article_block_pool->shmid;          snprintf(filepath, sizeof(filepath), "%s_%d", article_block_shm_name, ARTICLE_BLOCK_SHM_COUNT_LIMIT);
   
         if (shmdt(p_article_block_pool) == -1)  
         {  
                 log_error("shmdt(shmid = %d) error (%d)\n", shmid, errno);  
         }  
243    
244          if (shmctl(shmid, IPC_RMID, NULL) == -1)          if (shm_unlink(filepath) == -1 && errno != ENOENT)
245          {          {
246                  log_error("shmctl(shmid = %d, IPC_RMID) error (%d)\n", shmid, errno);                  log_error("shm_unlink(%s) error (%d)", filepath, errno);
247          }          }
248    
249          p_article_block_pool = NULL;          detach_article_block_shm();
250  }  }
251    
252  int set_article_block_shm_readonly(void)  int set_article_block_shm_readonly(void)
253  {  {
254          int shmid;          // int i;
         void *p_shm;  
         int i;  
255    
256          if (p_article_block_pool == NULL)          if (p_article_block_pool == NULL)
257          {          {
258                  log_error("article_block_pool not initialized\n");                  log_error("article_block_pool not initialized");
259                  return -1;                  return -1;
260          }          }
261    
262          for (i = 0; i < p_article_block_pool->shm_count; i++)          // for (i = 0; i < p_article_block_pool->shm_count; i++)
263          {          // {
264                  shmid = (p_article_block_pool->shm_pool + i)->shmid;          //      if ((p_article_block_pool->shm_pool + i)->p_shm != NULL &&
265            //              mprotect((p_article_block_pool->shm_pool + i)->p_shm, (p_article_block_pool->shm_pool + i)->shm_size, PROT_READ) < 0)
266            //      {
267            //              log_error("mprotect() error (%d)", errno);
268            //              return -2;
269            //      }
270            // }
271    
272                  // Remap shared memory in read-only mode          if (p_article_block_pool != NULL &&
273                  p_shm = shmat(shmid, (p_article_block_pool->shm_pool + i)->p_shm, SHM_RDONLY | SHM_REMAP);                  mprotect(p_article_block_pool, p_article_block_pool->shm_size, PROT_READ) < 0)
274                  if (p_shm == (void *)-1)          {
275                  {                  log_error("mprotect() error (%d)", errno);
276                          log_error("shmat(article_block_pool shmid = %d) error (%d)\n", shmid, errno);                  return -3;
                         return -2;  
                 }  
277          }          }
278    
279          return 0;          return 0;
# Line 266  int set_article_block_shm_readonly(void) Line 281  int set_article_block_shm_readonly(void)
281    
282  int detach_article_block_shm(void)  int detach_article_block_shm(void)
283  {  {
284          int shmid;          int shm_count;
285            size_t pool_shm_size;
286    
287          if (p_article_block_pool == NULL)          if (p_article_block_pool == NULL)
288          {          {
289                  return -1;                  return -1;
290          }          }
291    
292          for (int i = 0; i < p_article_block_pool->shm_count; i++)          shm_count = p_article_block_pool->shm_count;
293            pool_shm_size = p_article_block_pool->shm_size;
294    
295            for (int i = 0; i < shm_count; i++)
296          {          {
297                  if ((p_article_block_pool->shm_pool + i)->p_shm != NULL && shmdt((p_article_block_pool->shm_pool + i)->p_shm) == -1)                  if ((p_article_block_pool->shm_pool + i)->p_shm != NULL &&
298                            munmap((p_article_block_pool->shm_pool + i)->p_shm, (p_article_block_pool->shm_pool + i)->shm_size) < 0)
299                  {                  {
300                          log_error("shmdt(shmid = %d) error (%d)\n", (p_article_block_pool->shm_pool + i)->shmid, errno);                          log_error("munmap() error (%d)", errno);
301                          return -2;                          return -2;
302                  }                  }
303          }          }
304    
305          shmid = p_article_block_pool->shmid;          if (p_article_block_pool != NULL && munmap(p_article_block_pool, pool_shm_size) < 0)
   
         if (shmdt(p_article_block_pool) == -1)  
306          {          {
307                  log_error("shmdt(shmid = %d) error (%d)\n", shmid, errno);                  log_error("munmap() error (%d)", errno);
308                  return -3;                  return -3;
309          }          }
310    
# Line 322  int article_block_reset(void) Line 340  int article_block_reset(void)
340    
341          if (p_article_block_pool == NULL)          if (p_article_block_pool == NULL)
342          {          {
343                  log_error("article_block_pool not initialized\n");                  log_error("article_block_pool not initialized");
344                  return -1;                  return -1;
345          }          }
346    
# Line 345  ARTICLE *article_block_find_by_aid(int32 Line 363  ARTICLE *article_block_find_by_aid(int32
363    
364          if (p_article_block_pool == NULL)          if (p_article_block_pool == NULL)
365          {          {
366                  log_error("article_block_pool not initialized\n");                  log_error("article_block_pool not initialized");
367                  return NULL;                  return NULL;
368          }          }
369    
# Line 355  ARTICLE *article_block_find_by_aid(int32 Line 373  ARTICLE *article_block_find_by_aid(int32
373          }          }
374    
375          left = 0;          left = 0;
376          right = p_article_block_pool->block_count;          right = p_article_block_pool->block_count - 1;
377    
378          // aid in the range [ head aid of blocks[left], tail aid of blocks[right - 1] ]          // aid in the range [ head aid of blocks[left], tail aid of blocks[right] ]
379          while (left < right - 1)          while (left < right)
380          {          {
381                  // get block offset no less than mid value of left and right block offsets                  // get block offset no less than mid value of left and right block offsets
382                  mid = (left + right) / 2 + (right - left) % 2;                  mid = left + (right - left + 1) / 2;
   
                 if (mid >= p_article_block_pool->block_count)  
                 {  
                         log_error("block(mid = %d) is out of boundary\n", mid);  
                         return NULL;  
                 }  
383    
384                  if (aid < p_article_block_pool->p_block[mid]->articles[0].aid)                  if (aid < p_article_block_pool->p_block[mid]->articles[0].aid)
385                  {                  {
386                          right = mid;                          right = mid - 1;
387                  }                  }
388                  else                  else // if (aid >= p_article_block_pool->p_block[mid]->articles[0].aid)
389                  {                  {
390                          left = mid;                          left = mid;
391                  }                  }
# Line 387  ARTICLE *article_block_find_by_aid(int32 Line 399  ARTICLE *article_block_find_by_aid(int32
399          // aid in the range [ aid of articles[left], aid of articles[right] ]          // aid in the range [ aid of articles[left], aid of articles[right] ]
400          while (left < right)          while (left < right)
401          {          {
402                  mid = (left + right) / 2;                  mid = left + (right - left) / 2;
403    
404                  if (aid <= p_block->articles[mid].aid)                  if (aid <= p_block->articles[mid].aid)
405                  {                  {
# Line 413  ARTICLE *article_block_find_by_index(int Line 425  ARTICLE *article_block_find_by_index(int
425    
426          if (p_article_block_pool == NULL)          if (p_article_block_pool == NULL)
427          {          {
428                  log_error("article_block_pool not initialized\n");                  log_error("article_block_pool not initialized");
429                  return NULL;                  return NULL;
430          }          }
431    
432          if (index < 0 || index / ARTICLE_PER_BLOCK >= p_article_block_pool->block_count)          if (index < 0 || index / BBS_article_count_per_block >= p_article_block_pool->block_count)
433          {          {
434                  log_error("article_block_find_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)", index, p_article_block_pool->block_count);
435                  return NULL;                  return NULL;
436          }          }
437    
438          p_block = p_article_block_pool->p_block[index / ARTICLE_PER_BLOCK];          p_block = p_article_block_pool->p_block[index / BBS_article_count_per_block];
439    
440          if (index % ARTICLE_PER_BLOCK >= p_block->article_count)          if (index % BBS_article_count_per_block >= p_block->article_count)
441          {          {
442                  log_error("article_block_find_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)", index, p_block->article_count);
443                  return NULL;                  return NULL;
444          }          }
445    
446          return (p_block->articles + (index % ARTICLE_PER_BLOCK));          return (p_block->articles + (index % BBS_article_count_per_block));
447  }  }
448    
449  extern int section_list_init(const char *filename)  extern int section_list_init(const char *filename)
450  {  {
451          int semid;          char filepath[FILE_PATH_LEN];
452          int shmid;          int fd;
         int proj_id;  
         key_t key;  
453          size_t size;          size_t size;
454          void *p_shm;          void *p_shm;
455    #ifdef HAVE_SYSTEM_V
456            int proj_id;
457            key_t key;
458            int semid;
459          union semun arg;          union semun arg;
460    #endif
461          int i;          int i;
462    
463          if (p_section_list_pool != NULL)          if (p_section_list_pool != NULL)
# Line 450  extern int section_list_init(const char Line 465  extern int section_list_init(const char
465                  section_list_cleanup();                  section_list_cleanup();
466          }          }
467    
468          proj_id = (int)(time(NULL) % getpid());          // Allocate shared memory
469          key = ftok(filename, proj_id);          size = sizeof(SECTION_LIST_POOL);
470          if (key == -1)  
471            strncpy(filepath, filename, sizeof(filepath) - 1);
472            filepath[sizeof(filepath) - 1] = '\0';
473            snprintf(section_list_shm_name, sizeof(section_list_shm_name), "/SECTION_LIST_SHM_%s", basename(filepath));
474    
475            if (shm_unlink(section_list_shm_name) == -1 && errno != ENOENT)
476          {          {
477                  log_error("ftok(%s, %d) error (%d)\n", filename, proj_id, errno);                  log_error("shm_unlink(%s) error (%d)", section_list_shm_name, errno);
478                  return -3;                  return -2;
479          }          }
480    
481          // Allocate shared memory          if ((fd = shm_open(section_list_shm_name, O_CREAT | O_EXCL | O_RDWR, 0600)) == -1)
         size = sizeof(SECTION_LIST_POOL);  
         shmid = shmget(key, size, IPC_CREAT | IPC_EXCL | 0600);  
         if (shmid == -1)  
482          {          {
483                  log_error("shmget(section_list_pool_shm, size = %d) error (%d)\n", size, errno);                  log_error("shm_open(%s) error (%d)", section_list_shm_name, errno);
484                  return -3;                  return -2;
485          }          }
486          p_shm = shmat(shmid, NULL, 0);          if (ftruncate(fd, (off_t)size) == -1)
         if (p_shm == (void *)-1)  
487          {          {
488                  log_error("shmat(shmid = %d) error (%d)\n", shmid, errno);                  log_error("ftruncate(size=%d) error (%d)", size, errno);
489                  return -3;                  close(fd);
490                    return -2;
491            }
492    
493            p_shm = mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0L);
494            if (p_shm == MAP_FAILED)
495            {
496                    log_error("mmap() error (%d)", errno);
497                    close(fd);
498                    return -2;
499            }
500    
501            if (close(fd) < 0)
502            {
503                    log_error("close(fd) error (%d)", errno);
504                    return -1;
505          }          }
506    
507          p_section_list_pool = p_shm;          p_section_list_pool = p_shm;
508          p_section_list_pool->shmid = shmid;          p_section_list_pool->shm_size = size;
509          p_section_list_pool->section_count = 0;          p_section_list_pool->section_count = 0;
510    
511          // Allocate semaphore as section locks          // Allocate semaphore as section locks
512    #ifndef HAVE_SYSTEM_V
513            for (i = 0; i <= BBS_max_section; i++)
514            {
515                    if (sem_init(&(p_section_list_pool->sem[i]), 1, 1) == -1)
516                    {
517                            log_error("sem_init(sem[%d]) error (%d)", i, errno);
518                            return -3;
519                    }
520    
521                    p_section_list_pool->read_lock_count[i] = 0;
522                    p_section_list_pool->write_lock_count[i] = 0;
523            }
524    #else
525            proj_id = (int)(time(NULL) % getpid());
526            key = ftok(filename, proj_id);
527            if (key == -1)
528            {
529                    log_error("ftok(%s, %d) error (%d)", filename, proj_id, errno);
530                    return -3;
531            }
532    
533          size = 2 * (BBS_max_section + 1); // r_sem and w_sem per section, the last pair for all sections          size = 2 * (BBS_max_section + 1); // r_sem and w_sem per section, the last pair for all sections
534          semid = semget(key, (int)size, IPC_CREAT | IPC_EXCL | 0600);          semid = semget(key, (int)size, IPC_CREAT | IPC_EXCL | 0600);
535          if (semid == -1)          if (semid == -1)
536          {          {
537                  log_error("semget(section_list_pool_sem, size = %d) error (%d)\n", size, errno);                  log_error("semget(section_list_pool_sem, size = %d) error (%d)", size, errno);
538                  return -3;                  return -3;
539          }          }
540    
# Line 492  extern int section_list_init(const char Line 544  extern int section_list_init(const char
544          {          {
545                  if (semctl(semid, i, SETVAL, arg) == -1)                  if (semctl(semid, i, SETVAL, arg) == -1)
546                  {                  {
547                          log_error("semctl(section_list_pool_sem, SETVAL) error (%d)\n", errno);                          log_error("semctl(section_list_pool_sem, SETVAL) error (%d)", errno);
548                          return -3;                          return -3;
549                  }                  }
550          }          }
551    
552          p_section_list_pool->semid = semid;          p_section_list_pool->semid = semid;
553    #endif
554    
555          p_section_list_pool->p_trie_dict_section_by_name = trie_dict_create();          p_section_list_pool->p_trie_dict_section_by_name = trie_dict_create();
556          if (p_section_list_pool->p_trie_dict_section_by_name == NULL)          if (p_section_list_pool->p_trie_dict_section_by_name == NULL)
557          {          {
558                  log_error("trie_dict_create() OOM\n", BBS_max_section);                  log_error("trie_dict_create() OOM", BBS_max_section);
559                  return -2;                  return -2;
560          }          }
561    
562          p_section_list_pool->p_trie_dict_section_by_sid = trie_dict_create();          p_section_list_pool->p_trie_dict_section_by_sid = trie_dict_create();
563          if (p_section_list_pool->p_trie_dict_section_by_sid == NULL)          if (p_section_list_pool->p_trie_dict_section_by_sid == NULL)
564          {          {
565                  log_error("trie_dict_create() OOM\n", BBS_max_section);                  log_error("trie_dict_create() OOM", BBS_max_section);
566                  return -2;                  return -2;
567          }          }
568    
# Line 518  extern int section_list_init(const char Line 571  extern int section_list_init(const char
571    
572  void section_list_cleanup(void)  void section_list_cleanup(void)
573  {  {
         int shmid;  
   
574          if (p_section_list_pool == NULL)          if (p_section_list_pool == NULL)
575          {          {
576                  return;                  return;
# Line 537  void section_list_cleanup(void) Line 588  void section_list_cleanup(void)
588                  p_section_list_pool->p_trie_dict_section_by_sid = NULL;                  p_section_list_pool->p_trie_dict_section_by_sid = NULL;
589          }          }
590    
591          shmid = p_section_list_pool->shmid;  #ifdef HAVE_SYSTEM_V
   
592          if (semctl(p_section_list_pool->semid, 0, IPC_RMID) == -1)          if (semctl(p_section_list_pool->semid, 0, IPC_RMID) == -1)
593          {          {
594                  log_error("semctl(semid = %d, IPC_RMID) error (%d)\n", p_section_list_pool->semid, errno);                  log_error("semctl(semid = %d, IPC_RMID) error (%d)", p_section_list_pool->semid, errno);
595          }          }
596    #else
597          if (shmdt(p_section_list_pool) == -1)          for (int i = 0; i <= BBS_max_section; i++)
598          {          {
599                  log_error("shmdt(shmid = %d) error (%d)\n", shmid, errno);                  if (sem_destroy(&(p_section_list_pool->sem[i])) == -1)
600                    {
601                            log_error("sem_destroy(sem[%d]) error (%d)", i, errno);
602                    }
603          }          }
604    #endif
605    
606            detach_section_list_shm();
607    
608          if (shmctl(shmid, IPC_RMID, NULL) == -1)          if (shm_unlink(section_list_shm_name) == -1 && errno != ENOENT)
609          {          {
610                  log_error("shmctl(shmid = %d, IPC_RMID) error (%d)\n", shmid, errno);                  log_error("shm_unlink(%s) error (%d)", section_list_shm_name, errno);
611          }          }
   
         p_section_list_pool = NULL;  
612  }  }
613    
614  int set_section_list_shm_readonly(void)  int set_section_list_shm_readonly(void)
615  {  {
         int shmid;  
         void *p_shm;  
   
616          if (p_section_list_pool == NULL)          if (p_section_list_pool == NULL)
617          {          {
618                  log_error("p_section_list_pool not initialized\n");                  log_error("p_section_list_pool not initialized");
619                  return -1;                  return -1;
620          }          }
621    
622          shmid = p_section_list_pool->shmid;          if (p_section_list_pool != NULL &&
623                    mprotect(p_section_list_pool, p_section_list_pool->shm_size, PROT_READ) < 0)
         // Remap shared memory in read-only mode  
         p_shm = shmat(shmid, p_section_list_pool, SHM_RDONLY | SHM_REMAP);  
         if (p_shm == (void *)-1)  
624          {          {
625                  log_error("shmat(section_list_pool shmid = %d) error (%d)\n", shmid, errno);                  log_error("mprotect() error (%d)", errno);
626                  return -3;                  return -2;
627          }          }
628    
         p_section_list_pool = p_shm;  
   
629          return 0;          return 0;
630  }  }
631    
632  int detach_section_list_shm(void)  int detach_section_list_shm(void)
633  {  {
634          if (p_section_list_pool != NULL && shmdt(p_section_list_pool) == -1)          if (p_section_list_pool != NULL && munmap(p_section_list_pool, p_section_list_pool->shm_size) < 0)
635          {          {
636                  log_error("shmdt(section_list_pool) error (%d)\n", errno);                  log_error("munmap() error (%d)", errno);
637                  return -1;                  return -1;
638          }          }
639    
# Line 610  inline static void sid_to_str(int32_t si Line 656  inline static void sid_to_str(int32_t si
656          p_sid_str[i] = '\0';          p_sid_str[i] = '\0';
657  }  }
658    
659  SECTION_LIST *section_list_create(int32_t sid, const char *sname, const char *stitle, const char *master_name)  SECTION_LIST *section_list_create(int32_t sid, const char *sname, const char *stitle, const char *master_list)
660  {  {
661          SECTION_LIST *p_section;          SECTION_LIST *p_section;
662          char sid_str[SID_STR_LEN];          char sid_str[SID_STR_LEN];
663    
664          if (p_section_list_pool == NULL)          if (p_section_list_pool == NULL)
665          {          {
666                  log_error("session_list_pool not initialized\n");                  log_error("session_list_pool not initialized");
667                  return NULL;                  return NULL;
668          }          }
669    
670          if (p_section_list_pool->section_count >= BBS_max_section)          if (p_section_list_pool->section_count >= BBS_max_section)
671          {          {
672                  log_error("section_count reach limit %d >= %d\n", p_section_list_pool->section_count, BBS_max_section);                  log_error("section_count reach limit %d >= %d", p_section_list_pool->section_count, BBS_max_section);
673                  return NULL;                  return NULL;
674          }          }
675    
# Line 632  SECTION_LIST *section_list_create(int32_ Line 678  SECTION_LIST *section_list_create(int32_
678          p_section = p_section_list_pool->sections + p_section_list_pool->section_count;          p_section = p_section_list_pool->sections + p_section_list_pool->section_count;
679    
680          p_section->sid = sid;          p_section->sid = sid;
681            p_section->ex_menu_tm = 0;
682    
683          strncpy(p_section->sname, sname, sizeof(p_section->sname - 1));          strncpy(p_section->sname, sname, sizeof(p_section->sname) - 1);
684          p_section->sname[sizeof(p_section->sname - 1)] = '\0';          p_section->sname[sizeof(p_section->sname) - 1] = '\0';
685    
686          strncpy(p_section->stitle, stitle, sizeof(p_section->stitle - 1));          strncpy(p_section->stitle, stitle, sizeof(p_section->stitle) - 1);
687          p_section->stitle[sizeof(p_section->stitle - 1)] = '\0';          p_section->stitle[sizeof(p_section->stitle) - 1] = '\0';
688    
689          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);
690          p_section->master_name[sizeof(p_section->master_name - 1)] = '\0';          p_section->master_list[sizeof(p_section->master_list) - 1] = '\0';
691    
692          if (trie_dict_set(p_section_list_pool->p_trie_dict_section_by_name, sname, p_section_list_pool->section_count) != 1)          if (trie_dict_set(p_section_list_pool->p_trie_dict_section_by_name, sname, p_section_list_pool->section_count) != 1)
693          {          {
694                  log_error("trie_dict_set(section, %s, %d) error\n", sname, p_section_list_pool->section_count);                  log_error("trie_dict_set(section, %s, %d) error", sname, p_section_list_pool->section_count);
695                  return NULL;                  return NULL;
696          }          }
697    
698          if (trie_dict_set(p_section_list_pool->p_trie_dict_section_by_sid, sid_str, p_section_list_pool->section_count) != 1)          if (trie_dict_set(p_section_list_pool->p_trie_dict_section_by_sid, sid_str, p_section_list_pool->section_count) != 1)
699          {          {
700                  log_error("trie_dict_set(section, %d, %d) error\n", sid, p_section_list_pool->section_count);                  log_error("trie_dict_set(section, %d, %d) error", sid, p_section_list_pool->section_count);
701                  return NULL;                  return NULL;
702          }          }
703    
# Line 661  SECTION_LIST *section_list_create(int32_ Line 708  SECTION_LIST *section_list_create(int32_
708          return p_section;          return p_section;
709  }  }
710    
711    int section_list_update(SECTION_LIST *p_section, const char *sname, const char *stitle, const char *master_list)
712    {
713            int64_t index;
714    
715            if (p_section == NULL || sname == NULL || stitle == NULL || master_list == NULL)
716            {
717                    log_error("NULL pointer error");
718                    return -1;
719            }
720    
721            index = get_section_index(p_section);
722    
723            strncpy(p_section->sname, sname, sizeof(p_section->sname) - 1);
724            p_section->sname[sizeof(p_section->sname) - 1] = '\0';
725    
726            strncpy(p_section->stitle, stitle, sizeof(p_section->stitle) - 1);
727            p_section->stitle[sizeof(p_section->stitle) - 1] = '\0';
728    
729            strncpy(p_section->master_list, master_list, sizeof(p_section->master_list) - 1);
730            p_section->master_list[sizeof(p_section->master_list) - 1] = '\0';
731    
732            if (trie_dict_set(p_section_list_pool->p_trie_dict_section_by_name, sname, index) < 0)
733            {
734                    log_error("trie_dict_set(section, %s, %d) error", sname, index);
735                    return -2;
736            }
737    
738            return 0;
739    }
740    
741  void section_list_reset_articles(SECTION_LIST *p_section)  void section_list_reset_articles(SECTION_LIST *p_section)
742  {  {
743          p_section->article_count = 0;          p_section->article_count = 0;
# Line 672  void section_list_reset_articles(SECTION Line 749  void section_list_reset_articles(SECTION
749    
750          p_section->page_count = 0;          p_section->page_count = 0;
751          p_section->last_page_visible_article_count = 0;          p_section->last_page_visible_article_count = 0;
752    
753            p_section->ontop_article_count = 0;
754  }  }
755    
756  SECTION_LIST *section_list_find_by_name(const char *sname)  SECTION_LIST *section_list_find_by_name(const char *sname)
# Line 681  SECTION_LIST *section_list_find_by_name( Line 760  SECTION_LIST *section_list_find_by_name(
760    
761          if (p_section_list_pool == NULL)          if (p_section_list_pool == NULL)
762          {          {
763                  log_error("section_list not initialized\n");                  log_error("section_list not initialized");
764                  return NULL;                  return NULL;
765          }          }
766    
767          ret = trie_dict_get(p_section_list_pool->p_trie_dict_section_by_name, sname, &index);          ret = trie_dict_get(p_section_list_pool->p_trie_dict_section_by_name, sname, &index);
768          if (ret < 0)          if (ret < 0)
769          {          {
770                  log_error("trie_dict_get(section, %s) error\n", sname);                  log_error("trie_dict_get(section, %s) error", sname);
771                  return NULL;                  return NULL;
772          }          }
773          else if (ret == 0)          else if (ret == 0)
# Line 707  SECTION_LIST *section_list_find_by_sid(i Line 786  SECTION_LIST *section_list_find_by_sid(i
786    
787          if (p_section_list_pool == NULL)          if (p_section_list_pool == NULL)
788          {          {
789                  log_error("section_list not initialized\n");                  log_error("section_list not initialized");
790                  return NULL;                  return NULL;
791          }          }
792    
# Line 716  SECTION_LIST *section_list_find_by_sid(i Line 795  SECTION_LIST *section_list_find_by_sid(i
795          ret = trie_dict_get(p_section_list_pool->p_trie_dict_section_by_sid, sid_str, &index);          ret = trie_dict_get(p_section_list_pool->p_trie_dict_section_by_sid, sid_str, &index);
796          if (ret < 0)          if (ret < 0)
797          {          {
798                  log_error("trie_dict_get(section, %d) error\n", sid);                  log_error("trie_dict_get(section, %d) error", sid);
799                  return NULL;                  return NULL;
800          }          }
801          else if (ret == 0)          else if (ret == 0)
# Line 737  int section_list_append_article(SECTION_ Line 816  int section_list_append_article(SECTION_
816    
817          if (p_section == NULL || p_article_src == NULL)          if (p_section == NULL || p_article_src == NULL)
818          {          {
819                  log_error("section_list_append_article() NULL pointer error\n");                  log_error("NULL pointer error");
820                  return -1;                  return -1;
821          }          }
822    
823          if (p_article_block_pool == NULL)          if (p_article_block_pool == NULL)
824          {          {
825                  log_error("article_block_pool not initialized\n");                  log_error("article_block_pool not initialized");
826                  return -1;                  return -1;
827          }          }
828    
829          if (p_section->sid != p_article_src->sid)          if (p_section->sid != p_article_src->sid)
830          {          {
831                  log_error("section_list_append_article() error: section sid %d != article sid %d\n", p_section->sid, p_article_src->sid);                  log_error("section_list_append_article() error: section sid %d != article sid %d", p_section->sid, p_article_src->sid);
832                  return -2;                  return -2;
833          }          }
834    
835          if (p_section->article_count >= BBS_article_limit_per_section)          if (p_section->article_count >= BBS_article_limit_per_section)
836          {          {
837                  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", p_section->sid);
838                  return -2;                  return -2;
839          }          }
840    
841          if (p_article_block_pool->block_count == 0 ||          if (p_article_block_pool->block_count == 0 ||
842                  p_article_block_pool->p_block[p_article_block_pool->block_count - 1]->article_count >= ARTICLE_PER_BLOCK)                  p_article_block_pool->p_block[p_article_block_pool->block_count - 1]->article_count >= BBS_article_count_per_block)
843          {          {
844                  if ((p_block = pop_free_article_block()) == NULL)                  if ((p_block = pop_free_article_block()) == NULL)
845                  {                  {
846                          log_error("pop_free_article_block() error\n");                          log_error("pop_free_article_block() error");
847                          return -2;                          return -2;
848                  }                  }
849    
850                  if (p_article_block_pool->block_count > 0)                  if (p_article_block_pool->block_count > 0)
851                  {                  {
852                          last_aid = p_article_block_pool->p_block[p_article_block_pool->block_count - 1]->articles[ARTICLE_PER_BLOCK - 1].aid;                          last_aid = p_article_block_pool->p_block[p_article_block_pool->block_count - 1]->articles[BBS_article_count_per_block - 1].aid;
853                  }                  }
854    
855                  p_article_block_pool->p_block[p_article_block_pool->block_count] = p_block;                  p_article_block_pool->p_block[p_article_block_pool->block_count] = p_block;
# Line 785  int section_list_append_article(SECTION_ Line 864  int section_list_append_article(SECTION_
864          // AID of articles should be strictly ascending          // AID of articles should be strictly ascending
865          if (p_article_src->aid <= last_aid)          if (p_article_src->aid <= last_aid)
866          {          {
867                  log_error("section_list_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", p_article_src->aid, last_aid);
868                  return -3;                  return -3;
869          }          }
870    
# Line 807  int section_list_append_article(SECTION_ Line 886  int section_list_append_article(SECTION_
886                  p_topic_head = article_block_find_by_aid(p_article->tid);                  p_topic_head = article_block_find_by_aid(p_article->tid);
887                  if (p_topic_head == NULL)                  if (p_topic_head == NULL)
888                  {                  {
889                          log_error("search head of topic (aid=%d) error\n", p_article->tid);                          log_error("search head of topic (aid=%d) error", p_article->tid);
890                          return -4;                          return -4;
891                  }                  }
892    
893                  p_topic_tail = p_topic_head->p_topic_prior;                  p_topic_tail = p_topic_head->p_topic_prior;
894                  if (p_topic_tail == NULL)                  if (p_topic_tail == NULL)
895                  {                  {
896                          log_error("tail of topic (aid=%d) is NULL\n", p_article->tid);                          log_error("tail of topic (aid=%d) is NULL", p_article->tid);
897                          return -4;                          return -4;
898                  }                  }
899          }          }
# Line 849  int section_list_append_article(SECTION_ Line 928  int section_list_append_article(SECTION_
928          p_section->p_article_tail = p_article;          p_section->p_article_tail = p_article;
929    
930          // Update page          // Update page
931          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) ||
932                  p_section->article_count == 1)                  p_section->page_count == 0)
933          {          {
934                  p_section->p_page_first_article[p_section->page_count] = p_article;                  p_section->p_page_first_article[p_section->page_count] = p_article;
935                  p_section->page_count++;                  p_section->page_count++;
# Line 862  int section_list_append_article(SECTION_ Line 941  int section_list_append_article(SECTION_
941                  p_section->last_page_visible_article_count++;                  p_section->last_page_visible_article_count++;
942          }          }
943    
944            if (p_article->ontop && section_list_update_article_ontop(p_section, p_article) < 0)
945            {
946                    log_error("section_list_update_article_ontop(sid=%d, aid=%d) error",
947                                      p_section->sid, p_article->aid);
948                    return -5;
949            }
950    
951          return 0;          return 0;
952  }  }
953    
# Line 873  int section_list_set_article_visible(SEC Line 959  int section_list_set_article_visible(SEC
959    
960          if (p_section == NULL)          if (p_section == NULL)
961          {          {
962                  log_error("section_list_set_article_visible() NULL pointer error\n");                  log_error("NULL pointer error");
963                  return -2;                  return -1;
964          }          }
965    
966          p_article = article_block_find_by_aid(aid);          p_article = article_block_find_by_aid(aid);
# Line 885  int section_list_set_article_visible(SEC Line 971  int section_list_set_article_visible(SEC
971    
972          if (p_section->sid != p_article->sid)          if (p_section->sid != p_article->sid)
973          {          {
974                  log_error("section_list_set_article_visible() error: section sid %d != article sid %d\n", p_section->sid, p_article->sid);                  log_error("Inconsistent section sid %d != article sid %d", p_section->sid, p_article->sid);
975                  return -2;                  return -2;
976          }          }
977    
# Line 898  int section_list_set_article_visible(SEC Line 984  int section_list_set_article_visible(SEC
984          {          {
985                  p_section->visible_article_count--;                  p_section->visible_article_count--;
986    
987                    if (user_article_cnt_inc(p_article->uid, -1) < 0)
988                    {
989                            log_error("user_article_cnt_inc(uid=%d, -1) error", p_article->uid);
990                    }
991    
992                  if (p_article->tid == 0)                  if (p_article->tid == 0)
993                  {                  {
994                          p_section->visible_topic_count--;                          p_section->visible_topic_count--;
# Line 907  int section_list_set_article_visible(SEC Line 998  int section_list_set_article_visible(SEC
998                          {                          {
999                                  if (p_reply->tid != aid)                                  if (p_reply->tid != aid)
1000                                  {                                  {
1001                                          log_error("Inconsistent tid = %d found in reply %d of topic %d\n", p_reply->tid, p_reply->aid, aid);                                          log_error("Inconsistent tid = %d found in reply %d of topic %d", p_reply->tid, p_reply->aid, aid);
1002                                          continue;                                          continue;
1003                                  }                                  }
1004    
# Line 916  int section_list_set_article_visible(SEC Line 1007  int section_list_set_article_visible(SEC
1007                                          p_reply->visible = 0;                                          p_reply->visible = 0;
1008                                          p_section->visible_article_count--;                                          p_section->visible_article_count--;
1009                                          affected_count++;                                          affected_count++;
1010    
1011                                            if (user_article_cnt_inc(p_reply->uid, -1) < 0)
1012                                            {
1013                                                    log_error("user_article_cnt_inc(uid=%d, -1) error", p_reply->uid);
1014                                            }
1015                                  }                                  }
1016                          }                          }
1017                  }                  }
# Line 928  int section_list_set_article_visible(SEC Line 1024  int section_list_set_article_visible(SEC
1024                  {                  {
1025                          p_section->visible_topic_count++;                          p_section->visible_topic_count++;
1026                  }                  }
1027    
1028                    if (user_article_cnt_inc(p_article->uid, 1) < 0)
1029                    {
1030                            log_error("user_article_cnt_inc(uid=%d, 1) error", p_article->uid);
1031                    }
1032          }          }
1033    
1034          p_article->visible = visible;          p_article->visible = visible;
# Line 936  int section_list_set_article_visible(SEC Line 1037  int section_list_set_article_visible(SEC
1037          return affected_count;          return affected_count;
1038  }  }
1039    
1040    int section_list_set_article_excerption(SECTION_LIST *p_section, int32_t aid, int8_t excerption)
1041    {
1042            ARTICLE *p_article;
1043    
1044            if (p_section == NULL)
1045            {
1046                    log_error("NULL pointer error");
1047                    return -1;
1048            }
1049    
1050            p_article = article_block_find_by_aid(aid);
1051            if (p_article == NULL)
1052            {
1053                    return -1; // Not found
1054            }
1055    
1056            if (p_section->sid != p_article->sid)
1057            {
1058                    log_error("Inconsistent section sid %d != article sid %d", p_section->sid, p_article->sid);
1059                    return -2;
1060            }
1061    
1062            if (p_article->excerption == excerption)
1063            {
1064                    return 0; // Already set
1065            }
1066    
1067            p_article->excerption = excerption;
1068    
1069            return 1;
1070    }
1071    
1072    int section_list_update_article_ontop(SECTION_LIST *p_section, ARTICLE *p_article)
1073    {
1074            int i;
1075    
1076            if (p_section == NULL || p_article == NULL)
1077            {
1078                    log_error("NULL pointer error");
1079                    return -1;
1080            }
1081    
1082            if (p_section->sid != p_article->sid)
1083            {
1084                    log_error("Inconsistent section sid %d != article sid %d", p_section->sid, p_article->sid);
1085                    return -2;
1086            }
1087    
1088            if (p_article->ontop)
1089            {
1090                    for (i = 0; i < p_section->ontop_article_count; i++)
1091                    {
1092                            if (p_section->p_ontop_articles[i]->aid == p_article->aid)
1093                            {
1094                                    log_error("Inconsistent state found: article %d already ontop in section %d", p_article->aid, p_section->sid);
1095                                    return 0;
1096                            }
1097                            else if (p_section->p_ontop_articles[i]->aid > p_article->aid)
1098                            {
1099                                    break;
1100                            }
1101                    }
1102    
1103                    // Remove the oldest one if the array of ontop articles is full
1104                    if (p_section->ontop_article_count >= BBS_ontop_article_limit_per_section)
1105                    {
1106                            if (i == 0) // p_article is the oldest one
1107                            {
1108                                    return 0;
1109                            }
1110                            memmove((void *)(p_section->p_ontop_articles),
1111                                            (void *)(p_section->p_ontop_articles + 1),
1112                                            sizeof(ARTICLE *) * (size_t)(i - 1));
1113                            p_section->ontop_article_count--;
1114                            i--;
1115                    }
1116                    else
1117                    {
1118                            memmove((void *)(p_section->p_ontop_articles + i + 1),
1119                                            (void *)(p_section->p_ontop_articles + i),
1120                                            sizeof(ARTICLE *) * (size_t)(p_section->ontop_article_count - i));
1121                    }
1122    
1123                    p_section->p_ontop_articles[i] = p_article;
1124                    p_section->ontop_article_count++;
1125    
1126                    // TODO: debug
1127            }
1128            else // ontop == 0
1129            {
1130                    for (i = 0; i < p_section->ontop_article_count; i++)
1131                    {
1132                            if (p_section->p_ontop_articles[i]->aid == p_article->aid)
1133                            {
1134                                    break;
1135                            }
1136                    }
1137                    if (i == p_section->ontop_article_count) // not found
1138                    {
1139                            log_error("Inconsistent state found: article %d not ontop in section %d", p_article->aid, p_section->sid);
1140                            return 0;
1141                    }
1142    
1143                    memmove((void *)(p_section->p_ontop_articles + i),
1144                                    (void *)(p_section->p_ontop_articles + i + 1),
1145                                    sizeof(ARTICLE *) * (size_t)(p_section->ontop_article_count - i - 1));
1146                    p_section->ontop_article_count--;
1147            }
1148    
1149            return 0;
1150    }
1151    
1152    int section_list_page_count_with_ontop(SECTION_LIST *p_section)
1153    {
1154            int page_count;
1155    
1156            if (p_section == NULL)
1157            {
1158                    log_error("NULL pointer error");
1159                    return -1;
1160            }
1161    
1162            page_count = p_section->page_count - 1 +
1163                                     (p_section->last_page_visible_article_count + p_section->ontop_article_count + BBS_article_limit_per_page - 1) /
1164                                             BBS_article_limit_per_page;
1165    
1166            if (page_count < 0)
1167            {
1168                    page_count = 0;
1169            }
1170    
1171            return page_count;
1172    }
1173    
1174    int section_list_page_article_count_with_ontop(SECTION_LIST *p_section, int32_t page_id)
1175    {
1176            if (p_section == NULL)
1177            {
1178                    log_error("NULL pointer error");
1179                    return -1;
1180            }
1181    
1182            if (page_id < p_section->page_count - 1)
1183            {
1184                    return BBS_article_limit_per_page;
1185            }
1186            else // if (page_id >= p_section->page_count - 1)
1187            {
1188                    return MIN(MAX(0,
1189                                               (p_section->last_page_visible_article_count + p_section->ontop_article_count -
1190                                                    BBS_article_limit_per_page * (page_id - p_section->page_count + 1))),
1191                                       BBS_article_limit_per_page);
1192            }
1193    }
1194    
1195  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)  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)
1196  {  {
1197          ARTICLE *p_article;          ARTICLE *p_article;
# Line 949  ARTICLE *section_list_find_article_with_ Line 1205  ARTICLE *section_list_find_article_with_
1205    
1206          if (p_section == NULL)          if (p_section == NULL)
1207          {          {
1208                  log_error("section_list_find_article_with_offset() NULL pointer error\n");                  log_error("NULL pointer error");
1209                  return NULL;                  return NULL;
1210          }          }
1211    
# Line 961  ARTICLE *section_list_find_article_with_ Line 1217  ARTICLE *section_list_find_article_with_
1217          }          }
1218    
1219          left = 0;          left = 0;
1220          right = p_section->page_count;          right = p_section->page_count - 1;
1221    
1222          // aid in the range [ head aid of pages[left], tail aid of pages[right - 1] ]          // aid in the range [ head aid of pages[left], tail aid of pages[right] ]
1223          while (left < right - 1)          while (left < right)
1224          {          {
1225                  // get page id no less than mid value of left page id and right page id                  // get page id no less than mid value of left page id and right page id
1226                  mid = (left + right) / 2 + (right - left) % 2;                  mid = left + (right - left + 1) / 2;
   
                 if (mid >= p_section->page_count)  
                 {  
                         log_error("page id (mid = %d) is out of boundary\n", mid);  
                         return NULL;  
                 }  
1227    
1228                  if (aid < p_section->p_page_first_article[mid]->aid)                  if (aid < p_section->p_page_first_article[mid]->aid)
1229                  {                  {
1230                          right = mid;                          right = mid - 1;
1231                  }                  }
1232                  else                  else // if (aid < p_section->p_page_first_article[mid]->aid)
1233                  {                  {
1234                          left = mid;                          left = mid;
1235                  }                  }
# Line 1041  int section_list_calculate_page(SECTION_ Line 1291  int section_list_calculate_page(SECTION_
1291    
1292          if (p_section == NULL)          if (p_section == NULL)
1293          {          {
1294                  log_error("section_list_calculate_page() NULL pointer error\n");                  log_error("NULL pointer error");
1295                  return -1;                  return -1;
1296          }          }
1297    
# Line 1063  int section_list_calculate_page(SECTION_ Line 1313  int section_list_calculate_page(SECTION_
1313    
1314                  if (p_section->sid != p_article->sid)                  if (p_section->sid != p_article->sid)
1315                  {                  {
1316                          log_error("section_list_calculate_page() error: section sid %d != start article sid %d\n", p_section->sid, p_article->sid);                          log_error("section_list_calculate_page() error: section sid %d != start article sid %d", p_section->sid, p_article->sid);
1317                          return -2;                          return -2;
1318                  }                  }
1319    
# Line 1074  int section_list_calculate_page(SECTION_ Line 1324  int section_list_calculate_page(SECTION_
1324                          {                          {
1325                                  return -1;                                  return -1;
1326                          }                          }
1327                          log_error("section_list_calculate_page() aid = %d not found in section sid = %d\n",                          log_error("section_list_calculate_page() aid = %d not found in section sid = %d",
1328                                            start_aid, p_section->sid);                                            start_aid, p_section->sid);
1329                          return -2;                          return -2;
1330                  }                  }
# Line 1123  int section_list_calculate_page(SECTION_ Line 1373  int section_list_calculate_page(SECTION_
1373    
1374                          if (page >= BBS_article_limit_per_section / BBS_article_limit_per_page && p_article != p_section->p_article_head)                          if (page >= BBS_article_limit_per_section / BBS_article_limit_per_page && p_article != p_section->p_article_head)
1375                          {                          {
1376                                  log_error("Count of page exceed limit in section %d\n", p_section->sid);                                  log_error("Count of page exceed limit in section %d", p_section->sid);
1377                                  break;                                  break;
1378                          }                          }
1379                  }                  }
1380          } while (p_article != p_section->p_article_head);          } while (p_article != p_section->p_article_head);
1381    
1382          p_section->page_count = page + (visible_article_count > 0 ? 1 : 0);          p_section->page_count = page + (visible_article_count > 0 ? 1 : 0);
1383          p_section->last_page_visible_article_count = visible_article_count;          p_section->last_page_visible_article_count = (visible_article_count > 0
1384                                                                                                              ? visible_article_count
1385                                                                                                              : (page > 0 ? BBS_article_limit_per_page : 0));
1386    
1387          return 0;          return 0;
1388  }  }
# Line 1152  int article_block_article_count(void) Line 1404  int article_block_article_count(void)
1404                  return -1;                  return -1;
1405          }          }
1406    
1407          ret = (p_article_block_pool->block_count - 1) * ARTICLE_PER_BLOCK +          ret = (p_article_block_pool->block_count - 1) * BBS_article_count_per_block +
1408                    p_article_block_pool->p_block[p_article_block_pool->block_count - 1]->article_count;                    p_article_block_pool->p_block[p_article_block_pool->block_count - 1]->article_count;
1409    
1410          return ret;          return ret;
# Line 1175  int article_count_of_topic(int32_t aid) Line 1427  int article_count_of_topic(int32_t aid)
1427          {          {
1428                  if (p_article->tid != 0 && p_article->tid != aid)                  if (p_article->tid != 0 && p_article->tid != aid)
1429                  {                  {
1430                          log_error("article_count_of_topic(%d) error: article %d not linked to the topic\n", aid, p_article->aid);                          log_error("article_count_of_topic(%d) error: article %d not linked to the topic", aid, p_article->aid);
1431                          break;                          break;
1432                  }                  }
1433    
# Line 1200  int section_list_move_topic(SECTION_LIST Line 1452  int section_list_move_topic(SECTION_LIST
1452    
1453          if (p_section_src == NULL || p_section_dest == NULL)          if (p_section_src == NULL || p_section_dest == NULL)
1454          {          {
1455                  log_error("section_list_move_topic() NULL pointer error\n");                  log_error("NULL pointer error");
1456                  return -1;                  return -1;
1457          }          }
1458    
1459          if (p_section_src->sid == p_section_dest->sid)          if (p_section_src->sid == p_section_dest->sid)
1460          {          {
1461                  log_error("section_list_move_topic() src and dest section are the same\n");                  log_error("section_list_move_topic() src and dest section are the same");
1462                  return -1;                  return -1;
1463          }          }
1464    
1465          if ((p_article = article_block_find_by_aid(aid)) == NULL)          if ((p_article = article_block_find_by_aid(aid)) == NULL)
1466          {          {
1467                  log_error("article_block_find_by_aid(aid = %d) error: article not found\n", aid);                  log_error("article_block_find_by_aid(aid = %d) error: article not found", aid);
1468                  return -2;                  return -2;
1469          }          }
1470    
1471          if (p_section_src->sid != p_article->sid)          if (p_section_src->sid != p_article->sid)
1472          {          {
1473                  log_error("section_list_move_topic() error: src section sid %d != article %d sid %d\n",                  log_error("section_list_move_topic() error: src section sid %d != article %d sid %d",
1474                                    p_section_src->sid, p_article->aid, p_article->sid);                                    p_section_src->sid, p_article->aid, p_article->sid);
1475                  return -2;                  return -2;
1476          }          }
1477    
1478          if (p_article->tid != 0)          if (p_article->tid != 0)
1479          {          {
1480                  log_error("section_list_move_topic(aid = %d) error: article is not head of topic, tid = %d\n", aid, p_article->tid);                  log_error("section_list_move_topic(aid = %d) error: article is not head of topic, tid = %d", aid, p_article->tid);
1481                  return -2;                  return -2;
1482          }          }
1483    
# Line 1234  int section_list_move_topic(SECTION_LIST Line 1486  int section_list_move_topic(SECTION_LIST
1486          move_article_count = article_count_of_topic(aid);          move_article_count = article_count_of_topic(aid);
1487          if (move_article_count <= 0)          if (move_article_count <= 0)
1488          {          {
1489                  log_error("article_count_of_topic(aid = %d) <= 0\n", aid);                  log_error("article_count_of_topic(aid = %d) <= 0", aid);
1490                  return -2;                  return -2;
1491          }          }
1492    
1493          if (p_section_dest->article_count + move_article_count > BBS_article_limit_per_section)          if (p_section_dest->article_count + move_article_count > BBS_article_limit_per_section)
1494          {          {
1495                  log_error("section_list_move_topic() error: article_count %d reach limit in section %d\n",                  log_error("section_list_move_topic() error: article_count %d reach limit in section %d",
1496                                    p_section_dest->article_count + move_article_count, p_section_dest->sid);                                    p_section_dest->article_count + move_article_count, p_section_dest->sid);
1497                  return -3;                  return -3;
1498          }          }
# Line 1253  int section_list_move_topic(SECTION_LIST Line 1505  int section_list_move_topic(SECTION_LIST
1505          {          {
1506                  if (p_section_src->sid != p_article->sid)                  if (p_section_src->sid != p_article->sid)
1507                  {                  {
1508                          log_error("section_list_move_topic() warning: src section sid %d != article %d sid %d\n",                          log_error("section_list_move_topic() warning: src section sid %d != article %d sid %d",
1509                                            p_section_src->sid, p_article->aid, p_article->sid);                                            p_section_src->sid, p_article->aid, p_article->sid);
1510                          p_article = p_article->p_topic_next;                          p_article = p_article->p_topic_next;
1511                          continue;                          continue;
# Line 1268  int section_list_move_topic(SECTION_LIST Line 1520  int section_list_move_topic(SECTION_LIST
1520                  {                  {
1521                          p_section_src->p_article_tail = p_article->p_prior;                          p_section_src->p_article_tail = p_article->p_prior;
1522                  }                  }
1523                  if (p_section_src->p_article_head == p_article) // || p_section_src->p_article_tail == p_article                  if (p_section_src->p_article_head == p_article) // Single element list
1524                  {                  {
1525                          p_section_src->p_article_head = NULL;                          p_section_src->p_article_head = NULL;
1526                          p_section_src->p_article_tail = NULL;                          p_section_src->p_article_tail = NULL;
1527                  }                  }
1528                    else
1529                  p_article->p_prior->p_next = p_article->p_next;                  {
1530                  p_article->p_next->p_prior = p_article->p_prior;                          // Only update neighbor pointers if list is not empty after removal
1531                            p_article->p_prior->p_next = p_article->p_next;
1532                            p_article->p_next->p_prior = p_article->p_prior;
1533                    }
1534    
1535                  // Update sid of article                  // Update sid of article
1536                  p_article->sid = p_section_dest->sid;                  p_article->sid = p_section_dest->sid;
1537    
1538                  if (section_list_find_article_with_offset(p_section_dest, p_article->aid, &page, &offset, &p_next) != NULL)                  if (section_list_find_article_with_offset(p_section_dest, p_article->aid, &page, &offset, &p_next) != NULL)
1539                  {                  {
1540                          log_error("section_list_move_topic() warning: article %d already in section %d\n", p_article->aid, p_section_dest->sid);                          log_error("section_list_move_topic() warning: article %d already in section %d", p_article->aid, p_section_dest->sid);
1541                          p_article = p_article->p_topic_next;                          p_article = p_article->p_topic_next;
1542                          continue;                          continue;
1543                  }                  }
# Line 1352  int section_list_move_topic(SECTION_LIST Line 1607  int section_list_move_topic(SECTION_LIST
1607                          // Re-calculate pages of desc section                          // Re-calculate pages of desc section
1608                          if (section_list_calculate_page(p_section_dest, first_inserted_aid_dest) < 0)                          if (section_list_calculate_page(p_section_dest, first_inserted_aid_dest) < 0)
1609                          {                          {
1610                                  log_error("section_list_calculate_page(dest section = %d, aid = %d) error\n",                                  log_error("section_list_calculate_page(dest section = %d, aid = %d) error",
1611                                                    p_section_dest->sid, first_inserted_aid_dest);                                                    p_section_dest->sid, first_inserted_aid_dest);
1612                          }                          }
1613    
# Line 1362  int section_list_move_topic(SECTION_LIST Line 1617  int section_list_move_topic(SECTION_LIST
1617    
1618          if (p_section_dest->article_count - dest_article_count_old != move_article_count)          if (p_section_dest->article_count - dest_article_count_old != move_article_count)
1619          {          {
1620                  log_error("section_list_move_topic() warning: count of moved articles %d != %d\n",                  log_error("section_list_move_topic() warning: count of moved articles %d != %d",
1621                                    p_section_dest->article_count - dest_article_count_old, move_article_count);                                    p_section_dest->article_count - dest_article_count_old, move_article_count);
1622          }          }
1623    
1624          // Re-calculate pages of src section          // Re-calculate pages of src section
1625          if (section_list_calculate_page(p_section_src, last_unaffected_aid_src) < 0)          if (section_list_calculate_page(p_section_src, last_unaffected_aid_src) < 0)
1626          {          {
1627                  log_error("section_list_calculate_page(src section = %d, aid = %d) error at aid = %d\n",                  log_error("section_list_calculate_page(src section = %d, aid = %d) error at aid = %d",
1628                                    p_section_src->sid, last_unaffected_aid_src, aid);                                    p_section_src->sid, last_unaffected_aid_src, aid);
1629          }          }
1630    
# Line 1378  int section_list_move_topic(SECTION_LIST Line 1633  int section_list_move_topic(SECTION_LIST
1633                  // Re-calculate pages of desc section                  // Re-calculate pages of desc section
1634                  if (section_list_calculate_page(p_section_dest, first_inserted_aid_dest) < 0)                  if (section_list_calculate_page(p_section_dest, first_inserted_aid_dest) < 0)
1635                  {                  {
1636                          log_error("section_list_calculate_page(dest section = %d, aid = %d) error\n",                          log_error("section_list_calculate_page(dest section = %d, aid = %d) error",
1637                                            p_section_dest->sid, first_inserted_aid_dest);                                            p_section_dest->sid, first_inserted_aid_dest);
1638                  }                  }
1639          }          }
# Line 1392  int get_section_index(SECTION_LIST *p_se Line 1647  int get_section_index(SECTION_LIST *p_se
1647    
1648          if (p_section_list_pool == NULL)          if (p_section_list_pool == NULL)
1649          {          {
1650                  log_error("get_section_index() error: uninitialized\n");                  log_error("get_section_index() error: uninitialized");
1651                  return -1;                  return -1;
1652          }          }
1653    
# Line 1405  int get_section_index(SECTION_LIST *p_se Line 1660  int get_section_index(SECTION_LIST *p_se
1660                  index = (int)(p_section - p_section_list_pool->sections);                  index = (int)(p_section - p_section_list_pool->sections);
1661                  if (index < 0 || index >= BBS_max_section)                  if (index < 0 || index >= BBS_max_section)
1662                  {                  {
1663                          log_error("get_section_index(%d) error: index out of range\n", index);                          log_error("get_section_index(%d) error: index out of range", index);
1664                          return -2;                          return -2;
1665                  }                  }
1666          }          }
# Line 1413  int get_section_index(SECTION_LIST *p_se Line 1668  int get_section_index(SECTION_LIST *p_se
1668          return index;          return index;
1669  }  }
1670    
1671    int get_section_info(SECTION_LIST *p_section, char *sname, char *stitle, char *master_list)
1672    {
1673            if (p_section == NULL)
1674            {
1675                    log_error("NULL pointer error");
1676                    return -1;
1677            }
1678    
1679            if (section_list_rd_lock(p_section) < 0)
1680            {
1681                    log_error("section_list_rd_lock(sid=%d) error", p_section->sid);
1682                    return -2;
1683            }
1684    
1685            if (sname != NULL)
1686            {
1687                    memcpy(sname, p_section->sname, sizeof(p_section->sname));
1688            }
1689            if (stitle != NULL)
1690            {
1691                    memcpy(stitle, p_section->stitle, sizeof(p_section->stitle));
1692            }
1693            if (master_list != NULL)
1694            {
1695                    memcpy(master_list, p_section->master_list, sizeof(p_section->master_list));
1696            }
1697    
1698            // release lock of section
1699            if (section_list_rd_unlock(p_section) < 0)
1700            {
1701                    log_error("section_list_rd_unlock(sid=%d) error", p_section->sid);
1702                    return -2;
1703            }
1704    
1705            return 0;
1706    }
1707    
1708  int section_list_try_rd_lock(SECTION_LIST *p_section, int wait_sec)  int section_list_try_rd_lock(SECTION_LIST *p_section, int wait_sec)
1709  {  {
1710          int index;          int index;
1711    #ifdef HAVE_SYSTEM_V
1712          struct sembuf sops[4];          struct sembuf sops[4];
1713    #endif
1714          struct timespec timeout;          struct timespec timeout;
1715          int ret;          int ret = 0;
1716    
1717          index = get_section_index(p_section);          index = get_section_index(p_section);
1718          if (index < 0)          if (index < 0)
# Line 1426  int section_list_try_rd_lock(SECTION_LIS Line 1720  int section_list_try_rd_lock(SECTION_LIS
1720                  return -2;                  return -2;
1721          }          }
1722    
1723            timeout.tv_sec = wait_sec;
1724            timeout.tv_nsec = 0;
1725    
1726    #ifdef HAVE_SYSTEM_V
1727          sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index          sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1728          sops[0].sem_op = 0;                                                                // wait until unlocked          sops[0].sem_op = 0;                                                                // wait until unlocked
1729          sops[0].sem_flg = 0;          sops[0].sem_flg = 0;
# Line 1448  int section_list_try_rd_lock(SECTION_LIS Line 1746  int section_list_try_rd_lock(SECTION_LIS
1746                  sops[3].sem_flg = SEM_UNDO;                        // undo on terminate                  sops[3].sem_flg = SEM_UNDO;                        // undo on terminate
1747          }          }
1748    
         timeout.tv_sec = wait_sec;  
         timeout.tv_nsec = 0;  
   
1749          ret = semtimedop(p_section_list_pool->semid, sops, (index == BBS_max_section ? 2 : 4), &timeout);          ret = semtimedop(p_section_list_pool->semid, sops, (index == BBS_max_section ? 2 : 4), &timeout);
1750          if (ret == -1 && errno != EAGAIN && errno != EINTR)          if (ret == -1 && errno != EAGAIN && errno != EINTR)
1751          {          {
1752                  log_error("semtimedop(index = %d, lock read) error %d\n", index, errno);                  log_error("semop(index = %d, lock read) error %d", index, errno);
1753            }
1754    #else
1755            if (sem_timedwait(&(p_section_list_pool->sem[index]), &timeout) == -1)
1756            {
1757                    if (errno != ETIMEDOUT && errno != EAGAIN && errno != EINTR)
1758                    {
1759                            log_error("sem_timedwait(sem[%d]) error %d", index, errno);
1760                    }
1761                    return -1;
1762          }          }
1763    
1764            if (index != BBS_max_section)
1765            {
1766                    if (sem_timedwait(&(p_section_list_pool->sem[BBS_max_section]), &timeout) == -1)
1767                    {
1768                            if (errno != ETIMEDOUT && errno != EAGAIN && errno != EINTR)
1769                            {
1770                                    log_error("sem_timedwait(sem[%d]) error %d", BBS_max_section, errno);
1771                            }
1772                            // release previously acquired lock
1773                            if (sem_post(&(p_section_list_pool->sem[index])) == -1)
1774                            {
1775                                    log_error("sem_post(sem[%d]) error %d", index, errno);
1776                            }
1777                            return -1;
1778                    }
1779            }
1780    
1781            if (p_section_list_pool->write_lock_count[index] == 0 &&
1782                    (index != BBS_max_section && p_section_list_pool->write_lock_count[BBS_max_section] == 0))
1783            {
1784                    p_section_list_pool->read_lock_count[index]++;
1785                    if (index != BBS_max_section)
1786                    {
1787                            p_section_list_pool->read_lock_count[BBS_max_section]++;
1788                    }
1789            }
1790            else
1791            {
1792                    errno = EAGAIN;
1793                    ret = -1;
1794            }
1795    
1796            if (index != BBS_max_section)
1797            {
1798                    // release lock on "all section"
1799                    if (sem_post(&(p_section_list_pool->sem[BBS_max_section])) == -1)
1800                    {
1801                            log_error("sem_post(sem[%d]) error %d", BBS_max_section, errno);
1802                            ret = -1;
1803                    }
1804            }
1805    
1806            if (sem_post(&(p_section_list_pool->sem[index])) == -1)
1807            {
1808                    log_error("sem_post(sem[%d]) error %d", index, errno);
1809                    return -1;
1810            }
1811    #endif
1812    
1813          return ret;          return ret;
1814  }  }
1815    
1816  int section_list_try_rw_lock(SECTION_LIST *p_section, int wait_sec)  int section_list_try_rw_lock(SECTION_LIST *p_section, int wait_sec)
1817  {  {
1818          int index;          int index;
1819    #ifdef HAVE_SYSTEM_V
1820          struct sembuf sops[3];          struct sembuf sops[3];
1821    #endif
1822          struct timespec timeout;          struct timespec timeout;
1823          int ret;          int ret = 0;
1824    
1825          index = get_section_index(p_section);          index = get_section_index(p_section);
1826          if (index < 0)          if (index < 0)
# Line 1473  int section_list_try_rw_lock(SECTION_LIS Line 1828  int section_list_try_rw_lock(SECTION_LIS
1828                  return -2;                  return -2;
1829          }          }
1830    
1831            timeout.tv_sec = wait_sec;
1832            timeout.tv_nsec = 0;
1833    
1834    #ifdef HAVE_SYSTEM_V
1835          sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index          sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1836          sops[0].sem_op = 0;                                                                // wait until unlocked          sops[0].sem_op = 0;                                                                // wait until unlocked
1837          sops[0].sem_flg = 0;          sops[0].sem_flg = 0;
# Line 1485  int section_list_try_rw_lock(SECTION_LIS Line 1844  int section_list_try_rw_lock(SECTION_LIS
1844          sops[2].sem_op = 0;                                                        // wait until unlocked          sops[2].sem_op = 0;                                                        // wait until unlocked
1845          sops[2].sem_flg = 0;          sops[2].sem_flg = 0;
1846    
         timeout.tv_sec = wait_sec;  
         timeout.tv_nsec = 0;  
   
1847          ret = semtimedop(p_section_list_pool->semid, sops, 3, &timeout);          ret = semtimedop(p_section_list_pool->semid, sops, 3, &timeout);
1848          if (ret == -1 && errno != EAGAIN && errno != EINTR)          if (ret == -1 && errno != EAGAIN && errno != EINTR)
1849          {          {
1850                  log_error("semtimedop(index = %d, lock write) error %d\n", index, errno);                  log_error("semop(index = %d, lock write) error %d", index, errno);
1851          }          }
1852    #else
1853            if (sem_timedwait(&(p_section_list_pool->sem[index]), &timeout) == -1)
1854            {
1855                    if (errno != ETIMEDOUT && errno != EAGAIN && errno != EINTR)
1856                    {
1857                            log_error("sem_timedwait(sem[%d]) error %d", index, errno);
1858                    }
1859                    return -1;
1860            }
1861    
1862            if (p_section_list_pool->read_lock_count[index] == 0 && p_section_list_pool->write_lock_count[index] == 0)
1863            {
1864                    p_section_list_pool->write_lock_count[index]++;
1865            }
1866            else
1867            {
1868                    errno = EAGAIN;
1869                    ret = -1;
1870            }
1871    
1872            if (sem_post(&(p_section_list_pool->sem[index])) == -1)
1873            {
1874                    log_error("sem_post(sem[%d]) error %d", index, errno);
1875                    return -1;
1876            }
1877    #endif
1878    
1879          return ret;          return ret;
1880  }  }
# Line 1500  int section_list_try_rw_lock(SECTION_LIS Line 1882  int section_list_try_rw_lock(SECTION_LIS
1882  int section_list_rd_unlock(SECTION_LIST *p_section)  int section_list_rd_unlock(SECTION_LIST *p_section)
1883  {  {
1884          int index;          int index;
1885    #ifdef HAVE_SYSTEM_V
1886          struct sembuf sops[2];          struct sembuf sops[2];
1887          int ret;  #endif
1888            int ret = 0;
1889    
1890          index = get_section_index(p_section);          index = get_section_index(p_section);
1891          if (index < 0)          if (index < 0)
# Line 1509  int section_list_rd_unlock(SECTION_LIST Line 1893  int section_list_rd_unlock(SECTION_LIST
1893                  return -2;                  return -2;
1894          }          }
1895    
1896    #ifdef HAVE_SYSTEM_V
1897          sops[0].sem_num = (unsigned short)(index * 2); // r_sem of section index          sops[0].sem_num = (unsigned short)(index * 2); // r_sem of section index
1898          sops[0].sem_op = -1;                                               // unlock          sops[0].sem_op = -1;                                               // unlock
1899          sops[0].sem_flg = IPC_NOWAIT | SEM_UNDO;           // no wait          sops[0].sem_flg = IPC_NOWAIT | SEM_UNDO;           // no wait
# Line 1523  int section_list_rd_unlock(SECTION_LIST Line 1908  int section_list_rd_unlock(SECTION_LIST
1908          ret = semop(p_section_list_pool->semid, sops, (index == BBS_max_section ? 1 : 2));          ret = semop(p_section_list_pool->semid, sops, (index == BBS_max_section ? 1 : 2));
1909          if (ret == -1 && errno != EAGAIN && errno != EINTR)          if (ret == -1 && errno != EAGAIN && errno != EINTR)
1910          {          {
1911                  log_error("semop(index = %d, unlock read) error %d\n", index, errno);                  log_error("semop(index = %d, unlock read) error %d", index, errno);
1912            }
1913    #else
1914            if (sem_wait(&(p_section_list_pool->sem[index])) == -1)
1915            {
1916                    if (errno != ETIMEDOUT && errno != EAGAIN && errno != EINTR)
1917                    {
1918                            log_error("sem_wait(sem[%d]) error %d", index, errno);
1919                    }
1920                    return -1;
1921          }          }
1922    
1923            if (index != BBS_max_section)
1924            {
1925                    if (sem_wait(&(p_section_list_pool->sem[BBS_max_section])) == -1)
1926                    {
1927                            if (errno != ETIMEDOUT && errno != EAGAIN && errno != EINTR)
1928                            {
1929                                    log_error("sem_wait(sem[%d]) error %d", BBS_max_section, errno);
1930                            }
1931                            // release previously acquired lock
1932                            if (sem_post(&(p_section_list_pool->sem[index])) == -1)
1933                            {
1934                                    log_error("sem_post(sem[%d]) error %d", index, errno);
1935                            }
1936                            return -1;
1937                    }
1938            }
1939    
1940            if (p_section_list_pool->read_lock_count[index] > 0)
1941            {
1942                    p_section_list_pool->read_lock_count[index]--;
1943            }
1944            else
1945            {
1946                    log_error("read_lock_count[%d] already 0", index);
1947            }
1948    
1949            if (index != BBS_max_section && p_section_list_pool->read_lock_count[BBS_max_section] > 0)
1950            {
1951                    p_section_list_pool->read_lock_count[BBS_max_section]--;
1952            }
1953            else
1954            {
1955                    log_error("read_lock_count[%d] already 0", BBS_max_section);
1956            }
1957    
1958            if (index != BBS_max_section)
1959            {
1960                    // release lock on "all section"
1961                    if (sem_post(&(p_section_list_pool->sem[BBS_max_section])) == -1)
1962                    {
1963                            log_error("sem_post(sem[%d]) error %d", BBS_max_section, errno);
1964                            ret = -1;
1965                    }
1966            }
1967    
1968            if (sem_post(&(p_section_list_pool->sem[index])) == -1)
1969            {
1970                    log_error("sem_post(sem[%d]) error %d", index, errno);
1971                    return -1;
1972            }
1973    #endif
1974    
1975          return ret;          return ret;
1976  }  }
1977    
1978  int section_list_rw_unlock(SECTION_LIST *p_section)  int section_list_rw_unlock(SECTION_LIST *p_section)
1979  {  {
1980          int index;          int index;
1981    #ifdef HAVE_SYSTEM_V
1982          struct sembuf sops[1];          struct sembuf sops[1];
1983          int ret;  #endif
1984            int ret = 0;
1985    
1986          index = get_section_index(p_section);          index = get_section_index(p_section);
1987          if (index < 0)          if (index < 0)
# Line 1541  int section_list_rw_unlock(SECTION_LIST Line 1989  int section_list_rw_unlock(SECTION_LIST
1989                  return -2;                  return -2;
1990          }          }
1991    
1992    #ifdef HAVE_SYSTEM_V
1993          sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index          sops[0].sem_num = (unsigned short)(index * 2 + 1); // w_sem of section index
1994          sops[0].sem_op = -1;                                                       // unlock          sops[0].sem_op = -1;                                                       // unlock
1995          sops[0].sem_flg = IPC_NOWAIT | SEM_UNDO;                   // no wait          sops[0].sem_flg = IPC_NOWAIT | SEM_UNDO;                   // no wait
# Line 1548  int section_list_rw_unlock(SECTION_LIST Line 1997  int section_list_rw_unlock(SECTION_LIST
1997          ret = semop(p_section_list_pool->semid, sops, 1);          ret = semop(p_section_list_pool->semid, sops, 1);
1998          if (ret == -1 && errno != EAGAIN && errno != EINTR)          if (ret == -1 && errno != EAGAIN && errno != EINTR)
1999          {          {
2000                  log_error("semop(index = %d, unlock write) error %d\n", index, errno);                  log_error("semop(index = %d, unlock write) error %d", index, errno);
2001            }
2002    #else
2003            if (sem_wait(&(p_section_list_pool->sem[index])) == -1)
2004            {
2005                    if (errno != ETIMEDOUT && errno != EAGAIN && errno != EINTR)
2006                    {
2007                            log_error("sem_wait(sem[%d]) error %d", index, errno);
2008                    }
2009                    return -1;
2010            }
2011    
2012            if (p_section_list_pool->write_lock_count[index] > 0)
2013            {
2014                    p_section_list_pool->write_lock_count[index]--;
2015            }
2016            else
2017            {
2018                    log_error("write_lock_count[%d] already 0", index);
2019          }          }
2020    
2021            if (sem_post(&(p_section_list_pool->sem[index])) == -1)
2022            {
2023                    log_error("sem_post(sem[%d]) error %d", index, errno);
2024                    return -1;
2025            }
2026    #endif
2027    
2028          return ret;          return ret;
2029  }  }
2030    
# Line 1559  int section_list_rd_lock(SECTION_LIST *p Line 2033  int section_list_rd_lock(SECTION_LIST *p
2033          int timer = 0;          int timer = 0;
2034          int sid = (p_section == NULL ? 0 : p_section->sid);          int sid = (p_section == NULL ? 0 : p_section->sid);
2035          int ret = -1;          int ret = -1;
2036            time_t tm_first_failure = 0;
2037    
2038          while (!SYS_server_exit)          while (!SYS_server_exit)
2039          {          {
# Line 1569  int section_list_rd_lock(SECTION_LIST *p Line 2044  int section_list_rd_lock(SECTION_LIST *p
2044                  }                  }
2045                  else if (errno == EAGAIN || errno == EINTR) // retry                  else if (errno == EAGAIN || errno == EINTR) // retry
2046                  {                  {
2047                            // Dead lock detection
2048                            if (tm_first_failure == 0)
2049                            {
2050                                    time(&tm_first_failure);
2051                            }
2052    
2053                          timer++;                          timer++;
2054                          if (timer % SECTION_TRY_LOCK_TIMES == 0)                          if (timer % SECTION_TRY_LOCK_TIMES == 0)
2055                          {                          {
2056                                  log_error("section_list_rd_lock() tried %d times on section %d\n", sid, timer);                                  log_error("section_list_try_rd_lock() tried %d times on section %d", timer, sid);
2057                                    if (time(NULL) - tm_first_failure >= SECTION_DEAD_LOCK_TIMEOUT)
2058                                    {
2059                                            log_error("Unable to acquire rd_lock for %d seconds", time(NULL) - tm_first_failure);
2060    #ifndef HAVE_SYSTEM_V
2061                                            section_list_reset_lock(p_section);
2062                                            log_error("Reset POSIX semaphore to resolve dead lock");
2063    #endif
2064                                            break;
2065                                    }
2066                          }                          }
2067                            usleep(100 * 1000); // 0.1 second
2068                  }                  }
2069                  else // failed                  else // failed
2070                  {                  {
2071                          log_error("section_list_rd_lock() failed on section %d\n", sid);                          log_error("section_list_try_rd_lock() failed on section %d", sid);
2072                          break;                          break;
2073                  }                  }
2074          }          }
# Line 1590  int section_list_rw_lock(SECTION_LIST *p Line 2081  int section_list_rw_lock(SECTION_LIST *p
2081          int timer = 0;          int timer = 0;
2082          int sid = (p_section == NULL ? 0 : p_section->sid);          int sid = (p_section == NULL ? 0 : p_section->sid);
2083          int ret = -1;          int ret = -1;
2084            time_t tm_first_failure = 0;
2085    
2086          while (!SYS_server_exit)          while (!SYS_server_exit)
2087          {          {
# Line 1600  int section_list_rw_lock(SECTION_LIST *p Line 2092  int section_list_rw_lock(SECTION_LIST *p
2092                  }                  }
2093                  else if (errno == EAGAIN || errno == EINTR) // retry                  else if (errno == EAGAIN || errno == EINTR) // retry
2094                  {                  {
2095                            // Dead lock detection
2096                            if (tm_first_failure == 0)
2097                            {
2098                                    time(&tm_first_failure);
2099                            }
2100    
2101                          timer++;                          timer++;
2102                          if (timer % SECTION_TRY_LOCK_TIMES == 0)                          if (timer % SECTION_TRY_LOCK_TIMES == 0)
2103                          {                          {
2104                                  log_error("acquire_section_rw_lock() tried %d times on section %d\n", sid, timer);                                  log_error("section_list_try_rw_lock() tried %d times on section %d", timer, sid);
2105                                    if (time(NULL) - tm_first_failure >= SECTION_DEAD_LOCK_TIMEOUT)
2106                                    {
2107                                            log_error("Unable to acquire rw_lock for %d seconds", time(NULL) - tm_first_failure);
2108    #ifndef HAVE_SYSTEM_V
2109                                            section_list_reset_lock(p_section);
2110                                            log_error("Reset POSIX semaphore to resolve dead lock");
2111    #endif
2112                                            break;
2113                                    }
2114                          }                          }
2115                            usleep(100 * 1000); // 0.1 second
2116                  }                  }
2117                  else // failed                  else // failed
2118                  {                  {
2119                          log_error("acquire_section_rw_lock() failed on section %d\n", sid);                          log_error("section_list_try_rw_lock() failed on section %d", sid);
2120                          break;                          break;
2121                  }                  }
2122          }          }
2123    
2124          return ret;          return ret;
2125  }  }
2126    
2127    #ifndef HAVE_SYSTEM_V
2128    int section_list_reset_lock(SECTION_LIST *p_section)
2129    {
2130            int index;
2131    
2132            if (p_section == NULL)
2133            {
2134                    log_error("NULL pointer error");
2135                    return -1;
2136            }
2137    
2138            index = get_section_index(p_section);
2139            if (index < 0)
2140            {
2141                    return -2;
2142            }
2143    
2144            if (sem_destroy(&(p_section_list_pool->sem[index])) == -1)
2145            {
2146                    log_error("sem_destroy(sem[%d]) error (%d)", index, errno);
2147            }
2148    
2149            p_section_list_pool->read_lock_count[index] = 0;
2150            p_section_list_pool->write_lock_count[index] = 0;
2151    
2152            if (sem_init(&(p_section_list_pool->sem[index]), 1, 1) == -1)
2153            {
2154                    log_error("sem_init(sem[%d]) error (%d)", index, errno);
2155            }
2156    
2157            if (index != BBS_max_section)
2158            {
2159                    if (sem_destroy(&(p_section_list_pool->sem[BBS_max_section])) == -1)
2160                    {
2161                            log_error("sem_destroy(sem[%d]) error (%d)", BBS_max_section, errno);
2162                    }
2163    
2164                    p_section_list_pool->read_lock_count[BBS_max_section] = 0;
2165                    p_section_list_pool->write_lock_count[BBS_max_section] = 0;
2166    
2167                    if (sem_init(&(p_section_list_pool->sem[BBS_max_section]), 1, 1) == -1)
2168                    {
2169                            log_error("sem_init(sem[%d]) error (%d)", BBS_max_section, errno);
2170                    }
2171            }
2172    
2173            return 0;
2174    }
2175    #endif

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