Merged revisions 133649 via svnmerge from
[asterisk/asterisk.git] / main / devicestate.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 1999 - 2008, Digium, Inc.
5  *
6  * Mark Spencer <markster@digium.com>
7  * Russell Bryant <russell@digium.com>
8  *
9  * See http://www.asterisk.org for more information about
10  * the Asterisk project. Please do not directly contact
11  * any of the maintainers of this project for assistance;
12  * the project provides a web site, mailing lists and IRC
13  * channels for your use.
14  *
15  * This program is free software, distributed under the terms of
16  * the GNU General Public License Version 2. See the LICENSE file
17  * at the top of the source tree.
18  */
19
20 /*! \file
21  *
22  * \brief Device state management
23  *
24  * \author Mark Spencer <markster@digium.com> 
25  * \author Russell Bryant <russell@digium.com>
26  *
27  *      \arg \ref AstExtState
28  */
29
30 /*! \page AstExtState Extension and device states in Asterisk
31  *
32  * (Note that these descriptions of device states and extension
33  * states have not been updated to the way things work
34  * in Asterisk 1.6.)
35  *
36  *      Asterisk has an internal system that reports states
37  *      for an extension. By using the dialplan priority -1,
38  *      also called a \b hint, a connection can be made from an
39  *      extension to one or many devices. The state of the extension
40  *      now depends on the combined state of the devices.
41  *
42  *      The device state is basically based on the current calls.
43  *      If the devicestate engine can find a call from or to the
44  *      device, it's in use.
45  *      
46  *      Some channel drivers implement a callback function for 
47  *      a better level of reporting device states. The SIP channel
48  *      has a complicated system for this, which is improved 
49  *      by adding call limits to the configuration.
50  * 
51  *      Functions that want to check the status of an extension
52  *      register themself as a \b watcher.
53  *      Watchers in this system can subscribe either to all extensions
54  *      or just a specific extensions.
55  *
56  *      For non-device related states, there's an API called
57  *      devicestate providers. This is an extendible system for
58  *      delivering state information from outside sources or
59  *      functions within Asterisk. Currently we have providers
60  *      for app_meetme.c - the conference bridge - and call
61  *      parking (metermaids).
62  *
63  *      There are manly three subscribers to extension states 
64  *      within Asterisk:
65  *      - AMI, the manager interface
66  *      - app_queue.c - the Queue dialplan application
67  *      - SIP subscriptions, a.k.a. "blinking lamps" or 
68  *        "buddy lists"
69  *
70  *      The CLI command "show hints" show last known state
71  *
72  *      \note None of these handle user states, like an IM presence
73  *      system. res_jabber.c can subscribe and watch such states
74  *      in jabber/xmpp based systems.
75  *
76  *      \section AstDevStateArch Architecture for devicestates
77  *
78  *      When a channel driver or asterisk app changes state for 
79  *      a watched object, it alerts the core. The core queues
80  *      a change. When the change is processed, there's a query
81  *      sent to the channel driver/provider if there's a function
82  *      to handle that, otherwise a channel walk is issued to find
83  *      a channel that involves the object.
84  *      
85  *      The changes are queued and processed by a separate thread.
86  *      This thread calls the watchers subscribing to status 
87  *      changes for the object. For manager, this results 
88  *      in events. For SIP, NOTIFY requests.
89  *
90  *      - Device states
91  *              \arg \ref devicestate.c 
92  *              \arg \ref devicestate.h 
93  *
94  *      \section AstExtStateArch Architecture for extension states
95  *      
96  *      Hints are connected to extension. If an extension changes state
97  *      it checks the hint devices. If there is a hint, the callbacks into
98  *      device states are checked. The aggregated state is set for the hint
99  *      and reported back.
100  *
101  *      - Extension states
102  *              \arg \ref AstENUM ast_extension_states
103  *              \arg \ref pbx.c 
104  *              \arg \ref pbx.h 
105  *      - Structures
106  *              - \ref ast_state_cb struct.  Callbacks for watchers
107  *              - Callback ast_state_cb_type
108  *              - \ref ast_hint struct.
109  *      - Functions
110  *              - ast_extension_state_add()
111  *              - ast_extension_state_del()
112  *              - ast_get_hint()
113  *      
114  */
115
116 #include "asterisk.h"
117
118 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
119
120 #include "asterisk/_private.h"
121 #include "asterisk/channel.h"
122 #include "asterisk/utils.h"
123 #include "asterisk/lock.h"
124 #include "asterisk/linkedlists.h"
125 #include "asterisk/devicestate.h"
126 #include "asterisk/pbx.h"
127 #include "asterisk/app.h"
128 #include "asterisk/event.h"
129
130 /*! \brief Device state strings for printing */
131 static const char *devstatestring[] = {
132         /* 0 AST_DEVICE_UNKNOWN */      "Unknown",      /*!< Valid, but unknown state */
133         /* 1 AST_DEVICE_NOT_INUSE */    "Not in use",   /*!< Not used */
134         /* 2 AST_DEVICE IN USE */       "In use",       /*!< In use */
135         /* 3 AST_DEVICE_BUSY */         "Busy",         /*!< Busy */
136         /* 4 AST_DEVICE_INVALID */      "Invalid",      /*!< Invalid - not known to Asterisk */
137         /* 5 AST_DEVICE_UNAVAILABLE */  "Unavailable",  /*!< Unavailable (not registred) */
138         /* 6 AST_DEVICE_RINGING */      "Ringing",      /*!< Ring, ring, ring */
139         /* 7 AST_DEVICE_RINGINUSE */    "Ring+Inuse",   /*!< Ring and in use */
140         /* 8 AST_DEVICE_ONHOLD */       "On Hold"       /*!< On Hold */
141 };
142
143 /*! \brief  A device state provider (not a channel) */
144 struct devstate_prov {
145         char label[40];
146         ast_devstate_prov_cb_type callback;
147         AST_RWLIST_ENTRY(devstate_prov) list;
148 };
149
150 /*! \brief A list of providers */
151 static AST_RWLIST_HEAD_STATIC(devstate_provs, devstate_prov);
152
153 struct state_change {
154         AST_LIST_ENTRY(state_change) list;
155         char device[1];
156 };
157
158 /*! \brief The state change queue. State changes are queued
159         for processing by a separate thread */
160 static AST_LIST_HEAD_STATIC(state_changes, state_change);
161
162 /*! \brief The device state change notification thread */
163 static pthread_t change_thread = AST_PTHREADT_NULL;
164
165 /*! \brief Flag for the queue */
166 static ast_cond_t change_pending;
167
168 /*! \brief Whether or not to cache this device state value */
169 enum devstate_cache {
170         /*! Cache this value as it is coming from a device state provider which is
171          *  pushing up state change events to us as they happen */
172         CACHE_ON,
173         /*! Don't cache this result, since it was pulled from the device state provider.
174          *  We only want to cache results from device state providers that are being nice
175          *  and pushing state change events up to us as they happen. */
176         CACHE_OFF,
177 };
178
179 struct devstate_change {
180         AST_LIST_ENTRY(devstate_change) entry;
181         uint32_t state;
182         struct ast_eid eid;
183         char device[1];
184 };
185
186 struct {
187         pthread_t thread;
188         struct ast_event_sub *event_sub;
189         ast_cond_t cond;
190         ast_mutex_t lock;
191         AST_LIST_HEAD_NOLOCK(, devstate_change) devstate_change_q;
192 } devstate_collector = {
193         .thread = AST_PTHREADT_NULL,
194 };
195
196 /* Forward declarations */
197 static int getproviderstate(const char *provider, const char *address);
198
199 /*! \brief Find devicestate as text message for output */
200 const char *devstate2str(enum ast_device_state devstate) 
201 {
202         return devstatestring[devstate];
203 }
204
205 const char *ast_devstate_str(enum ast_device_state state)
206 {
207         const char *res = "UNKNOWN";
208
209         switch (state) {
210         case AST_DEVICE_UNKNOWN:
211                 break;
212         case AST_DEVICE_NOT_INUSE:
213                 res = "NOT_INUSE";
214                 break;
215         case AST_DEVICE_INUSE:
216                 res = "INUSE";
217                 break;
218         case AST_DEVICE_BUSY:
219                 res = "BUSY";
220                 break;
221         case AST_DEVICE_INVALID:
222                 res = "INVALID";
223                 break;
224         case AST_DEVICE_UNAVAILABLE:
225                 res = "UNAVAILABLE";
226                 break;
227         case AST_DEVICE_RINGING:
228                 res = "RINGING";
229                 break;
230         case AST_DEVICE_RINGINUSE:
231                 res = "RINGINUSE";
232                 break;
233         case AST_DEVICE_ONHOLD:
234                 res = "ONHOLD";
235                 break;
236         }
237
238         return res;
239 }
240
241 enum ast_device_state ast_devstate_val(const char *val)
242 {
243         if (!strcasecmp(val, "NOT_INUSE"))
244                 return AST_DEVICE_NOT_INUSE;
245         else if (!strcasecmp(val, "INUSE"))
246                 return AST_DEVICE_INUSE;
247         else if (!strcasecmp(val, "BUSY"))
248                 return AST_DEVICE_BUSY;
249         else if (!strcasecmp(val, "INVALID"))
250                 return AST_DEVICE_INVALID;
251         else if (!strcasecmp(val, "UNAVAILABLE"))
252                 return AST_DEVICE_UNAVAILABLE;
253         else if (!strcasecmp(val, "RINGING"))
254                 return AST_DEVICE_RINGING;
255         else if (!strcasecmp(val, "RINGINUSE"))
256                 return AST_DEVICE_RINGINUSE;
257         else if (!strcasecmp(val, "ONHOLD"))
258                 return AST_DEVICE_ONHOLD;
259
260         return AST_DEVICE_UNKNOWN;
261 }
262
263 /*! \brief Find out if device is active in a call or not 
264         \note find channels with the device's name in it
265         This function is only used for channels that does not implement 
266         devicestate natively
267 */
268 enum ast_device_state ast_parse_device_state(const char *device)
269 {
270         struct ast_channel *chan;
271         char match[AST_CHANNEL_NAME];
272         enum ast_device_state res;
273
274         ast_copy_string(match, device, sizeof(match)-1);
275         strcat(match, "-");
276         chan = ast_get_channel_by_name_prefix_locked(match, strlen(match));
277
278         if (!chan)
279                 return AST_DEVICE_UNKNOWN;
280
281         if (chan->_state == AST_STATE_RINGING)
282                 res = AST_DEVICE_RINGING;
283         else
284                 res = AST_DEVICE_INUSE;
285         
286         ast_channel_unlock(chan);
287
288         return res;
289 }
290
291 static enum ast_device_state devstate_cached(const char *device)
292 {
293         enum ast_device_state res = AST_DEVICE_UNKNOWN;
294         struct ast_event *event;
295
296         event = ast_event_get_cached(AST_EVENT_DEVICE_STATE,
297                 AST_EVENT_IE_DEVICE, AST_EVENT_IE_PLTYPE_STR, device,
298                 AST_EVENT_IE_END);
299
300         if (!event)
301                 return res;
302
303         res = ast_event_get_ie_uint(event, AST_EVENT_IE_STATE);
304
305         ast_event_destroy(event);
306
307         return res;
308 }
309
310 /*! \brief Check device state through channel specific function or generic function */
311 enum ast_device_state ast_device_state(const char *device)
312 {
313         char *buf;
314         char *number;
315         const struct ast_channel_tech *chan_tech;
316         enum ast_device_state res;
317         /*! \brief Channel driver that provides device state */
318         char *tech;
319         /*! \brief Another provider of device state */
320         char *provider = NULL;
321
322         /* If the last known state is cached, just return that */
323         res = devstate_cached(device);
324         if (res != AST_DEVICE_UNKNOWN)
325                 return res;
326
327         buf = ast_strdupa(device);
328         tech = strsep(&buf, "/");
329         if (!(number = buf)) {
330                 if (!(provider = strsep(&tech, ":")))
331                         return AST_DEVICE_INVALID;
332                 /* We have a provider */
333                 number = tech;
334                 tech = NULL;
335         }
336
337         if (provider)  {
338                 ast_debug(3, "Checking if I can find provider for \"%s\" - number: %s\n", provider, number);
339                 return getproviderstate(provider, number);
340         }
341
342         ast_debug(4, "No provider found, checking channel drivers for %s - %s\n", tech, number);
343
344         if (!(chan_tech = ast_get_channel_tech(tech)))
345                 return AST_DEVICE_INVALID;
346
347         if (!(chan_tech->devicestate)) /* Does the channel driver support device state notification? */
348                 return ast_parse_device_state(device); /* No, try the generic function */
349
350         res = chan_tech->devicestate(number);
351
352         if (res != AST_DEVICE_UNKNOWN)
353                 return res;
354
355         res = ast_parse_device_state(device);
356
357         if (res == AST_DEVICE_UNKNOWN)
358                 return AST_DEVICE_NOT_INUSE;
359
360         return res;
361 }
362
363 /*! \brief Add device state provider */
364 int ast_devstate_prov_add(const char *label, ast_devstate_prov_cb_type callback)
365 {
366         struct devstate_prov *devprov;
367
368         if (!callback || !(devprov = ast_calloc(1, sizeof(*devprov))))
369                 return -1;
370
371         devprov->callback = callback;
372         ast_copy_string(devprov->label, label, sizeof(devprov->label));
373
374         AST_RWLIST_WRLOCK(&devstate_provs);
375         AST_RWLIST_INSERT_HEAD(&devstate_provs, devprov, list);
376         AST_RWLIST_UNLOCK(&devstate_provs);
377
378         return 0;
379 }
380
381 /*! \brief Remove device state provider */
382 int ast_devstate_prov_del(const char *label)
383 {
384         struct devstate_prov *devcb;
385         int res = -1;
386
387         AST_RWLIST_WRLOCK(&devstate_provs);
388         AST_RWLIST_TRAVERSE_SAFE_BEGIN(&devstate_provs, devcb, list) {
389                 if (!strcasecmp(devcb->label, label)) {
390                         AST_RWLIST_REMOVE_CURRENT(list);
391                         ast_free(devcb);
392                         res = 0;
393                         break;
394                 }
395         }
396         AST_RWLIST_TRAVERSE_SAFE_END;
397         AST_RWLIST_UNLOCK(&devstate_provs);
398
399         return res;
400 }
401
402 /*! \brief Get provider device state */
403 static int getproviderstate(const char *provider, const char *address)
404 {
405         struct devstate_prov *devprov;
406         int res = AST_DEVICE_INVALID;
407
408         AST_RWLIST_RDLOCK(&devstate_provs);
409         AST_RWLIST_TRAVERSE(&devstate_provs, devprov, list) {
410                 ast_debug(5, "Checking provider %s with %s\n", devprov->label, provider);
411
412                 if (!strcasecmp(devprov->label, provider)) {
413                         res = devprov->callback(address);
414                         break;
415                 }
416         }
417         AST_RWLIST_UNLOCK(&devstate_provs);
418
419         return res;
420 }
421
422 static void devstate_event(const char *device, enum ast_device_state state, enum devstate_cache cache)
423 {
424         struct ast_event *event;
425
426         ast_debug(1, "device '%s' state '%d'\n", device, state);
427
428         if (!(event = ast_event_new(AST_EVENT_DEVICE_STATE_CHANGE,
429                         AST_EVENT_IE_DEVICE, AST_EVENT_IE_PLTYPE_STR, device,
430                         AST_EVENT_IE_STATE, AST_EVENT_IE_PLTYPE_UINT, state,
431                         AST_EVENT_IE_END))) {
432                 return;
433         }
434
435         if (cache == CACHE_ON) {
436                 /* Cache this event, replacing an event in the cache with the same
437                  * device name if it exists. */
438                 ast_event_queue_and_cache(event,
439                         AST_EVENT_IE_DEVICE, AST_EVENT_IE_PLTYPE_STR,
440                         AST_EVENT_IE_EID, AST_EVENT_IE_PLTYPE_RAW, sizeof(struct ast_eid),
441                         AST_EVENT_IE_END);
442         } else {
443                 ast_event_queue(event);
444         }
445 }
446
447 /*! Called by the state change thread to find out what the state is, and then
448  *  to queue up the state change event */
449 static void do_state_change(const char *device)
450 {
451         enum ast_device_state state;
452
453         state = ast_device_state(device);
454
455         ast_debug(3, "Changing state for %s - state %d (%s)\n", device, state, devstate2str(state));
456
457         devstate_event(device, state, CACHE_OFF);
458 }
459
460 int ast_devstate_changed_literal(enum ast_device_state state, const char *device)
461 {
462         struct state_change *change;
463
464         ast_debug(3, "Notification of state change to be queued on device/channel %s\n", device);
465
466         if (state != AST_DEVICE_UNKNOWN) {
467                 devstate_event(device, state, CACHE_ON);
468         } else if (change_thread == AST_PTHREADT_NULL || !(change = ast_calloc(1, sizeof(*change) + strlen(device)))) {
469                 /* we could not allocate a change struct, or */
470                 /* there is no background thread, so process the change now */
471                 do_state_change(device);
472         } else {
473                 /* queue the change */
474                 strcpy(change->device, device);
475                 AST_LIST_LOCK(&state_changes);
476                 AST_LIST_INSERT_TAIL(&state_changes, change, list);
477                 ast_cond_signal(&change_pending);
478                 AST_LIST_UNLOCK(&state_changes);
479         }
480
481         return 1;
482 }
483
484 int ast_device_state_changed_literal(const char *dev)
485 {
486         return ast_devstate_changed_literal(AST_DEVICE_UNKNOWN, dev);
487 }
488
489 int ast_devstate_changed(enum ast_device_state state, const char *fmt, ...) 
490 {
491         char buf[AST_MAX_EXTENSION];
492         va_list ap;
493
494         va_start(ap, fmt);
495         vsnprintf(buf, sizeof(buf), fmt, ap);
496         va_end(ap);
497
498         return ast_devstate_changed_literal(state, buf);
499 }
500
501 /*! \brief Accept change notification, add it to change queue */
502 int ast_device_state_changed(const char *fmt, ...) 
503 {
504         char buf[AST_MAX_EXTENSION];
505         va_list ap;
506
507         va_start(ap, fmt);
508         vsnprintf(buf, sizeof(buf), fmt, ap);
509         va_end(ap);
510
511         return ast_devstate_changed_literal(AST_DEVICE_UNKNOWN, buf);
512 }
513
514 /*! \brief Go through the dev state change queue and update changes in the dev state thread */
515 static void *do_devstate_changes(void *data)
516 {
517         struct state_change *next, *current;
518
519         for (;;) {
520                 /* This basically pops off any state change entries, resets the list back to NULL, unlocks, and processes each state change */
521                 AST_LIST_LOCK(&state_changes);
522                 if (AST_LIST_EMPTY(&state_changes))
523                         ast_cond_wait(&change_pending, &state_changes.lock);
524                 next = AST_LIST_FIRST(&state_changes);
525                 AST_LIST_HEAD_INIT_NOLOCK(&state_changes);
526                 AST_LIST_UNLOCK(&state_changes);
527
528                 /* Process each state change */
529                 while ((current = next)) {
530                         next = AST_LIST_NEXT(current, list);
531                         do_state_change(current->device);
532                         ast_free(current);
533                 }
534         }
535
536         return NULL;
537 }
538
539 static void destroy_devstate_change(struct devstate_change *sc)
540 {
541         ast_free(sc);
542 }
543
544 #define MAX_SERVERS 64
545 struct change_collection {
546         struct devstate_change states[MAX_SERVERS];
547         size_t num_states;
548 };
549
550 static void devstate_cache_cb(const struct ast_event *event, void *data)
551 {
552         struct change_collection *collection = data;
553         int i;
554         const struct ast_eid *eid;
555
556         if (collection->num_states == ARRAY_LEN(collection->states)) {
557                 ast_log(LOG_ERROR, "More per-server state values than we have room for (MAX_SERVERS is %d)\n",
558                         MAX_SERVERS);
559                 return;
560         }
561
562         if (!(eid = ast_event_get_ie_raw(event, AST_EVENT_IE_EID))) {
563                 ast_log(LOG_ERROR, "Device state change event with no EID\n");
564                 return;
565         }
566
567         i = collection->num_states;
568
569         collection->states[i].state = ast_event_get_ie_uint(event, AST_EVENT_IE_STATE);
570         collection->states[i].eid = *eid;
571
572         collection->num_states++;
573 }
574
575 static void process_collection(const char *device, struct change_collection *collection)
576 {
577         int i;
578         struct ast_devstate_aggregate agg;
579         enum ast_device_state state;
580         struct ast_event *event;
581
582         ast_devstate_aggregate_init(&agg);
583
584         for (i = 0; i < collection->num_states; i++) {
585                 ast_debug(1, "Adding per-server state of '%s' for '%s'\n", 
586                         devstate2str(collection->states[i].state), device);
587                 ast_devstate_aggregate_add(&agg, collection->states[i].state);
588         }
589
590         state = ast_devstate_aggregate_result(&agg);
591
592         ast_debug(1, "Aggregate devstate result is %d\n", state);
593
594         event = ast_event_get_cached(AST_EVENT_DEVICE_STATE,
595                 AST_EVENT_IE_DEVICE, AST_EVENT_IE_PLTYPE_STR, device,
596                 AST_EVENT_IE_END);
597         
598         if (event) {
599                 enum ast_device_state old_state;
600
601                 old_state = ast_event_get_ie_uint(event, AST_EVENT_IE_STATE);
602                 
603                 ast_event_destroy(event);
604
605                 if (state == old_state) {
606                         /* No change since last reported device state */
607                         ast_debug(1, "Aggregate state for device '%s' has not changed from '%s'\n",
608                                 device, devstate2str(state));
609                         return;
610                 }
611         }
612
613         ast_debug(1, "Aggregate state for device '%s' has changed to '%s'\n",
614                 device, devstate2str(state));
615
616         event = ast_event_new(AST_EVENT_DEVICE_STATE,
617                 AST_EVENT_IE_DEVICE, AST_EVENT_IE_PLTYPE_STR, device,
618                 AST_EVENT_IE_STATE, AST_EVENT_IE_PLTYPE_UINT, state,
619                 AST_EVENT_IE_END);
620         
621         if (!event)
622                 return;
623
624         ast_event_queue_and_cache(event,
625                 AST_EVENT_IE_DEVICE, AST_EVENT_IE_PLTYPE_STR,
626                 AST_EVENT_IE_END);
627 }
628
629 static void handle_devstate_change(struct devstate_change *sc)
630 {
631         struct ast_event_sub *tmp_sub;
632         struct change_collection collection = {
633                 .num_states = 0,
634         };
635
636         ast_debug(1, "Processing device state change for '%s'\n", sc->device);
637
638         if (!(tmp_sub = ast_event_subscribe_new(AST_EVENT_DEVICE_STATE_CHANGE, devstate_cache_cb, &collection))) {
639                 ast_log(LOG_ERROR, "Failed to create subscription\n");
640                 return;
641         }
642
643         if (ast_event_sub_append_ie_str(tmp_sub, AST_EVENT_IE_DEVICE, sc->device)) {
644                 ast_log(LOG_ERROR, "Failed to append device IE\n");
645                 ast_event_sub_destroy(tmp_sub);
646                 return;
647         }
648
649         /* Populate the collection of device states from the cache */
650         ast_event_dump_cache(tmp_sub);
651
652         process_collection(sc->device, &collection);
653
654         ast_event_sub_destroy(tmp_sub);
655 }
656
657 static void *run_devstate_collector(void *data)
658 {
659         for (;;) {
660                 struct devstate_change *sc;
661
662                 ast_mutex_lock(&devstate_collector.lock);
663                 while (!(sc = AST_LIST_REMOVE_HEAD(&devstate_collector.devstate_change_q, entry)))
664                         ast_cond_wait(&devstate_collector.cond, &devstate_collector.lock);
665                 ast_mutex_unlock(&devstate_collector.lock);
666
667                 handle_devstate_change(sc);
668
669                 destroy_devstate_change(sc);
670         }
671
672         return NULL;
673 }
674
675 static void devstate_change_collector_cb(const struct ast_event *event, void *data)
676 {
677         struct devstate_change *sc;
678         const char *device;
679         const struct ast_eid *eid;
680         uint32_t state;
681
682         device = ast_event_get_ie_str(event, AST_EVENT_IE_DEVICE);
683         eid = ast_event_get_ie_raw(event, AST_EVENT_IE_EID);
684         state = ast_event_get_ie_uint(event, AST_EVENT_IE_STATE);
685
686         if (ast_strlen_zero(device) || !eid) {
687                 ast_log(LOG_ERROR, "Invalid device state change event received\n");
688                 return;
689         }
690
691         if (!(sc = ast_calloc(1, sizeof(*sc) + strlen(device))))
692                 return;
693
694         strcpy(sc->device, device);
695         sc->eid = *eid;
696         sc->state = state;
697
698         ast_mutex_lock(&devstate_collector.lock);
699         AST_LIST_INSERT_TAIL(&devstate_collector.devstate_change_q, sc, entry);
700         ast_cond_signal(&devstate_collector.cond);
701         ast_mutex_unlock(&devstate_collector.lock);
702 }
703
704 /*! \brief Initialize the device state engine in separate thread */
705 int ast_device_state_engine_init(void)
706 {
707         devstate_collector.event_sub = ast_event_subscribe(AST_EVENT_DEVICE_STATE_CHANGE,
708                 devstate_change_collector_cb, NULL, AST_EVENT_IE_END);
709
710         if (!devstate_collector.event_sub) {
711                 ast_log(LOG_ERROR, "Failed to create subscription for the device state change collector\n");
712                 return -1;
713         }
714
715         ast_mutex_init(&devstate_collector.lock);
716         ast_cond_init(&devstate_collector.cond, NULL);
717         if (ast_pthread_create_background(&devstate_collector.thread, NULL, run_devstate_collector, NULL) < 0) {
718                 ast_log(LOG_ERROR, "Unable to start device state collector thread.\n");
719                 return -1;
720         }
721
722         ast_cond_init(&change_pending, NULL);
723         if (ast_pthread_create_background(&change_thread, NULL, do_devstate_changes, NULL) < 0) {
724                 ast_log(LOG_ERROR, "Unable to start device state change thread.\n");
725                 return -1;
726         }
727
728         return 0;
729 }
730
731 void ast_devstate_aggregate_init(struct ast_devstate_aggregate *agg)
732 {
733         memset(agg, 0, sizeof(*agg));
734
735         agg->all_unavail = 1;
736         agg->all_busy = 1;
737         agg->all_free = 1;
738         agg->all_on_hold = 1;
739 }
740
741 void ast_devstate_aggregate_add(struct ast_devstate_aggregate *agg, enum ast_device_state state)
742 {
743         switch (state) {
744         case AST_DEVICE_NOT_INUSE:
745                 agg->all_unavail = 0;
746                 agg->all_busy = 0;
747                 agg->all_on_hold = 0;
748                 break;
749         case AST_DEVICE_INUSE:
750                 agg->in_use = 1;
751                 agg->all_busy = 0;
752                 agg->all_unavail = 0;
753                 agg->all_free = 0;
754                 agg->all_on_hold = 0;
755                 break;
756         case AST_DEVICE_RINGING:
757                 agg->ring = 1;
758                 agg->all_busy = 0;
759                 agg->all_unavail = 0;
760                 agg->all_free = 0;
761                 agg->all_on_hold = 0;
762                 break;
763         case AST_DEVICE_RINGINUSE:
764                 agg->in_use = 1;
765                 agg->ring = 1;
766                 agg->all_busy = 0;
767                 agg->all_unavail = 0;
768                 agg->all_free = 0;
769                 agg->all_on_hold = 0;
770                 break;
771         case AST_DEVICE_ONHOLD:
772                 agg->all_unavail = 0;
773                 agg->all_free = 0;
774                 break;
775         case AST_DEVICE_BUSY:
776                 agg->all_unavail = 0;
777                 agg->all_free = 0;
778                 agg->all_on_hold = 0;
779                 agg->busy = 1;
780                 break;
781         case AST_DEVICE_UNAVAILABLE:
782         case AST_DEVICE_INVALID:
783                 agg->all_busy = 0;
784                 agg->all_free = 0;
785                 agg->all_on_hold = 0;
786                 break;
787         case AST_DEVICE_UNKNOWN:
788                 break;
789         }
790 }
791
792 enum ast_device_state ast_devstate_aggregate_result(struct ast_devstate_aggregate *agg)
793 {
794         if (agg->all_free)
795                 return AST_DEVICE_NOT_INUSE;
796         
797         if (agg->all_on_hold)
798                 return AST_DEVICE_ONHOLD;
799         
800         if (agg->all_busy)
801                 return AST_DEVICE_BUSY;
802
803         if (agg->all_unavail)
804                 return AST_DEVICE_UNAVAILABLE;
805         
806         if (agg->ring)
807                 return agg->in_use ? AST_DEVICE_RINGINUSE : AST_DEVICE_RINGING;
808
809         if (agg->in_use)
810                 return AST_DEVICE_INUSE;
811
812         if (agg->busy)
813                 return AST_DEVICE_BUSY;
814         
815         return AST_DEVICE_NOT_INUSE;
816 }
817