Merge branch 'master' into windows+cc
[ardour.git] / libs / pbd / pbd / abstract_ui.cc
1 /*
2     Copyright (C) 2012 Paul Davis 
3
4     This program is free software; you can redistribute it and/or modify
5     it under the terms of the GNU General Public License as published by
6     the Free Software Foundation; either version 2 of the License, or
7     (at your option) any later version.
8
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.
13
14     You should have received a copy of the GNU General Public License
15     along with this program; if not, write to the Free Software
16     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17
18 */
19
20 #include <unistd.h>
21 #include <iostream>
22
23 #include "pbd/stacktrace.h"
24 #include "pbd/abstract_ui.h"
25 #include "pbd/pthread_utils.h"
26 #include "pbd/failed_constructor.h"
27 #include "pbd/debug.h"
28
29 #include "i18n.h"
30
31 #ifdef COMPILER_MSVC
32 #include <ardourext/misc.h>  // Needed for 'DECLARE_DEFAULT_COMPARISONS'. Objects in an STL container can be
33                              // searched and sorted. Thus, when instantiating the container, MSVC complains
34                              // if the type of object being contained has no appropriate comparison operators
35                              // defined (specifically, if operators '<' and '==' are undefined). This seems
36                              // to be the case with ptw32 'pthread_t' which is a simple struct.
37 DECLARE_DEFAULT_COMPARISONS(pthread_t)
38 #endif
39
40 using namespace std;
41
42 template<typename RequestBuffer> void 
43 cleanup_request_buffer (void* ptr)
44 {
45         RequestBuffer* rb = (RequestBuffer*) ptr;
46         
47         /* there is the question of why we don't simply erase the request
48          * buffer and delete it right here, since we have to take the lock
49          * anyway.
50          *
51          * as of april 24th 2012, i don't have a good answer to that.
52          */
53          
54
55         {
56                 Glib::Threads::Mutex::Lock lm (rb->ui.request_buffer_map_lock);
57                 rb->dead = true;
58         }
59 }
60
61 template<typename R>
62 Glib::Threads::Private<typename AbstractUI<R>::RequestBuffer> AbstractUI<R>::per_thread_request_buffer (cleanup_request_buffer<AbstractUI<R>::RequestBuffer>);
63
64 template <typename RequestObject>
65 AbstractUI<RequestObject>::AbstractUI (const string& name)
66         : BaseUI (name)
67 {
68         void (AbstractUI<RequestObject>::*pmf)(string,pthread_t,string,uint32_t) = &AbstractUI<RequestObject>::register_thread;
69
70         /* better to make this connect a handler that runs in the UI event loop but the syntax seems hard, and 
71            register_thread() is thread safe anyway.
72         */
73
74         PBD::ThreadCreatedWithRequestSize.connect_same_thread (new_thread_connection, boost::bind (pmf, this, _1, _2, _3, _4));
75 }
76
77 template <typename RequestObject> void
78 AbstractUI<RequestObject>::register_thread (string target_gui, pthread_t thread_id, string /*thread name*/, uint32_t num_requests)
79 {
80         /* the calling thread wants to register with the thread that runs this
81          * UI's event loop, so that it will have its own per-thread queue of
82          * requests. this means that when it makes a request to this UI it can
83          * do so in a realtime-safe manner (no locks).
84          */
85
86         if (target_gui != name()) {
87                 /* this UI is not the UI that the calling thread is trying to
88                    register with
89                 */
90                 return;
91         }
92
93         /* the per_thread_request_buffer is a thread-private variable.
94            See pthreads documentation for more on these, but the key
95            thing is that it is a variable that as unique value for
96            each thread, guaranteed.
97         */
98
99         RequestBuffer* b = per_thread_request_buffer.get();
100
101         if (b) {
102                 /* thread already registered with this UI
103                  */
104                 return;
105         }
106
107         /* create a new request queue/ringbuffer */
108
109         b = new RequestBuffer (num_requests, *this);
110
111         {
112                 /* add the new request queue (ringbuffer) to our map
113                    so that we can iterate over it when the time is right.
114                    This step is not RT-safe, but is assumed to be called
115                    only at thread initialization time, not repeatedly, 
116                    and so this is of little consequence.
117                 */
118                 Glib::Threads::Mutex::Lock lm (request_buffer_map_lock);
119                 request_buffers[thread_id] = b;
120         }
121
122         /* set this thread's per_thread_request_buffer to this new 
123            queue/ringbuffer. remember that only this thread will
124            get this queue when it calls per_thread_request_buffer.get()
125
126            the second argument is a function that will be called
127            when the thread exits, and ensures that the buffer is marked
128            dead. it will then be deleted during a call to handle_ui_requests()
129         */
130         
131         per_thread_request_buffer.set (b);
132 }
133
134 template <typename RequestObject> RequestObject*
135 AbstractUI<RequestObject>::get_request (RequestType rt)
136 {
137         RequestBuffer* rbuf = per_thread_request_buffer.get ();
138         RequestBufferVector vec;
139
140         /* see comments in ::register_thread() above for an explanation of
141            the per_thread_request_buffer variable
142         */
143
144         if (rbuf != 0) {
145
146                 /* the calling thread has registered with this UI and therefore
147                  * we have a per-thread request queue/ringbuffer. use it. this
148                  * "allocation" of a request is RT-safe.
149                  */
150
151                 rbuf->get_write_vector (&vec);
152
153                 if (vec.len[0] == 0) {
154                         DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1: no space in per thread pool for request of type %2\n", name(), rt));
155                         return 0;
156                 }
157
158                 DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1: allocated per-thread request of type %2, caller %3\n", name(), rt, pthread_name()));
159
160                 vec.buf[0]->type = rt;
161                 vec.buf[0]->valid = true;
162                 return vec.buf[0];
163         }
164
165         /* calling thread has not registered, so just allocate a new request on
166          * the heap. the lack of registration implies that realtime constraints
167          * are not at work.
168          */
169
170         DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1: allocated normal heap request of type %2, caller %3\n", name(), rt, pthread_name()));
171
172         RequestObject* req = new RequestObject;
173         req->type = rt;
174
175         return req;
176 }
177
178 template <typename RequestObject> void
179 AbstractUI<RequestObject>::handle_ui_requests ()
180 {
181         RequestBufferMapIterator i;
182         RequestBufferVector vec;
183
184         /* check all registered per-thread buffers first */
185
186         request_buffer_map_lock.lock ();
187
188         for (i = request_buffers.begin(); i != request_buffers.end(); ++i) {
189
190                 while (true) {
191                         
192                         /* we must process requests 1 by 1 because
193                            the request may run a recursive main
194                            event loop that will itself call
195                            handle_ui_requests. when we return
196                            from the request handler, we cannot
197                            expect that the state of queued requests
198                            is even remotely consistent with
199                            the condition before we called it.
200                         */
201                         
202                         i->second->get_read_vector (&vec);
203                         
204                         if (vec.len[0] == 0) {
205                                 break;
206                         } else {
207                                 if (vec.buf[0]->valid) {
208                                         request_buffer_map_lock.unlock ();
209                                         do_request (vec.buf[0]);
210                                         request_buffer_map_lock.lock ();
211                                         if (vec.buf[0]->invalidation) {
212                                                 vec.buf[0]->invalidation->requests.remove (vec.buf[0]);
213                                         }
214                                         i->second->increment_read_ptr (1);
215                                 }
216                         } 
217                 }
218         }
219
220         /* clean up any dead request buffers (their thread has exited) */
221
222         for (i = request_buffers.begin(); i != request_buffers.end(); ) {
223              if ((*i).second->dead) {
224                      DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1/%2 deleting dead per-thread request buffer for %3 @ %4\n",
225                                                                           name(), pthread_name(), i->second));
226                      delete (*i).second;
227                      RequestBufferMapIterator tmp = i;
228                      ++tmp;
229                      request_buffers.erase (i);
230                      i = tmp;
231              } else {           
232                      ++i;
233              }
234         }
235
236         request_buffer_map_lock.unlock ();
237
238         /* and now, the generic request buffer. same rules as above apply */
239
240         Glib::Threads::Mutex::Lock lm (request_list_lock);
241
242         while (!request_list.empty()) {
243                 RequestObject* req = request_list.front ();
244                 request_list.pop_front ();
245
246                 /* We need to use this lock, because its the one
247                    returned by slot_invalidation_mutex() and protects
248                    against request invalidation. 
249                 */
250
251                 request_buffer_map_lock.lock ();
252                 if (!req->valid) {
253                         DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1/%2 handling invalid heap request, type %3, deleting\n", name(), pthread_name(), req->type));
254                         delete req;
255                         request_buffer_map_lock.unlock ();
256                         continue;
257                 }
258
259                 /* we're about to execute this request, so its
260                    too late for any invalidation. mark
261                    the request as "done" before we start.
262                 */
263
264                 if (req->invalidation) {
265                         DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1/%2 remove request from its invalidation list\n", name(), pthread_name()));
266                         
267                         /* after this call, if the object referenced by the
268                          * invalidation record is deleted, it will no longer
269                          * try to mark the request as invalid.
270                          */
271
272                         req->invalidation->requests.remove (req);
273                 }
274
275                 /* at this point, an object involved in a functor could be
276                  * deleted before we actually execute the functor. so there is
277                  * a race condition that makes the invalidation architecture
278                  * somewhat pointless. 
279                  *
280                  * really, we should only allow functors containing shared_ptr
281                  * references to objects to enter into the request queue.
282                  */
283
284                 request_buffer_map_lock.unlock ();
285                 
286                 /* unlock the request lock while we execute the request, so
287                  * that we don't needlessly block other threads (note: not RT 
288                  * threads since they have their own queue) from making requests.
289                  */
290
291                 lm.release ();
292
293                 DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1/%2 execute request type %3\n", name(), pthread_name(), req->type));
294
295                 /* and lets do it ... this is a virtual call so that each
296                  * specific type of UI can have its own set of requests without
297                  * some kind of central request type registration logic
298                  */
299
300                 do_request (req);
301
302                 DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1/%2 delete heap request type %3\n", name(), pthread_name(), req->type));
303                 delete req;
304
305                 /* re-acquire the list lock so that we check again */
306
307                 lm.acquire();
308         }
309 }
310
311 template <typename RequestObject> void
312 AbstractUI<RequestObject>::send_request (RequestObject *req)
313 {
314         /* This is called to ask a given UI to carry out a request. It may be
315          * called from the same thread that runs the UI's event loop (see the
316          * caller_is_self() case below), or from any other thread.
317          */
318
319         if (base_instance() == 0) {
320                 return; /* XXX is this the right thing to do ? */
321         }
322
323         if (caller_is_self ()) {
324                 /* the thread that runs this UI's event loop is sending itself
325                    a request: we dispatch it immediately and inline.
326                 */
327                 DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1/%2 direct dispatch of request type %3\n", name(), pthread_name(), req->type));
328                 do_request (req);
329         } else {        
330
331                 /* If called from a different thread, we first check to see if
332                  * the calling thread is registered with this UI. If so, there
333                  * is a per-thread ringbuffer of requests that ::get_request()
334                  * just set up a new request in. If so, all we need do here is
335                  * to advance the write ptr in that ringbuffer so that the next
336                  * request by this calling thread will use the next slot in
337                  * the ringbuffer. The ringbuffer has
338                  * single-reader/single-writer semantics because the calling
339                  * thread is the only writer, and the UI event loop is the only
340                  * reader.
341                  */
342
343                 RequestBuffer* rbuf = per_thread_request_buffer.get ();
344
345                 if (rbuf != 0) {
346                         DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1/%2 send per-thread request type %3\n", name(), pthread_name(), req->type));
347                         rbuf->increment_write_ptr (1);
348                 } else {
349                         /* no per-thread buffer, so just use a list with a lock so that it remains
350                            single-reader/single-writer semantics
351                         */
352                         DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1/%2 send heap request type %3\n", name(), pthread_name(), req->type));
353                         Glib::Threads::Mutex::Lock lm (request_list_lock);
354                         request_list.push_back (req);
355                 }
356
357                 /* send the UI event loop thread a wakeup so that it will look
358                    at the per-thread and generic request lists.
359                 */
360
361                 signal_new_request ();
362         }
363 }
364
365 template<typename RequestObject> void
366 AbstractUI<RequestObject>::call_slot (InvalidationRecord* invalidation, const boost::function<void()>& f)
367 {
368         if (caller_is_self()) {
369                 DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1/%2 direct dispatch of call slot via functor @ %3, invalidation %4\n", name(), pthread_name(), &f, invalidation));
370                 f ();
371                 return;
372         }
373
374         RequestObject *req = get_request (BaseUI::CallSlot);
375         
376         if (req == 0) {
377                 return;
378         }
379
380         DEBUG_TRACE (PBD::DEBUG::AbstractUI, string_compose ("%1/%2 queue call-slot using functor @ %3, invalidation %4\n", name(), pthread_name(), &f, invalidation));
381
382         /* copy semantics: copy the functor into the request object */
383
384         req->the_slot = f;
385         
386         /* the invalidation record is an object which will carry out
387          * invalidation of any requests associated with it when it is 
388          * destroyed. it can be null. if its not null, associate this
389          * request with the invalidation record. this allows us to
390          * "cancel" requests submitted to the UI because they involved
391          * a functor that uses an object that is being deleted.
392          */
393
394         req->invalidation = invalidation;
395
396         if (invalidation) {
397                 invalidation->requests.push_back (req);
398                 invalidation->event_loop = this;
399         }
400
401         send_request (req);
402 }       
403