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...)   TDM_INFO("[%p] "fmt, private_vblank, ##arg)
  75 #define VDB(fmt, arg...)   TDM_DBG("[%p] "fmt, private_vblank, ##arg)
  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 struct _tdm_vblank_wait_info tdm_vblank_wait_info;
  85
  86 typedef struct _tdm_private_vblank {
  87         struct list_head valid_link;
  88
  89         double stamp;
  90         pid_t owner_tid;
  91
  92         tdm_display *dpy;
  93         tdm_output *output;
  94         tdm_output_conn_status connection;
  95         tdm_output_dpms dpms;
  96         unsigned int vrefresh;
  97
  98         unsigned int check_HW_or_SW;
  99         char name[TDM_NAME_LEN];
 100         unsigned int fps;
 101         unsigned int fps_changeable;
 102         int offset;
 103         unsigned int enable_fake;
 104         unsigned int ignore_global_fps;
 105
 106         double vblank_gap;
 107         unsigned int quotient;
 108
 109         unsigned int last_seq;
 110         double last_time;
 111
 112         unsigned int add_front;
 113         struct wl_resource *resource;
 114
 115         /* for HW */
 116         double HW_vblank_gap;
 117         struct list_head HW_wait_list;
 118
 119         /* for SW */
 120         tdm_event_loop_source *SW_timer;
 121         struct list_head SW_wait_list;
 122 } tdm_private_vblank;
 123
 124 struct _tdm_vblank_wait_info {
 125         struct list_head link;
 126         struct list_head valid_link;
 127
 128         double stamp;
 129
 130         double req_time;
 131         unsigned int interval;
 132
 133         tdm_vblank_handler func;
 134         void *user_data;
 135         tdm_private_vblank *private_vblank;
 136
 137         tdm_vblank_wait_type type;
 138
 139         double target_time;
 140         unsigned int target_seq;
 141 };
 142
 143 /* valid_vblank_list and valid_wait_list should be protected by valid_list_lock because
 144  * tdm_vblank can be used in multi-thread.
 145  */
 146 static pthread_mutex_t valid_list_lock;
 147 static struct list_head valid_vblank_list;
 148 static struct list_head valid_wait_list;
 149 static unsigned int vblank_list_inited;
 150 static unsigned int vblank_global_fps;
 151 static double stamp = 0;
 152
 153 static tdm_error _tdm_vblank_cb_vblank_SW(void *user_data);
 154 static tdm_error _tdm_vblank_wait_SW(tdm_vblank_wait_info *wait_info);
 155 static void _tdm_vblank_cb_vblank_HW(tdm_output *output, unsigned int sequence,
 156                                                                          unsigned int tv_sec, unsigned int tv_usec,
 157                                                                          void *user_data);
 158
 159 #if 0
 160 static void
 161 _print_list(struct list_head *list)
 162 {
 163         tdm_vblank_wait_info *w = NULL;
 164
 165         LIST_FOR_EACH_ENTRY(w, list, link) {
 166                 printf(" %d", w->interval);
 167         }
 168         printf("\n");
 169 }
 170 #endif
 171
 172 static void
 173 _tdm_vblank_valid_list_add(struct list_head *valid_link, struct list_head *valid_list)
 174 {
 175         pthread_mutex_lock(&valid_list_lock);
 176         LIST_ADDTAIL(valid_link, valid_list);
 177         pthread_mutex_unlock(&valid_list_lock);
 178 }
 179
 180 static void
 181 _tdm_vblank_valid_list_del(struct list_head *valid_link)
 182 {
 183         pthread_mutex_lock(&valid_list_lock);
 184         LIST_DEL(valid_link);
 185         pthread_mutex_unlock(&valid_list_lock);
 186 }
 187
 188 static inline tdm_private_vblank*
 189 _tdm_vblank_find(double vblank_stamp)
 190 {
 191         tdm_private_vblank *v = NULL;
 192
 193         if (!vblank_stamp)
 194                 return 0;
 195
 196         pthread_mutex_lock(&valid_list_lock);
 197         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 198                 if (v->stamp == vblank_stamp) {
 199                         pthread_mutex_unlock(&valid_list_lock);
 200                         return v;
 201                 }
 202         }
 203         pthread_mutex_unlock(&valid_list_lock);
 204
 205         return 0;
 206 }
 207
 208 static inline unsigned int
 209 _tdm_vblank_check_valid_wait(tdm_vblank_wait_info *wait_info)
 210 {
 211         tdm_vblank_wait_info *w = NULL;
 212
 213         if (!wait_info)
 214                 return 0;
 215
 216         pthread_mutex_lock(&valid_list_lock);
 217         LIST_FOR_EACH_ENTRY(w, &valid_wait_list, valid_link) {
 218                 if (w == wait_info) {
 219                         pthread_mutex_unlock(&valid_list_lock);
 220                         return 1;
 221                 }
 222         }
 223         pthread_mutex_unlock(&valid_list_lock);
 224
 225         return 0;
 226 }
 227
 228 static inline unsigned int
 229 _tdm_vblank_find_wait(tdm_vblank_wait_info *wait_info, struct list_head *list)
 230 {
 231         tdm_vblank_wait_info *w = NULL;
 232
 233         if (!wait_info)
 234                 return 0;
 235
 236         LIST_FOR_EACH_ENTRY(w, list, link) {
 237                 if (w->stamp == wait_info->stamp)
 238                         return 1;
 239         }
 240
 241         return 0;
 242 }
 243
 244 static inline void
 245 _tdm_vblank_insert_wait(tdm_vblank_wait_info *wait_info, struct list_head *list)
 246 {
 247         tdm_vblank_wait_info *w = NULL;
 248         tdm_vblank_wait_info *found = NULL;
 249
 250         if (LIST_IS_EMPTY(list)) {
 251                 LIST_ADDTAIL(&wait_info->link, list);
 252                 return;
 253         }
 254
 255         LIST_FOR_EACH_ENTRY(w, list, link) {
 256                 if (wait_info->type == VBLANK_TYPE_SW) {
 257                         if (wait_info->target_time == 0)
 258                                 TDM_NEVER_GET_HERE();
 259                         if (w->target_time <= wait_info->target_time) {
 260                                 found = w;
 261                                 continue;
 262                         }
 263                 } else {
 264                         if (w->interval <= wait_info->interval) {
 265                                 found = w;
 266                                 continue;
 267                         }
 268                 }
 269         }
 270
 271         if (found)
 272                 LIST_ADD(&wait_info->link, &found->link);
 273         else
 274                 LIST_ADDTAIL(&wait_info->link, list->next);
 275 }
 276
 277 static void
 278 _tdm_vblank_change_to_SW(tdm_private_vblank *private_vblank)
 279 {
 280         tdm_vblank_wait_info *w = NULL, *ww = NULL;
 281
 282         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->HW_wait_list, link) {
 283                 LIST_DEL(&w->link);
 284
 285                 tdm_display_lock(private_vblank->dpy);
 286                 tdm_output_remove_vblank_handler_internal(private_vblank->output, _tdm_vblank_cb_vblank_HW, w);
 287                 tdm_display_unlock(private_vblank->dpy);
 288
 289                 w->type = VBLANK_TYPE_SW_FAKE;
 290                 _tdm_vblank_wait_SW(w);
 291         }
 292 }
 293
 294 static void
 295 _tdm_vblank_free_HW_wait(tdm_private_vblank *private_vblank, tdm_error error, unsigned int call_cb)
 296 {
 297         tdm_vblank_wait_info *w = NULL, *ww = NULL;
 298
 299         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->HW_wait_list, link) {
 300                 LIST_DEL(&w->link);
 301                 _tdm_vblank_valid_list_del(&w->valid_link);
 302
 303                 tdm_display_lock(private_vblank->dpy);
 304                 tdm_output_remove_vblank_handler_internal(private_vblank->output, _tdm_vblank_cb_vblank_HW, w);
 305                 tdm_display_unlock(private_vblank->dpy);
 306
 307                 if (call_cb && w->func)
 308                         w->func(private_vblank, error, 0, 0, 0, w->user_data);
 309
 310                 free(w);
 311         }
 312 }
 313
 314 static void
 315 _tdm_vblank_update_output_info(tdm_private_vblank *private_vblank)
 316 {
 317         tdm_output *output = private_vblank->output;
 318         tdm_output_conn_status connection = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 319         tdm_output_dpms dpms = TDM_OUTPUT_DPMS_OFF;
 320         unsigned int vrefresh = 0;
 321
 322         tdm_output_get_conn_status(output, &connection);
 323
 324         if (connection != TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 325                 const tdm_output_mode *mode = NULL;
 326                 tdm_output_get_mode(output, &mode);
 327                 vrefresh = (mode) ? mode->vrefresh : 0;
 328                 tdm_output_get_dpms(output, &dpms);
 329         }
 330
 331         if (vrefresh == 0)
 332                 vrefresh = TDM_VBLANK_DEFAULT_VREFRESH;
 333
 334         private_vblank->dpms = dpms;
 335         private_vblank->connection = connection;
 336         private_vblank->vrefresh = vrefresh;
 337         private_vblank->HW_vblank_gap = 1.0 / private_vblank->vrefresh;
 338
 339         if (private_vblank->fps_changeable)
 340                 private_vblank->fps = vrefresh;
 341
 342         VDB("dpms(%d) connection(%d) vrefresh(%d) fps(%d)",
 343                 private_vblank->dpms, private_vblank->connection,
 344                 private_vblank->vrefresh, private_vblank->fps);
 345 }
 346
 347 static void
 348 _tdm_vblank_cb_output_change(tdm_output *output, tdm_output_change_type type,
 349                                                          tdm_value value, void *user_data)
 350 {
 351         tdm_private_vblank *private_vblank = user_data;
 352
 353         TDM_RETURN_IF_FAIL(private_vblank != NULL);
 354
 355         switch (type) {
 356         case TDM_OUTPUT_CHANGE_DPMS:
 357                 if (private_vblank->dpms == value.u32)
 358                         break;
 359                 VDB("dpms %s", tdm_dpms_str(value.u32));
 360                 _tdm_vblank_update_output_info(private_vblank);
 361                 private_vblank->check_HW_or_SW = 1;
 362                 if (private_vblank->dpms != TDM_OUTPUT_DPMS_ON) {
 363                         if (private_vblank->enable_fake)
 364                                 _tdm_vblank_change_to_SW(private_vblank);
 365                         else
 366                                 _tdm_vblank_free_HW_wait(private_vblank, TDM_ERROR_DPMS_OFF, 1);
 367                 }
 368                 break;
 369         case TDM_OUTPUT_CHANGE_CONNECTION:
 370                 if (private_vblank->connection == value.u32)
 371                         break;
 372                 VDB("output %s", tdm_status_str(value.u32));
 373                 _tdm_vblank_update_output_info(private_vblank);
 374                 private_vblank->check_HW_or_SW = 1;
 375                 if (private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 376                         if (private_vblank->enable_fake)
 377                                 _tdm_vblank_change_to_SW(private_vblank);
 378                         else
 379                                 _tdm_vblank_free_HW_wait(private_vblank, TDM_ERROR_OUTPUT_DISCONNECTED, 1);
 380                 }
 381                 break;
 382         default:
 383                 break;
 384         }
 385 }
 386
 387 EXTERN tdm_error
 388 tdm_vblank_set_client_vblank_fps(unsigned int pid, const char *name, unsigned int fps)
 389 {
 390         tdm_private_vblank *v = NULL;
 391
 392         TDM_RETURN_VAL_IF_FAIL(pid > 0, TDM_ERROR_INVALID_PARAMETER);
 393         TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 394
 395         TDM_INFO("pid: %u, name: %s, fps: %d", pid, name, fps);
 396
 397         pthread_mutex_lock(&valid_list_lock);
 398         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 399                 struct wl_client *client;
 400                 pid_t client_pid = 0;
 401
 402                 if (!v->resource)
 403                         continue;
 404
 405                 client = wl_resource_get_client(v->resource);
 406                 if (!client)
 407                         continue;
 408
 409                 wl_client_get_credentials(client, &client_pid, NULL, NULL);
 410
 411                 if (client_pid != pid)
 412                         continue;
 413
 414                 if (name && strncmp(name, TDM_VBLANK_DEFAULT_NAME, TDM_NAME_LEN)) {
 415                         if (strncmp(v->name, name, TDM_NAME_LEN))
 416                                 continue;
 417                 }
 418
 419                 tdm_vblank_set_fps(v, fps);
 420
 421                 TDM_INFO("(pid:%u) '%s' fps changed: %d", pid, v->name, fps);
 422         }
 423         pthread_mutex_unlock(&valid_list_lock);
 424
 425         return TDM_ERROR_NONE;
 426 }
 427
 428 EXTERN tdm_error
 429 tdm_vblank_enable_global_fps(unsigned int enable, unsigned int fps)
 430 {
 431         tdm_private_vblank *v = NULL;
 432
 433         if (enable)
 434                 TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 435
 436         TDM_INFO("global fps: %s fps(%d)", (enable) ? "enabled" : "disabled", fps);
 437
 438         pthread_mutex_lock(&valid_list_lock);
 439
 440         vblank_global_fps = (enable) ? fps : 0;
 441
 442         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 443                 /* skip if vblank is created in server side */
 444                 if (!v->resource)
 445                         continue;
 446
 447                 v->check_HW_or_SW = 1;
 448         }
 449         pthread_mutex_unlock(&valid_list_lock);
 450
 451         return TDM_ERROR_NONE;
 452 }
 453
 454 EXTERN tdm_vblank *
 455 tdm_vblank_create(tdm_display *dpy, tdm_output *output, tdm_error *error)
 456 {
 457         tdm_private_vblank *private_vblank;
 458         tdm_error ret;
 459
 460         TDM_RETURN_VAL_IF_FAIL_WITH_ERROR(dpy != NULL, TDM_ERROR_INVALID_PARAMETER, NULL);
 461         TDM_RETURN_VAL_IF_FAIL_WITH_ERROR(output != NULL, TDM_ERROR_INVALID_PARAMETER, NULL);
 462
 463         if (error)
 464                 *error = TDM_ERROR_NONE;
 465
 466         if (!vblank_list_inited) {
 467                 if (pthread_mutex_init(&valid_list_lock, NULL)) {
 468                         TDM_ERR("mutex init failed: %m");
 469                         if (error)
 470                                 *error = TDM_ERROR_OPERATION_FAILED;
 471                         return NULL;
 472                 }
 473                 LIST_INITHEAD(&valid_vblank_list);
 474                 LIST_INITHEAD(&valid_wait_list);
 475                 vblank_list_inited = 1;
 476         }
 477
 478         private_vblank = calloc(1, sizeof * private_vblank);
 479         if (!private_vblank) {
 480                 if (error)
 481                         *error = TDM_ERROR_OUT_OF_MEMORY;
 482                 VER("alloc failed");
 483                 return NULL;
 484         }
 485
 486         tdm_output_add_change_handler(output, _tdm_vblank_cb_output_change, private_vblank);
 487
 488         private_vblank->stamp = ++stamp;
 489         private_vblank->owner_tid = syscall(SYS_gettid);
 490         private_vblank->dpy = dpy;
 491         private_vblank->output = output;
 492         private_vblank->check_HW_or_SW = 1;
 493         private_vblank->fps_changeable = 1;
 494
 495         _tdm_vblank_update_output_info(private_vblank);
 496
 497         strncpy(private_vblank->name, TDM_VBLANK_DEFAULT_NAME, TDM_NAME_LEN - 1);
 498         private_vblank->name[TDM_NAME_LEN - 1] = '\0';
 499
 500         LIST_INITHEAD(&private_vblank->HW_wait_list);
 501         LIST_INITHEAD(&private_vblank->SW_wait_list);
 502
 503         _tdm_vblank_valid_list_add(&private_vblank->valid_link, &valid_vblank_list);
 504
 505         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 506                 VIN("created. vrefresh(%d) dpms(%d) connection(%d)",
 507                         private_vblank->vrefresh, private_vblank->dpms, private_vblank->connection);
 508
 509         return (tdm_vblank *)private_vblank;
 510 }
 511
 512 EXTERN void
 513 tdm_vblank_destroy(tdm_vblank *vblank)
 514 {
 515         tdm_private_vblank *private_vblank = vblank;
 516         tdm_vblank_wait_info *w = NULL, *ww = NULL;
 517
 518         if (!private_vblank)
 519                 return;
 520
 521         _tdm_vblank_valid_list_del(&private_vblank->valid_link);
 522
 523         if (private_vblank->SW_timer) {
 524                 tdm_display_lock(private_vblank->dpy);
 525                 tdm_event_loop_source_remove(private_vblank->SW_timer);
 526                 tdm_display_unlock(private_vblank->dpy);
 527         }
 528
 529         tdm_output_remove_change_handler(private_vblank->output,
 530                                                                          _tdm_vblank_cb_output_change, private_vblank);
 531
 532         _tdm_vblank_free_HW_wait(private_vblank, 0, 0);
 533
 534         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->SW_wait_list, link) {
 535                 LIST_DEL(&w->link);
 536                 _tdm_vblank_valid_list_del(&w->valid_link);
 537                 free(w);
 538         }
 539
 540         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 541                 VIN("destroyed");
 542
 543         free(private_vblank);
 544 }
 545
 546 EXTERN tdm_error
 547 tdm_vblank_set_name(tdm_vblank *vblank, const char *name)
 548 {
 549         tdm_private_vblank *private_vblank = vblank;
 550
 551         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 552
 553         if (!name)
 554                 name = TDM_VBLANK_DEFAULT_NAME;
 555
 556         strncpy(private_vblank->name, name, TDM_NAME_LEN - 1);
 557         private_vblank->name[TDM_NAME_LEN - 1] = '\0';
 558
 559         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 560                 VIN("name(%s)", name);
 561
 562         return TDM_ERROR_NONE;
 563 }
 564
 565 EXTERN tdm_error
 566 tdm_vblank_get_name(tdm_vblank *vblank, const char **name)
 567 {
 568         tdm_private_vblank *private_vblank = vblank;
 569
 570         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 571         TDM_RETURN_VAL_IF_FAIL(name != NULL, TDM_ERROR_INVALID_PARAMETER);
 572
 573         *name = (const char*)private_vblank->name;
 574
 575         return TDM_ERROR_NONE;
 576 }
 577
 578 EXTERN tdm_error
 579 tdm_vblank_set_fps(tdm_vblank *vblank, unsigned int fps)
 580 {
 581         tdm_private_vblank *private_vblank = vblank;
 582
 583         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 584         TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 585
 586         if (private_vblank->fps == fps)
 587                 return TDM_ERROR_NONE;
 588
 589         private_vblank->fps = fps;
 590         private_vblank->fps_changeable = 0;
 591         private_vblank->check_HW_or_SW = 1;
 592
 593         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 594                 VIN("fps(%d)", private_vblank->fps);
 595
 596         return TDM_ERROR_NONE;
 597 }
 598
 599 EXTERN tdm_error
 600 tdm_vblank_get_fps(tdm_vblank *vblank, unsigned int *fps)
 601 {
 602         tdm_private_vblank *private_vblank = vblank;
 603
 604         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 605         TDM_RETURN_VAL_IF_FAIL(fps != NULL, TDM_ERROR_INVALID_PARAMETER);
 606
 607         *fps = private_vblank->fps;
 608
 609         return TDM_ERROR_NONE;
 610 }
 611
 612 EXTERN tdm_error
 613 tdm_vblank_ignore_global_fps(tdm_vblank *vblank, unsigned int ignore)
 614 {
 615         tdm_private_vblank *private_vblank = vblank;
 616
 617         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 618
 619         if (private_vblank->ignore_global_fps == ignore)
 620                 return TDM_ERROR_NONE;
 621
 622         private_vblank->ignore_global_fps = ignore;
 623         private_vblank->check_HW_or_SW = 1;
 624
 625         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 626                 VIN("ignore_global_fps(%d)", private_vblank->ignore_global_fps);
 627
 628         return TDM_ERROR_NONE;
 629 }
 630
 631 EXTERN tdm_error
 632 tdm_vblank_set_offset(tdm_vblank *vblank, int offset)
 633 {
 634         tdm_private_vblank *private_vblank = vblank;
 635
 636         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 637
 638         if (private_vblank->offset == offset)
 639                 return TDM_ERROR_NONE;
 640
 641         private_vblank->offset = offset;
 642         private_vblank->check_HW_or_SW = 1;
 643
 644         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 645                 VIN("offset(%d)", private_vblank->offset);
 646
 647         return TDM_ERROR_NONE;
 648 }
 649
 650 EXTERN tdm_error
 651 tdm_vblank_get_offset(tdm_vblank *vblank, int *offset)
 652 {
 653         tdm_private_vblank *private_vblank = vblank;
 654
 655         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 656         TDM_RETURN_VAL_IF_FAIL(offset != NULL, TDM_ERROR_INVALID_PARAMETER);
 657
 658         *offset = private_vblank->offset;
 659
 660         return TDM_ERROR_NONE;
 661 }
 662
 663 EXTERN tdm_error
 664 tdm_vblank_set_enable_fake(tdm_vblank *vblank, unsigned int enable_fake)
 665 {
 666         tdm_private_vblank *private_vblank = vblank;
 667
 668         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
 669
 670         if (private_vblank->enable_fake == enable_fake)
 671                 return TDM_ERROR_NONE;
 672
 673         private_vblank->enable_fake = enable_fake;
 674
 675         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 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 if (tdm_debug_module & TDM_DEBUG_VBLANK)
 723                 VIN("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("Use SW vblank");
 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         if (wait_info->type == VBLANK_TYPE_HW_SW) {
 775                 tdm_error ret;
 776
 777                 LIST_DEL(&wait_info->link);
 778
 779                 /* kernel sends the wrong time of first vblank event. and the time of
 780                  * second vblank is correct.
 781                  */
 782                 wait_info->target_time = TDM_TIME(tv_sec, tv_usec);
 783                 wait_info->target_time += (((double)private_vblank->offset) / 1000.0);
 784
 785                 _tdm_vblank_insert_wait(wait_info, &private_vblank->SW_wait_list);
 786
 787                 ret = _tdm_vblank_sw_timer_update(private_vblank);
 788
 789                 /* wait_info will be freed in _tdm_vblank_cb_vblank_SW() */
 790                 if (ret == TDM_ERROR_NONE) {
 791                         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 792                                 VIN("wait(%p) SW timer", wait_info);
 793                         return;
 794                 }
 795
 796                 VWR("couldn't update sw timer");
 797         }
 798
 799         /* tv_sec & tv_usec shouldn't be zero. But sometimes they are zero in some hardware.
 800          * We need to prohibit that last_time becomes zero because "last_time == 0" means
 801          * that a tdm_vblank object is just created and doesn't have the first vblank event.
 802          * If last_time becomes 0, it would make issue.
 803          */
 804         if (tv_sec == 0 && tv_usec == 0) {
 805                 double curr = tdm_helper_get_time();
 806                 tv_sec = TDM_TIME_SEC(curr);
 807                 tv_usec = TDM_TIME_USEC(curr);
 808         }
 809
 810         private_vblank->last_seq = wait_info->target_seq;
 811         private_vblank->last_time = TDM_TIME(tv_sec, tv_usec);
 812
 813         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 814                 VIN("wait(%p) last(%.6f) sequence(%u) done", wait_info, private_vblank->last_time, wait_info->target_seq);
 815
 816         if (wait_info->func)
 817                 wait_info->func(private_vblank, TDM_ERROR_NONE, wait_info->target_seq,
 818                                                 tv_sec, tv_usec, wait_info->user_data);
 819
 820         LIST_DEL(&wait_info->link);
 821         _tdm_vblank_valid_list_del(&wait_info->valid_link);
 822         free(wait_info);
 823 }
 824
 825 static tdm_error
 826 _tdm_vblank_wait_HW(tdm_vblank_wait_info *wait_info)
 827 {
 828         tdm_private_vblank *private_vblank = wait_info->private_vblank;
 829         int hw_interval;
 830         tdm_error ret;
 831
 832         _tdm_vblank_insert_wait(wait_info, &private_vblank->HW_wait_list);
 833
 834         hw_interval = wait_info->interval * private_vblank->quotient;
 835
 836         if (private_vblank->last_time == 0) {
 837                 /* SW vblank starts from now. SW vblank doesn't need to be aligned with HW vblank. */
 838                 private_vblank->last_seq = 0;
 839                 private_vblank->last_time = tdm_helper_get_time();
 840
 841                 /* +1 ms to call the handler ASAP at the first. no matter for SW timer. */
 842                 wait_info->target_seq = 1;
 843                 if (tdm_debug_module & TDM_DEBUG_VBLANK)
 844                         VIN("wait(%p) last(%.6f) hw_itvl(%d) targ_seq(%u)",
 845                                 wait_info, private_vblank->last_time, hw_interval, wait_info->target_seq);
 846         } else {
 847                 double last, prev, req, curr, target;
 848                 unsigned int skip;
 849
 850                 last = private_vblank->last_time;
 851                 req = wait_info->req_time;
 852
 853                 /* make sure that req time is bigger than last. */
 854                 if (req < last)
 855                         req = last;
 856
 857                 skip = (unsigned int)((req - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
 858                 prev = last + private_vblank->vblank_gap * skip;
 859
 860                 curr = tdm_helper_get_time();
 861                 target = last;
 862                 while (target < curr)
 863                         target += (private_vblank->vblank_gap * wait_info->interval);
 864
 865                 hw_interval = (unsigned int)((target - curr) / private_vblank->HW_vblank_gap + TDM_TIME_MARGIN) + 1;
 866
 867                 wait_info->target_seq = private_vblank->last_seq;
 868                 wait_info->target_seq += (unsigned int)((target - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
 869
 870                 if (hw_interval > 300)
 871                         VER("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) hw_itvl(%d) targ_seq(%u)",
 872                                 wait_info, last, req - last, prev - last, curr - last, target, target - last,
 873                                 skip, hw_interval, wait_info->target_seq);
 874                 else if (tdm_debug_module & TDM_DEBUG_VBLANK)
 875                         VIN("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) hw_itvl(%d) targ_seq(%u)",
 876                                 wait_info, last, req - last, prev - last, curr - last, target, target - last,
 877                                 skip, hw_interval, wait_info->target_seq);
 878         }
 879
 880         if (private_vblank->add_front)
 881                 ret = tdm_output_wait_vblank_add_front(private_vblank->output, hw_interval, 0,
 882                                                                                            _tdm_vblank_cb_vblank_HW, wait_info);
 883         else
 884                 ret = tdm_output_wait_vblank(private_vblank->output, hw_interval, 0,
 885                                                                          _tdm_vblank_cb_vblank_HW, wait_info);
 886
 887         if (ret != TDM_ERROR_NONE) {
 888                 LIST_DEL(&wait_info->link);
 889                 return ret;
 890         }
 891
 892         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 893                 VIN("wait(%p) waiting", wait_info);
 894
 895         return TDM_ERROR_NONE;
 896 }
 897
 898 static tdm_error
 899 _tdm_vblank_cb_vblank_SW(void *user_data)
 900 {
 901         tdm_private_vblank *private_vblank = user_data;
 902
 903         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_OPERATION_FAILED);
 904
 905         return tdm_vblank_cb_vblank_SW(private_vblank, 0);
 906 }
 907
 908 INTERN tdm_error
 909 tdm_vblank_cb_vblank_SW(tdm_vblank *vblank, double vblank_stamp)
 910 {
 911         tdm_private_vblank *private_vblank;
 912         tdm_vblank_wait_info *first_wait_info = NULL, *w = NULL, *ww = NULL;
 913
 914         TDM_RETURN_VAL_IF_FAIL(vblank || vblank_stamp > 0, TDM_ERROR_INVALID_PARAMETER);
 915
 916         if (vblank)
 917                 private_vblank = vblank;
 918         else {
 919                 private_vblank = _tdm_vblank_find(vblank_stamp);
 920                 if (!private_vblank) {
 921                         TDM_DBG("can't find vblank(%.0f) from valid_list", vblank_stamp);
 922                         return TDM_ERROR_NONE;
 923                 }
 924         }
 925
 926         if (private_vblank->owner_tid != syscall(SYS_gettid)) {
 927                 tdm_thread_cb_vblank_sw vblank_sw;
 928                 tdm_private_display *private_display = private_vblank->dpy;
 929                 tdm_error ret;
 930
 931                 vblank_sw.base.type = TDM_THREAD_CB_VBLANK_SW;
 932                 vblank_sw.base.length = sizeof vblank_sw;
 933                 vblank_sw.vblank_stamp = private_vblank->stamp;
 934
 935                 ret = tdm_thread_send_cb(private_display->private_loop, &vblank_sw.base);
 936                 TDM_WARNING_IF_FAIL(ret == TDM_ERROR_NONE);
 937
 938                 return TDM_ERROR_NONE;
 939         }
 940
 941         if (LIST_IS_EMPTY(&private_vblank->SW_wait_list)) {
 942                 VER("no wait_info");
 943                 return TDM_ERROR_OPERATION_FAILED;
 944         }
 945
 946         first_wait_info = container_of(private_vblank->SW_wait_list.next, first_wait_info, link);
 947         TDM_RETURN_VAL_IF_FAIL(first_wait_info != NULL, TDM_ERROR_OPERATION_FAILED);
 948
 949         if (private_vblank->last_seq >= first_wait_info->target_seq)
 950                 TDM_ERR("last_seq(%u) target_seq(%u)", private_vblank->last_seq, first_wait_info->target_seq);
 951
 952         private_vblank->last_seq = first_wait_info->target_seq;
 953         private_vblank->last_time = first_wait_info->target_time;
 954
 955         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 956                 VIN("wait(%p) last(%.6f) sequence(%u) done", first_wait_info, private_vblank->last_time, first_wait_info->target_seq);
 957
 958         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->SW_wait_list, link) {
 959                 if (w->target_time != first_wait_info->target_time)
 960                         break;
 961
 962                 LIST_DEL(&w->link);
 963                 _tdm_vblank_valid_list_del(&w->valid_link);
 964
 965                 if (w->func) {
 966                         tdm_display_unlock(private_vblank->dpy);
 967                         w->func(private_vblank, TDM_ERROR_NONE, w->target_seq,
 968                                         TDM_TIME_SEC(w->target_time), TDM_TIME_USEC(w->target_time),
 969                                         w->user_data);
 970                         tdm_display_lock(private_vblank->dpy);
 971                 }
 972
 973                 free(w);
 974         }
 975
 976         return TDM_ERROR_NONE;
 977 }
 978
 979 static tdm_error
 980 _tdm_vblank_wait_SW(tdm_vblank_wait_info *wait_info)
 981 {
 982         tdm_private_vblank *private_vblank = wait_info->private_vblank;
 983         tdm_error ret;
 984
 985         if (private_vblank->last_time == 0) {
 986                 /* SW vblank starts from now. SW vblank doesn't need to be aligned with HW vblank. */
 987                 private_vblank->last_seq = 0;
 988                 private_vblank->last_time = tdm_helper_get_time();
 989
 990                 /* +1 ms to call the handler ASAP at the first. no matter for SW timer. */
 991                 wait_info->target_seq = 1;
 992                 wait_info->target_time = private_vblank->last_time + 0.001;
 993
 994                 if (tdm_debug_module & TDM_DEBUG_VBLANK)
 995                         VIN("wait(%p) last(%.6f) target(%.6f) target sequence(%u)",
 996                                 wait_info, private_vblank->last_time, wait_info->target_time, wait_info->target_seq);
 997         } else {
 998                 double last, prev, req, curr, target;
 999                 unsigned int skip;
1000
1001                 last = private_vblank->last_time;
1002                 req = wait_info->req_time;
1003
1004                 /* make sure that req time is bigger than last. */
1005                 if (req < last)
1006                         req = last;
1007
1008                 skip = (unsigned int)((req - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
1009                 prev = last + private_vblank->vblank_gap * skip;
1010
1011                 curr = tdm_helper_get_time();
1012                 target = prev + private_vblank->vblank_gap * wait_info->interval;
1013
1014                 while (target < curr)
1015                         target += private_vblank->vblank_gap;
1016
1017                 wait_info->target_seq = private_vblank->last_seq;
1018                 wait_info->target_seq += (unsigned int)((target - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
1019
1020                 wait_info->target_time = target;
1021
1022                 if (tdm_debug_module & TDM_DEBUG_VBLANK)
1023                         VIN("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) targ_seq(%u)",
1024                                 wait_info, last, req - last, prev - last, curr - last,
1025                                 target, target - last, skip, wait_info->target_seq);
1026         }
1027
1028         _tdm_vblank_insert_wait(wait_info, &private_vblank->SW_wait_list);
1029
1030         ret = _tdm_vblank_sw_timer_update(private_vblank);
1031         if (ret != TDM_ERROR_NONE) {
1032                 LIST_DEL(&wait_info->link);
1033                 VER("couldn't update sw timer");
1034                 return ret;
1035         }
1036
1037         return TDM_ERROR_NONE;
1038 }
1039
1040 EXTERN tdm_error
1041 tdm_vblank_wait(tdm_vblank *vblank, unsigned int req_sec, unsigned int req_usec,
1042                                 unsigned int interval, tdm_vblank_handler func, void *user_data)
1043 {
1044         tdm_private_vblank *private_vblank = vblank;
1045         tdm_vblank_wait_info *wait_info;
1046         unsigned int fps;
1047         tdm_error ret;
1048
1049         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1050         TDM_RETURN_VAL_IF_FAIL(func != NULL, TDM_ERROR_INVALID_PARAMETER);
1051
1052         if (private_vblank->owner_tid != syscall(SYS_gettid)) {
1053                 TDM_ERR("SHOULD be called in the owner thread(%d)", (int)private_vblank->owner_tid);
1054                 return TDM_ERROR_BAD_REQUEST;
1055         }
1056
1057         if (!private_vblank->enable_fake) {
1058                 if (private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
1059                         VIN("can't wait a vblank: output disconnected");
1060                         return TDM_ERROR_OUTPUT_DISCONNECTED;
1061                 }
1062                 if (private_vblank->dpms != TDM_OUTPUT_DPMS_ON) {
1063                         VIN("can't wait a vblank: DPMS off");
1064                         return TDM_ERROR_DPMS_OFF;
1065                 }
1066         }
1067
1068         wait_info = calloc(1, sizeof * wait_info);
1069         if (!wait_info) {
1070                 VER("alloc failed");
1071                 return TDM_ERROR_OUT_OF_MEMORY;
1072         }
1073
1074         /* set request time to current time if 0. This function seems to be called in server side. */
1075         if (req_sec == 0 && req_usec == 0) {
1076                 double curr = tdm_helper_get_time();
1077                 req_sec = TDM_TIME_SEC(curr);
1078                 req_usec = TDM_TIME_USEC(curr);
1079         }
1080
1081         LIST_INITHEAD(&wait_info->link);
1082
1083         _tdm_vblank_valid_list_add(&wait_info->valid_link, &valid_wait_list);
1084
1085         wait_info->stamp = ++stamp;
1086         wait_info->req_time = TDM_TIME(req_sec, req_usec);
1087         wait_info->interval = interval;
1088         wait_info->func = func;
1089         wait_info->user_data = user_data;
1090         wait_info->private_vblank = private_vblank;
1091
1092         if (private_vblank->ignore_global_fps ||
1093                 vblank_global_fps == 0 ||
1094                 private_vblank->fps < vblank_global_fps)
1095                 fps = private_vblank->fps;
1096         else
1097                 fps = vblank_global_fps;
1098
1099         if (private_vblank->check_HW_or_SW) {
1100                 private_vblank->check_HW_or_SW = 0;
1101                 private_vblank->vblank_gap = 1.0 / fps;
1102                 private_vblank->quotient = private_vblank->vrefresh / fps;
1103         }
1104
1105         /* 1) if fps != factor of vrefresh, SW timer
1106          * 2) if fps == factor of vrefresh && dpms == off, SW timer (Fake HW vblank)
1107          * 2) if fps == factor of vrefresh && dpms == on && offset == 0, HW vblank
1108          * 3) if fps == factor of vrefresh && dpms == on && offset != 0, HW vblank + SW timer
1109          * In case of 1), we really don't need to align with HW vblank.
1110          */
1111         if (private_vblank->vrefresh % fps)
1112                 wait_info->type = VBLANK_TYPE_SW;
1113         else if (private_vblank->dpms == TDM_OUTPUT_DPMS_OFF ||
1114                          private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED)
1115                 wait_info->type = VBLANK_TYPE_SW_FAKE;
1116         else if (private_vblank->offset == 0)
1117                 wait_info->type = VBLANK_TYPE_HW;
1118         else
1119                 wait_info->type = VBLANK_TYPE_HW_SW;
1120
1121         if (wait_info->type == VBLANK_TYPE_SW || wait_info->type == VBLANK_TYPE_SW_FAKE)
1122                 ret = _tdm_vblank_wait_SW(wait_info);
1123         else {
1124                 ret = _tdm_vblank_wait_HW(wait_info);
1125                 if (ret == TDM_ERROR_OUTPUT_DISCONNECTED || ret == TDM_ERROR_DPMS_OFF)
1126                         ret = _tdm_vblank_wait_SW(wait_info);
1127         }
1128
1129         if (ret != TDM_ERROR_NONE) {
1130                 LIST_DEL(&wait_info->link);
1131                 _tdm_vblank_valid_list_del(&wait_info->valid_link);
1132
1133                 tdm_display_lock(private_vblank->dpy);
1134                 tdm_output_remove_vblank_handler_internal(private_vblank->output, _tdm_vblank_cb_vblank_HW, wait_info);
1135                 tdm_display_unlock(private_vblank->dpy);
1136
1137                 free(wait_info);
1138                 return ret;
1139         }
1140
1141         return TDM_ERROR_NONE;
1142 }
1143
1144 EXTERN tdm_error
1145 tdm_vblank_wait_seq(tdm_vblank *vblank, unsigned int req_sec, unsigned int req_usec,
1146                                         unsigned int sequence, tdm_vblank_handler func, void *user_data)
1147 {
1148         tdm_private_vblank *private_vblank = vblank;
1149         unsigned int interval;
1150
1151         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1152         TDM_RETURN_VAL_IF_FAIL(func != NULL, TDM_ERROR_INVALID_PARAMETER);
1153
1154         /* if the sequence of vblank reaches the max value, sequence can be 0. */
1155
1156         if (private_vblank->last_seq == 0) {
1157                 TDM_WRN("can't calculate interval with sequence(%u)", sequence);
1158                 interval = 1;
1159         } else if (sequence > private_vblank->last_seq ||
1160                            TDM_VBLANK_SEQ_REACHED_MAX(sequence, private_vblank->last_seq)) {
1161                 double last, curr, seq_target;
1162
1163                 last = private_vblank->last_time;
1164                 curr = tdm_helper_get_time();
1165                 seq_target = last + private_vblank->vblank_gap * (sequence - private_vblank->last_seq);
1166
1167                 /* If target is old or too close(1ms) to current, we call the handler immediately.
1168                  * 2ms? it seems too much.
1169                  */
1170                 if (seq_target < curr) {
1171                         func(vblank, TDM_ERROR_NONE, sequence,
1172                                  TDM_TIME_SEC(seq_target), TDM_TIME_USEC(seq_target),
1173                                  user_data);
1174                         return TDM_ERROR_NONE;
1175                 } else if ((seq_target - curr) < 0.001) {  /* 1ms */
1176                         func(vblank, TDM_ERROR_NONE, sequence,
1177                                  TDM_TIME_SEC(curr), TDM_TIME_USEC(curr),
1178                                  user_data);
1179                         return TDM_ERROR_NONE;
1180                 }
1181
1182                 interval = (unsigned int)((seq_target - curr) / private_vblank->vblank_gap + TDM_TIME_MARGIN) + 1;
1183         } else {
1184                 /* this seems error. But we handle this like normal to avoid the unexpected error in cliend side */
1185                 TDM_WRN("sequence(%u) should be over the last sequence(%u)", sequence, private_vblank->last_seq);
1186                 func(vblank, TDM_ERROR_NONE, private_vblank->last_seq,
1187                          TDM_TIME_SEC(private_vblank->last_time), TDM_TIME_USEC(private_vblank->last_time),
1188                          user_data);
1189                 return TDM_ERROR_NONE;
1190         }
1191
1192         return tdm_vblank_wait(vblank, req_sec, req_usec, interval, func, user_data);
1193 }
1194
1195 INTERN tdm_error
1196 tdm_vblank_set_add_front(tdm_vblank *vblank, unsigned int add_front)
1197 {
1198         tdm_private_vblank *private_vblank = vblank;
1199
1200         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1201
1202         TDM_RETURN_VAL_IF_FAIL(TDM_MUTEX_IS_LOCKED(), TDM_ERROR_OPERATION_FAILED);
1203
1204         if (private_vblank->add_front == add_front)
1205                 return TDM_ERROR_NONE;
1206
1207         private_vblank->add_front = add_front;
1208
1209         return TDM_ERROR_NONE;
1210 }
1211
1212 INTERN tdm_error
1213 tdm_vblank_set_resource(tdm_vblank *vblank, struct wl_resource *resource)
1214 {
1215         tdm_private_vblank *private_vblank = vblank;
1216
1217         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_INVALID_PARAMETER);
1218         TDM_RETURN_VAL_IF_FAIL(private_vblank->resource == NULL, TDM_ERROR_OPERATION_FAILED);
1219
1220         private_vblank->resource = resource;
1221
1222         return TDM_ERROR_NONE;
1223 }
1224
1225 INTERN void
1226 tdm_vblank_get_vblank_list_information(tdm_display *dpy, char *reply, int *len)
1227 {
1228         tdm_private_vblank *v = NULL;
1229
1230         TDM_SNPRINTF(reply, len, "[Client Vblank List]\n");
1231         TDM_SNPRINTF(reply, len, "* global fps: %u\n", vblank_global_fps);
1232         TDM_SNPRINTF(reply, len, "---------------------------------------------------------------\n");
1233         TDM_SNPRINTF(reply, len, "name         fps ignore offset fake process\n");
1234         TDM_SNPRINTF(reply, len, "---------------------------------------------------------------\n");
1235
1236         pthread_mutex_lock(&valid_list_lock);
1237         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
1238                 const char *proc_name = NULL;
1239                 pid_t pid = 0;
1240
1241                 if (v->resource) {
1242                         struct wl_client *client = wl_resource_get_client(v->resource);
1243                         if (client) {
1244                                 wl_client_get_credentials(client, &pid, NULL, NULL);
1245                                 proc_name = tdm_server_get_client_name(pid);
1246                         }
1247                 }
1248
1249                 TDM_SNPRINTF(reply, len, "%-12s %u  %u     %d      %u    %s (pid: %u)\n",
1250                                          v->name, v->fps, v->ignore_global_fps, v->offset, v->enable_fake,
1251                                          (proc_name) ? proc_name : "Unknown", pid);
1252         }
1253         pthread_mutex_unlock(&valid_list_lock);
1254
1255         TDM_SNPRINTF(reply, len, "\n");
1256 }
1257