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

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