2 * This file contains miscellaneous housekeeping tasks.
4 * Copyright (c) 1987-2017 by the citadel.org team
6 * This program is open source software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License, version 3.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
16 #include <libcitadel.h>
18 #include "ctdl_module.h"
19 #include "serv_extensions.h"
21 #include "internet_addressing.h"
22 #include "journaling.h"
23 #include "citadel_ldap.h"
25 void check_sched_shutdown(void) {
26 if ((ScheduledShutdown == 1) && (ContextList == NULL)) {
27 syslog(LOG_NOTICE, "housekeeping: scheduled shutdown initiating");
28 server_shutting_down = 1;
34 * Check (and fix) floor reference counts. This doesn't need to be done
35 * very often, since the counts should remain correct during normal operation.
37 void check_ref_counts_backend(struct ctdlroom *qrbuf, void *data) {
41 new_refcounts = (int *) data;
43 ++new_refcounts[(int)qrbuf->QRfloor];
47 void check_ref_counts(void) {
51 int new_refcounts[MAXFLOORS];
53 syslog(LOG_DEBUG, "housekeeping: checking floor reference counts");
54 for (a=0; a<MAXFLOORS; ++a) {
58 cdb_begin_transaction();
59 CtdlForEachRoom(check_ref_counts_backend, (void *)new_refcounts );
60 cdb_end_transaction();
62 for (a=0; a<MAXFLOORS; ++a) {
64 flbuf.f_ref_count = new_refcounts[a];
65 if (new_refcounts[a] > 0) {
66 flbuf.f_flags = flbuf.f_flags | QR_INUSE;
69 flbuf.f_flags = flbuf.f_flags & ~QR_INUSE;
72 syslog(LOG_DEBUG, "housekeeping: floor %d has %d rooms", a, new_refcounts[a]);
78 * This is the housekeeping loop. Worker threads come through here after
79 * processing client requests but before jumping back into the pool. We
80 * only allow housekeeping to execute once per minute, and we only allow one
81 * instance to run at a time.
83 static int housekeeping_in_progress = 0;
84 static time_t last_timer = 0L;
85 void do_housekeeping(void) {
86 int do_housekeeping_now = 0;
87 int do_perminute_housekeeping_now = 0;
91 * We do it this way instead of wrapping the whole loop in an
92 * S_HOUSEKEEPING critical section because it eliminates the need to
93 * potentially have multiple concurrent mutexes in progress.
95 begin_critical_section(S_HOUSEKEEPING);
96 if (housekeeping_in_progress == 0) {
97 do_housekeeping_now = 1;
98 housekeeping_in_progress = 1;
100 end_critical_section(S_HOUSEKEEPING);
103 if (do_housekeeping_now == 0) {
104 if ( (now - last_timer) > (time_t)300 ) {
106 "housekeeping: WARNING: housekeeping loop has not run for %ld minutes. Is something stuck?",
107 ((now - last_timer) / 60)
114 * Ok, at this point we've made the decision to run the housekeeping
115 * loop. Everything below this point is real work.
118 if ( (now - last_timer) > (time_t)60 ) {
119 do_perminute_housekeeping_now = 1;
120 last_timer = time(NULL);
123 /* First, do the "as often as needed" stuff... */
125 PerformSessionHooks(EVT_HOUSE);
127 /* Then, do the "once per minute" stuff... */
128 if (do_perminute_housekeeping_now) {
130 //CtdlPopulateUsersFromLDAP(); // This one isn't from a module so we put it here
131 PerformSessionHooks(EVT_TIMER); // Run all registered TIMER hooks
137 begin_critical_section(S_HOUSEKEEPING);
138 housekeeping_in_progress = 0;
139 end_critical_section(S_HOUSEKEEPING);
143 void CtdlDisableHouseKeeping(void)
145 int ActiveBackgroundJobs;
146 int do_housekeeping_now = 0;
147 struct CitContext *nptr;
150 retry_block_housekeeping:
151 syslog(LOG_INFO, "housekeeping: trying to disable services");
152 begin_critical_section(S_HOUSEKEEPING);
153 if (housekeeping_in_progress == 0) {
154 do_housekeeping_now = 1;
155 housekeeping_in_progress = 1;
157 end_critical_section(S_HOUSEKEEPING);
158 if (do_housekeeping_now == 0) {
160 goto retry_block_housekeeping;
163 syslog(LOG_INFO, "housekeeping: checking for running server jobs");
165 retry_wait_for_contexts:
166 /* So that we don't keep the context list locked for a long time
167 * we create a copy of it first
169 ActiveBackgroundJobs = 0;
170 nptr = CtdlGetContextArray(&nContexts) ;
173 for (i=0; i<nContexts; i++)
175 if ((nptr[i].state != CON_SYS) || (nptr[i].lastcmd == 0))
177 ActiveBackgroundJobs ++;
178 syslog(LOG_INFO, "jousekeeping: job CC[%d] active; use TERM if you don't want to wait for it", nptr[i].cs_pid);
185 if (ActiveBackgroundJobs != 0) {
186 syslog(LOG_INFO, "housekeeping: found %d running jobs, need to wait", ActiveBackgroundJobs);
188 goto retry_wait_for_contexts;
190 syslog(LOG_INFO, "housekeeping: disabled now.");
194 void CtdlEnableHouseKeeping(void)
196 begin_critical_section(S_HOUSEKEEPING);
197 housekeeping_in_progress = 0;
198 end_critical_section(S_HOUSEKEEPING);