static void
http_address_free (
http_address_t * self // Object reference
)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_HTTP_ADDRESS) || defined (BASE_ANIMATE_HTTP_ADDRESS_FREE))
if (http_address_animating)
icl_console_print ("<http_address_free_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_HTTP_ADDRESS) || defined (BASE_TRACE_HTTP_ADDRESS_FREE))
icl_trace_record (NULL, http_address_dump, 11);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_HTTP_ADDRESS) || defined (BASE_STATS_HTTP_ADDRESS_FREE))
icl_stats_inc ("http_address_free", &s_http_address_free_stats);
#endif
if (self) {
#if (defined (BASE_THREADSAFE))
if (self->mutex)
icl_mutex_destroy (&self->mutex);
#endif
memset (&self->object_tag, 0, sizeof (http_address_t) - ((byte *) &self->object_tag - (byte *) self));
// memset (self, 0, sizeof (http_address_t));
self->object_tag = HTTP_ADDRESS_DEAD;
icl_mem_free (self);
}
self = NULL;
#if (defined (BASE_TRACE) || defined (BASE_TRACE_HTTP_ADDRESS) || defined (BASE_TRACE_HTTP_ADDRESS_FREE))
icl_trace_record (NULL, http_address_dump, 0x10000 + 11);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_HTTP_ADDRESS) || defined (BASE_ANIMATE_HTTP_ADDRESS_FREE))
if (http_address_animating)
icl_console_print ("<http_address_free_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
}
ipr_looseref_t *
ipr_looseref_push (
ipr_looseref_list_t * list, // List to attach to
void * object // Target object reference
)
{
ipr_looseref_t *
self; // The item
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_LOOSEREF) || defined (BASE_ANIMATE_IPR_LOOSEREF_PUSH))
if (ipr_looseref_animating)
icl_console_print ("<ipr_looseref_push_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" list=\"%pp\""
" object=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, list, object);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_LOOSEREF) || defined (BASE_TRACE_IPR_LOOSEREF_PUSH))
icl_trace_record (NULL, ipr_looseref_dump, 4);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_IPR_LOOSEREF) || defined (BASE_STATS_IPR_LOOSEREF_PUSH))
icl_stats_inc ("ipr_looseref_push", &s_ipr_looseref_push_stats);
#endif
self = ipr_looseref_new ();
if (self) {
self->object = object;
ipr_looseref_list_push (list, self);
}
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_LOOSEREF) || defined (BASE_TRACE_IPR_LOOSEREF_PUSH))
icl_trace_record (NULL, ipr_looseref_dump, 0x10000 + 4);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_LOOSEREF) || defined (BASE_ANIMATE_IPR_LOOSEREF_PUSH))
if (ipr_looseref_animating)
icl_console_print ("<ipr_looseref_push_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" list=\"%pp\""
" object=\"%pp\""
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, list, object, self);
#endif
return (self);
}
static void wait_on_busy_threads(apr_thread_pool_t *me, void *owner)
{
#ifndef NDEBUG
apr_os_thread_t *os_thread;
#endif
struct apr_thread_list_elt *elt;
apr_thread_mutex_lock(me->lock);
elt = APR_RING_FIRST(me->busy_thds);
while (elt != APR_RING_SENTINEL(me->busy_thds, apr_thread_list_elt, link)) {
if (elt->current_owner != owner) {
elt = APR_RING_NEXT(elt, link);
continue;
}
#ifndef NDEBUG
/* make sure the thread is not the one calling tasks_cancel */
apr_os_thread_get(&os_thread, elt->thd);
#ifdef WIN32
/* hack for apr win32 bug */
assert(!apr_os_thread_equal(apr_os_thread_current(), os_thread));
#else
assert(!apr_os_thread_equal(apr_os_thread_current(), *os_thread));
#endif
#endif
while (elt->current_owner == owner) {
apr_thread_mutex_unlock(me->lock);
apr_sleep(200 * 1000);
apr_thread_mutex_lock(me->lock);
}
elt = APR_RING_FIRST(me->busy_thds);
}
apr_thread_mutex_unlock(me->lock);
return;
}
int
http_address_unlock (
http_address_t * self // Reference to object
)
{
int
rc = 0; // Return code
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_HTTP_ADDRESS) || defined (BASE_ANIMATE_HTTP_ADDRESS_UNLOCK))
if (http_address_animating)
icl_console_print ("<http_address_unlock_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_HTTP_ADDRESS) || defined (BASE_TRACE_HTTP_ADDRESS_UNLOCK))
icl_trace_record (NULL, http_address_dump, 13);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_HTTP_ADDRESS) || defined (BASE_STATS_HTTP_ADDRESS_UNLOCK))
icl_stats_inc ("http_address_unlock", &s_http_address_unlock_stats);
#endif
HTTP_ADDRESS_ASSERT_SANE (self);
#if (defined (BASE_THREADSAFE))
icl_mutex_unlock (self->mutex);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_HTTP_ADDRESS) || defined (BASE_TRACE_HTTP_ADDRESS_UNLOCK))
icl_trace_record (NULL, http_address_dump, 0x10000 + 13);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_HTTP_ADDRESS) || defined (BASE_ANIMATE_HTTP_ADDRESS_UNLOCK))
if (http_address_animating)
icl_console_print ("<http_address_unlock_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
" rc=\"%i\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self, rc);
#endif
return (rc);
}
void *
ipr_looseref_pop (
ipr_looseref_list_t * list // List to attach to
)
{
ipr_looseref_t *self;
void *
object = NULL; // Target object reference
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_LOOSEREF) || defined (BASE_ANIMATE_IPR_LOOSEREF_POP))
if (ipr_looseref_animating)
icl_console_print ("<ipr_looseref_pop_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" list=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, list);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_LOOSEREF) || defined (BASE_TRACE_IPR_LOOSEREF_POP))
icl_trace_record (NULL, ipr_looseref_dump, 5);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_IPR_LOOSEREF) || defined (BASE_STATS_IPR_LOOSEREF_POP))
icl_stats_inc ("ipr_looseref_pop", &s_ipr_looseref_pop_stats);
#endif
self = ipr_looseref_list_pop (list);
if (self) {
object = self->object;
ipr_looseref_destroy (&self);
}
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_LOOSEREF) || defined (BASE_TRACE_IPR_LOOSEREF_POP))
icl_trace_record (NULL, ipr_looseref_dump, 0x10000 + 5);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_LOOSEREF) || defined (BASE_ANIMATE_IPR_LOOSEREF_POP))
if (ipr_looseref_animating)
icl_console_print ("<ipr_looseref_pop_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" list=\"%pp\""
" object=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, list, object);
#endif
return (object);
}
static void
smt_fileio_annihilate (
smt_fileio_t * ( * self_p ) // Reference to object reference
)
{
smt_fileio_t *
self = *self_p; // Dereferenced Reference to object reference
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_SMT_FILEIO) || defined (BASE_ANIMATE_SMT_FILEIO_DESTROY))
if (smt_fileio_animating)
icl_console_print ("<smt_fileio_destroy_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self, self);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_SMT_FILEIO) || defined (BASE_TRACE_SMT_FILEIO_DESTROY))
icl_trace_record (NULL, smt_fileio_dump, 2);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_SMT_FILEIO) || defined (BASE_STATS_SMT_FILEIO_DESTROY))
icl_stats_inc ("smt_fileio_annihilate", &s_smt_fileio_annihilate_stats);
#endif
SMT_FILEIO_ASSERT_SANE (self);
apr_file_close (self->handle);
apr_pool_destroy (self->pool);
#if (defined (BASE_TRACE) || defined (BASE_TRACE_SMT_FILEIO) || defined (BASE_TRACE_SMT_FILEIO_DESTROY))
icl_trace_record (NULL, smt_fileio_dump, 0x10000 + 2);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_SMT_FILEIO) || defined (BASE_ANIMATE_SMT_FILEIO_DESTROY))
if (smt_fileio_animating)
icl_console_print ("<smt_fileio_destroy_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self, self);
#endif
}
static void
icl_demo_cache_annihilate (
icl_demo_cache_t * ( * self_p ) // Reference to object reference
)
{
icl_demo_cache_t *
self = *self_p; // Dereferenced Reference to object reference
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE_DESTROY))
if (icl_demo_cache_animating)
icl_console_print ("<icl_demo_cache_destroy_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self, self);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_CACHE) || defined (BASE_TRACE_ICL_DEMO_CACHE_DESTROY))
icl_trace_record (NULL, icl_demo_cache_dump, 2);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_ICL_DEMO_CACHE) || defined (BASE_STATS_ICL_DEMO_CACHE_DESTROY))
icl_stats_inc ("icl_demo_cache_annihilate", &s_icl_demo_cache_annihilate_stats);
#endif
ICL_DEMO_CACHE_ASSERT_SANE (self);
icl_mem_free (self->name);
icl_mem_free (self->address);
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_CACHE) || defined (BASE_TRACE_ICL_DEMO_CACHE_DESTROY))
icl_trace_record (NULL, icl_demo_cache_dump, 0x10000 + 2);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE_DESTROY))
if (icl_demo_cache_animating)
icl_console_print ("<icl_demo_cache_destroy_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self, self);
#endif
}
static void
icl_demo_cache_free (
icl_demo_cache_t * self // Object reference
)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE_FREE))
if (icl_demo_cache_animating)
icl_console_print ("<icl_demo_cache_free_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_CACHE) || defined (BASE_TRACE_ICL_DEMO_CACHE_FREE))
icl_trace_record (NULL, icl_demo_cache_dump, 8);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_ICL_DEMO_CACHE) || defined (BASE_STATS_ICL_DEMO_CACHE_FREE))
icl_stats_inc ("icl_demo_cache_free", &s_icl_demo_cache_free_stats);
#endif
if (self) {
memset (&self->object_tag, 0, sizeof (icl_demo_cache_t) - ((byte *) &self->object_tag - (byte *) self));
// memset (self, 0, sizeof (icl_demo_cache_t));
self->object_tag = ICL_DEMO_CACHE_DEAD;
icl_mem_free (self);
}
self = NULL;
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_CACHE) || defined (BASE_TRACE_ICL_DEMO_CACHE_FREE))
icl_trace_record (NULL, icl_demo_cache_dump, 0x10000 + 8);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE_FREE))
if (icl_demo_cache_animating)
icl_console_print ("<icl_demo_cache_free_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
}
static void
ipr_looseref_annihilate (
ipr_looseref_t * ( * self_p ) // Reference to object reference
)
{
ipr_looseref_t *
self = *self_p; // Dereferenced Reference to object reference
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_LOOSEREF) || defined (BASE_ANIMATE_IPR_LOOSEREF_DESTROY))
if (ipr_looseref_animating)
icl_console_print ("<ipr_looseref_destroy_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self, self);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_LOOSEREF) || defined (BASE_TRACE_IPR_LOOSEREF_DESTROY))
icl_trace_record (NULL, ipr_looseref_dump, 2);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_IPR_LOOSEREF) || defined (BASE_STATS_IPR_LOOSEREF_DESTROY))
icl_stats_inc ("ipr_looseref_annihilate", &s_ipr_looseref_annihilate_stats);
#endif
IPR_LOOSEREF_ASSERT_SANE (self);
ipr_looseref_remove_from_all_containers (self);
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_LOOSEREF) || defined (BASE_TRACE_IPR_LOOSEREF_DESTROY))
icl_trace_record (NULL, ipr_looseref_dump, 0x10000 + 2);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_LOOSEREF) || defined (BASE_ANIMATE_IPR_LOOSEREF_DESTROY))
if (ipr_looseref_animating)
icl_console_print ("<ipr_looseref_destroy_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self, self);
#endif
}
void
ipr_path_selftest (
void)
{
char
*path;
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_PATH) || defined (BASE_ANIMATE_IPR_PATH_SELFTEST))
if (ipr_path_animating)
icl_console_print ("<ipr_path_selftest_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_PATH) || defined (BASE_TRACE_IPR_PATH_SELFTEST))
icl_trace_record (NULL, ipr_path_dump, 4);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_IPR_PATH) || defined (BASE_STATS_IPR_PATH_SELFTEST))
icl_stats_inc ("ipr_path_selftest", &s_ipr_path_selftest_stats);
#endif
assert (ipr_path_create ("level1/level2/level3") == 0);
assert (ipr_file_is_directory ("level1/level2/level3"));
assert (ipr_path_remove ("level1/level2/level3") == 0);
assert (ipr_path_remove ("level1/level2") == 0);
assert (ipr_path_remove ("level1") == 0);
path = ipr_path_resolve ("../this/is/not/../valid/");
assert (streq (path, "this/is/valid/"));
icl_mem_free (path);
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_PATH) || defined (BASE_TRACE_IPR_PATH_SELFTEST))
icl_trace_record (NULL, ipr_path_dump, 0x10000 + 4);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_PATH) || defined (BASE_ANIMATE_IPR_PATH_SELFTEST))
if (ipr_path_animating)
icl_console_print ("<ipr_path_selftest_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
}
static void
smt_fileio_free (
smt_fileio_t * self // Object reference
)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_SMT_FILEIO) || defined (BASE_ANIMATE_SMT_FILEIO_FREE))
if (smt_fileio_animating)
icl_console_print ("<smt_fileio_free_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_SMT_FILEIO) || defined (BASE_TRACE_SMT_FILEIO_FREE))
icl_trace_record (NULL, smt_fileio_dump, 11);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_SMT_FILEIO) || defined (BASE_STATS_SMT_FILEIO_FREE))
icl_stats_inc ("smt_fileio_free", &s_smt_fileio_free_stats);
#endif
if (self) {
self->object_tag = SMT_FILEIO_DEAD;
icl_mem_free (self);
}
self = NULL;
#if (defined (BASE_TRACE) || defined (BASE_TRACE_SMT_FILEIO) || defined (BASE_TRACE_SMT_FILEIO_FREE))
icl_trace_record (NULL, smt_fileio_dump, 0x10000 + 11);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_SMT_FILEIO) || defined (BASE_ANIMATE_SMT_FILEIO_FREE))
if (smt_fileio_animating)
icl_console_print ("<smt_fileio_free_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
}
Bool
smt_fileio_eof (
smt_fileio_t * self // The fileio item
)
{
Bool
rc; // The result code
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_SMT_FILEIO) || defined (BASE_ANIMATE_SMT_FILEIO_EOF))
if (smt_fileio_animating)
icl_console_print ("<smt_fileio_eof_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_SMT_FILEIO) || defined (BASE_TRACE_SMT_FILEIO_EOF))
icl_trace_record (NULL, smt_fileio_dump, 5);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_SMT_FILEIO) || defined (BASE_STATS_SMT_FILEIO_EOF))
icl_stats_inc ("smt_fileio_eof", &s_smt_fileio_eof_stats);
#endif
rc = self->eof;
#if (defined (BASE_TRACE) || defined (BASE_TRACE_SMT_FILEIO) || defined (BASE_TRACE_SMT_FILEIO_EOF))
icl_trace_record (NULL, smt_fileio_dump, 0x10000 + 5);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_SMT_FILEIO) || defined (BASE_ANIMATE_SMT_FILEIO_EOF))
if (smt_fileio_animating)
icl_console_print ("<smt_fileio_eof_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
" rc=\"%i\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self, rc);
#endif
return (rc);
}
void
ipr_looseref_selftest (
void)
{
ipr_looseref_list_t
*list;
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_LOOSEREF) || defined (BASE_ANIMATE_IPR_LOOSEREF_SELFTEST))
if (ipr_looseref_animating)
icl_console_print ("<ipr_looseref_selftest_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_LOOSEREF) || defined (BASE_TRACE_IPR_LOOSEREF_SELFTEST))
icl_trace_record (NULL, ipr_looseref_dump, 6);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_IPR_LOOSEREF) || defined (BASE_STATS_IPR_LOOSEREF_SELFTEST))
icl_stats_inc ("ipr_looseref_selftest", &s_ipr_looseref_selftest_stats);
#endif
list = ipr_looseref_list_new ();
ipr_looseref_queue (list, (void *) list);
ipr_looseref_queue (list, (void *) list);
ipr_looseref_queue (list, (void *) list);
assert (ipr_looseref_pop (list) == (void *) list);
ipr_looseref_list_destroy (&list);
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_LOOSEREF) || defined (BASE_TRACE_IPR_LOOSEREF_SELFTEST))
icl_trace_record (NULL, ipr_looseref_dump, 0x10000 + 6);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_LOOSEREF) || defined (BASE_ANIMATE_IPR_LOOSEREF_SELFTEST))
if (ipr_looseref_animating)
icl_console_print ("<ipr_looseref_selftest_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
}
void
icl_demo_scope_selftest (
void)
{
icl_scope_t
*scope;
icl_demo_scope_t
*self;
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_SCOPE) || defined (BASE_ANIMATE_ICL_DEMO_SCOPE_SELFTEST))
if (icl_demo_scope_animating)
icl_console_print ("<icl_demo_scope_selftest_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_SCOPE) || defined (BASE_TRACE_ICL_DEMO_SCOPE_SELFTEST))
icl_trace_record (NULL, icl_demo_scope_dump, 3);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_ICL_DEMO_SCOPE) || defined (BASE_STATS_ICL_DEMO_SCOPE_SELFTEST))
icl_stats_inc ("icl_demo_scope_selftest", &s_icl_demo_scope_selftest_stats);
#endif
scope = icl_scope_new ();
icl_demo_scope_new_in_scope (&self, scope, "Santorini", "0x012201");
icl_scope_destroy (&scope);
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_SCOPE) || defined (BASE_TRACE_ICL_DEMO_SCOPE_SELFTEST))
icl_trace_record (NULL, icl_demo_scope_dump, 0x10000 + 3);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_SCOPE) || defined (BASE_ANIMATE_ICL_DEMO_SCOPE_SELFTEST))
if (icl_demo_scope_animating)
icl_console_print ("<icl_demo_scope_selftest_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
}
void
icl_apr_error_print_ (
apr_status_t status, // The status code to print
char * file, // Source file for call
size_t line // Line number for call
)
{
char
buffer [128];
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_APR) || defined (BASE_ANIMATE_ICL_APR_APR_ERROR_PRINT))
if (icl_apr_animating)
icl_console_print ("<icl_apr_apr_error_print_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" file=\"%s\""
" line=\"%u\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, file, line);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_APR) || defined (BASE_TRACE_ICL_APR_APR_ERROR_PRINT))
icl_trace_record (NULL, icl_apr_dump, 2);
#endif
icl_console_print ("(%s %lu) %s", file, (long) line, apr_strerror (status, buffer, 128));
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_APR) || defined (BASE_TRACE_ICL_APR_APR_ERROR_PRINT))
icl_trace_record (NULL, icl_apr_dump, 0x10000 + 2);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_APR) || defined (BASE_ANIMATE_ICL_APR_APR_ERROR_PRINT))
if (icl_apr_animating)
icl_console_print ("<icl_apr_apr_error_print_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" file=\"%s\""
" line=\"%u\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, file, line);
#endif
}
void
http_address_remove_from_all_containers (
http_address_t * self // The item
)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_HTTP_ADDRESS) || defined (BASE_ANIMATE_HTTP_ADDRESS_REMOVE_FROM_ALL_CONTAINERS))
if (http_address_animating)
icl_console_print ("<http_address_remove_from_all_containers_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_HTTP_ADDRESS) || defined (BASE_TRACE_HTTP_ADDRESS_REMOVE_FROM_ALL_CONTAINERS))
icl_trace_record (NULL, http_address_dump, 6);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_HTTP_ADDRESS) || defined (BASE_STATS_HTTP_ADDRESS_REMOVE_FROM_ALL_CONTAINERS))
icl_stats_inc ("http_address_remove_from_all_containers", &s_http_address_remove_from_all_containers_stats);
#endif
HTTP_ADDRESS_ASSERT_SANE (self);
http_address_table_remove (self);
#if (defined (BASE_TRACE) || defined (BASE_TRACE_HTTP_ADDRESS) || defined (BASE_TRACE_HTTP_ADDRESS_REMOVE_FROM_ALL_CONTAINERS))
icl_trace_record (NULL, http_address_dump, 0x10000 + 6);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_HTTP_ADDRESS) || defined (BASE_ANIMATE_HTTP_ADDRESS_REMOVE_FROM_ALL_CONTAINERS))
if (http_address_animating)
icl_console_print ("<http_address_remove_from_all_containers_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
}
void
cse_log(char *fmt, ...)
{
#ifdef DEBUG
va_list args;
char timestamp[32];
char buffer[8192];
time_t t;
int pid;
FILE *file;
file = fopen("/tmp/mod_caucho.log", "a");
pid = (int) getpid();
time(&t);
strftime(timestamp, sizeof(timestamp), "[%m/%b/%Y:%H:%M:%S %z]",
localtime(&t));
#ifdef WIN32
#if APR_HAS_THREADS
_snprintf(buffer, sizeof(buffer), "%s %d_%ld: ",
timestamp, pid, (long int) apr_os_thread_current());
#else
_snprintf(buffer, sizeof(buffer), "%s %d: ", timestamp, pid);
#endif
#else
#if APR_HAS_THREADS
snprintf(buffer, sizeof(buffer), "%s %d_%ld: ",
timestamp, pid, (long int) apr_os_thread_current());
#else
snprintf(buffer, sizeof(buffer), "%s %d: ", timestamp, pid);
#endif
#endif
va_start(args, fmt);
vsprintf(buffer + strlen(buffer), fmt, args);
va_end(args);
if (file) {
fputs(buffer, file);
fclose(file);
}
else {
fputs(buffer, stderr);
fflush(stderr);
}
#endif
}
void
http_address_show_animation (
Bool enabled // Are we enabling or disabling animation?
)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_HTTP_ADDRESS) || defined (BASE_ANIMATE_HTTP_ADDRESS_SHOW_ANIMATION))
if (http_address_animating)
icl_console_print ("<http_address_show_animation_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" enabled=\"%i\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, enabled);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_HTTP_ADDRESS) || defined (BASE_TRACE_HTTP_ADDRESS_SHOW_ANIMATION))
icl_trace_record (NULL, http_address_dump, 17);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_HTTP_ADDRESS) || defined (BASE_STATS_HTTP_ADDRESS_SHOW_ANIMATION))
icl_stats_inc ("http_address_show_animation", &s_http_address_show_animation_stats);
#endif
http_address_animating = enabled;
#if (defined (BASE_TRACE) || defined (BASE_TRACE_HTTP_ADDRESS) || defined (BASE_TRACE_HTTP_ADDRESS_SHOW_ANIMATION))
icl_trace_record (NULL, http_address_dump, 0x10000 + 17);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_HTTP_ADDRESS) || defined (BASE_ANIMATE_HTTP_ADDRESS_SHOW_ANIMATION))
if (http_address_animating)
icl_console_print ("<http_address_show_animation_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" enabled=\"%i\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, enabled);
#endif
}
void
ipr_looseref_remove_from_all_containers (
ipr_looseref_t * self // The item
)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_LOOSEREF) || defined (BASE_ANIMATE_IPR_LOOSEREF_REMOVE_FROM_ALL_CONTAINERS))
if (ipr_looseref_animating)
icl_console_print ("<ipr_looseref_remove_from_all_containers_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_LOOSEREF) || defined (BASE_TRACE_IPR_LOOSEREF_REMOVE_FROM_ALL_CONTAINERS))
icl_trace_record (NULL, ipr_looseref_dump, 7);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_IPR_LOOSEREF) || defined (BASE_STATS_IPR_LOOSEREF_REMOVE_FROM_ALL_CONTAINERS))
icl_stats_inc ("ipr_looseref_remove_from_all_containers", &s_ipr_looseref_remove_from_all_containers_stats);
#endif
ipr_looseref_list_remove (self);
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_LOOSEREF) || defined (BASE_TRACE_IPR_LOOSEREF_REMOVE_FROM_ALL_CONTAINERS))
icl_trace_record (NULL, ipr_looseref_dump, 0x10000 + 7);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_LOOSEREF) || defined (BASE_ANIMATE_IPR_LOOSEREF_REMOVE_FROM_ALL_CONTAINERS))
if (ipr_looseref_animating)
icl_console_print ("<ipr_looseref_remove_from_all_containers_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" self=\"%pp\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, self);
#endif
}
void
ipr_path_show_animation (
Bool enabled // Are we enabling or disabling animation?
)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_PATH) || defined (BASE_ANIMATE_IPR_PATH_SHOW_ANIMATION))
if (ipr_path_animating)
icl_console_print ("<ipr_path_show_animation_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" enabled=\"%i\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, enabled);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_PATH) || defined (BASE_TRACE_IPR_PATH_SHOW_ANIMATION))
icl_trace_record (NULL, ipr_path_dump, 5);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_IPR_PATH) || defined (BASE_STATS_IPR_PATH_SHOW_ANIMATION))
icl_stats_inc ("ipr_path_show_animation", &s_ipr_path_show_animation_stats);
#endif
ipr_path_animating = enabled;
#if (defined (BASE_TRACE) || defined (BASE_TRACE_IPR_PATH) || defined (BASE_TRACE_IPR_PATH_SHOW_ANIMATION))
icl_trace_record (NULL, ipr_path_dump, 0x10000 + 5);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_IPR_PATH) || defined (BASE_ANIMATE_IPR_PATH_SHOW_ANIMATION))
if (ipr_path_animating)
icl_console_print ("<ipr_path_show_animation_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" enabled=\"%i\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, enabled);
#endif
}
void
smt_fileio_show_animation (
Bool enabled // Are we enabling or disabling animation?
)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_SMT_FILEIO) || defined (BASE_ANIMATE_SMT_FILEIO_SHOW_ANIMATION))
if (smt_fileio_animating)
icl_console_print ("<smt_fileio_show_animation_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" enabled=\"%i\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, enabled);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_SMT_FILEIO) || defined (BASE_TRACE_SMT_FILEIO_SHOW_ANIMATION))
icl_trace_record (NULL, smt_fileio_dump, 15);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_SMT_FILEIO) || defined (BASE_STATS_SMT_FILEIO_SHOW_ANIMATION))
icl_stats_inc ("smt_fileio_show_animation", &s_smt_fileio_show_animation_stats);
#endif
smt_fileio_animating = enabled;
#if (defined (BASE_TRACE) || defined (BASE_TRACE_SMT_FILEIO) || defined (BASE_TRACE_SMT_FILEIO_SHOW_ANIMATION))
icl_trace_record (NULL, smt_fileio_dump, 0x10000 + 15);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_SMT_FILEIO) || defined (BASE_ANIMATE_SMT_FILEIO_SHOW_ANIMATION))
if (smt_fileio_animating)
icl_console_print ("<smt_fileio_show_animation_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" enabled=\"%i\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, enabled);
#endif
}
void
icl_demo_cache_show_animation (
Bool enabled // Are we enabling or disabling animation?
)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE_SHOW_ANIMATION))
if (icl_demo_cache_animating)
icl_console_print ("<icl_demo_cache_show_animation_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" enabled=\"%i\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, enabled);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_CACHE) || defined (BASE_TRACE_ICL_DEMO_CACHE_SHOW_ANIMATION))
icl_trace_record (NULL, icl_demo_cache_dump, 12);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_ICL_DEMO_CACHE) || defined (BASE_STATS_ICL_DEMO_CACHE_SHOW_ANIMATION))
icl_stats_inc ("icl_demo_cache_show_animation", &s_icl_demo_cache_show_animation_stats);
#endif
icl_demo_cache_animating = enabled;
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_CACHE) || defined (BASE_TRACE_ICL_DEMO_CACHE_SHOW_ANIMATION))
icl_trace_record (NULL, icl_demo_cache_dump, 0x10000 + 12);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE_SHOW_ANIMATION))
if (icl_demo_cache_animating)
icl_console_print ("<icl_demo_cache_show_animation_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
" enabled=\"%i\""
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
, enabled);
#endif
}
static void Q_DBG(char*msg, apr_queue_t *q) {
fprintf(stderr, "%ld\t#%d in %d out %d\t%s\n",
apr_os_thread_current(),
q->nelts, q->in, q->out,
msg
);
}
void aos_log_format_default(int level,
const char *file,
int line,
const char *function,
const char *fmt, ...)
{
int len;
apr_time_t t;
int s;
apr_time_exp_t tm;
va_list args;
char buffer[4096];
t = apr_time_now();
if ((s = apr_time_exp_lt(&tm, t)) != APR_SUCCESS) {
return;
}
len = snprintf(buffer, 4090, "[%04d-%02d-%02d %02d:%02d:%02d.%03d] %" APR_INT64_T_FMT " %s:%d ",
tm.tm_year + 1900, tm.tm_mon + 1, tm.tm_mday,
tm.tm_hour, tm.tm_min, tm.tm_sec, tm.tm_usec/1000,
(int64_t)apr_os_thread_current(), file, line);
va_start(args, fmt);
len += vsnprintf(buffer + len, 4090 - len, fmt, args);
va_end(args);
while (buffer[len -1] == '\n') len--;
buffer[len++] = '\n';
buffer[len] = '\0';
aos_log_print(buffer, len);
}
static APR_INLINE unsigned long apt_thread_id_get(void)
{
#ifdef WIN32
return (unsigned long) GetCurrentThreadId();
#else
return (unsigned long) apr_os_thread_current();
#endif
}
SWITCH_DECLARE(switch_thread_id_t) switch_thread_self(void)
{
#ifndef WIN32
return apr_os_thread_current();
#else
return (switch_thread_id_t) (GetCurrentThreadId());
#endif
}
static void Q_DBG(char*msg, etch_apr_queue_t *q) {
fprintf(stderr, "%ld\t#%d in %d out %d\t%s\n",
(size_t) apr_os_thread_current(), /* cast - Cisco */
q->nelts, q->in, q->out,
msg
);
fflush(stdout); /* Cisco */
}
static void
icl_demo_cache_cache_terminate (
void)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE_CACHE_TERMINATE))
if (icl_demo_cache_animating)
icl_console_print ("<icl_demo_cache_cache_terminate_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_CACHE) || defined (BASE_TRACE_ICL_DEMO_CACHE_CACHE_TERMINATE))
icl_trace_record (NULL, icl_demo_cache_dump, 11);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_ICL_DEMO_CACHE) || defined (BASE_STATS_ICL_DEMO_CACHE_CACHE_TERMINATE))
icl_stats_inc ("icl_demo_cache_cache_terminate", &s_icl_demo_cache_cache_terminate_stats);
#endif
s_cache = NULL;
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_CACHE) || defined (BASE_TRACE_ICL_DEMO_CACHE_CACHE_TERMINATE))
icl_trace_record (NULL, icl_demo_cache_dump, 0x10000 + 11);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE_CACHE_TERMINATE))
if (icl_demo_cache_animating)
icl_console_print ("<icl_demo_cache_cache_terminate_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
}
static void
icl_demo_cache_cache_initialise (
void)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE_CACHE_INITIALISE))
if (icl_demo_cache_animating)
icl_console_print ("<icl_demo_cache_cache_initialise_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_CACHE) || defined (BASE_TRACE_ICL_DEMO_CACHE_CACHE_INITIALISE))
icl_trace_record (NULL, icl_demo_cache_dump, 9);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_ICL_DEMO_CACHE) || defined (BASE_STATS_ICL_DEMO_CACHE_CACHE_INITIALISE))
icl_stats_inc ("icl_demo_cache_cache_initialise", &s_icl_demo_cache_cache_initialise_stats);
#endif
s_cache = icl_cache_get (sizeof (icl_demo_cache_t));
icl_system_register (icl_demo_cache_cache_purge, icl_demo_cache_cache_terminate);
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_CACHE) || defined (BASE_TRACE_ICL_DEMO_CACHE_CACHE_INITIALISE))
icl_trace_record (NULL, icl_demo_cache_dump, 0x10000 + 9);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE) || defined (BASE_ANIMATE_ICL_DEMO_CACHE_CACHE_INITIALISE))
if (icl_demo_cache_animating)
icl_console_print ("<icl_demo_cache_cache_initialise_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
}
static void
icl_demo_scope_cache_purge (
void)
{
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_SCOPE) || defined (BASE_ANIMATE_ICL_DEMO_SCOPE_CACHE_PURGE))
if (icl_demo_scope_animating)
icl_console_print ("<icl_demo_scope_cache_purge_start"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_SCOPE) || defined (BASE_TRACE_ICL_DEMO_SCOPE_CACHE_PURGE))
icl_trace_record (NULL, icl_demo_scope_dump, 10);
#endif
#if (defined (BASE_STATS) || defined (BASE_STATS_ICL_DEMO_SCOPE) || defined (BASE_STATS_ICL_DEMO_SCOPE_CACHE_PURGE))
icl_stats_inc ("icl_demo_scope_cache_purge", &s_icl_demo_scope_cache_purge_stats);
#endif
icl_mem_cache_purge (s_cache);
#if (defined (BASE_TRACE) || defined (BASE_TRACE_ICL_DEMO_SCOPE) || defined (BASE_TRACE_ICL_DEMO_SCOPE_CACHE_PURGE))
icl_trace_record (NULL, icl_demo_scope_dump, 0x10000 + 10);
#endif
#if (defined (BASE_ANIMATE) || defined (BASE_ANIMATE_ICL_DEMO_SCOPE) || defined (BASE_ANIMATE_ICL_DEMO_SCOPE_CACHE_PURGE))
if (icl_demo_scope_animating)
icl_console_print ("<icl_demo_scope_cache_purge_finish"
#if (defined (BASE_THREADSAFE))
" thread=\"%pp\""
#endif
"/>"
#if (defined (BASE_THREADSAFE))
, apr_os_thread_current ()
#endif
);
#endif
}
