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
 327         tdm_output_get_conn_status(output, &connection);
 328
 329         if (connection != TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 330                 const tdm_output_mode *mode = NULL;
 331                 tdm_output_get_mode(output, &mode);
 332                 if (mode)
 333                         vrefresh = mode->vrefresh;
 334                 else
 335                         VWR("mode not setted!!!");
 336         }
 337
 338         if (vrefresh == 0) {
 339                 VWR("vrefresh can't be zero !!!");
 340                 vrefresh = TDM_VBLANK_DEFAULT_VREFRESH;
 341         }
 342
 343         private_vblank->connection = connection;
 344         private_vblank->vrefresh = vrefresh;
 345         private_vblank->HW_vblank_gap = 1.0 / private_vblank->vrefresh;
 346
 347         if (private_vblank->fps_changeable)
 348                 private_vblank->fps = vrefresh;
 349
 350         VIN("connection(%d) vrefresh(%d) fps(%d) fps_changeable(%d)",
 351                 private_vblank->connection,
 352                 private_vblank->vrefresh, private_vblank->fps, private_vblank->fps_changeable);
 353 }
 354
 355 static void
 356 _tdm_vblank_cb_output_change(tdm_output *output, tdm_output_change_type type,
 357                                                          tdm_value value, void *user_data)
 358 {
 359         tdm_private_vblank *private_vblank = user_data;
 360
 361         TDM_RETURN_IF_FAIL(private_vblank != NULL);
 362
 363         switch (type) {
 364         case TDM_OUTPUT_CHANGE_DPMS:
 365                 VIN("dpms %s", tdm_dpms_str(value.u32));
 366                 private_vblank->check_HW_or_SW = 1;
 367                 if (value.u32 != TDM_OUTPUT_DPMS_ON) {
 368                         if (private_vblank->enable_fake)
 369                                 _tdm_vblank_change_to_SW(private_vblank);
 370                         else
 371                                 _tdm_vblank_free_HW_wait(private_vblank, TDM_ERROR_DPMS_OFF, 1);
 372                 }
 373                 break;
 374         case TDM_OUTPUT_CHANGE_CONNECTION:
 375                 if (private_vblank->connection == value.u32)
 376                         break;
 377                 VIN("output %s", tdm_status_str(value.u32));
 378                 _tdm_vblank_update_output_info(private_vblank);
 379                 private_vblank->check_HW_or_SW = 1;
 380                 if (private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 381                         if (private_vblank->enable_fake)
 382                                 _tdm_vblank_change_to_SW(private_vblank);
 383                         else
 384                                 _tdm_vblank_free_HW_wait(private_vblank, TDM_ERROR_OUTPUT_DISCONNECTED, 1);
 385                 }
 386                 break;
 387         default:
 388                 break;
 389         }
 390 }
 391
 392 EXTERN tdm_error
 393 tdm_vblank_set_client_vblank_fps(unsigned int pid, const char *name, unsigned int fps)
 394 {
 395         tdm_private_vblank *v = NULL;
 396
 397         TDM_RETURN_VAL_IF_FAIL(pid > 0, TDM_ERROR_INVALID_PARAMETER);
 398         TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 399
 400         TDM_INFO("pid: %u, name: %s, fps: %d", pid, name, fps);
 401
 402         pthread_mutex_lock(&valid_list_lock);
 403         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 404                 struct wl_client *client;
 405                 pid_t client_pid = 0;
 406
 407                 if (!v->resource)
 408                         continue;
 409
 410                 client = wl_resource_get_client(v->resource);
 411                 if (!client)
 412                         continue;
 413
 414                 wl_client_get_credentials(client, &client_pid, NULL, NULL);
 415
 416                 if (client_pid != pid)
 417                         continue;
 418
 419                 if (name && strncmp(name, TDM_VBLANK_DEFAULT_NAME, TDM_NAME_LEN)) {
 420                         if (strncmp(v->name, name, TDM_NAME_LEN))
 421                                 continue;
 422                 }
 423
 424                 tdm_vblank_set_fps(v, fps);
 425
 426                 TDM_INFO("(pid:%u) '%s' fps changed: %d", pid, v->name, fps);
 427         }
 428         pthread_mutex_unlock(&valid_list_lock);
 429
 430         return TDM_ERROR_NONE;
 431 }
 432
 433 EXTERN tdm_error
 434 tdm_vblank_enable_global_fps(unsigned int enable, unsigned int fps)
 435 {
 436         tdm_private_vblank *v = NULL;
 437
 438         if (enable)
 439                 TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 440
 441         TDM_INFO("global fps: %s fps(%d)", (enable) ? "enabled" : "disabled", fps);
 442
 443         pthread_mutex_lock(&valid_list_lock);
 444
 445         vblank_global_fps = (enable) ? fps : 0;
 446
 447         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 448                 /* skip if vblank is created in server side */
 449                 if (!v->resource)
 450                         continue;
 451
 452                 v->check_HW_or_SW = 1;
 453         }
 454         pthread_mutex_unlock(&valid_list_lock);
 455
 456         return TDM_ERROR_NONE;
 457 }
 458
 459 EXTERN tdm_vblank *
 460 tdm_vblank_create(tdm_display *dpy, tdm_output *output, tdm_error *error)
 461 {
 462         tdm_private_vblank *private_vblank;
 463         tdm_error ret;
 464
 465         TDM_RETURN_VAL_IF_FAIL_WITH_ERROR(dpy != NULL, TDM_ERROR_INVALID_PARAMETER, NULL);
 466         TDM_RETURN_VAL_IF_FAIL_WITH_ERROR(output != NULL, TDM_ERROR_INVALID_PARAMETER, NULL);
 467
 468         if (error)
 469                 *error = TDM_ERROR_NONE;
 470
 471         if (!vblank_list_inited) {
 472                 if (pthread_mutex_init(&valid_list_lock, NULL)) {
 473                         TDM_ERR("mutex init failed: %m");
 474                         if (error)
 475                                 *error = TDM_ERROR_OPERATION_FAILED;
 476                         return NULL;
 477                 }
 478                 LIST_INITHEAD(&valid_vblank_list);
 479                 LIST_INITHEAD(&valid_wait_list);
 480                 vblank_list_inited = 1;
 481         }
 482
 483         private_vblank = calloc(1, sizeof * private_vblank);
 484         if (!private_vblank) {
 485                 if (error)
 486                         *error = TDM_ERROR_OUT_OF_MEMORY;
 487                 VER("alloc failed");
 488                 return NULL;
 489         }
 490
 491         tdm_output_add_change_handler(output, _tdm_vblank_cb_output_change, private_vblank);
 492
 493         private_vblank->stamp = ++stamp;
 494         private_vblank->owner_tid = syscall(SYS_gettid);
 495         private_vblank->dpy = dpy;
 496         private_vblank->output = output;
 497         private_vblank->check_HW_or_SW = 1;
 498         private_vblank->fps_changeable = 1;
 499
 500         _tdm_vblank_update_output_info(private_vblank);
 501
 502         strncpy(private_vblank->name, TDM_VBLANK_DEFAULT_NAME, TDM_NAME_LEN - 1);
 503         private_vblank->name[TDM_NAME_LEN - 1] = '\0';
 504
 505         LIST_INITHEAD(&private_vblank->HW_wait_list);
 506         LIST_INITHEAD(&private_vblank->SW_wait_list);
 507
 508         _tdm_vblank_valid_list_add(&private_vblank->valid_link, &valid_vblank_list);
 509
 510         VIN("created. vrefresh(%d) connection(%d)",
 511                 private_vblank->vrefresh, private_vblank->connection);
 512
 513         return (tdm_vblank *)private_vblank;
 514 }
 515
 516 EXTERN void
 517 tdm_vblank_destroy(tdm_vblank *vblank)
 518 {
 519         tdm_private_vblank *private_vblank = vblank;
 520         tdm_vblank_wait_info *w = NULL, *ww = NULL;
 521
 522         if (!private_vblank)
 523                 return;
 524
 525         _tdm_vblank_valid_list_del(&private_vblank->valid_link);
 526
 527         if (private_vblank->SW_timer) {
 528                 tdm_display_lock(private_vblank->dpy);
 529                 tdm_event_loop_source_remove(private_vblank->SW_timer);
 530                 tdm_display_unlock(private_vblank->dpy);
 531         }
 532
 533         tdm_output_remove_change_handler(private_vblank->output,
 534                                                                          _tdm_vblank_cb_output_change, private_vblank);
 535
 536         _tdm_vblank_free_HW_wait(private_vblank, 0, 0);
 537
 538         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->SW_wait_list, link) {
 539                 LIST_DEL(&w->link);
 540                 _tdm_vblank_valid_list_del(&w->valid_link);
 541                 free(w);
 542         }
 543
 544         VIN("destroyed");
 545
 546         free(private_vblank);
 547 }
 548
 549 EXTERN tdm_error
 550 tdm_vblank_set_name(tdm_vblank *vblank, const char *name)
 551 {
 552         tdm_private_vblank *private_vblank = vblank;
 553
 554         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 555
 556         if (!name)
 557                 name = TDM_VBLANK_DEFAULT_NAME;
 558
 559         strncpy(private_vblank->name, name, TDM_NAME_LEN - 1);
 560         private_vblank->name[TDM_NAME_LEN - 1] = '\0';
 561
 562         VIN("name(%s)", name);
 563
 564         return TDM_ERROR_NONE;
 565 }
 566
 567 EXTERN tdm_error
 568 tdm_vblank_get_name(tdm_vblank *vblank, const char **name)
 569 {
 570         tdm_private_vblank *private_vblank = vblank;
 571
 572         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 573         TDM_RETURN_VAL_IF_FAIL(name != NULL, TDM_ERROR_INVALID_PARAMETER);
 574
 575         *name = (const char*)private_vblank->name;
 576
 577         return TDM_ERROR_NONE;
 578 }
 579
 580 EXTERN tdm_error
 581 tdm_vblank_set_fps(tdm_vblank *vblank, unsigned int fps)
 582 {
 583         tdm_private_vblank *private_vblank = vblank;
 584
 585         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 586         TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 587
 588         if (private_vblank->fps != fps || private_vblank->fps_changeable)
 589                 VIN("fps(%d) fps_changeable(0)", fps);
 590
 591         private_vblank->fps_changeable = 0;
 592
 593         if (private_vblank->fps == fps)
 594                 return TDM_ERROR_NONE;
 595
 596         private_vblank->fps = fps;
 597         private_vblank->check_HW_or_SW = 1;
 598
 599         return TDM_ERROR_NONE;
 600 }
 601
 602 EXTERN tdm_error
 603 tdm_vblank_get_fps(tdm_vblank *vblank, unsigned int *fps)
 604 {
 605         tdm_private_vblank *private_vblank = vblank;
 606
 607         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 608         TDM_RETURN_VAL_IF_FAIL(fps != NULL, TDM_ERROR_INVALID_PARAMETER);
 609
 610         *fps = private_vblank->fps;
 611
 612         return TDM_ERROR_NONE;
 613 }
 614
 615 EXTERN tdm_error
 616 tdm_vblank_ignore_global_fps(tdm_vblank *vblank, unsigned int ignore)
 617 {
 618         tdm_private_vblank *private_vblank = vblank;
 619
 620         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 621
 622         if (private_vblank->ignore_global_fps == ignore)
 623                 return TDM_ERROR_NONE;
 624
 625         private_vblank->ignore_global_fps = ignore;
 626         private_vblank->check_HW_or_SW = 1;
 627
 628         VIN("ignore_global_fps(%d)", private_vblank->ignore_global_fps);
 629
 630         return TDM_ERROR_NONE;
 631 }
 632
 633 EXTERN tdm_error
 634 tdm_vblank_set_offset(tdm_vblank *vblank, int offset)
 635 {
 636         tdm_private_vblank *private_vblank = vblank;
 637
 638         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 639
 640         if (private_vblank->offset == offset)
 641                 return TDM_ERROR_NONE;
 642
 643         private_vblank->offset = offset;
 644         private_vblank->check_HW_or_SW = 1;
 645
 646         VIN("offset(%d)", private_vblank->offset);
 647
 648         return TDM_ERROR_NONE;
 649 }
 650
 651 EXTERN tdm_error
 652 tdm_vblank_get_offset(tdm_vblank *vblank, int *offset)
 653 {
 654         tdm_private_vblank *private_vblank = vblank;
 655
 656         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 657         TDM_RETURN_VAL_IF_FAIL(offset != NULL, TDM_ERROR_INVALID_PARAMETER);
 658
 659         *offset = private_vblank->offset;
 660
 661         return TDM_ERROR_NONE;
 662 }
 663
 664 EXTERN tdm_error
 665 tdm_vblank_set_enable_fake(tdm_vblank *vblank, unsigned int enable_fake)
 666 {
 667         tdm_private_vblank *private_vblank = vblank;
 668
 669         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 670
 671         if (private_vblank->enable_fake == enable_fake)
 672                 return TDM_ERROR_NONE;
 673
 674         private_vblank->enable_fake = enable_fake;
 675
 676         VIN("enable_fake(%d)", private_vblank->enable_fake);
 677
 678         return TDM_ERROR_NONE;
 679 }
 680
 681 EXTERN tdm_error
 682 tdm_vblank_get_enable_fake(tdm_vblank *vblank, unsigned int *enable_fake)
 683 {
 684         tdm_private_vblank *private_vblank = vblank;
 685
 686         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 687         TDM_RETURN_VAL_IF_FAIL(enable_fake != NULL, TDM_ERROR_INVALID_PARAMETER);
 688
 689         *enable_fake = private_vblank->enable_fake;
 690
 691         return TDM_ERROR_NONE;
 692 }
 693
 694 static tdm_error
 695 _tdm_vblank_sw_timer_update(tdm_private_vblank *private_vblank)
 696 {
 697         tdm_vblank_wait_info *first_wait_info = NULL;
 698         double curr, target;
 699         int ms_delay;
 700         tdm_error ret;
 701
 702         if (LIST_IS_EMPTY(&private_vblank->SW_wait_list)) {
 703                 VER("no wait_info");
 704                 return TDM_ERROR_OPERATION_FAILED;
 705         }
 706
 707         first_wait_info = container_of(private_vblank->SW_wait_list.next, first_wait_info, link);
 708         curr = tdm_helper_get_time();
 709         target = first_wait_info->target_time;
 710
 711         /* ms_delay should be more that 1 */
 712         if (target < curr)
 713                 ms_delay = 1;
 714         else
 715                 ms_delay = ceil((target - curr) * 1000.0);
 716
 717         if (ms_delay < 1)
 718                 ms_delay = 1;
 719
 720         if (ms_delay > 5000)
 721                 VER("wait(%p) curr(%.6f) target(%.6f) ms_delay(%d)", first_wait_info, curr, target, ms_delay);
 722         else
 723                 VDB("wait(%p) curr(%.6f) target(%.6f) ms_delay(%d)", first_wait_info, curr, target, ms_delay);
 724
 725         tdm_display_lock(private_vblank->dpy);
 726
 727         if (!private_vblank->SW_timer) {
 728                 private_vblank->SW_timer =
 729                         tdm_event_loop_add_timer_handler(private_vblank->dpy,
 730                                                                                          _tdm_vblank_cb_vblank_SW,
 731                                                                                          private_vblank,
 732                                                                                          &ret);
 733                 if (!private_vblank->SW_timer) {
 734                         tdm_display_unlock(private_vblank->dpy);
 735                         VER("couldn't add timer");
 736                         return ret;
 737                 }
 738                 VIN("Create SW timer");
 739         }
 740
 741         ret = tdm_event_loop_source_timer_update(private_vblank->SW_timer, ms_delay);
 742         if (ret != TDM_ERROR_NONE) {
 743                 tdm_display_unlock(private_vblank->dpy);
 744                 VER("couldn't update timer");
 745                 return ret;
 746         }
 747
 748         tdm_display_unlock(private_vblank->dpy);
 749
 750         return TDM_ERROR_NONE;
 751 }
 752
 753 static void
 754 _tdm_vblank_cb_vblank_HW(tdm_output *output, unsigned int sequence,
 755                                                  unsigned int tv_sec, unsigned int tv_usec,
 756                                                  void *user_data)
 757 {
 758         tdm_vblank_wait_info *wait_info = user_data;
 759         tdm_private_vblank *private_vblank;
 760
 761         if (!_tdm_vblank_check_valid_wait(wait_info)) {
 762                 TDM_DBG("can't find wait(%p) from valid_wait_list", wait_info);
 763                 return;
 764         }
 765
 766         private_vblank = wait_info->private_vblank;
 767         TDM_RETURN_IF_FAIL(private_vblank != NULL);
 768
 769         if (!_tdm_vblank_find_wait(wait_info, &private_vblank->HW_wait_list)) {
 770                 VDB("can't find wait(%p)", wait_info);
 771                 return;
 772         }
 773
 774         TDM_TRACE_ASYNC_END((int)wait_info->req_time, "TDM_HW_Vblank:%u", (unsigned int)private_vblank->stamp);
 775
 776         if (wait_info->type == VBLANK_TYPE_HW_SW) {
 777                 tdm_error ret;
 778
 779                 LIST_DEL(&wait_info->link);
 780
 781                 /* kernel sends the wrong time of first vblank event. and the time of
 782                  * second vblank is correct.
 783                  */
 784                 wait_info->target_time = TDM_TIME(tv_sec, tv_usec);
 785                 wait_info->target_time += (((double)private_vblank->offset) / 1000.0);
 786
 787                 _tdm_vblank_insert_wait(wait_info, &private_vblank->SW_wait_list);
 788
 789                 ret = _tdm_vblank_sw_timer_update(private_vblank);
 790
 791                 /* wait_info will be freed in _tdm_vblank_cb_vblank_SW() */
 792                 if (ret == TDM_ERROR_NONE) {
 793                         VDB("wait(%p) SW timer", wait_info);
 794                         return;
 795                 }
 796
 797                 VWR("couldn't update sw timer");
 798         }
 799
 800         LIST_DEL(&wait_info->link);
 801         _tdm_vblank_valid_list_del(&wait_info->valid_link);
 802
 803         /* tv_sec & tv_usec shouldn't be zero. But sometimes they are zero in some hardware.
 804          * We need to prohibit that last_time becomes zero because "last_time == 0" means
 805          * that a tdm_vblank object is just created and doesn't have the first vblank event.
 806          * If last_time becomes 0, it would make issue.
 807          */
 808         if (tv_sec == 0 && tv_usec == 0) {
 809                 double curr = tdm_helper_get_time();
 810                 tv_sec = TDM_TIME_SEC(curr);
 811                 tv_usec = TDM_TIME_USEC(curr);
 812         }
 813
 814         private_vblank->last_seq = wait_info->target_seq;
 815         private_vblank->last_time = TDM_TIME(tv_sec, tv_usec);
 816
 817         VDB("wait(%p) last(%.6f) sequence(%u) done", wait_info, private_vblank->last_time, wait_info->target_seq);
 818
 819         if (wait_info->func)
 820                 wait_info->func(private_vblank, TDM_ERROR_NONE, wait_info->target_seq,
 821                                                 tv_sec, tv_usec, wait_info->user_data);
 822
 823         free(wait_info);
 824 }
 825
 826 static tdm_error
 827 _tdm_vblank_wait_HW(tdm_vblank_wait_info *wait_info)
 828 {
 829         tdm_private_vblank *private_vblank = wait_info->private_vblank;
 830         int hw_interval;
 831         tdm_error ret;
 832
 833         if (private_vblank->last_type != VBLANK_EVENT_TYPE_HW) {
 834                 VIN("Use HW vblank");
 835                 private_vblank->last_type = VBLANK_EVENT_TYPE_HW;
 836         }
 837
 838         _tdm_vblank_insert_wait(wait_info, &private_vblank->HW_wait_list);
 839
 840         hw_interval = wait_info->interval * private_vblank->quotient;
 841
 842         if (private_vblank->last_time == 0) {
 843                 /* SW vblank starts from now. SW vblank doesn't need to be aligned with HW vblank. */
 844                 private_vblank->last_seq = 0;
 845                 private_vblank->last_time = tdm_helper_get_time();
 846
 847                 /* +1 ms to call the handler ASAP at the first. no matter for SW timer. */
 848                 wait_info->target_seq = 1;
 849
 850                 VDB("wait(%p) last(%.6f) hw_itvl(%d) targ_seq(%u)",
 851                         wait_info, private_vblank->last_time, hw_interval, wait_info->target_seq);
 852         } else {
 853                 double last, prev, req, curr, target;
 854                 unsigned int skip;
 855
 856                 last = private_vblank->last_time;
 857                 req = wait_info->req_time;
 858
 859                 /* make sure that req time is bigger than last. */
 860                 if (req < last)
 861                         req = last;
 862
 863                 skip = (unsigned int)((req - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
 864                 prev = last + private_vblank->vblank_gap * skip;
 865
 866                 curr = tdm_helper_get_time();
 867                 target = last;
 868                 while (target < curr)
 869                         target += (private_vblank->vblank_gap * wait_info->interval);
 870
 871                 hw_interval = (unsigned int)((target - curr) / private_vblank->HW_vblank_gap + TDM_TIME_MARGIN) + 1;
 872
 873                 wait_info->target_seq = private_vblank->last_seq;
 874                 wait_info->target_seq += (unsigned int)((target - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
 875
 876                 if (hw_interval > 300)
 877                         VER("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) hw_itvl(%d) targ_seq(%u)",
 878                                 wait_info, last, req - last, prev - last, curr - last, target, target - last,
 879                                 skip, hw_interval, wait_info->target_seq);
 880                 else
 881                         VDB("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) hw_itvl(%d) targ_seq(%u)",
 882                                 wait_info, last, req - last, prev - last, curr - last, target, target - last,
 883                                 skip, hw_interval, wait_info->target_seq);
 884         }
 885
 886         TDM_TRACE_ASYNC_BEGIN((int)wait_info->req_time, "TDM_HW_Vblank:%u", (unsigned int)private_vblank->stamp);
 887
 888         if (private_vblank->add_front)
 889                 ret = tdm_output_wait_vblank_add_front(private_vblank->output, hw_interval, 0,
 890                                                                                            _tdm_vblank_cb_vblank_HW, wait_info);
 891         else
 892                 ret = tdm_output_wait_vblank(private_vblank->output, hw_interval, 0,
 893                                                                          _tdm_vblank_cb_vblank_HW, wait_info);
 894
 895         if (ret != TDM_ERROR_NONE) {
 896                 LIST_DEL(&wait_info->link);
 897                 return ret;
 898         }
 899
 900         VDB("wait(%p) waiting", wait_info);
 901
 902         return TDM_ERROR_NONE;
 903 }
 904
 905 static tdm_error
 906 _tdm_vblank_cb_vblank_SW(void *user_data)
 907 {
 908         tdm_private_vblank *private_vblank = user_data;
 909
 910         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_OPERATION_FAILED);
 911
 912         return tdm_vblank_cb_vblank_SW(private_vblank, 0);
 913 }
 914
 915 INTERN tdm_error
 916 tdm_vblank_cb_vblank_SW(tdm_vblank *vblank, double vblank_stamp)
 917 {
 918         tdm_private_vblank *private_vblank;
 919         tdm_vblank_wait_info *first_wait_info = NULL, *w = NULL, *ww = NULL;
 920
 921         TDM_RETURN_VAL_IF_FAIL(vblank || vblank_stamp > 0, TDM_ERROR_INVALID_PARAMETER);
 922
 923         if (vblank)
 924                 private_vblank = vblank;
 925         else {
 926                 private_vblank = _tdm_vblank_find(vblank_stamp);
 927                 if (!private_vblank) {
 928                         TDM_DBG("can't find vblank(%.0f) from valid_list", vblank_stamp);
 929                         return TDM_ERROR_NONE;
 930                 }
 931         }
 932
 933         if (private_vblank->owner_tid != syscall(SYS_gettid)) {
 934                 tdm_thread_cb_vblank_sw vblank_sw;
 935                 tdm_private_display *private_display = private_vblank->dpy;
 936                 tdm_error ret;
 937
 938                 vblank_sw.base.type = TDM_THREAD_CB_VBLANK_SW;
 939                 vblank_sw.base.length = sizeof vblank_sw;
 940                 vblank_sw.vblank_stamp = private_vblank->stamp;
 941
 942                 ret = tdm_thread_send_cb(private_display->private_loop, &vblank_sw.base);
 943                 TDM_WARNING_IF_FAIL(ret == TDM_ERROR_NONE);
 944
 945                 return TDM_ERROR_NONE;
 946         }
 947
 948         if (LIST_IS_EMPTY(&private_vblank->SW_wait_list)) {
 949                 VER("no wait_info");
 950                 return TDM_ERROR_OPERATION_FAILED;
 951         }
 952
 953         first_wait_info = container_of(private_vblank->SW_wait_list.next, first_wait_info, link);
 954         TDM_RETURN_VAL_IF_FAIL(first_wait_info != NULL, TDM_ERROR_OPERATION_FAILED);
 955
 956         if (private_vblank->last_seq >= first_wait_info->target_seq)
 957                 TDM_ERR("last_seq(%u) target_seq(%u)", private_vblank->last_seq, first_wait_info->target_seq);
 958
 959         private_vblank->last_seq = first_wait_info->target_seq;
 960         private_vblank->last_time = first_wait_info->target_time;
 961
 962         VDB("wait(%p) last(%.6f) sequence(%u) done", first_wait_info, private_vblank->last_time, first_wait_info->target_seq);
 963
 964         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->SW_wait_list, link) {
 965                 if (w->target_time != first_wait_info->target_time)
 966                         break;
 967
 968                 TDM_TRACE_ASYNC_END((int)w->req_time, "TDM_SW_Vblank:%u", (unsigned int)private_vblank->stamp);
 969
 970                 LIST_DEL(&w->link);
 971                 _tdm_vblank_valid_list_del(&w->valid_link);
 972
 973                 if (w->func) {
 974                         tdm_display_unlock(private_vblank->dpy);
 975                         w->func(private_vblank, TDM_ERROR_NONE, w->target_seq,
 976                                         TDM_TIME_SEC(w->target_time), TDM_TIME_USEC(w->target_time),
 977                                         w->user_data);
 978                         tdm_display_lock(private_vblank->dpy);
 979                 }
 980
 981                 free(w);
 982         }
 983
 984         return TDM_ERROR_NONE;
 985 }
 986
 987 static tdm_error
 988 _tdm_vblank_wait_SW(tdm_vblank_wait_info *wait_info)
 989 {
 990         tdm_private_vblank *private_vblank = wait_info->private_vblank;
 991         tdm_error ret;
 992
 993         if (private_vblank->last_type != VBLANK_EVENT_TYPE_SW) {
 994                 VIN("Use SW vblank");
 995                 private_vblank->last_type = VBLANK_EVENT_TYPE_SW;
 996         }
 997
 998         if (private_vblank->last_time == 0) {
 999                 /* SW vblank starts from now. SW vblank doesn't need to be aligned with HW vblank. */
1000                 private_vblank->last_seq = 0;
1001                 private_vblank->last_time = tdm_helper_get_time();
1002
1003                 /* +1 ms to call the handler ASAP at the first. no matter for SW timer. */
1004                 wait_info->target_seq = 1;
1005                 wait_info->target_time = private_vblank->last_time + 0.001;
1006
1007                 VDB("wait(%p) last(%.6f) target(%.6f) target sequence(%u)",
1008                         wait_info, private_vblank->last_time, wait_info->target_time, wait_info->target_seq);
1009         } else {
1010                 double last, prev, req, curr, target;
1011                 unsigned int skip;
1012
1013                 last = private_vblank->last_time;
1014                 req = wait_info->req_time;
1015
1016                 /* make sure that req time is bigger than last. */
1017                 if (req < last)
1018                         req = last;
1019
1020                 skip = (unsigned int)((req - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
1021                 prev = last + private_vblank->vblank_gap * skip;
1022
1023                 curr = tdm_helper_get_time();
1024                 target = prev + private_vblank->vblank_gap * wait_info->interval;
1025
1026                 while (target < curr)
1027                         target += private_vblank->vblank_gap;
1028
1029                 wait_info->target_seq = private_vblank->last_seq;
1030                 wait_info->target_seq += (unsigned int)((target - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
1031
1032                 wait_info->target_time = target;
1033
1034                 VDB("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) targ_seq(%u)",
1035                         wait_info, last, req - last, prev - last, curr - last,
1036                         target, target - last, skip, wait_info->target_seq);
1037         }
1038
1039         _tdm_vblank_insert_wait(wait_info, &private_vblank->SW_wait_list);
1040
1041         TDM_TRACE_ASYNC_BEGIN((int)wait_info->req_time, "TDM_SW_Vblank:%u", (unsigned int)private_vblank->stamp);
1042
1043         ret = _tdm_vblank_sw_timer_update(private_vblank);
1044         if (ret != TDM_ERROR_NONE) {
1045                 LIST_DEL(&wait_info->link);
1046                 VER("couldn't update sw timer");
1047                 return ret;
1048         }
1049
1050         return TDM_ERROR_NONE;
1051 }
1052
1053 EXTERN tdm_error
1054 tdm_vblank_wait(tdm_vblank *vblank, unsigned int req_sec, unsigned int req_usec,
1055                                 unsigned int interval, tdm_vblank_handler func, void *user_data)
1056 {
1057         tdm_private_vblank *private_vblank = vblank;
1058         tdm_vblank_wait_info *wait_info;
1059         tdm_output_dpms dpms = TDM_OUTPUT_DPMS_OFF;
1060         unsigned int fps;
1061         tdm_error ret;
1062
1063         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1064         TDM_RETURN_VAL_IF_FAIL(func != NULL, TDM_ERROR_INVALID_PARAMETER);
1065
1066         if (private_vblank->owner_tid != syscall(SYS_gettid)) {
1067                 TDM_ERR("SHOULD be called in the owner thread(%d)", (int)private_vblank->owner_tid);
1068                 return TDM_ERROR_BAD_REQUEST;
1069         }
1070
1071         tdm_output_get_dpms(private_vblank->output, &dpms);
1072
1073         if (!private_vblank->enable_fake) {
1074                 if (private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
1075                         VER("can't wait a vblank: output disconnected");
1076                         return TDM_ERROR_OUTPUT_DISCONNECTED;
1077                 }
1078                 if (dpms != TDM_OUTPUT_DPMS_ON) {
1079                         VER("can't wait a vblank: DPMS off");
1080                         return TDM_ERROR_DPMS_OFF;
1081                 }
1082         }
1083
1084         wait_info = calloc(1, sizeof * wait_info);
1085         if (!wait_info) {
1086                 VER("alloc failed");
1087                 return TDM_ERROR_OUT_OF_MEMORY;
1088         }
1089
1090         /* set request time to current time if 0. This function seems to be called in server side. */
1091         if (req_sec == 0 && req_usec == 0) {
1092                 double curr = tdm_helper_get_time();
1093                 req_sec = TDM_TIME_SEC(curr);
1094                 req_usec = TDM_TIME_USEC(curr);
1095         }
1096
1097         LIST_INITHEAD(&wait_info->link);
1098
1099         _tdm_vblank_valid_list_add(&wait_info->valid_link, &valid_wait_list);
1100
1101         wait_info->stamp = ++stamp;
1102         wait_info->req_time = TDM_TIME(req_sec, req_usec);
1103         wait_info->interval = interval;
1104         wait_info->func = func;
1105         wait_info->user_data = user_data;
1106         wait_info->private_vblank = private_vblank;
1107
1108         if (private_vblank->ignore_global_fps ||
1109                 vblank_global_fps == 0 ||
1110                 private_vblank->fps < vblank_global_fps)
1111                 fps = private_vblank->fps;
1112         else
1113                 fps = vblank_global_fps;
1114
1115         if (private_vblank->check_HW_or_SW) {
1116                 private_vblank->check_HW_or_SW = 0;
1117                 private_vblank->vblank_gap = 1.0 / fps;
1118                 private_vblank->quotient = private_vblank->vrefresh / fps;
1119         }
1120
1121         /* 1) if fps != factor of vrefresh, SW timer
1122          * 2) if fps == factor of vrefresh && dpms == off, SW timer (Fake HW vblank)
1123          * 2) if fps == factor of vrefresh && dpms == on && offset == 0, HW vblank
1124          * 3) if fps == factor of vrefresh && dpms == on && offset != 0, HW vblank + SW timer
1125          * In case of 1), we really don't need to align with HW vblank.
1126          */
1127         if (private_vblank->vrefresh % fps)
1128                 wait_info->type = VBLANK_TYPE_SW;
1129         else if (dpms == TDM_OUTPUT_DPMS_OFF ||
1130                          private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED)
1131                 wait_info->type = VBLANK_TYPE_SW_FAKE;
1132         else if (private_vblank->offset == 0)
1133                 wait_info->type = VBLANK_TYPE_HW;
1134         else
1135                 wait_info->type = VBLANK_TYPE_HW_SW;
1136
1137         if (wait_info->type == VBLANK_TYPE_SW || wait_info->type == VBLANK_TYPE_SW_FAKE)
1138                 ret = _tdm_vblank_wait_SW(wait_info);
1139         else {
1140                 ret = _tdm_vblank_wait_HW(wait_info);
1141                 if (ret == TDM_ERROR_OUTPUT_DISCONNECTED || ret == TDM_ERROR_DPMS_OFF)
1142                         ret = _tdm_vblank_wait_SW(wait_info);
1143         }
1144
1145         if (ret != TDM_ERROR_NONE) {
1146                 LIST_DEL(&wait_info->link);
1147                 _tdm_vblank_valid_list_del(&wait_info->valid_link);
1148
1149                 tdm_display_lock(private_vblank->dpy);
1150                 tdm_output_remove_vblank_handler_internal(private_vblank->output, _tdm_vblank_cb_vblank_HW, wait_info);
1151                 tdm_display_unlock(private_vblank->dpy);
1152
1153                 free(wait_info);
1154                 return ret;
1155         }
1156
1157         return TDM_ERROR_NONE;
1158 }
1159
1160 EXTERN tdm_error
1161 tdm_vblank_wait_seq(tdm_vblank *vblank, unsigned int req_sec, unsigned int req_usec,
1162                                         unsigned int sequence, tdm_vblank_handler func, void *user_data)
1163 {
1164         tdm_private_vblank *private_vblank = vblank;
1165         unsigned int interval;
1166
1167         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1168         TDM_RETURN_VAL_IF_FAIL(func != NULL, TDM_ERROR_INVALID_PARAMETER);
1169
1170         /* if the sequence of vblank reaches the max value, sequence can be 0. */
1171
1172         if (private_vblank->last_seq == 0) {
1173                 TDM_WRN("can't calculate interval with sequence(%u)", sequence);
1174                 interval = 1;
1175         } else if (sequence > private_vblank->last_seq ||
1176                            TDM_VBLANK_SEQ_REACHED_MAX(sequence, private_vblank->last_seq)) {
1177                 double last, curr, seq_target;
1178
1179                 last = private_vblank->last_time;
1180                 curr = tdm_helper_get_time();
1181                 seq_target = last + private_vblank->vblank_gap * (sequence - private_vblank->last_seq);
1182
1183                 /* If target is old or too close(1ms) to current, we call the handler immediately.
1184                  * 2ms? it seems too much.
1185                  */
1186                 if (seq_target < curr) {
1187                         func(vblank, TDM_ERROR_NONE, sequence,
1188                                  TDM_TIME_SEC(seq_target), TDM_TIME_USEC(seq_target),
1189                                  user_data);
1190                         return TDM_ERROR_NONE;
1191                 } else if ((seq_target - curr) < 0.001) {  /* 1ms */
1192                         func(vblank, TDM_ERROR_NONE, sequence,
1193                                  TDM_TIME_SEC(curr), TDM_TIME_USEC(curr),
1194                                  user_data);
1195                         return TDM_ERROR_NONE;
1196                 }
1197
1198                 interval = (unsigned int)((seq_target - curr) / private_vblank->vblank_gap + TDM_TIME_MARGIN) + 1;
1199         } else {
1200                 /* this seems error. But we handle this like normal to avoid the unexpected error in cliend side */
1201                 TDM_WRN("sequence(%u) should be over the last sequence(%u)", sequence, private_vblank->last_seq);
1202                 func(vblank, TDM_ERROR_NONE, private_vblank->last_seq,
1203                          TDM_TIME_SEC(private_vblank->last_time), TDM_TIME_USEC(private_vblank->last_time),
1204                          user_data);
1205                 return TDM_ERROR_NONE;
1206         }
1207
1208         return tdm_vblank_wait(vblank, req_sec, req_usec, interval, func, user_data);
1209 }
1210
1211 INTERN tdm_error
1212 tdm_vblank_set_add_front(tdm_vblank *vblank, unsigned int add_front)
1213 {
1214         tdm_private_vblank *private_vblank = vblank;
1215
1216         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1217
1218         TDM_RETURN_VAL_IF_FAIL(TDM_MUTEX_IS_LOCKED(), TDM_ERROR_OPERATION_FAILED);
1219
1220         if (private_vblank->add_front == add_front)
1221                 return TDM_ERROR_NONE;
1222
1223         private_vblank->add_front = add_front;
1224
1225         return TDM_ERROR_NONE;
1226 }
1227
1228 INTERN tdm_error
1229 tdm_vblank_set_resource(tdm_vblank *vblank, struct wl_resource *resource)
1230 {
1231         tdm_private_vblank *private_vblank = vblank;
1232
1233         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1234         TDM_RETURN_VAL_IF_FAIL(private_vblank->resource == NULL, TDM_ERROR_OPERATION_FAILED);
1235
1236         private_vblank->resource = resource;
1237
1238         return TDM_ERROR_NONE;
1239 }
1240
1241 INTERN double
1242 tdm_vblank_get_stamp(tdm_vblank *vblank)
1243 {
1244         tdm_private_vblank *private_vblank = vblank;
1245
1246         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1247
1248         return private_vblank->stamp;
1249 }
1250
1251 INTERN void
1252 tdm_vblank_get_vblank_list_information(tdm_display *dpy, char *reply, int *len)
1253 {
1254         tdm_private_vblank *v = NULL;
1255
1256         TDM_SNPRINTF(reply, len, "[Client Vblank List]\n");
1257         TDM_SNPRINTF(reply, len, "* global fps: %u\n", vblank_global_fps);
1258         TDM_SNPRINTF(reply, len, "---------------------------------------------------------------\n");
1259         TDM_SNPRINTF(reply, len, "name         fps ignore offset fake process\n");
1260         TDM_SNPRINTF(reply, len, "---------------------------------------------------------------\n");
1261
1262         pthread_mutex_lock(&valid_list_lock);
1263         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
1264                 const char *proc_name = NULL;
1265                 pid_t pid = 0;
1266
1267                 if (v->resource) {
1268                         struct wl_client *client = wl_resource_get_client(v->resource);
1269                         if (client) {
1270                                 wl_client_get_credentials(client, &pid, NULL, NULL);
1271                                 proc_name = tdm_server_get_client_name(pid);
1272                         }
1273                 }
1274
1275                 TDM_SNPRINTF(reply, len, "%-12s %u  %u     %d      %u    %s (pid: %u)\n",
1276                                          v->name, v->fps, v->ignore_global_fps, v->offset, v->enable_fake,
1277                                          (proc_name) ? proc_name : "Unknown", pid);
1278         }
1279         pthread_mutex_unlock(&valid_list_lock);
1280
1281         TDM_SNPRINTF(reply, len, "\n");
1282 }
1283