notification::sweep::cleanup_sse_subscriptions (private)

 notification::sweep::cleanup_sse_subscriptions

Defined in packages/notifications/tcl/sweep-procs.tcl

Cleanup unused SSE channels.

Partial Call Graph (max 5 caller/called nodes):
notification::sse::unsubscribe notification::sse::unsubscribe (private) notification::sweep::cleanup_sse_subscriptions notification::sweep::cleanup_sse_subscriptions notification::sweep::cleanup_sse_subscriptions->notification::sse::unsubscribe

Testcases:
No testcase defined.
Source code:
        foreach {subscription channels} [nsv_array get ::notification::sse channels-*] {
            set to_user_id [string range $subscription [string length channels-] end]
            foreach channel $channels {
                try {
                    ns_connchan write $channel [string cat {: ping} \n\n]
                } on error {errmsg} {
                    ::notification::sse::unsubscribe $channel $to_user_id
                }
            }
        }
XQL Not present:
PostgreSQL, Oracle
Generic XQL file:
packages/notifications/tcl/sweep-procs.xql

[ hide source ] | [ make this the default ]
Show another procedure: