add verification for tdm_output
[platform/core/uifw/libtdm.git] / src / tdm_vblank.c
1 /**************************************************************************
2  *
3  * libtdm
4  *
5  * Copyright 2015 Samsung Electronics co., Ltd. All Rights Reserved.
6  *
7  * Contact: Eunchul Kim <chulspro.kim@samsung.com>,
8  *          JinYoung Jeon <jy0.jeon@samsung.com>,
9  *          Taeheon Kim <th908.kim@samsung.com>,
10  *          YoungJun Cho <yj44.cho@samsung.com>,
11  *          SooChan Lim <sc1.lim@samsung.com>,
12  *          Boram Park <sc1.lim@samsung.com>
13  *
14  * Permission is hereby granted, free of charge, to any person obtaining a
15  * copy of this software and associated documentation files (the
16  * "Software"), to deal in the Software without restriction, including
17  * without limitation the rights to use, copy, modify, merge, publish,
18  * distribute, sub license, and/or sell copies of the Software, and to
19  * permit persons to whom the Software is furnished to do so, subject to
20  * the following conditions:
21  *
22  * The above copyright notice and this permission notice (including the
23  * next paragraph) shall be included in all copies or substantial portions
24  * of the Software.
25  *
26  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
27  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
28  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
29  * IN NO EVENT SHALL PRECISION INSIGHT AND/OR ITS SUPPLIERS BE LIABLE FOR
30  * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
31  * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
32  * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
33  *
34 **************************************************************************/
35
36 #ifdef HAVE_CONFIG_H
37 #include "config.h"
38 #endif
39
40 #include "tdm.h"
41 #include "tdm_private.h"
42 #include "tdm_list.h"
43
44 /* CAUTION:
45  * Basically tdm vblank doesn't care about thread things.
46  * However, to use tdm_event_loop_xxx functions, have to use the internal function.
47  * So need to lock/unlock the mutex of private_display. And valid_vblank_list and
48  * valid_wait_list should be protected by valid_list_lock because tdm_vblank can
49  * be used in multi-thread.
50  */
51
52 /* TDM vblank
53  * - aligned by HW vblank
54  * - use a tdm_event_loop_source object only.
55  */
56
57 #define TDM_VBLANK_DEFAULT_VREFRESH    30
58
59 /* We expact "(unsigned int)(0.0016667 / 0.0016667) = 1". But it becomes 0. */
60 #define TDM_TIME_MARGIN     0.0000001
61
62 #define TDM_VBLANK_UINT_MAX 4294967295U
63 #define TDM_VBLANK_UINT_1Q  1073741823U     /* UINT_MAX / 4 */
64 #define TDM_VBLANK_UINT_3Q  3221225471U     /* UINT_MAX / 4 * 3 */
65
66 /* (seq < TDM_VBLANK_UINT_1Q && TDM_VBLANK_UINT_3Q < last_seq) means
67  * that the sequence value has reached the max value and started from 0 again.
68  */
69 #define TDM_VBLANK_SEQ_REACHED_MAX(seq, last_seq) \
70         ((seq) < TDM_VBLANK_UINT_1Q && TDM_VBLANK_UINT_3Q < (last_seq))
71
72 #define VER(fmt, arg...)   TDM_ERR("[%p] "fmt, private_vblank, ##arg)
73 #define VWR(fmt, arg...)   TDM_WRN("[%p] "fmt, private_vblank, ##arg)
74 #define VIN(fmt, arg...)   do { if (tdm_debug_module & TDM_DEBUG_VBLANK) TDM_INFO("[%p] "fmt, private_vblank, ##arg); } while (0)
75 #define VDB(fmt, arg...)   do { if (tdm_debug_module & TDM_DEBUG_VBLANK) TDM_DBG("[%p] "fmt, private_vblank, ##arg); } while (0)
76
77 typedef enum {
78         VBLANK_TYPE_SW,
79         VBLANK_TYPE_SW_FAKE,
80         VBLANK_TYPE_HW,
81         VBLANK_TYPE_HW_SW,
82 } tdm_vblank_wait_type;
83
84 typedef enum {
85         VBLANK_EVENT_TYPE_NONE,
86         VBLANK_EVENT_TYPE_SW,
87         VBLANK_EVENT_TYPE_HW,
88 } tdm_vblank_event_type;
89
90 typedef struct _tdm_vblank_wait_info tdm_vblank_wait_info;
91
92 typedef struct _tdm_private_vblank {
93         struct list_head valid_link;
94
95         double stamp;
96         pid_t owner_tid;
97
98         tdm_display *dpy;
99         tdm_output *output;
100         tdm_output_conn_status connection;
101         unsigned int vrefresh;
102
103         tdm_vblank_event_type last_type;
104         unsigned int check_HW_or_SW;
105         char name[TDM_NAME_LEN];
106         unsigned int fps;
107         unsigned int fps_changeable;
108         int offset;
109         unsigned int enable_fake;
110         unsigned int ignore_global_fps;
111
112         double vblank_gap;
113         unsigned int quotient;
114
115         unsigned int last_seq;
116         double last_time;
117
118         unsigned int add_front;
119         struct wl_resource *resource;
120
121         /* for HW */
122         double HW_vblank_gap;
123         struct list_head HW_wait_list;
124
125         /* for SW */
126         tdm_event_loop_source *SW_timer;
127         struct list_head SW_wait_list;
128 } tdm_private_vblank;
129
130 struct _tdm_vblank_wait_info {
131         struct list_head link;
132         struct list_head valid_link;
133
134         double stamp;
135
136         double req_time;
137         unsigned int interval;
138
139         tdm_vblank_handler func;
140         void *user_data;
141         tdm_private_vblank *private_vblank;
142
143         tdm_vblank_wait_type type;
144
145         double target_time;
146         unsigned int target_seq;
147 };
148
149 /* valid_vblank_list and valid_wait_list should be protected by valid_list_lock because
150  * tdm_vblank can be used in multi-thread.
151  */
152 static pthread_mutex_t valid_list_lock;
153 static struct list_head valid_vblank_list;
154 static struct list_head valid_wait_list;
155 static unsigned int vblank_list_inited;
156 static unsigned int vblank_global_fps;
157 static double stamp = 0;
158
159 static tdm_error _tdm_vblank_cb_vblank_SW(void *user_data);
160 static tdm_error _tdm_vblank_wait_SW(tdm_vblank_wait_info *wait_info);
161 static void _tdm_vblank_cb_vblank_HW(tdm_output *output, unsigned int sequence,
162                                                                          unsigned int tv_sec, unsigned int tv_usec,
163                                                                          void *user_data);
164
165 #if 0
166 static void
167 _print_list(struct list_head *list)
168 {
169         tdm_vblank_wait_info *w = NULL;
170
171         LIST_FOR_EACH_ENTRY(w, list, link) {
172                 printf(" %d", w->interval);
173         }
174         printf("\n");
175 }
176 #endif
177
178 static void
179 _tdm_vblank_valid_list_add(struct list_head *valid_link, struct list_head *valid_list)
180 {
181         pthread_mutex_lock(&valid_list_lock);
182         LIST_ADDTAIL(valid_link, valid_list);
183         pthread_mutex_unlock(&valid_list_lock);
184 }
185
186 static void
187 _tdm_vblank_valid_list_del(struct list_head *valid_link)
188 {
189         pthread_mutex_lock(&valid_list_lock);
190         LIST_DEL(valid_link);
191         pthread_mutex_unlock(&valid_list_lock);
192 }
193
194 static inline tdm_private_vblank*
195 _tdm_vblank_find(double vblank_stamp)
196 {
197         tdm_private_vblank *v = NULL;
198
199         if (!vblank_stamp)
200                 return 0;
201
202         pthread_mutex_lock(&valid_list_lock);
203         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
204                 if (v->stamp == vblank_stamp) {
205                         pthread_mutex_unlock(&valid_list_lock);
206                         return v;
207                 }
208         }
209         pthread_mutex_unlock(&valid_list_lock);
210
211         return 0;
212 }
213
214 static inline unsigned int
215 _tdm_vblank_check_valid_wait(tdm_vblank_wait_info *wait_info)
216 {
217         tdm_vblank_wait_info *w = NULL;
218
219         if (!wait_info)
220                 return 0;
221
222         pthread_mutex_lock(&valid_list_lock);
223         LIST_FOR_EACH_ENTRY(w, &valid_wait_list, valid_link) {
224                 if (w == wait_info) {
225                         pthread_mutex_unlock(&valid_list_lock);
226                         return 1;
227                 }
228         }
229         pthread_mutex_unlock(&valid_list_lock);
230
231         return 0;
232 }
233
234 static inline unsigned int
235 _tdm_vblank_find_wait(tdm_vblank_wait_info *wait_info, struct list_head *list)
236 {
237         tdm_vblank_wait_info *w = NULL;
238
239         if (!wait_info)
240                 return 0;
241
242         LIST_FOR_EACH_ENTRY(w, list, link) {
243                 if (w->stamp == wait_info->stamp)
244                         return 1;
245         }
246
247         return 0;
248 }
249
250 static inline void
251 _tdm_vblank_insert_wait(tdm_vblank_wait_info *wait_info, struct list_head *list)
252 {
253         tdm_vblank_wait_info *w = NULL;
254         tdm_vblank_wait_info *found = NULL;
255
256         if (LIST_IS_EMPTY(list)) {
257                 LIST_ADDTAIL(&wait_info->link, list);
258                 return;
259         }
260
261         LIST_FOR_EACH_ENTRY(w, list, link) {
262                 if (wait_info->type == VBLANK_TYPE_SW) {
263                         if (wait_info->target_time == 0)
264                                 TDM_NEVER_GET_HERE();
265                         if (w->target_time <= wait_info->target_time) {
266                                 found = w;
267                                 continue;
268                         }
269                 } else {
270                         if (w->interval <= wait_info->interval) {
271                                 found = w;
272                                 continue;
273                         }
274                 }
275         }
276
277         if (found)
278                 LIST_ADD(&wait_info->link, &found->link);
279         else
280                 LIST_ADDTAIL(&wait_info->link, list->next);
281 }
282
283 static void
284 _tdm_vblank_change_to_SW(tdm_private_vblank *private_vblank)
285 {
286         tdm_vblank_wait_info *w = NULL, *ww = NULL;
287
288         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->HW_wait_list, link) {
289                 LIST_DEL(&w->link);
290
291                 tdm_display_lock(private_vblank->dpy);
292                 tdm_output_remove_vblank_handler_internal(private_vblank->output, _tdm_vblank_cb_vblank_HW, w);
293                 tdm_display_unlock(private_vblank->dpy);
294
295                 w->type = VBLANK_TYPE_SW_FAKE;
296                 _tdm_vblank_wait_SW(w);
297         }
298 }
299
300 static void
301 _tdm_vblank_free_HW_wait(tdm_private_vblank *private_vblank, tdm_error error, unsigned int call_cb)
302 {
303         tdm_vblank_wait_info *w = NULL, *ww = NULL;
304
305         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->HW_wait_list, link) {
306                 LIST_DEL(&w->link);
307                 _tdm_vblank_valid_list_del(&w->valid_link);
308
309                 tdm_display_lock(private_vblank->dpy);
310                 tdm_output_remove_vblank_handler_internal(private_vblank->output, _tdm_vblank_cb_vblank_HW, w);
311                 tdm_display_unlock(private_vblank->dpy);
312
313                 if (call_cb && w->func)
314                         w->func(private_vblank, error, 0, 0, 0, w->user_data);
315
316                 free(w);
317         }
318 }
319
320 static void
321 _tdm_vblank_update_output_info(tdm_private_vblank *private_vblank)
322 {
323         tdm_output *output = private_vblank->output;
324         tdm_output_conn_status connection = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
325         unsigned int vrefresh = 0;
326         tdm_error ret;
327
328         ret = tdm_output_get_conn_status(output, &connection);
329         TDM_WARNING_IF_FAIL(ret == TDM_ERROR_NONE);
330
331         if (connection != TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
332                 const tdm_output_mode *mode = NULL;
333                 tdm_output_get_mode(output, &mode);
334                 if (mode)
335                         vrefresh = mode->vrefresh;
336                 else
337                         VWR("mode not setted!!!");
338         }
339
340         if (vrefresh == 0) {
341                 VWR("vrefresh can't be zero !!!");
342                 vrefresh = TDM_VBLANK_DEFAULT_VREFRESH;
343         }
344
345         private_vblank->connection = connection;
346         private_vblank->vrefresh = vrefresh;
347         private_vblank->HW_vblank_gap = 1.0 / private_vblank->vrefresh;
348
349         if (private_vblank->fps_changeable)
350                 private_vblank->fps = vrefresh;
351
352         VIN("connection(%d) vrefresh(%d) fps(%d) fps_changeable(%d)",
353                 private_vblank->connection,
354                 private_vblank->vrefresh, private_vblank->fps, private_vblank->fps_changeable);
355 }
356
357 /* LCOV_EXCL_START */
358 static void
359 _tdm_vblank_cb_output_change(tdm_output *output, tdm_output_change_type type,
360                                                          tdm_value value, void *user_data)
361 {
362         tdm_private_vblank *private_vblank = user_data;
363
364         TDM_RETURN_IF_FAIL(private_vblank != NULL);
365
366         switch (type) {
367         case TDM_OUTPUT_CHANGE_DPMS:
368                 VIN("dpms %s", tdm_dpms_str(value.u32));
369                 private_vblank->check_HW_or_SW = 1;
370                 if (TDM_OUTPUT_DPMS_VSYNC_IS_OFF(value.u32)) {
371                         if (private_vblank->enable_fake)
372                                 _tdm_vblank_change_to_SW(private_vblank);
373                         else
374                                 _tdm_vblank_free_HW_wait(private_vblank, TDM_ERROR_DPMS_OFF, 1);
375                 }
376                 break;
377         case TDM_OUTPUT_CHANGE_CONNECTION:
378                 if (private_vblank->connection == value.u32)
379                         break;
380                 VIN("output %s", tdm_status_str(value.u32));
381                 _tdm_vblank_update_output_info(private_vblank);
382                 private_vblank->check_HW_or_SW = 1;
383                 if (private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
384                         if (private_vblank->enable_fake)
385                                 _tdm_vblank_change_to_SW(private_vblank);
386                         else
387                                 _tdm_vblank_free_HW_wait(private_vblank, TDM_ERROR_OUTPUT_DISCONNECTED, 1);
388                 }
389                 break;
390         default:
391                 break;
392         }
393 }
394 /* LCOV_EXCL_STOP */
395
396 EXTERN tdm_error
397 tdm_vblank_set_client_vblank_fps(unsigned int pid, const char *name, unsigned int fps)
398 {
399         tdm_private_vblank *v = NULL;
400
401         TDM_RETURN_VAL_IF_FAIL(pid > 0, TDM_ERROR_INVALID_PARAMETER);
402         TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
403
404         TDM_INFO("pid: %u, name: %s, fps: %d", pid, name, fps);
405
406         pthread_mutex_lock(&valid_list_lock);
407         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
408                 struct wl_client *client;
409                 pid_t client_pid = 0;
410
411                 if (!v->resource)
412                         continue;
413
414                 client = wl_resource_get_client(v->resource);
415                 if (!client)
416                         continue;
417
418                 wl_client_get_credentials(client, &client_pid, NULL, NULL);
419
420                 if (client_pid != pid)
421                         continue;
422
423                 if (name && strncmp(name, TDM_VBLANK_DEFAULT_NAME, TDM_NAME_LEN)) {
424                         if (strncmp(v->name, name, TDM_NAME_LEN))
425                                 continue;
426                 }
427
428                 tdm_vblank_set_fps(v, fps);
429
430                 TDM_INFO("(pid:%u) '%s' fps changed: %d", pid, v->name, fps);
431         }
432         pthread_mutex_unlock(&valid_list_lock);
433
434         return TDM_ERROR_NONE;
435 }
436
437 EXTERN tdm_error
438 tdm_vblank_enable_global_fps(unsigned int enable, unsigned int fps)
439 {
440         tdm_private_vblank *v = NULL;
441
442         if (enable)
443                 TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
444
445         TDM_INFO("global fps: %s fps(%d)", (enable) ? "enabled" : "disabled", fps);
446
447         pthread_mutex_lock(&valid_list_lock);
448
449         vblank_global_fps = (enable) ? fps : 0;
450
451         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
452                 /* skip if vblank is created in server side */
453                 if (!v->resource)
454                         continue;
455
456                 v->check_HW_or_SW = 1;
457         }
458         pthread_mutex_unlock(&valid_list_lock);
459
460         return TDM_ERROR_NONE;
461 }
462
463 EXTERN tdm_vblank *
464 tdm_vblank_create(tdm_display *dpy, tdm_output *output, tdm_error *error)
465 {
466         tdm_private_vblank *private_vblank;
467         tdm_error ret;
468
469         TDM_RETURN_VAL_IF_FAIL_WITH_ERROR(tdm_display_is_valide(dpy), TDM_ERROR_INVALID_PARAMETER, NULL);
470         TDM_RETURN_VAL_IF_FAIL_WITH_ERROR(tdm_output_is_valide(output), TDM_ERROR_INVALID_PARAMETER, NULL);
471
472         if (error)
473                 *error = TDM_ERROR_NONE;
474
475         if (!vblank_list_inited) {
476                 if (pthread_mutex_init(&valid_list_lock, NULL)) {
477                         /* LCOV_EXCL_START */
478                         TDM_ERR("mutex init failed: %m");
479                         if (error)
480                                 *error = TDM_ERROR_OPERATION_FAILED;
481                         return NULL;
482                         /* LCOV_EXCL_STOP */
483                 }
484                 LIST_INITHEAD(&valid_vblank_list);
485                 LIST_INITHEAD(&valid_wait_list);
486                 vblank_list_inited = 1;
487         }
488
489         private_vblank = calloc(1, sizeof * private_vblank);
490         if (!private_vblank) {
491                 /* LCOV_EXCL_START */
492                 if (error)
493                         *error = TDM_ERROR_OUT_OF_MEMORY;
494                 VER("alloc failed");
495                 return NULL;
496                 /* LCOV_EXCL_STOP */
497         }
498
499         tdm_output_add_change_handler(output, _tdm_vblank_cb_output_change, private_vblank);
500
501         private_vblank->stamp = ++stamp;
502         private_vblank->owner_tid = syscall(SYS_gettid);
503         private_vblank->dpy = dpy;
504         private_vblank->output = output;
505         private_vblank->check_HW_or_SW = 1;
506         private_vblank->fps_changeable = 1;
507
508         _tdm_vblank_update_output_info(private_vblank);
509
510         strncpy(private_vblank->name, TDM_VBLANK_DEFAULT_NAME, TDM_NAME_LEN - 1);
511         private_vblank->name[TDM_NAME_LEN - 1] = '\0';
512
513         LIST_INITHEAD(&private_vblank->HW_wait_list);
514         LIST_INITHEAD(&private_vblank->SW_wait_list);
515
516         _tdm_vblank_valid_list_add(&private_vblank->valid_link, &valid_vblank_list);
517
518         VIN("created. vrefresh(%d) connection(%d)",
519                 private_vblank->vrefresh, private_vblank->connection);
520
521         return (tdm_vblank *)private_vblank;
522 }
523
524 EXTERN void
525 tdm_vblank_destroy(tdm_vblank *vblank)
526 {
527         tdm_private_vblank *private_vblank = vblank;
528         tdm_vblank_wait_info *w = NULL, *ww = NULL;
529
530         if (!private_vblank)
531                 return;
532
533         _tdm_vblank_valid_list_del(&private_vblank->valid_link);
534
535         if (private_vblank->SW_timer) {
536                 tdm_display_lock(private_vblank->dpy);
537                 tdm_event_loop_source_remove(private_vblank->SW_timer);
538                 tdm_display_unlock(private_vblank->dpy);
539         }
540
541         tdm_output_remove_change_handler(private_vblank->output,
542                                                                          _tdm_vblank_cb_output_change, private_vblank);
543
544         _tdm_vblank_free_HW_wait(private_vblank, 0, 0);
545
546         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->SW_wait_list, link) {
547                 LIST_DEL(&w->link);
548                 _tdm_vblank_valid_list_del(&w->valid_link);
549                 free(w);
550         }
551
552         VIN("destroyed");
553
554         free(private_vblank);
555 }
556
557 EXTERN tdm_error
558 tdm_vblank_set_name(tdm_vblank *vblank, const char *name)
559 {
560         tdm_private_vblank *private_vblank = vblank;
561
562         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
563
564         if (!name)
565                 name = TDM_VBLANK_DEFAULT_NAME;
566
567         strncpy(private_vblank->name, name, TDM_NAME_LEN - 1);
568         private_vblank->name[TDM_NAME_LEN - 1] = '\0';
569
570         VIN("name(%s)", name);
571
572         return TDM_ERROR_NONE;
573 }
574
575 EXTERN tdm_error
576 tdm_vblank_get_name(tdm_vblank *vblank, const char **name)
577 {
578         tdm_private_vblank *private_vblank = vblank;
579
580         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
581         TDM_RETURN_VAL_IF_FAIL(name != NULL, TDM_ERROR_INVALID_PARAMETER);
582
583         *name = (const char*)private_vblank->name;
584
585         return TDM_ERROR_NONE;
586 }
587
588 EXTERN tdm_error
589 tdm_vblank_set_fps(tdm_vblank *vblank, unsigned int fps)
590 {
591         tdm_private_vblank *private_vblank = vblank;
592
593         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
594         TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
595
596         if (private_vblank->fps != fps || private_vblank->fps_changeable)
597                 VIN("fps(%d) fps_changeable(0)", fps);
598
599         private_vblank->fps_changeable = 0;
600
601         if (private_vblank->fps == fps)
602                 return TDM_ERROR_NONE;
603
604         private_vblank->fps = fps;
605         private_vblank->check_HW_or_SW = 1;
606
607         return TDM_ERROR_NONE;
608 }
609
610 EXTERN tdm_error
611 tdm_vblank_get_fps(tdm_vblank *vblank, unsigned int *fps)
612 {
613         tdm_private_vblank *private_vblank = vblank;
614
615         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
616         TDM_RETURN_VAL_IF_FAIL(fps != NULL, TDM_ERROR_INVALID_PARAMETER);
617
618         *fps = private_vblank->fps;
619
620         return TDM_ERROR_NONE;
621 }
622
623 EXTERN tdm_error
624 tdm_vblank_ignore_global_fps(tdm_vblank *vblank, unsigned int ignore)
625 {
626         tdm_private_vblank *private_vblank = vblank;
627
628         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
629
630         if (private_vblank->ignore_global_fps == ignore)
631                 return TDM_ERROR_NONE;
632
633         private_vblank->ignore_global_fps = ignore;
634         private_vblank->check_HW_or_SW = 1;
635
636         VIN("ignore_global_fps(%d)", private_vblank->ignore_global_fps);
637
638         return TDM_ERROR_NONE;
639 }
640
641 EXTERN tdm_error
642 tdm_vblank_set_offset(tdm_vblank *vblank, int offset)
643 {
644         tdm_private_vblank *private_vblank = vblank;
645
646         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
647
648         if (private_vblank->offset == offset)
649                 return TDM_ERROR_NONE;
650
651         private_vblank->offset = offset;
652         private_vblank->check_HW_or_SW = 1;
653
654         VIN("offset(%d)", private_vblank->offset);
655
656         return TDM_ERROR_NONE;
657 }
658
659 EXTERN tdm_error
660 tdm_vblank_get_offset(tdm_vblank *vblank, int *offset)
661 {
662         tdm_private_vblank *private_vblank = vblank;
663
664         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
665         TDM_RETURN_VAL_IF_FAIL(offset != NULL, TDM_ERROR_INVALID_PARAMETER);
666
667         *offset = private_vblank->offset;
668
669         return TDM_ERROR_NONE;
670 }
671
672 EXTERN tdm_error
673 tdm_vblank_set_enable_fake(tdm_vblank *vblank, unsigned int enable_fake)
674 {
675         tdm_private_vblank *private_vblank = vblank;
676
677         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
678
679         if (private_vblank->enable_fake == enable_fake)
680                 return TDM_ERROR_NONE;
681
682         private_vblank->enable_fake = enable_fake;
683
684         VIN("enable_fake(%d)", private_vblank->enable_fake);
685
686         return TDM_ERROR_NONE;
687 }
688
689 EXTERN tdm_error
690 tdm_vblank_get_enable_fake(tdm_vblank *vblank, unsigned int *enable_fake)
691 {
692         tdm_private_vblank *private_vblank = vblank;
693
694         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
695         TDM_RETURN_VAL_IF_FAIL(enable_fake != NULL, TDM_ERROR_INVALID_PARAMETER);
696
697         *enable_fake = private_vblank->enable_fake;
698
699         return TDM_ERROR_NONE;
700 }
701
702 static tdm_error
703 _tdm_vblank_sw_timer_update(tdm_private_vblank *private_vblank)
704 {
705         tdm_vblank_wait_info *first_wait_info = NULL;
706         double curr, target;
707         int ms_delay;
708         tdm_error ret;
709
710         if (LIST_IS_EMPTY(&private_vblank->SW_wait_list)) {
711                 VER("no wait_info");
712                 return TDM_ERROR_OPERATION_FAILED;
713         }
714
715         first_wait_info = container_of(private_vblank->SW_wait_list.next, first_wait_info, link);
716         curr = tdm_helper_get_time();
717         target = first_wait_info->target_time;
718
719         /* ms_delay should be more that 1 */
720         if (target < curr)
721                 ms_delay = 1;
722         else
723                 ms_delay = ceil((target - curr) * 1000.0);
724
725         if (ms_delay < 1)
726                 ms_delay = 1;
727
728         if (ms_delay > 5000)
729                 VER("wait(%p) curr(%.6f) target(%.6f) ms_delay(%d)", first_wait_info, curr, target, ms_delay);
730         else
731                 VDB("wait(%p) curr(%.6f) target(%.6f) ms_delay(%d)", first_wait_info, curr, target, ms_delay);
732
733         tdm_display_lock(private_vblank->dpy);
734
735         if (!private_vblank->SW_timer) {
736                 private_vblank->SW_timer =
737                         tdm_event_loop_add_timer_handler(private_vblank->dpy,
738                                                                                          _tdm_vblank_cb_vblank_SW,
739                                                                                          private_vblank,
740                                                                                          &ret);
741                 if (!private_vblank->SW_timer) {
742                         tdm_display_unlock(private_vblank->dpy);
743                         VER("couldn't add timer");
744                         return ret;
745                 }
746                 VIN("Create SW timer");
747         }
748
749         ret = tdm_event_loop_source_timer_update(private_vblank->SW_timer, ms_delay);
750         if (ret != TDM_ERROR_NONE) {
751                 /* LCOV_EXCL_START */
752                 tdm_display_unlock(private_vblank->dpy);
753                 VER("couldn't update timer");
754                 return ret;
755                 /* LCOV_EXCL_STOP */
756         }
757
758         tdm_display_unlock(private_vblank->dpy);
759
760         return TDM_ERROR_NONE;
761 }
762
763 static void
764 _tdm_vblank_cb_vblank_HW(tdm_output *output, unsigned int sequence,
765                                                  unsigned int tv_sec, unsigned int tv_usec,
766                                                  void *user_data)
767 {
768         tdm_vblank_wait_info *wait_info = user_data;
769         tdm_private_vblank *private_vblank;
770
771         if (!_tdm_vblank_check_valid_wait(wait_info)) {
772                 TDM_DBG("can't find wait(%p) from valid_wait_list", wait_info);
773                 return;
774         }
775
776         private_vblank = wait_info->private_vblank;
777         TDM_RETURN_IF_FAIL(private_vblank != NULL);
778
779         if (!_tdm_vblank_find_wait(wait_info, &private_vblank->HW_wait_list)) {
780                 VDB("can't find wait(%p)", wait_info);
781                 return;
782         }
783
784         if (wait_info->type == VBLANK_TYPE_HW_SW) {
785                 tdm_error ret;
786
787                 LIST_DEL(&wait_info->link);
788
789                 /* kernel sends the wrong time of first vblank event. and the time of
790                  * second vblank is correct.
791                  */
792                 wait_info->target_time = TDM_TIME(tv_sec, tv_usec);
793                 wait_info->target_time += (((double)private_vblank->offset) / 1000.0);
794
795                 _tdm_vblank_insert_wait(wait_info, &private_vblank->SW_wait_list);
796
797                 ret = _tdm_vblank_sw_timer_update(private_vblank);
798
799                 /* wait_info will be freed in _tdm_vblank_cb_vblank_SW() */
800                 if (ret == TDM_ERROR_NONE) {
801                         VDB("wait(%p) SW timer", wait_info);
802                         return;
803                 }
804
805                 VWR("couldn't update sw timer");
806         }
807
808         LIST_DEL(&wait_info->link);
809         _tdm_vblank_valid_list_del(&wait_info->valid_link);
810
811         /* tv_sec & tv_usec shouldn't be zero. But sometimes they are zero in some hardware.
812          * We need to prohibit that last_time becomes zero because "last_time == 0" means
813          * that a tdm_vblank object is just created and doesn't have the first vblank event.
814          * If last_time becomes 0, it would make issue.
815          */
816         if (tv_sec == 0 && tv_usec == 0) {
817                 double curr = tdm_helper_get_time();
818                 tv_sec = TDM_TIME_SEC(curr);
819                 tv_usec = TDM_TIME_USEC(curr);
820         }
821
822         private_vblank->last_seq = wait_info->target_seq;
823         private_vblank->last_time = TDM_TIME(tv_sec, tv_usec);
824
825         VDB("wait(%p) last(%.6f) sequence(%u) done", wait_info, private_vblank->last_time, wait_info->target_seq);
826
827         if (wait_info->func)
828                 wait_info->func(private_vblank, TDM_ERROR_NONE, wait_info->target_seq,
829                                                 tv_sec, tv_usec, wait_info->user_data);
830
831         free(wait_info);
832 }
833
834 static tdm_error
835 _tdm_vblank_wait_HW(tdm_vblank_wait_info *wait_info)
836 {
837         tdm_private_vblank *private_vblank = wait_info->private_vblank;
838         int hw_interval;
839         tdm_error ret;
840
841         if (private_vblank->last_type != VBLANK_EVENT_TYPE_HW) {
842                 VIN("Use HW vblank");
843                 private_vblank->last_type = VBLANK_EVENT_TYPE_HW;
844         }
845
846         _tdm_vblank_insert_wait(wait_info, &private_vblank->HW_wait_list);
847
848         hw_interval = wait_info->interval * private_vblank->quotient;
849
850         if (private_vblank->last_time == 0) {
851                 /* SW vblank starts from now. SW vblank doesn't need to be aligned with HW vblank. */
852                 private_vblank->last_seq = 0;
853                 private_vblank->last_time = tdm_helper_get_time();
854
855                 /* +1 ms to call the handler ASAP at the first. no matter for SW timer. */
856                 wait_info->target_seq = 1;
857
858                 VDB("wait(%p) last(%.6f) hw_itvl(%d) targ_seq(%u)",
859                         wait_info, private_vblank->last_time, hw_interval, wait_info->target_seq);
860         } else {
861                 double last, prev, req, curr, target;
862                 unsigned int skip;
863
864                 last = private_vblank->last_time;
865                 req = wait_info->req_time;
866
867                 /* make sure that req time is bigger than last. */
868                 if (req < last)
869                         req = last;
870
871                 skip = (unsigned int)((req - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
872                 prev = last + private_vblank->vblank_gap * skip;
873
874                 curr = tdm_helper_get_time();
875                 target = last;
876                 while (target < curr)
877                         target += (private_vblank->vblank_gap * wait_info->interval);
878
879                 hw_interval = (unsigned int)((target - curr) / private_vblank->HW_vblank_gap + TDM_TIME_MARGIN) + 1;
880
881                 wait_info->target_seq = private_vblank->last_seq;
882                 wait_info->target_seq += (unsigned int)((target - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
883
884                 if (hw_interval > 300)
885                         VER("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) hw_itvl(%d) targ_seq(%u)",
886                                 wait_info, last, req - last, prev - last, curr - last, target, target - last,
887                                 skip, hw_interval, wait_info->target_seq);
888                 else
889                         VDB("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) hw_itvl(%d) targ_seq(%u)",
890                                 wait_info, last, req - last, prev - last, curr - last, target, target - last,
891                                 skip, hw_interval, wait_info->target_seq);
892         }
893
894         if (private_vblank->add_front)
895                 ret = tdm_output_wait_vblank_add_front(private_vblank->output, hw_interval, 0,
896                                                                                            _tdm_vblank_cb_vblank_HW, wait_info);
897         else
898                 ret = tdm_output_wait_vblank(private_vblank->output, hw_interval, 0,
899                                                                          _tdm_vblank_cb_vblank_HW, wait_info);
900
901         if (ret != TDM_ERROR_NONE) {
902                 LIST_DEL(&wait_info->link);
903                 return ret;
904         }
905
906         VDB("wait(%p) waiting", wait_info);
907
908         return TDM_ERROR_NONE;
909 }
910
911 static tdm_error
912 _tdm_vblank_cb_vblank_SW(void *user_data)
913 {
914         tdm_private_vblank *private_vblank = user_data;
915
916         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_OPERATION_FAILED);
917
918         return tdm_vblank_cb_vblank_SW(private_vblank, 0);
919 }
920
921 INTERN tdm_error
922 tdm_vblank_cb_vblank_SW(tdm_vblank *vblank, double vblank_stamp)
923 {
924         tdm_private_vblank *private_vblank;
925         tdm_vblank_wait_info *first_wait_info = NULL, *w = NULL, *ww = NULL;
926
927         TDM_RETURN_VAL_IF_FAIL(vblank || vblank_stamp > 0, TDM_ERROR_INVALID_PARAMETER);
928
929         if (vblank)
930                 private_vblank = vblank;
931         else {
932                 private_vblank = _tdm_vblank_find(vblank_stamp);
933                 if (!private_vblank) {
934                         TDM_DBG("can't find vblank(%.0f) from valid_list", vblank_stamp);
935                         return TDM_ERROR_NONE;
936                 }
937         }
938
939         if (private_vblank->owner_tid != syscall(SYS_gettid)) {
940                 tdm_thread_cb_vblank_sw vblank_sw;
941                 tdm_private_display *private_display = private_vblank->dpy;
942                 tdm_error ret;
943
944                 vblank_sw.base.type = TDM_THREAD_CB_VBLANK_SW;
945                 vblank_sw.base.length = sizeof vblank_sw;
946                 vblank_sw.vblank_stamp = private_vblank->stamp;
947
948                 ret = tdm_thread_send_cb(private_display->private_loop, &vblank_sw.base);
949                 TDM_WARNING_IF_FAIL(ret == TDM_ERROR_NONE);
950
951                 return TDM_ERROR_NONE;
952         }
953
954         if (LIST_IS_EMPTY(&private_vblank->SW_wait_list)) {
955                 VER("no wait_info");
956                 return TDM_ERROR_OPERATION_FAILED;
957         }
958
959         first_wait_info = container_of(private_vblank->SW_wait_list.next, first_wait_info, link);
960         TDM_RETURN_VAL_IF_FAIL(first_wait_info != NULL, TDM_ERROR_OPERATION_FAILED);
961
962         if (private_vblank->last_seq >= first_wait_info->target_seq)
963                 TDM_ERR("last_seq(%u) target_seq(%u)", private_vblank->last_seq, first_wait_info->target_seq);
964
965         private_vblank->last_seq = first_wait_info->target_seq;
966         private_vblank->last_time = first_wait_info->target_time;
967
968         VDB("wait(%p) last(%.6f) sequence(%u) done", first_wait_info, private_vblank->last_time, first_wait_info->target_seq);
969
970         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->SW_wait_list, link) {
971                 if (w->target_time != first_wait_info->target_time)
972                         break;
973
974                 LIST_DEL(&w->link);
975                 _tdm_vblank_valid_list_del(&w->valid_link);
976
977                 if (w->func) {
978                         tdm_display_unlock(private_vblank->dpy);
979                         w->func(private_vblank, TDM_ERROR_NONE, w->target_seq,
980                                         TDM_TIME_SEC(w->target_time), TDM_TIME_USEC(w->target_time),
981                                         w->user_data);
982                         tdm_display_lock(private_vblank->dpy);
983                 }
984
985                 free(w);
986         }
987
988         return TDM_ERROR_NONE;
989 }
990
991 static tdm_error
992 _tdm_vblank_wait_SW(tdm_vblank_wait_info *wait_info)
993 {
994         tdm_private_vblank *private_vblank = wait_info->private_vblank;
995         tdm_error ret;
996
997         if (private_vblank->last_type != VBLANK_EVENT_TYPE_SW) {
998                 VIN("Use SW vblank");
999                 private_vblank->last_type = VBLANK_EVENT_TYPE_SW;
1000         }
1001
1002         if (private_vblank->last_time == 0) {
1003                 /* SW vblank starts from now. SW vblank doesn't need to be aligned with HW vblank. */
1004                 private_vblank->last_seq = 0;
1005                 private_vblank->last_time = tdm_helper_get_time();
1006
1007                 /* +1 ms to call the handler ASAP at the first. no matter for SW timer. */
1008                 wait_info->target_seq = 1;
1009                 wait_info->target_time = private_vblank->last_time + 0.001;
1010
1011                 VDB("wait(%p) last(%.6f) target(%.6f) target sequence(%u)",
1012                         wait_info, private_vblank->last_time, wait_info->target_time, wait_info->target_seq);
1013         } else {
1014                 double last, prev, req, curr, target;
1015                 unsigned int skip;
1016
1017                 last = private_vblank->last_time;
1018                 req = wait_info->req_time;
1019
1020                 /* make sure that req time is bigger than last. */
1021                 if (req < last)
1022                         req = last;
1023
1024                 skip = (unsigned int)((req - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
1025                 prev = last + private_vblank->vblank_gap * skip;
1026
1027                 curr = tdm_helper_get_time();
1028                 target = prev + private_vblank->vblank_gap * wait_info->interval;
1029
1030                 while (target < curr)
1031                         target += private_vblank->vblank_gap;
1032
1033                 wait_info->target_seq = private_vblank->last_seq;
1034                 wait_info->target_seq += (unsigned int)((target - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
1035
1036                 wait_info->target_time = target;
1037
1038                 VDB("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) targ_seq(%u)",
1039                         wait_info, last, req - last, prev - last, curr - last,
1040                         target, target - last, skip, wait_info->target_seq);
1041         }
1042
1043         _tdm_vblank_insert_wait(wait_info, &private_vblank->SW_wait_list);
1044
1045         ret = _tdm_vblank_sw_timer_update(private_vblank);
1046         if (ret != TDM_ERROR_NONE) {
1047                 /* LCOV_EXCL_START */
1048                 LIST_DEL(&wait_info->link);
1049                 VER("couldn't update sw timer");
1050                 return ret;
1051                 /* LCOV_EXCL_STOP */
1052         }
1053
1054         return TDM_ERROR_NONE;
1055 }
1056
1057 EXTERN tdm_error
1058 tdm_vblank_wait(tdm_vblank *vblank, unsigned int req_sec, unsigned int req_usec,
1059                                 unsigned int interval, tdm_vblank_handler func, void *user_data)
1060 {
1061         tdm_private_vblank *private_vblank = vblank;
1062         tdm_vblank_wait_info *wait_info;
1063         tdm_output_dpms dpms = TDM_OUTPUT_DPMS_OFF;
1064         unsigned int fps;
1065         tdm_error ret;
1066
1067         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1068         TDM_RETURN_VAL_IF_FAIL(func != NULL, TDM_ERROR_INVALID_PARAMETER);
1069
1070         if (private_vblank->owner_tid != syscall(SYS_gettid)) {
1071                 TDM_ERR("SHOULD be called in the owner thread(%d)", (int)private_vblank->owner_tid);
1072                 return TDM_ERROR_BAD_REQUEST;
1073         }
1074
1075         tdm_output_get_dpms(private_vblank->output, &dpms);
1076
1077         if (!private_vblank->enable_fake) {
1078                 if (private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
1079                         VER("can't wait a vblank: output disconnected");
1080                         return TDM_ERROR_OUTPUT_DISCONNECTED;
1081                 }
1082                 if (TDM_OUTPUT_DPMS_VSYNC_IS_OFF(dpms)) {
1083                         VER("can't wait a vblank: DPMS %s", tdm_dpms_str(dpms));
1084                         return TDM_ERROR_DPMS_OFF;
1085                 }
1086         }
1087
1088         wait_info = calloc(1, sizeof * wait_info);
1089         if (!wait_info) {
1090                 /* LCOV_EXCL_START */
1091                 VER("alloc failed");
1092                 return TDM_ERROR_OUT_OF_MEMORY;
1093                 /* LCOV_EXCL_STOP */
1094         }
1095
1096         /* set request time to current time if 0. This function seems to be called in server side. */
1097         if (req_sec == 0 && req_usec == 0) {
1098                 double curr = tdm_helper_get_time();
1099                 req_sec = TDM_TIME_SEC(curr);
1100                 req_usec = TDM_TIME_USEC(curr);
1101         }
1102
1103         LIST_INITHEAD(&wait_info->link);
1104
1105         _tdm_vblank_valid_list_add(&wait_info->valid_link, &valid_wait_list);
1106
1107         wait_info->stamp = ++stamp;
1108         wait_info->req_time = TDM_TIME(req_sec, req_usec);
1109         wait_info->interval = interval;
1110         wait_info->func = func;
1111         wait_info->user_data = user_data;
1112         wait_info->private_vblank = private_vblank;
1113
1114         if (private_vblank->ignore_global_fps ||
1115                 vblank_global_fps == 0 ||
1116                 private_vblank->fps < vblank_global_fps)
1117                 fps = private_vblank->fps;
1118         else
1119                 fps = vblank_global_fps;
1120
1121         if (private_vblank->check_HW_or_SW) {
1122                 private_vblank->check_HW_or_SW = 0;
1123                 private_vblank->vblank_gap = 1.0 / fps;
1124                 private_vblank->quotient = private_vblank->vrefresh / fps;
1125         }
1126
1127         /* 1) if fps != factor of vrefresh, SW timer
1128          * 2) if fps == factor of vrefresh && dpms == off, SW timer (Fake HW vblank)
1129          * 2) if fps == factor of vrefresh && dpms == on && offset == 0, HW vblank
1130          * 3) if fps == factor of vrefresh && dpms == on && offset != 0, HW vblank + SW timer
1131          * In case of 1), we really don't need to align with HW vblank.
1132          */
1133         if (private_vblank->vrefresh % fps)
1134                 wait_info->type = VBLANK_TYPE_SW;
1135         else if (TDM_OUTPUT_DPMS_VSYNC_IS_OFF(dpms) ||
1136                          private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED)
1137                 wait_info->type = VBLANK_TYPE_SW_FAKE;
1138         else if (private_vblank->offset == 0)
1139                 wait_info->type = VBLANK_TYPE_HW;
1140         else
1141                 wait_info->type = VBLANK_TYPE_HW_SW;
1142
1143         if (wait_info->type == VBLANK_TYPE_SW || wait_info->type == VBLANK_TYPE_SW_FAKE) {
1144                 ret = _tdm_vblank_wait_SW(wait_info);
1145                 if (ret != TDM_ERROR_NONE)
1146                         TDM_ERR("_tdm_vblank_wait_SW failed: ret(%d)", ret);
1147         } else {
1148                 ret = _tdm_vblank_wait_HW(wait_info);
1149                 if (ret != TDM_ERROR_NONE)
1150                         TDM_ERR("_tdm_vblank_wait_HW failed: ret(%d)", ret);
1151
1152                 if (ret == TDM_ERROR_OUTPUT_DISCONNECTED || ret == TDM_ERROR_DPMS_OFF) {
1153                         ret = _tdm_vblank_wait_SW(wait_info);
1154                         if (ret != TDM_ERROR_NONE)
1155                                 TDM_ERR("_tdm_vblank_wait_SW failed: ret(%d)", ret);
1156                 }
1157         }
1158
1159         if (ret != TDM_ERROR_NONE) {
1160                 /* LCOV_EXCL_START */
1161                 LIST_DEL(&wait_info->link);
1162                 _tdm_vblank_valid_list_del(&wait_info->valid_link);
1163
1164                 tdm_display_lock(private_vblank->dpy);
1165                 tdm_output_remove_vblank_handler_internal(private_vblank->output, _tdm_vblank_cb_vblank_HW, wait_info);
1166                 tdm_display_unlock(private_vblank->dpy);
1167
1168                 free(wait_info);
1169                 return ret;
1170                 /* LCOV_EXCL_STOP */
1171         }
1172
1173         return TDM_ERROR_NONE;
1174 }
1175
1176 EXTERN tdm_error
1177 tdm_vblank_wait_seq(tdm_vblank *vblank, unsigned int req_sec, unsigned int req_usec,
1178                                         unsigned int sequence, tdm_vblank_handler func, void *user_data)
1179 {
1180         tdm_private_vblank *private_vblank = vblank;
1181         unsigned int interval;
1182
1183         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1184         TDM_RETURN_VAL_IF_FAIL(func != NULL, TDM_ERROR_INVALID_PARAMETER);
1185
1186         /* if the sequence of vblank reaches the max value, sequence can be 0. */
1187
1188         if (private_vblank->last_seq == 0) {
1189                 TDM_WRN("can't calculate interval with sequence(%u)", sequence);
1190                 interval = 1;
1191         } else if (sequence > private_vblank->last_seq ||
1192                            TDM_VBLANK_SEQ_REACHED_MAX(sequence, private_vblank->last_seq)) {
1193                 double last, curr, seq_target;
1194
1195                 last = private_vblank->last_time;
1196                 curr = tdm_helper_get_time();
1197                 seq_target = last + private_vblank->vblank_gap * (sequence - private_vblank->last_seq);
1198
1199                 /* If target is old or too close(1ms) to current, we call the handler immediately.
1200                  * 2ms? it seems too much.
1201                  */
1202                 if (seq_target < curr) {
1203                         func(vblank, TDM_ERROR_NONE, sequence,
1204                                  TDM_TIME_SEC(seq_target), TDM_TIME_USEC(seq_target),
1205                                  user_data);
1206                         return TDM_ERROR_NONE;
1207                 } else if ((seq_target - curr) < 0.001) {  /* 1ms */
1208                         func(vblank, TDM_ERROR_NONE, sequence,
1209                                  TDM_TIME_SEC(curr), TDM_TIME_USEC(curr),
1210                                  user_data);
1211                         return TDM_ERROR_NONE;
1212                 }
1213
1214                 interval = (unsigned int)((seq_target - curr) / private_vblank->vblank_gap + TDM_TIME_MARGIN) + 1;
1215         } else {
1216                 /* this seems error. But we handle this like normal to avoid the unexpected error in cliend side */
1217                 TDM_WRN("sequence(%u) should be over the last sequence(%u)", sequence, private_vblank->last_seq);
1218                 func(vblank, TDM_ERROR_NONE, private_vblank->last_seq,
1219                          TDM_TIME_SEC(private_vblank->last_time), TDM_TIME_USEC(private_vblank->last_time),
1220                          user_data);
1221                 return TDM_ERROR_NONE;
1222         }
1223
1224         return tdm_vblank_wait(vblank, req_sec, req_usec, interval, func, user_data);
1225 }
1226
1227 /* LCOV_EXCL_START */
1228 INTERN tdm_error
1229 tdm_vblank_set_add_front(tdm_vblank *vblank, unsigned int add_front)
1230 {
1231         tdm_private_vblank *private_vblank = vblank;
1232
1233         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1234
1235         TDM_RETURN_VAL_IF_FAIL(TDM_MUTEX_IS_LOCKED(), TDM_ERROR_OPERATION_FAILED);
1236
1237         if (private_vblank->add_front == add_front)
1238                 return TDM_ERROR_NONE;
1239
1240         private_vblank->add_front = add_front;
1241
1242         return TDM_ERROR_NONE;
1243 }
1244 /* LCOV_EXCL_STOP */
1245
1246 INTERN tdm_error
1247 tdm_vblank_set_resource(tdm_vblank *vblank, struct wl_resource *resource)
1248 {
1249         tdm_private_vblank *private_vblank = vblank;
1250
1251         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1252         TDM_RETURN_VAL_IF_FAIL(private_vblank->resource == NULL, TDM_ERROR_OPERATION_FAILED);
1253
1254         private_vblank->resource = resource;
1255
1256         return TDM_ERROR_NONE;
1257 }
1258
1259 INTERN double
1260 tdm_vblank_get_stamp(tdm_vblank *vblank)
1261 {
1262         tdm_private_vblank *private_vblank = vblank;
1263
1264         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1265
1266         return private_vblank->stamp;
1267 }
1268
1269 /* LCOV_EXCL_START */
1270 INTERN void
1271 tdm_vblank_get_vblank_list_information(tdm_display *dpy, char *reply, int *len)
1272 {
1273         tdm_private_vblank *v = NULL;
1274
1275         TDM_SNPRINTF(reply, len, "[Client Vblank List]\n");
1276         TDM_SNPRINTF(reply, len, "* global fps: %u\n", vblank_global_fps);
1277         TDM_SNPRINTF(reply, len, "---------------------------------------------------------------\n");
1278         TDM_SNPRINTF(reply, len, "name         fps ignore offset fake process\n");
1279         TDM_SNPRINTF(reply, len, "---------------------------------------------------------------\n");
1280
1281         pthread_mutex_lock(&valid_list_lock);
1282         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
1283                 const char *proc_name = NULL;
1284                 pid_t pid = 0;
1285
1286                 if (v->resource) {
1287                         struct wl_client *client = wl_resource_get_client(v->resource);
1288                         if (client) {
1289                                 wl_client_get_credentials(client, &pid, NULL, NULL);
1290                                 proc_name = tdm_server_get_client_name(pid);
1291                         }
1292                 }
1293
1294                 TDM_SNPRINTF(reply, len, "%-12s %u  %u     %d      %u    %s (pid: %u)\n",
1295                                          v->name, v->fps, v->ignore_global_fps, v->offset, v->enable_fake,
1296                                          (proc_name) ? proc_name : "Unknown", pid);
1297         }
1298         pthread_mutex_unlock(&valid_list_lock);
1299
1300         TDM_SNPRINTF(reply, len, "\n");
1301 }
1302 /* LCOV_EXCL_STOP */
1303