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_private.h"
  41
  42 /* CAUTION:
  43  * Basically tdm vblank doesn't care about thread things.
  44  * However, to use tdm_event_loop_xxx functions, have to use the internal function.
  45  * So need to lock/unlock the mutex of private_display. And valid_vblank_list and
  46  * valid_wait_list should be protected by valid_list_lock because tdm_vblank can
  47  * be used in multi-thread.
  48  */
  49
  50 /* TDM vblank
  51  * - aligned by HW vblank
  52  * - use a tdm_event_loop_source object only.
  53  */
  54
  55 #define TDM_VBLANK_DEFAULT_VREFRESH    30
  56
  57 /* We expact "(unsigned int)(0.0016667 / 0.0016667) = 1". But it becomes 0. */
  58 #define TDM_TIME_MARGIN     0.0000001
  59
  60 #define TDM_VBLANK_UINT_MAX 4294967295U
  61 #define TDM_VBLANK_UINT_1Q  1073741823U     /* UINT_MAX / 4 */
  62 #define TDM_VBLANK_UINT_3Q  3221225471U     /* UINT_MAX / 4 * 3 */
  63
  64 /* (seq < TDM_VBLANK_UINT_1Q && TDM_VBLANK_UINT_3Q < last_seq) means
  65  * that the sequence value has reached the max value and started from 0 again.
  66  */
  67 #define TDM_VBLANK_SEQ_REACHED_MAX(seq, last_seq) \
  68         ((seq) < TDM_VBLANK_UINT_1Q && TDM_VBLANK_UINT_3Q < (last_seq))
  69
  70 #define VER(fmt, arg...)   TDM_ERR("[%p] "fmt, private_vblank, ##arg)
  71 #define VWR(fmt, arg...)   TDM_WRN("[%p] "fmt, private_vblank, ##arg)
  72 #define VIN(fmt, arg...)   do { if (tdm_debug_module & TDM_DEBUG_VBLANK) TDM_INFO("[%p] "fmt, private_vblank, ##arg); } while (0)
  73 #define VDB(fmt, arg...)   do { if (tdm_debug_module & TDM_DEBUG_VBLANK) TDM_DBG("[%p] "fmt, private_vblank, ##arg); } while (0)
  74
  75 typedef enum {
  76         VBLANK_TYPE_SW,
  77         VBLANK_TYPE_SW_FAKE,
  78         VBLANK_TYPE_HW,
  79         VBLANK_TYPE_HW_SW,
  80 } tdm_vblank_wait_type;
  81
  82 typedef enum {
  83         VBLANK_EVENT_TYPE_NONE,
  84         VBLANK_EVENT_TYPE_SW,
  85         VBLANK_EVENT_TYPE_HW,
  86 } tdm_vblank_event_type;
  87
  88 typedef struct _tdm_vblank_wait_info tdm_vblank_wait_info;
  89
  90 typedef struct _tdm_private_vblank {
  91         struct list_head valid_link;
  92
  93         double stamp;
  94         pid_t owner_tid;
  95
  96         tdm_display *dpy;
  97         tdm_output *output;
  98         tdm_output_conn_status connection;
  99         unsigned int vrefresh;
 100
 101         tdm_vblank_event_type last_type;
 102         unsigned int check_HW_or_SW;
 103         char name[TDM_NAME_LEN];
 104         unsigned int fps;
 105         unsigned int fps_changeable;
 106         unsigned int fps_fixed;
 107         int offset;
 108         unsigned int enable_fake;
 109         unsigned int ignore_global_fps;
 110         unsigned int in_create_handler;
 111
 112         double vblank_gap;
 113         unsigned int quotient;
 114
 115         int last_interval;
 116         unsigned int last_seq;
 117         double last_time;
 118
 119         unsigned int add_front;
 120         struct wl_resource *resource;
 121
 122         /* for HW */
 123         double HW_vblank_gap;
 124         struct list_head HW_wait_list;
 125
 126         /* for SW */
 127         tdm_event_loop_source *SW_timer;
 128         struct list_head SW_wait_list;
 129
 130         /* for timeout */
 131         tdm_event_loop_source *timeout_timer;
 132 } tdm_private_vblank;
 133
 134 struct _tdm_vblank_wait_info {
 135         struct list_head link;
 136         struct list_head valid_link;
 137
 138         double stamp;
 139
 140         double req_time;
 141         unsigned int interval;
 142         int hw_interval;
 143
 144         tdm_vblank_handler func;
 145         void *user_data;
 146         tdm_private_vblank *private_vblank;
 147
 148         tdm_vblank_wait_type type;
 149
 150         double target_time;
 151         unsigned int target_seq;
 152 };
 153
 154 typedef struct _tdm_vblank_create_handler_info {
 155         struct list_head link;
 156
 157         tdm_vblank_create_handler func;
 158         void *user_data;
 159 } tdm_vblank_create_handler_info;
 160
 161 /* valid_vblank_list, valid_wait_list and create_handler_list should be protected
 162  * by valid_list_lock because tdm_vblank can be used in multi-thread.
 163  */
 164 static pthread_mutex_t valid_list_lock = PTHREAD_MUTEX_INITIALIZER;
 165 static struct list_head valid_vblank_list;
 166 static struct list_head valid_wait_list;
 167 static struct list_head create_handler_list;
 168 static unsigned int vblank_list_inited;
 169 static unsigned int vblank_global_fps;
 170 static double stamp = 0;
 171
 172 static void _tdm_vblank_cb_vblank_SW(tdm_private_display *private_display, void *object, tdm_thread_cb_base *cb_base, void *user_data);
 173 static tdm_error _tdm_vblank_cb_timeout_SW(void *user_data);
 174 static tdm_error _tdm_vblank_wait_SW(tdm_vblank_wait_info *wait_info);
 175 static void _tdm_vblank_cb_vblank_HW(tdm_output *output, unsigned int sequence,
 176                                                                          unsigned int tv_sec, unsigned int tv_usec,
 177                                                                          void *user_data);
 178 static void _tdm_vblank_timeout_timer_update(tdm_private_vblank *private_vblank, int ms_delay);
 179 static void _tdm_vblank_get_client_information(tdm_private_vblank *private_vblank,
 180                                                                                            pid_t *pid, const char **name);
 181
 182 #if 0
 183 static void
 184 _print_list(tdm_private_vblank *private_vblank)
 185 {
 186         tdm_vblank_wait_info *w = NULL;
 187         int count = 0;
 188
 189         LIST_FOR_EACH_ENTRY(w, &private_vblank->HW_wait_list, link) {
 190                 VIN("HW_wait(%p): type(%d) req_time(%.6f) target_time(%.6f) target_seq(%u)",
 191                         w, w->type, w->req_time, w->target_time, w->target_seq);
 192                 count++;
 193         }
 194
 195         LIST_FOR_EACH_ENTRY(w, &private_vblank->SW_wait_list, link) {
 196                 VIN("SW_wait(%p): type(%d) req_time(%.6f) target_time(%.6f) target_seq(%u)",
 197                         w, w->type, w->req_time, w->target_time, w->target_seq);
 198                 count++;
 199         }
 200
 201         if (!count)
 202                 VIN("NO_wait");
 203 }
 204 #endif
 205
 206 static int
 207 tdm_vblank_is_valid(tdm_vblank *vblank)
 208 {
 209         tdm_private_vblank *v = NULL;
 210
 211         if (vblank && vblank_list_inited) {
 212                 pthread_mutex_lock(&valid_list_lock);
 213                 LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 214                         if (v == (tdm_private_vblank *)vblank) {
 215                                 pthread_mutex_unlock(&valid_list_lock);
 216                                 return 1;
 217                         }
 218                 }
 219                 pthread_mutex_unlock(&valid_list_lock);
 220
 221         }
 222         return 0;
 223 }
 224
 225 static void
 226 _tdm_vblank_valid_list_add(struct list_head *valid_link, struct list_head *valid_list)
 227 {
 228         pthread_mutex_lock(&valid_list_lock);
 229         LIST_ADDTAIL(valid_link, valid_list);
 230         pthread_mutex_unlock(&valid_list_lock);
 231 }
 232
 233 static void
 234 _tdm_vblank_valid_list_del(struct list_head *valid_link)
 235 {
 236         pthread_mutex_lock(&valid_list_lock);
 237         LIST_DEL(valid_link);
 238         pthread_mutex_unlock(&valid_list_lock);
 239 }
 240
 241 static inline void*
 242 _tdm_vblank_find_object(tdm_private_display *private_display, double vblank_stamp)
 243 {
 244         tdm_private_vblank *v = NULL;
 245
 246         pthread_mutex_lock(&valid_list_lock);
 247         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 248                 if (v->stamp == vblank_stamp) {
 249                         pthread_mutex_unlock(&valid_list_lock);
 250                         return v;
 251                 }
 252         }
 253         pthread_mutex_unlock(&valid_list_lock);
 254
 255         return NULL;
 256 }
 257
 258 static inline unsigned int
 259 _tdm_vblank_check_valid_wait(tdm_vblank_wait_info *wait_info)
 260 {
 261         tdm_vblank_wait_info *w = NULL;
 262
 263         if (!wait_info)
 264                 return 0;
 265
 266         pthread_mutex_lock(&valid_list_lock);
 267         LIST_FOR_EACH_ENTRY(w, &valid_wait_list, valid_link) {
 268                 if (w == wait_info) {
 269                         pthread_mutex_unlock(&valid_list_lock);
 270                         return 1;
 271                 }
 272         }
 273         pthread_mutex_unlock(&valid_list_lock);
 274
 275         return 0;
 276 }
 277
 278 static inline unsigned int
 279 _tdm_vblank_find_wait(tdm_vblank_wait_info *wait_info, struct list_head *list)
 280 {
 281         tdm_vblank_wait_info *w = NULL;
 282
 283         if (!wait_info)
 284                 return 0;
 285
 286         LIST_FOR_EACH_ENTRY(w, list, link) {
 287                 if (w->stamp == wait_info->stamp)
 288                         return 1;
 289         }
 290
 291         return 0;
 292 }
 293
 294 static inline void
 295 _tdm_vblank_insert_wait(tdm_vblank_wait_info *wait_info, struct list_head *list)
 296 {
 297         tdm_vblank_wait_info *w = NULL;
 298         tdm_vblank_wait_info *found = NULL;
 299
 300         if (LIST_IS_EMPTY(list)) {
 301                 LIST_ADDTAIL(&wait_info->link, list);
 302                 return;
 303         }
 304
 305         LIST_FOR_EACH_ENTRY(w, list, link) {
 306                 if (wait_info->type == VBLANK_TYPE_SW) {
 307                         if (wait_info->target_time == 0)
 308                                 TDM_NEVER_GET_HERE();
 309                         if (w->target_time <= wait_info->target_time) {
 310                                 found = w;
 311                                 continue;
 312                         }
 313                 } else {
 314                         if (w->interval <= wait_info->interval) {
 315                                 found = w;
 316                                 continue;
 317                         }
 318                 }
 319         }
 320
 321         if (found)
 322                 LIST_ADD(&wait_info->link, &found->link);
 323         else
 324                 LIST_ADDTAIL(&wait_info->link, list->next);
 325 }
 326
 327 static void
 328 _tdm_vblank_change_to_SW(tdm_private_vblank *private_vblank)
 329 {
 330         tdm_vblank_wait_info *w = NULL, *ww = NULL;
 331
 332         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->HW_wait_list, link) {
 333                 LIST_DEL(&w->link);
 334
 335                 tdm_display_lock(private_vblank->dpy);
 336                 tdm_output_remove_vblank_handler_internal(private_vblank->output, _tdm_vblank_cb_vblank_HW, w);
 337                 tdm_display_unlock(private_vblank->dpy);
 338
 339                 w->type = VBLANK_TYPE_SW_FAKE;
 340                 _tdm_vblank_wait_SW(w);
 341         }
 342 }
 343
 344 static void
 345 _tdm_vblank_free_HW_wait(tdm_private_vblank *private_vblank, tdm_error error, unsigned int call_cb)
 346 {
 347         tdm_vblank_wait_info *w = NULL, *ww = NULL;
 348
 349         if (!LIST_IS_EMPTY(&private_vblank->HW_wait_list)) {
 350                 pid_t pid;
 351                 const char *proc_name;
 352                 _tdm_vblank_get_client_information(private_vblank, &pid, &proc_name);
 353                 VWR("TDM HW vblank destroyed forcely!! (pid: %u, name: %s)", pid, proc_name);
 354         }
 355
 356         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->HW_wait_list, link) {
 357                 LIST_DEL(&w->link);
 358                 _tdm_vblank_valid_list_del(&w->valid_link);
 359
 360                 tdm_display_lock(private_vblank->dpy);
 361                 tdm_output_remove_vblank_handler_internal(private_vblank->output, _tdm_vblank_cb_vblank_HW, w);
 362                 tdm_display_unlock(private_vblank->dpy);
 363
 364                 VDB("wait(%p) last(%.6f) sequence(%u) done (error:%d, call_cb:%u)",
 365                         w, (double)0.0, w->target_seq, error, call_cb);
 366
 367                 if (call_cb && w->func)
 368                         w->func(private_vblank, error, 0, 0, 0, w->user_data);
 369
 370                 free(w);
 371         }
 372 }
 373
 374 static void
 375 _tdm_vblank_update_output_info(tdm_private_vblank *private_vblank)
 376 {
 377         tdm_output *output = private_vblank->output;
 378         tdm_output_conn_status connection = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 379         unsigned int vrefresh = TDM_VBLANK_DEFAULT_VREFRESH;
 380         tdm_error ret;
 381
 382         ret = tdm_output_get_conn_status(output, &connection);
 383         TDM_WARNING_IF_FAIL(ret == TDM_ERROR_NONE);
 384
 385         if (connection == TDM_OUTPUT_CONN_STATUS_MODE_SETTED) {
 386                 const tdm_output_mode *mode = NULL;
 387                 tdm_output_get_mode(output, &mode);
 388                 if (mode)
 389                         vrefresh = mode->vrefresh;
 390                 else
 391                         VWR("mode not setted!!!");
 392         }
 393
 394         private_vblank->connection = connection;
 395         private_vblank->vrefresh = vrefresh;
 396         private_vblank->HW_vblank_gap = 1.0 / private_vblank->vrefresh;
 397
 398         if (private_vblank->fps_changeable)
 399                 private_vblank->fps = vrefresh;
 400
 401         VIN("connection(%d) vrefresh(%d) fps(%d) fps_changeable(%d)",
 402                 private_vblank->connection,
 403                 private_vblank->vrefresh, private_vblank->fps, private_vblank->fps_changeable);
 404 }
 405
 406 /* LCOV_EXCL_START */
 407 static void
 408 _tdm_vblank_cb_output_change(tdm_output *output, tdm_output_change_type type,
 409                                                          tdm_value value, void *user_data)
 410 {
 411         tdm_private_vblank *private_vblank = user_data;
 412
 413         TDM_RETURN_IF_FAIL(tdm_vblank_is_valid(private_vblank));
 414
 415         switch (type) {
 416         case TDM_OUTPUT_CHANGE_DPMS:
 417                 VIN("dpms %s", tdm_dpms_str(value.u32));
 418                 private_vblank->check_HW_or_SW = 1;
 419                 if (TDM_OUTPUT_DPMS_VSYNC_IS_OFF(value.u32)) {
 420                         if (private_vblank->enable_fake)
 421                                 _tdm_vblank_change_to_SW(private_vblank);
 422                         else {
 423                                 tdm_display_lock(private_vblank->dpy);
 424                                 _tdm_vblank_timeout_timer_update(private_vblank, 0);
 425                                 tdm_display_unlock(private_vblank->dpy);
 426
 427                                 _tdm_vblank_free_HW_wait(private_vblank, TDM_ERROR_DPMS_OFF, 1);
 428                         }
 429                 }
 430                 break;
 431         case TDM_OUTPUT_CHANGE_CONNECTION:
 432                 if (private_vblank->connection == value.u32)
 433                         break;
 434                 VIN("output %s", tdm_status_str(value.u32));
 435                 _tdm_vblank_update_output_info(private_vblank);
 436                 private_vblank->check_HW_or_SW = 1;
 437                 if (private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 438                         if (private_vblank->enable_fake)
 439                                 _tdm_vblank_change_to_SW(private_vblank);
 440                         else {
 441                                 tdm_display_lock(private_vblank->dpy);
 442                                 _tdm_vblank_timeout_timer_update(private_vblank, 0);
 443                                 tdm_display_unlock(private_vblank->dpy);
 444
 445                                 _tdm_vblank_free_HW_wait(private_vblank, TDM_ERROR_OUTPUT_DISCONNECTED, 1);
 446                         }
 447                 }
 448                 break;
 449         default:
 450                 break;
 451         }
 452 }
 453 /* LCOV_EXCL_STOP */
 454
 455 EXTERN tdm_error
 456 tdm_vblank_set_client_vblank_fps(unsigned int pid, const char *name, unsigned int fps)
 457 {
 458         tdm_private_vblank *v = NULL;
 459
 460         TDM_RETURN_VAL_IF_FAIL(pid > 0, TDM_ERROR_INVALID_PARAMETER);
 461         TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 462
 463         TDM_INFO("pid: %u, name: %s, fps: %d", pid, name, fps);
 464
 465         pthread_mutex_lock(&valid_list_lock);
 466         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 467                 struct wl_client *client;
 468                 pid_t client_pid = 0;
 469
 470                 if (!v->resource)
 471                         continue;
 472
 473                 client = wl_resource_get_client(v->resource);
 474                 if (!client)
 475                         continue;
 476
 477                 wl_client_get_credentials(client, &client_pid, NULL, NULL);
 478
 479                 if (client_pid != pid)
 480                         continue;
 481
 482                 if (name && strncmp(name, TDM_VBLANK_DEFAULT_NAME, TDM_NAME_LEN)) {
 483                         if (strncmp(v->name, name, TDM_NAME_LEN))
 484                                 continue;
 485                 }
 486
 487                 tdm_vblank_set_fps(v, fps);
 488
 489                 TDM_INFO("(pid:%u) '%s' fps changed: %d", pid, v->name, fps);
 490         }
 491         pthread_mutex_unlock(&valid_list_lock);
 492
 493         return TDM_ERROR_NONE;
 494 }
 495
 496 EXTERN tdm_error
 497 tdm_vblank_set_client_ignore_global_fps(unsigned int pid, const char *name, unsigned int ignore)
 498 {
 499         tdm_private_vblank *v = NULL;
 500
 501         TDM_RETURN_VAL_IF_FAIL(pid > 0, TDM_ERROR_INVALID_PARAMETER);
 502
 503         TDM_INFO("pid: %u, name: %s, ignore: %u", pid, name, ignore);
 504
 505         pthread_mutex_lock(&valid_list_lock);
 506         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 507                 struct wl_client *client;
 508                 pid_t client_pid = 0;
 509
 510                 if (!v->resource)
 511                         continue;
 512
 513                 client = wl_resource_get_client(v->resource);
 514                 if (!client)
 515                         continue;
 516
 517                 wl_client_get_credentials(client, &client_pid, NULL, NULL);
 518
 519                 if (client_pid != pid)
 520                         continue;
 521
 522                 if (name && strncmp(name, TDM_VBLANK_DEFAULT_NAME, TDM_NAME_LEN)) {
 523                         if (strncmp(v->name, name, TDM_NAME_LEN))
 524                                 continue;
 525                 }
 526
 527                 tdm_vblank_ignore_global_fps(v, ignore);
 528
 529                 TDM_INFO("(pid:%u) '%s' ignore changed: %u", pid, v->name, ignore);
 530         }
 531         pthread_mutex_unlock(&valid_list_lock);
 532
 533         return TDM_ERROR_NONE;
 534 }
 535
 536 EXTERN tdm_error
 537 tdm_vblank_enable_global_fps(unsigned int enable, unsigned int fps)
 538 {
 539         tdm_private_vblank *v = NULL;
 540
 541         if (enable)
 542                 TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 543
 544         TDM_INFO("global fps: %s fps(%d)", (enable) ? "enabled" : "disabled", fps);
 545
 546         pthread_mutex_lock(&valid_list_lock);
 547
 548         vblank_global_fps = (enable) ? fps : 0;
 549
 550         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 551                 /* skip if vblank is created in server side */
 552                 if (!v->resource)
 553                         continue;
 554
 555                 v->check_HW_or_SW = 1;
 556         }
 557         pthread_mutex_unlock(&valid_list_lock);
 558
 559         return TDM_ERROR_NONE;
 560 }
 561
 562 static void
 563 _tdm_vblank_thread_cb_create(tdm_private_display *private_display, void *object, tdm_thread_cb_base *cb_base, void *user_data)
 564 {
 565         tdm_thread_cb_vblank_create *vblank_create = (tdm_thread_cb_vblank_create *)cb_base;
 566         tdm_vblank_create_handler_info *ch_info = user_data;
 567         tdm_private_vblank *private_vblank;
 568
 569         TDM_RETURN_IF_FAIL(TDM_MUTEX_IS_LOCKED());
 570
 571         assert(ch_info != NULL);
 572
 573         private_vblank = _tdm_vblank_find_object(private_display, vblank_create->vblank_stamp);
 574         if (!private_vblank) {
 575                 TDM_DBG("can't find vblank(%.0f) from valid_list", vblank_create->vblank_stamp);
 576                 return;
 577         }
 578
 579         private_vblank->in_create_handler = 1;
 580         tdm_display_unlock(private_display);
 581         ch_info->func(private_vblank, ch_info->user_data);
 582         tdm_display_lock(private_display);
 583         private_vblank->in_create_handler = 0;
 584 }
 585
 586 static tdm_error
 587 _tdm_vblank_call_thread_cb(tdm_private_vblank *private_vblank)
 588 {
 589         tdm_thread_cb_vblank_create vblank_create;
 590         tdm_error ret;
 591
 592         memset(&vblank_create, 0, sizeof vblank_create);
 593         vblank_create.base.type = TDM_THREAD_CB_VBLANK_CREATE;
 594         vblank_create.base.length = sizeof vblank_create;
 595         vblank_create.base.object_stamp = 1;
 596         vblank_create.base.data = NULL;
 597         vblank_create.base.sync = 0;
 598         vblank_create.vblank_stamp = private_vblank->stamp;
 599
 600         ret = tdm_thread_cb_call(private_vblank->dpy, &vblank_create.base);
 601         TDM_WARNING_IF_FAIL(ret == TDM_ERROR_NONE);
 602
 603         return TDM_ERROR_NONE;
 604 }
 605
 606 EXTERN tdm_error
 607 tdm_vblank_add_create_handler(tdm_display *dpy, tdm_vblank_create_handler func, void *user_data)
 608 {
 609         tdm_vblank_create_handler_info *ch_info = NULL;
 610         tdm_error ret;
 611
 612         TDM_RETURN_VAL_IF_FAIL(dpy != NULL, TDM_ERROR_INVALID_PARAMETER);
 613         TDM_RETURN_VAL_IF_FAIL(func != NULL, TDM_ERROR_INVALID_PARAMETER);
 614
 615         pthread_mutex_lock(&valid_list_lock);
 616
 617         LIST_FOR_EACH_ENTRY(ch_info, &create_handler_list, link) {
 618                 if (ch_info->func == func && ch_info->user_data == user_data) {
 619                         TDM_ERR("can't be added twice");
 620                         pthread_mutex_unlock(&valid_list_lock);
 621                         return TDM_ERROR_BAD_REQUEST;
 622                 }
 623         }
 624
 625         ch_info = calloc(1, sizeof *ch_info);
 626         if (!ch_info) {
 627                 TDM_ERR("alloc failed: %m");
 628                 pthread_mutex_unlock(&valid_list_lock);
 629                 return TDM_ERROR_OUT_OF_MEMORY;
 630         }
 631
 632         tdm_display_lock(dpy);
 633         ret = tdm_thread_cb_add(dpy, TDM_THREAD_CB_VBLANK_CREATE, NULL, _tdm_vblank_thread_cb_create, ch_info);
 634         tdm_display_unlock(dpy);
 635
 636         if (ret != TDM_ERROR_NONE) {
 637                 TDM_ERR("tdm_thread_cb_add failed");
 638                 free(ch_info);
 639                 pthread_mutex_unlock(&valid_list_lock);
 640                 return ret;
 641         }
 642
 643         ch_info->func = func;
 644         ch_info->user_data = user_data;
 645
 646         LIST_ADDTAIL(&ch_info->link, &create_handler_list);
 647
 648         pthread_mutex_unlock(&valid_list_lock);
 649
 650         return TDM_ERROR_NONE;
 651 }
 652
 653 EXTERN void
 654 tdm_vblank_remove_create_handler(tdm_display *dpy, tdm_vblank_create_handler func, void *user_data)
 655 {
 656         tdm_vblank_create_handler_info *ch_info = NULL, *hh = NULL;
 657
 658         TDM_RETURN_IF_FAIL(dpy != NULL);
 659         TDM_RETURN_IF_FAIL(func != NULL);
 660
 661         tdm_display_lock(dpy);
 662         pthread_mutex_lock(&valid_list_lock);
 663         LIST_FOR_EACH_ENTRY_SAFE(ch_info, hh, &create_handler_list, link) {
 664                 if (ch_info->func != func || ch_info->user_data != user_data)
 665                         continue;
 666
 667                 tdm_thread_cb_remove(dpy, TDM_THREAD_CB_VBLANK_CREATE, NULL, _tdm_vblank_thread_cb_create, ch_info);
 668
 669                 LIST_DEL(&ch_info->link);
 670                 free(ch_info);
 671                 pthread_mutex_unlock(&valid_list_lock);
 672                 tdm_display_unlock(dpy);
 673                 return;
 674         }
 675         pthread_mutex_unlock(&valid_list_lock);
 676         tdm_display_unlock(dpy);
 677 }
 678
 679 static void*
 680 _tdm_vblank_find_display(tdm_private_display *private_display, double stamp)
 681 {
 682         return private_display;
 683 }
 684
 685 INTERN tdm_error
 686 tdm_vblank_init(tdm_display *dpy)
 687 {
 688         if (vblank_list_inited)
 689                 return TDM_ERROR_NONE;
 690
 691         LIST_INITHEAD(&valid_vblank_list);
 692         LIST_INITHEAD(&valid_wait_list);
 693         LIST_INITHEAD(&create_handler_list);
 694
 695         tdm_thread_cb_set_find_func(TDM_THREAD_CB_VBLANK_SW, _tdm_vblank_find_object);
 696         tdm_thread_cb_set_find_func(TDM_THREAD_CB_VBLANK_CREATE, _tdm_vblank_find_display);
 697
 698         vblank_list_inited = 1;
 699
 700         return TDM_ERROR_NONE;
 701 }
 702
 703 INTERN void
 704 tdm_vblank_deinit(tdm_display *dpy)
 705 {
 706         tdm_vblank_create_handler_info *ch_info = NULL, *hh = NULL;
 707
 708         if (!vblank_list_inited)
 709                 return;
 710
 711         if (!LIST_IS_EMPTY(&valid_vblank_list))
 712                 TDM_NEVER_GET_HERE();
 713
 714         if (!LIST_IS_EMPTY(&valid_wait_list))
 715                 TDM_NEVER_GET_HERE();
 716
 717         LIST_FOR_EACH_ENTRY_SAFE(ch_info, hh, &create_handler_list, link) {
 718                 LIST_DEL(&ch_info->link);
 719                 free(ch_info);
 720         }
 721
 722         vblank_list_inited = 0;
 723 }
 724
 725 EXTERN tdm_vblank *
 726 tdm_vblank_create(tdm_display *dpy, tdm_output *output, tdm_error *error)
 727 {
 728         tdm_private_vblank *private_vblank;
 729         tdm_error ret;
 730
 731         TDM_RETURN_VAL_IF_FAIL_WITH_ERROR(tdm_display_is_valid(dpy), TDM_ERROR_INVALID_PARAMETER, NULL);
 732         TDM_RETURN_VAL_IF_FAIL_WITH_ERROR(tdm_output_is_valid(output), TDM_ERROR_INVALID_PARAMETER, NULL);
 733
 734         if (error)
 735                 *error = TDM_ERROR_NONE;
 736
 737         private_vblank = calloc(1, sizeof * private_vblank);
 738         if (!private_vblank) {
 739                 /* LCOV_EXCL_START */
 740                 if (error)
 741                         *error = TDM_ERROR_OUT_OF_MEMORY;
 742                 TDM_ERR("alloc failed");
 743                 return NULL;
 744                 /* LCOV_EXCL_STOP */
 745         }
 746
 747         tdm_output_add_change_handler(output, _tdm_vblank_cb_output_change, private_vblank);
 748
 749         private_vblank->stamp = ++stamp;
 750         private_vblank->owner_tid = syscall(SYS_gettid);
 751         private_vblank->dpy = dpy;
 752         private_vblank->output = output;
 753         private_vblank->check_HW_or_SW = 1;
 754         private_vblank->fps_changeable = 1;
 755         private_vblank->last_interval = -1;
 756
 757         _tdm_vblank_update_output_info(private_vblank);
 758
 759         strncpy(private_vblank->name, TDM_VBLANK_DEFAULT_NAME, TDM_NAME_LEN - 1);
 760         private_vblank->name[TDM_NAME_LEN - 1] = '\0';
 761
 762         LIST_INITHEAD(&private_vblank->HW_wait_list);
 763         LIST_INITHEAD(&private_vblank->SW_wait_list);
 764
 765         _tdm_vblank_valid_list_add(&private_vblank->valid_link, &valid_vblank_list);
 766
 767         VIN("created. vrefresh(%d) connection(%d)",
 768                 private_vblank->vrefresh, private_vblank->connection);
 769
 770         tdm_display_lock(private_vblank->dpy);
 771         _tdm_vblank_call_thread_cb(private_vblank);
 772         tdm_display_unlock(private_vblank->dpy);
 773
 774         return (tdm_vblank *)private_vblank;
 775 }
 776
 777 EXTERN void
 778 tdm_vblank_destroy(tdm_vblank *vblank)
 779 {
 780         tdm_private_vblank *private_vblank = vblank;
 781         tdm_vblank_wait_info *w = NULL, *ww = NULL;
 782
 783         TDM_RETURN_IF_FAIL(tdm_vblank_is_valid(vblank));
 784
 785         if (private_vblank->in_create_handler) {
 786                 TDM_ERR("NOT allowed to be called in a create handler");
 787                 return;
 788         }
 789
 790         _tdm_vblank_valid_list_del(&private_vblank->valid_link);
 791
 792         if (private_vblank->SW_timer) {
 793                 tdm_display_lock(private_vblank->dpy);
 794                 tdm_thread_cb_remove(private_vblank, TDM_THREAD_CB_VBLANK_SW, NULL, _tdm_vblank_cb_vblank_SW, NULL);
 795                 tdm_event_loop_source_remove(private_vblank->SW_timer);
 796                 tdm_display_unlock(private_vblank->dpy);
 797         }
 798
 799         tdm_output_remove_change_handler(private_vblank->output,
 800                                                                          _tdm_vblank_cb_output_change, private_vblank);
 801
 802         _tdm_vblank_free_HW_wait(private_vblank, 0, 0);
 803
 804         if (!LIST_IS_EMPTY(&private_vblank->SW_wait_list)) {
 805                 pid_t pid;
 806                 const char *proc_name;
 807                 _tdm_vblank_get_client_information(private_vblank, &pid, &proc_name);
 808                 VER("TDM SW vblank destroyed forcely!! (pid: %u, name: %s)", pid, proc_name);
 809         }
 810
 811         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->SW_wait_list, link) {
 812                 LIST_DEL(&w->link);
 813                 _tdm_vblank_valid_list_del(&w->valid_link);
 814                 free(w);
 815         }
 816
 817         if (private_vblank->timeout_timer) {
 818                 tdm_display_lock(private_vblank->dpy);
 819                 tdm_event_loop_source_remove(private_vblank->timeout_timer);
 820                 tdm_display_unlock(private_vblank->dpy);
 821         }
 822
 823         VIN("destroyed");
 824
 825         free(private_vblank);
 826 }
 827
 828 EXTERN tdm_output *
 829 tdm_vblank_get_output(tdm_vblank *vblank, tdm_error *error)
 830 {
 831         tdm_private_vblank *private_vblank = vblank;
 832         tdm_error ret = TDM_ERROR_NONE;
 833
 834         TDM_RETURN_VAL_IF_FAIL_WITH_ERROR(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER, NULL);
 835
 836         if (error)
 837                 *error = TDM_ERROR_NONE;
 838
 839         return private_vblank->output;
 840 }
 841
 842 EXTERN tdm_error
 843 tdm_vblank_get_client_pid(tdm_vblank *vblank, pid_t *pid)
 844 {
 845         tdm_private_vblank *private_vblank = vblank;
 846         struct wl_client *client;
 847
 848         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
 849         TDM_RETURN_VAL_IF_FAIL(pid != NULL, TDM_ERROR_INVALID_PARAMETER);
 850
 851         if (!private_vblank->resource) {
 852                 *pid = 0;
 853                 return TDM_ERROR_NONE;
 854         }
 855
 856         client = wl_resource_get_client(private_vblank->resource);
 857         if (!client) {
 858                 *pid = 0;
 859                 return TDM_ERROR_NONE;
 860         }
 861
 862         wl_client_get_credentials(client, pid, NULL, NULL);
 863
 864         return TDM_ERROR_NONE;
 865 }
 866
 867 EXTERN tdm_error
 868 tdm_vblank_set_name(tdm_vblank *vblank, const char *name)
 869 {
 870         tdm_private_vblank *private_vblank = vblank;
 871
 872         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
 873
 874         if (!name)
 875                 name = TDM_VBLANK_DEFAULT_NAME;
 876
 877         strncpy(private_vblank->name, name, TDM_NAME_LEN - 1);
 878         private_vblank->name[TDM_NAME_LEN - 1] = '\0';
 879
 880         VIN("name(%s)", name);
 881
 882         return TDM_ERROR_NONE;
 883 }
 884
 885 EXTERN tdm_error
 886 tdm_vblank_get_name(tdm_vblank *vblank, const char **name)
 887 {
 888         tdm_private_vblank *private_vblank = vblank;
 889
 890         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
 891         TDM_RETURN_VAL_IF_FAIL(name != NULL, TDM_ERROR_INVALID_PARAMETER);
 892
 893         *name = (const char*)private_vblank->name;
 894
 895         return TDM_ERROR_NONE;
 896 }
 897
 898 EXTERN tdm_error
 899 tdm_vblank_set_fps(tdm_vblank *vblank, unsigned int fps)
 900 {
 901         tdm_private_vblank *private_vblank = vblank;
 902
 903         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
 904         TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 905
 906         if (private_vblank->fps_fixed) {
 907                 VIN("fps(%u) can't be changed", private_vblank->fps);
 908                 return TDM_ERROR_NONE;
 909         }
 910
 911         private_vblank->fps_changeable = 0;
 912
 913         if (private_vblank->fps == fps)
 914                 return TDM_ERROR_NONE;
 915
 916         private_vblank->fps = fps;
 917         private_vblank->check_HW_or_SW = 1;
 918
 919         VIN("fps(%u) changed", fps);
 920
 921         return TDM_ERROR_NONE;
 922 }
 923
 924 EXTERN tdm_error
 925 tdm_vblank_get_fps(tdm_vblank *vblank, unsigned int *fps)
 926 {
 927         tdm_private_vblank *private_vblank = vblank;
 928
 929         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
 930         TDM_RETURN_VAL_IF_FAIL(fps != NULL, TDM_ERROR_INVALID_PARAMETER);
 931
 932         *fps = private_vblank->fps;
 933
 934         return TDM_ERROR_NONE;
 935 }
 936
 937 EXTERN tdm_error
 938 tdm_vblank_set_fixed_fps(tdm_vblank *vblank, unsigned int fps)
 939 {
 940         tdm_private_vblank *private_vblank = vblank;
 941
 942         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
 943         TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 944
 945         private_vblank->fps_changeable = 0;
 946         private_vblank->fps_fixed = 1;
 947
 948         if (private_vblank->fps == fps)
 949                 return TDM_ERROR_NONE;
 950
 951         private_vblank->fps = fps;
 952         private_vblank->check_HW_or_SW = 1;
 953
 954         VIN("fps(%u) fixed", fps);
 955
 956         return TDM_ERROR_NONE;
 957 }
 958
 959 EXTERN tdm_error
 960 tdm_vblank_ignore_global_fps(tdm_vblank *vblank, unsigned int ignore)
 961 {
 962         tdm_private_vblank *private_vblank = vblank;
 963
 964         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
 965
 966         if (private_vblank->ignore_global_fps == ignore)
 967                 return TDM_ERROR_NONE;
 968
 969         private_vblank->ignore_global_fps = ignore;
 970         private_vblank->check_HW_or_SW = 1;
 971
 972         VIN("ignore_global_fps(%u)", private_vblank->ignore_global_fps);
 973
 974         return TDM_ERROR_NONE;
 975 }
 976
 977 EXTERN tdm_error
 978 tdm_vblank_set_offset(tdm_vblank *vblank, int offset)
 979 {
 980         tdm_private_vblank *private_vblank = vblank;
 981
 982         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
 983
 984         if (private_vblank->offset == offset)
 985                 return TDM_ERROR_NONE;
 986
 987         private_vblank->offset = offset;
 988         private_vblank->check_HW_or_SW = 1;
 989
 990         VIN("offset(%u)", private_vblank->offset);
 991
 992         return TDM_ERROR_NONE;
 993 }
 994
 995 EXTERN tdm_error
 996 tdm_vblank_get_offset(tdm_vblank *vblank, int *offset)
 997 {
 998         tdm_private_vblank *private_vblank = vblank;
 999
1000         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
1001         TDM_RETURN_VAL_IF_FAIL(offset != NULL, TDM_ERROR_INVALID_PARAMETER);
1002
1003         *offset = private_vblank->offset;
1004
1005         return TDM_ERROR_NONE;
1006 }
1007
1008 EXTERN tdm_error
1009 tdm_vblank_set_enable_fake(tdm_vblank *vblank, unsigned int enable_fake)
1010 {
1011         tdm_private_vblank *private_vblank = vblank;
1012
1013         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
1014
1015         if (private_vblank->enable_fake == enable_fake)
1016                 return TDM_ERROR_NONE;
1017
1018         private_vblank->enable_fake = enable_fake;
1019
1020         VIN("enable_fake(%u)", private_vblank->enable_fake);
1021
1022         return TDM_ERROR_NONE;
1023 }
1024
1025 EXTERN tdm_error
1026 tdm_vblank_get_enable_fake(tdm_vblank *vblank, unsigned int *enable_fake)
1027 {
1028         tdm_private_vblank *private_vblank = vblank;
1029
1030         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
1031         TDM_RETURN_VAL_IF_FAIL(enable_fake != NULL, TDM_ERROR_INVALID_PARAMETER);
1032
1033         *enable_fake = private_vblank->enable_fake;
1034
1035         return TDM_ERROR_NONE;
1036 }
1037
1038 static tdm_error
1039 _tdm_vblank_timeout_timer_cb(void *user_data)
1040 {
1041         tdm_private_vblank *private_vblank = user_data;
1042         tdm_vblank_wait_info *w = NULL;
1043         pid_t pid;
1044         const char *proc_name;
1045
1046         TDM_RETURN_VAL_IF_FAIL(private_vblank != NULL, TDM_ERROR_OPERATION_FAILED);
1047
1048         _tdm_vblank_get_client_information(private_vblank, &pid, &proc_name);
1049
1050         VER("TDM vblank TIMEOUT!! (pid: %u, name: %s)", pid, proc_name);
1051         VER("quotient(%u) last_seq(%u) last_time(%.6f)", private_vblank->quotient, private_vblank->last_seq, private_vblank->last_time);
1052
1053         LIST_FOR_EACH_ENTRY(w, &private_vblank->HW_wait_list, link) {
1054                 VER("wait_info(%p) req_time(%.6f) target_seq(%u) interval(%u) hw_interval(%d)",
1055                         w, w->req_time, w->target_seq, w->interval, w->hw_interval);
1056                 tdm_output_vblank_print_wait_information(private_vblank->output, w);
1057         }
1058
1059         LIST_FOR_EACH_ENTRY(w, &private_vblank->SW_wait_list, link) {
1060                 VER("wait_info(%p) req_time(%.6f) target_time(%.6f) target_seq(%u) interval(%u)",
1061                         w, w->req_time, w->target_time, w->target_seq, w->interval);
1062         }
1063
1064         return TDM_ERROR_NONE;
1065 }
1066
1067 static void
1068 _tdm_vblank_timeout_timer_update(tdm_private_vblank *private_vblank, int ms_delay)
1069 {
1070         tdm_error ret;
1071
1072         if (!private_vblank->timeout_timer) {
1073                 private_vblank->timeout_timer =
1074                         tdm_event_loop_add_timer_handler(private_vblank->dpy,
1075                                                                                          _tdm_vblank_timeout_timer_cb,
1076                                                                                          private_vblank,
1077                                                                                          &ret);
1078                 if (!private_vblank->timeout_timer) {
1079                         VER("couldn't add timer");
1080                         return;
1081                 }
1082                 VIN("Create Timeout timer");
1083         }
1084
1085         ret = tdm_event_loop_source_timer_update(private_vblank->timeout_timer, ms_delay);
1086         if (ret != TDM_ERROR_NONE) {
1087                 VER("couldn't update timer");
1088                 return;
1089         }
1090
1091         if (ms_delay != 0)
1092                 VDB("timeout timer updated");
1093         else
1094                 VDB("timeout timer disabled");
1095 }
1096
1097 static tdm_error
1098 _tdm_vblank_sw_timer_update(tdm_private_vblank *private_vblank)
1099 {
1100         tdm_vblank_wait_info *first_wait_info = NULL;
1101         double curr, target;
1102         int ms_delay;
1103         tdm_error ret;
1104
1105         if (LIST_IS_EMPTY(&private_vblank->SW_wait_list)) {
1106                 VER("no wait_info");
1107                 return TDM_ERROR_OPERATION_FAILED;
1108         }
1109
1110         first_wait_info = container_of(private_vblank->SW_wait_list.next, first_wait_info, link);
1111         curr = tdm_helper_get_time();
1112         target = first_wait_info->target_time;
1113
1114         /* ms_delay should be more that 1 */
1115         if (target < curr)
1116                 ms_delay = 1;
1117         else
1118                 ms_delay = ceil((target - curr) * 1000.0);
1119
1120         if (ms_delay < 1)
1121                 ms_delay = 1;
1122
1123         if (ms_delay > 5000)
1124                 VER("wait(%p) curr(%.6f) target(%.6f) ms_delay(%d)", first_wait_info, curr, target, ms_delay);
1125         else
1126                 VDB("wait(%p) curr(%.6f) target(%.6f) ms_delay(%d)", first_wait_info, curr, target, ms_delay);
1127
1128         tdm_display_lock(private_vblank->dpy);
1129
1130         if (!private_vblank->SW_timer) {
1131                 private_vblank->SW_timer =
1132                         tdm_event_loop_add_timer_handler(private_vblank->dpy,
1133                                                                                          _tdm_vblank_cb_timeout_SW,
1134                                                                                          private_vblank,
1135                                                                                          &ret);
1136                 if (!private_vblank->SW_timer) {
1137                         tdm_display_unlock(private_vblank->dpy);
1138                         VER("couldn't add timer");
1139                         return ret;
1140                 }
1141
1142                 ret = tdm_thread_cb_add(private_vblank, TDM_THREAD_CB_VBLANK_SW, NULL, _tdm_vblank_cb_vblank_SW, NULL);
1143                 if (ret != TDM_ERROR_NONE) {
1144                         tdm_event_loop_source_remove(private_vblank->SW_timer);
1145                         private_vblank->SW_timer = NULL;
1146                         tdm_display_unlock(private_vblank->dpy);
1147                         VER("couldn't add thread_cb");
1148                         return ret;
1149                 }
1150
1151                 VIN("Create SW timer");
1152         }
1153
1154         private_vblank->last_interval = ms_delay;
1155
1156         ret = tdm_event_loop_source_timer_update(private_vblank->SW_timer, ms_delay);
1157         if (ret != TDM_ERROR_NONE) {
1158                 /* LCOV_EXCL_START */
1159                 tdm_display_unlock(private_vblank->dpy);
1160                 VER("couldn't update timer");
1161                 return ret;
1162                 /* LCOV_EXCL_STOP */
1163         }
1164
1165         tdm_display_unlock(private_vblank->dpy);
1166
1167         return TDM_ERROR_NONE;
1168 }
1169
1170 static void
1171 _tdm_vblank_cb_vblank_HW(tdm_output *output, unsigned int sequence,
1172                                                  unsigned int tv_sec, unsigned int tv_usec,
1173                                                  void *user_data)
1174 {
1175         tdm_vblank_wait_info *wait_info = user_data;
1176         tdm_private_vblank *private_vblank;
1177
1178         if (!_tdm_vblank_check_valid_wait(wait_info)) {
1179                 TDM_ERR("can't find wait(%p) from valid_wait_list", wait_info);
1180                 return;
1181         }
1182
1183         private_vblank = wait_info->private_vblank;
1184         TDM_RETURN_IF_FAIL(tdm_vblank_is_valid(private_vblank));
1185
1186         assert(private_vblank->owner_tid == syscall(SYS_gettid));
1187
1188         if (!_tdm_vblank_find_wait(wait_info, &private_vblank->HW_wait_list)) {
1189                 VER("can't find wait(%p)", wait_info);
1190                 return;
1191         }
1192
1193         if (wait_info->type == VBLANK_TYPE_HW_SW) {
1194                 tdm_error ret;
1195
1196                 LIST_DEL(&wait_info->link);
1197
1198                 /* kernel sends the wrong time of first vblank event. and the time of
1199                  * second vblank is correct.
1200                  */
1201                 wait_info->target_time = TDM_TIME(tv_sec, tv_usec);
1202                 wait_info->target_time += (((double)private_vblank->offset) / 1000.0);
1203
1204                 _tdm_vblank_insert_wait(wait_info, &private_vblank->SW_wait_list);
1205
1206                 ret = _tdm_vblank_sw_timer_update(private_vblank);
1207
1208                 /* wait_info will be freed in _tdm_vblank_cb_timeout_SW() */
1209                 if (ret == TDM_ERROR_NONE) {
1210                         VIN("wait(%p) SW timer", wait_info);
1211                         return;
1212                 }
1213
1214                 VER("couldn't update sw timer");
1215         }
1216
1217         tdm_display_lock(private_vblank->dpy);
1218         _tdm_vblank_timeout_timer_update(private_vblank, 0);
1219         tdm_display_unlock(private_vblank->dpy);
1220
1221         LIST_DEL(&wait_info->link);
1222         _tdm_vblank_valid_list_del(&wait_info->valid_link);
1223
1224         /* tv_sec & tv_usec shouldn't be zero. But sometimes they are zero in some hardware.
1225          * We need to prohibit that last_time becomes zero because "last_time == 0" means
1226          * that a tdm_vblank object is just created and doesn't have the first vblank event.
1227          * If last_time becomes 0, it would make issue.
1228          */
1229         if (tv_sec == 0 && tv_usec == 0) {
1230                 double curr = tdm_helper_get_time();
1231                 tv_sec = TDM_TIME_SEC(curr);
1232                 tv_usec = TDM_TIME_USEC(curr);
1233         }
1234
1235         private_vblank->last_seq = wait_info->target_seq;
1236         private_vblank->last_time = TDM_TIME(tv_sec, tv_usec);
1237
1238         VDB("wait(%p) last(%.6f) sequence(%u) done", wait_info, private_vblank->last_time, wait_info->target_seq);
1239
1240         if (tdm_ttrace_module & TDM_TTRACE_VBLANK)
1241                 TDM_TRACE_ASYNC_END((int)wait_info->req_time, "TDM_Vblank:%u", (unsigned int)private_vblank->stamp);
1242
1243         if (wait_info->func)
1244                 wait_info->func(private_vblank, TDM_ERROR_NONE, wait_info->target_seq,
1245                                                 tv_sec, tv_usec, wait_info->user_data);
1246
1247         free(wait_info);
1248 }
1249
1250 static tdm_error
1251 _tdm_vblank_wait_HW(tdm_vblank_wait_info *wait_info)
1252 {
1253         tdm_private_vblank *private_vblank = wait_info->private_vblank;
1254         int hw_interval;
1255         tdm_error ret;
1256
1257         if (private_vblank->last_type != VBLANK_EVENT_TYPE_HW) {
1258                 VIN("Use HW vblank");
1259                 private_vblank->last_type = VBLANK_EVENT_TYPE_HW;
1260         }
1261
1262         _tdm_vblank_insert_wait(wait_info, &private_vblank->HW_wait_list);
1263
1264         if (private_vblank->last_time == 0) {
1265                 hw_interval = wait_info->interval * private_vblank->quotient;
1266
1267                 /* SW vblank starts from now. SW vblank doesn't need to be aligned with HW vblank. */
1268                 private_vblank->last_seq = 0;
1269                 private_vblank->last_time = tdm_helper_get_time();
1270
1271                 /* +1 ms to call the handler ASAP at the first. no matter for SW timer. */
1272                 wait_info->target_seq = 1;
1273
1274                 VDB("wait(%p) last(%.6f) hw_itvl(%d) targ_seq(%u)",
1275                         wait_info, private_vblank->last_time, hw_interval, wait_info->target_seq);
1276         } else {
1277                 double last, prev, req, curr, target;
1278                 unsigned int skip;
1279
1280                 last = private_vblank->last_time;
1281                 req = wait_info->req_time;
1282
1283                 /* make sure that req time is bigger than last. */
1284                 if (req < last)
1285                         req = last;
1286
1287                 skip = (unsigned int)((req - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
1288                 prev = last + private_vblank->vblank_gap * skip;
1289
1290                 curr = tdm_helper_get_time();
1291                 target = last;
1292                 while (target < curr)
1293                         target += (private_vblank->vblank_gap * wait_info->interval);
1294
1295                 hw_interval = (unsigned int)((target - curr) / private_vblank->HW_vblank_gap + TDM_TIME_MARGIN) + 1;
1296
1297                 wait_info->target_seq = private_vblank->last_seq;
1298                 wait_info->target_seq += (unsigned int)((target - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
1299
1300                 if (hw_interval > 300)
1301                         VER("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) hw_itvl(%d) targ_seq(%u)",
1302                                 wait_info, last, req - last, prev - last, curr - last, target, target - last,
1303                                 skip, hw_interval, wait_info->target_seq);
1304                 else
1305                         VDB("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) hw_itvl(%d) targ_seq(%u)",
1306                                 wait_info, last, req - last, prev - last, curr - last, target, target - last,
1307                                 skip, hw_interval, wait_info->target_seq);
1308         }
1309
1310         private_vblank->last_interval = hw_interval;
1311         wait_info->hw_interval = hw_interval;
1312
1313         if (tdm_ttrace_module & TDM_TTRACE_VBLANK)
1314                 TDM_TRACE_ASYNC_BEGIN((int)wait_info->req_time, "TDM_Vblank:%u", (unsigned int)private_vblank->stamp);
1315
1316         if (private_vblank->add_front)
1317                 ret = tdm_output_wait_vblank_add_front(private_vblank->output, hw_interval, 0,
1318                                                                                            _tdm_vblank_cb_vblank_HW, wait_info);
1319         else
1320                 ret = tdm_output_wait_vblank(private_vblank->output, hw_interval, 0,
1321                                                                          _tdm_vblank_cb_vblank_HW, wait_info);
1322
1323         if (ret != TDM_ERROR_NONE) {
1324                 LIST_DEL(&wait_info->link);
1325                 return ret;
1326         }
1327
1328         VDB("wait(%p) waiting", wait_info);
1329
1330         return TDM_ERROR_NONE;
1331 }
1332
1333 static void
1334 _tdm_vblank_cb_vblank_SW(tdm_private_display *private_display, void *object, tdm_thread_cb_base *cb_base, void *user_data)
1335 {
1336         tdm_private_vblank *private_vblank = object;
1337         tdm_vblank_wait_info *first_wait_info = NULL, *w = NULL, *ww = NULL;
1338
1339         TDM_RETURN_IF_FAIL(TDM_MUTEX_IS_LOCKED());
1340
1341         assert(private_vblank->owner_tid == syscall(SYS_gettid));
1342
1343         if (LIST_IS_EMPTY(&private_vblank->SW_wait_list)) {
1344                 VER("no wait_info");
1345                 return;
1346         }
1347
1348         if (!LIST_IS_EMPTY(&private_vblank->HW_wait_list))
1349                 TDM_NEVER_GET_HERE();
1350
1351         first_wait_info = container_of(private_vblank->SW_wait_list.next, first_wait_info, link);
1352         TDM_RETURN_IF_FAIL(first_wait_info != NULL);
1353
1354         _tdm_vblank_timeout_timer_update(private_vblank, 0);
1355
1356         if (private_vblank->last_seq >= first_wait_info->target_seq)
1357                 TDM_ERR("last_seq(%u) target_seq(%u)", private_vblank->last_seq, first_wait_info->target_seq);
1358
1359         private_vblank->last_seq = first_wait_info->target_seq;
1360         private_vblank->last_time = first_wait_info->target_time;
1361
1362         VDB("wait(%p) last(%.6f) sequence(%u) done", first_wait_info, private_vblank->last_time, first_wait_info->target_seq);
1363
1364         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_vblank->SW_wait_list, link) {
1365                 if (w->target_time != first_wait_info->target_time)
1366                         break;
1367
1368                 LIST_DEL(&w->link);
1369                 _tdm_vblank_valid_list_del(&w->valid_link);
1370
1371                 if (w->func) {
1372                         tdm_display_unlock(private_vblank->dpy);
1373                         w->func(private_vblank, TDM_ERROR_NONE, w->target_seq,
1374                                         TDM_TIME_SEC(w->target_time), TDM_TIME_USEC(w->target_time),
1375                                         w->user_data);
1376                         tdm_display_lock(private_vblank->dpy);
1377                 }
1378
1379                 free(w);
1380         }
1381 }
1382
1383 static tdm_error
1384 _tdm_vblank_cb_timeout_SW(void *user_data)
1385 {
1386         tdm_private_vblank *private_vblank = user_data;
1387         tdm_thread_cb_vblank_sw vblank_sw;
1388         tdm_error ret;
1389
1390         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(private_vblank), TDM_ERROR_OPERATION_FAILED);
1391
1392         VIN("timeout_SW -> thread-cb");
1393
1394         memset(&vblank_sw, 0, sizeof vblank_sw);
1395         vblank_sw.base.type = TDM_THREAD_CB_VBLANK_SW;
1396         vblank_sw.base.length = sizeof vblank_sw;
1397         vblank_sw.base.object_stamp = private_vblank->stamp;
1398         vblank_sw.base.data = NULL;
1399         vblank_sw.base.sync = 0;
1400
1401         ret = tdm_thread_cb_call(private_vblank, &vblank_sw.base);
1402         TDM_WARNING_IF_FAIL(ret == TDM_ERROR_NONE);
1403
1404         return TDM_ERROR_NONE;
1405 }
1406
1407 static tdm_error
1408 _tdm_vblank_wait_SW(tdm_vblank_wait_info *wait_info)
1409 {
1410         tdm_private_vblank *private_vblank = wait_info->private_vblank;
1411         tdm_error ret;
1412
1413         if (private_vblank->last_type != VBLANK_EVENT_TYPE_SW) {
1414                 VIN("Use SW vblank");
1415                 private_vblank->last_type = VBLANK_EVENT_TYPE_SW;
1416         }
1417
1418         if (private_vblank->last_time == 0) {
1419                 /* SW vblank starts from now. SW vblank doesn't need to be aligned with HW vblank. */
1420                 private_vblank->last_seq = 0;
1421                 private_vblank->last_time = tdm_helper_get_time();
1422
1423                 /* +1 ms to call the handler ASAP at the first. no matter for SW timer. */
1424                 wait_info->target_seq = 1;
1425                 wait_info->target_time = private_vblank->last_time + 0.001;
1426
1427                 VDB("wait(%p) last(%.6f) target(%.6f) target sequence(%u)",
1428                         wait_info, private_vblank->last_time, wait_info->target_time, wait_info->target_seq);
1429         } else {
1430                 double last, prev, req, curr, target;
1431                 unsigned int skip;
1432
1433                 last = private_vblank->last_time;
1434                 req = wait_info->req_time;
1435
1436                 /* make sure that req time is bigger than last. */
1437                 if (req < last)
1438                         req = last;
1439
1440                 skip = (unsigned int)((req - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
1441                 prev = last + private_vblank->vblank_gap * skip;
1442
1443                 curr = tdm_helper_get_time();
1444                 target = prev + private_vblank->vblank_gap * wait_info->interval;
1445
1446                 while (target < curr)
1447                         target += private_vblank->vblank_gap;
1448
1449                 wait_info->target_seq = private_vblank->last_seq;
1450                 wait_info->target_seq += (unsigned int)((target - last) / private_vblank->vblank_gap + TDM_TIME_MARGIN);
1451
1452                 wait_info->target_time = target;
1453
1454                 VDB("wait(%p) last(%.6f) req(%.6f) prev(%.6f) curr(%.6f) targ(%.6f,%.6f) skip(%u) targ_seq(%u)",
1455                         wait_info, last, req - last, prev - last, curr - last,
1456                         target, target - last, skip, wait_info->target_seq);
1457         }
1458
1459         _tdm_vblank_insert_wait(wait_info, &private_vblank->SW_wait_list);
1460
1461         ret = _tdm_vblank_sw_timer_update(private_vblank);
1462         if (ret != TDM_ERROR_NONE) {
1463                 /* LCOV_EXCL_START */
1464                 LIST_DEL(&wait_info->link);
1465                 VER("couldn't update sw timer");
1466                 return ret;
1467                 /* LCOV_EXCL_STOP */
1468         }
1469
1470         return TDM_ERROR_NONE;
1471 }
1472
1473 EXTERN tdm_error
1474 tdm_vblank_wait(tdm_vblank *vblank, unsigned int req_sec, unsigned int req_usec,
1475                                 unsigned int interval, tdm_vblank_handler func, void *user_data)
1476 {
1477         tdm_private_vblank *private_vblank = vblank;
1478         tdm_vblank_wait_info *wait_info;
1479         tdm_output_dpms dpms = TDM_OUTPUT_DPMS_OFF;
1480         unsigned int fps;
1481         tdm_error ret;
1482
1483         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
1484         TDM_RETURN_VAL_IF_FAIL(func != NULL, TDM_ERROR_INVALID_PARAMETER);
1485         TDM_RETURN_VAL_IF_FAIL(interval > 0, TDM_ERROR_INVALID_PARAMETER);
1486
1487         if (private_vblank->in_create_handler) {
1488                 TDM_ERR("NOT allowed to be called in a create handler");
1489                 return TDM_ERROR_BAD_REQUEST;
1490         }
1491
1492         if (private_vblank->owner_tid != syscall(SYS_gettid)) {
1493                 TDM_ERR("SHOULD be called in the owner thread(%d)", (int)private_vblank->owner_tid);
1494                 return TDM_ERROR_BAD_REQUEST;
1495         }
1496
1497         tdm_output_get_dpms(private_vblank->output, &dpms);
1498
1499         if (!private_vblank->enable_fake) {
1500                 if (private_vblank->connection == TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
1501                         VER("can't wait a vblank: output disconnected");
1502                         return TDM_ERROR_OUTPUT_DISCONNECTED;
1503                 }
1504                 if (TDM_OUTPUT_DPMS_VSYNC_IS_OFF(dpms)) {
1505                         VER("can't wait a vblank: DPMS %s", tdm_dpms_str(dpms));
1506                         return TDM_ERROR_DPMS_OFF;
1507                 }
1508         }
1509
1510         wait_info = calloc(1, sizeof * wait_info);
1511         if (!wait_info) {
1512                 /* LCOV_EXCL_START */
1513                 VER("alloc failed");
1514                 return TDM_ERROR_OUT_OF_MEMORY;
1515                 /* LCOV_EXCL_STOP */
1516         }
1517         _tdm_vblank_update_output_info(private_vblank);
1518
1519         /* set request time to current time if 0. This function seems to be called in server side. */
1520         if (req_sec == 0 && req_usec == 0) {
1521                 double curr = tdm_helper_get_time();
1522                 req_sec = TDM_TIME_SEC(curr);
1523                 req_usec = TDM_TIME_USEC(curr);
1524         }
1525
1526         LIST_INITHEAD(&wait_info->link);
1527
1528         _tdm_vblank_valid_list_add(&wait_info->valid_link, &valid_wait_list);
1529
1530         wait_info->stamp = ++stamp;
1531         wait_info->req_time = TDM_TIME(req_sec, req_usec);
1532         wait_info->interval = interval;
1533         wait_info->func = func;
1534         wait_info->user_data = user_data;
1535         wait_info->private_vblank = private_vblank;
1536
1537         if (private_vblank->ignore_global_fps ||
1538                 vblank_global_fps == 0 ||
1539                 private_vblank->fps < vblank_global_fps)
1540                 fps = private_vblank->fps;
1541         else
1542                 fps = vblank_global_fps;
1543
1544         if (private_vblank->check_HW_or_SW) {
1545                 private_vblank->check_HW_or_SW = 0;
1546                 private_vblank->vblank_gap = 1.0 / fps;
1547                 private_vblank->quotient = private_vblank->vrefresh / fps;
1548         }
1549
1550         /* 1) if fps != factor of vrefresh, SW timer
1551          * 2) if fps == factor of vrefresh && dpms == off, SW timer (Fake HW vblank)
1552          * 2) if fps == factor of vrefresh && dpms == on && offset == 0, HW vblank
1553          * 3) if fps == factor of vrefresh && dpms == on && offset != 0, HW vblank + SW timer
1554          * In case of 1), we really don't need to align with HW vblank.
1555          */
1556         if (private_vblank->vrefresh % fps)
1557                 wait_info->type = VBLANK_TYPE_SW;
1558         else if (TDM_OUTPUT_DPMS_VSYNC_IS_OFF(dpms) ||
1559                          private_vblank->connection != TDM_OUTPUT_CONN_STATUS_MODE_SETTED)
1560                 wait_info->type = VBLANK_TYPE_SW_FAKE;
1561         else if (private_vblank->offset == 0)
1562                 wait_info->type = VBLANK_TYPE_HW;
1563         else
1564                 wait_info->type = VBLANK_TYPE_HW_SW;
1565
1566         if (wait_info->type == VBLANK_TYPE_SW || wait_info->type == VBLANK_TYPE_SW_FAKE) {
1567                 ret = _tdm_vblank_wait_SW(wait_info);
1568                 if (ret != TDM_ERROR_NONE)
1569                         TDM_ERR("_tdm_vblank_wait_SW failed: ret(%d)", ret);
1570         } else {
1571                 ret = _tdm_vblank_wait_HW(wait_info);
1572                 if (ret != TDM_ERROR_NONE)
1573                         TDM_ERR("_tdm_vblank_wait_HW failed: ret(%d)", ret);
1574
1575                 if (ret == TDM_ERROR_OUTPUT_DISCONNECTED || ret == TDM_ERROR_DPMS_OFF) {
1576                         ret = _tdm_vblank_wait_SW(wait_info);
1577                         if (ret != TDM_ERROR_NONE)
1578                                 TDM_ERR("_tdm_vblank_wait_SW failed: ret(%d)", ret);
1579                 }
1580         }
1581
1582         if (ret != TDM_ERROR_NONE) {
1583                 /* LCOV_EXCL_START */
1584                 LIST_DEL(&wait_info->link);
1585                 _tdm_vblank_valid_list_del(&wait_info->valid_link);
1586
1587                 tdm_display_lock(private_vblank->dpy);
1588                 tdm_output_remove_vblank_handler_internal(private_vblank->output, _tdm_vblank_cb_vblank_HW, wait_info);
1589                 tdm_display_unlock(private_vblank->dpy);
1590
1591                 free(wait_info);
1592                 return ret;
1593                 /* LCOV_EXCL_STOP */
1594         }
1595
1596         tdm_display_lock(private_vblank->dpy);
1597         _tdm_vblank_timeout_timer_update(private_vblank, 1000);
1598         tdm_display_unlock(private_vblank->dpy);
1599
1600         return TDM_ERROR_NONE;
1601 }
1602
1603 EXTERN tdm_error
1604 tdm_vblank_wait_seq(tdm_vblank *vblank, unsigned int req_sec, unsigned int req_usec,
1605                                         unsigned int sequence, tdm_vblank_handler func, void *user_data)
1606 {
1607         tdm_private_vblank *private_vblank = vblank;
1608         unsigned int interval;
1609
1610         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
1611         TDM_RETURN_VAL_IF_FAIL(func != NULL, TDM_ERROR_INVALID_PARAMETER);
1612
1613         /* if the sequence of vblank reaches the max value, sequence can be 0. */
1614
1615         if (private_vblank->last_seq == 0) {
1616                 VWR("can't calculate interval with sequence(%u)", sequence);
1617                 interval = 1;
1618         } else if (sequence > private_vblank->last_seq ||
1619                            TDM_VBLANK_SEQ_REACHED_MAX(sequence, private_vblank->last_seq)) {
1620                 double last, curr, seq_target;
1621
1622                 last = private_vblank->last_time;
1623                 curr = tdm_helper_get_time();
1624                 seq_target = last + private_vblank->vblank_gap * (sequence - private_vblank->last_seq);
1625
1626                 /* If target is old or too close(1ms) to current, we call the handler immediately.
1627                  * 2ms? it seems too much.
1628                  */
1629                 if (seq_target < curr) {
1630                         func(vblank, TDM_ERROR_NONE, sequence,
1631                                  TDM_TIME_SEC(seq_target), TDM_TIME_USEC(seq_target),
1632                                  user_data);
1633                         return TDM_ERROR_NONE;
1634                 } else if ((seq_target - curr) < 0.001) {  /* 1ms */
1635                         func(vblank, TDM_ERROR_NONE, sequence,
1636                                  TDM_TIME_SEC(curr), TDM_TIME_USEC(curr),
1637                                  user_data);
1638                         return TDM_ERROR_NONE;
1639                 }
1640
1641                 interval = (unsigned int)((seq_target - curr) / private_vblank->vblank_gap + TDM_TIME_MARGIN) + 1;
1642         } else {
1643                 /* this seems error. But we handle this like normal to avoid the unexpected error in cliend side */
1644                 VER("sequence(%u) should be over the last sequence(%u)", sequence, private_vblank->last_seq);
1645                 func(vblank, TDM_ERROR_NONE, private_vblank->last_seq,
1646                          TDM_TIME_SEC(private_vblank->last_time), TDM_TIME_USEC(private_vblank->last_time),
1647                          user_data);
1648                 return TDM_ERROR_NONE;
1649         }
1650
1651         return tdm_vblank_wait(vblank, req_sec, req_usec, interval, func, user_data);
1652 }
1653
1654 /* LCOV_EXCL_START */
1655 INTERN tdm_error
1656 tdm_vblank_set_add_front(tdm_vblank *vblank, unsigned int add_front)
1657 {
1658         tdm_private_vblank *private_vblank = vblank;
1659
1660         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
1661
1662         TDM_RETURN_VAL_IF_FAIL(TDM_MUTEX_IS_LOCKED(), TDM_ERROR_OPERATION_FAILED);
1663
1664         if (private_vblank->add_front == add_front)
1665                 return TDM_ERROR_NONE;
1666
1667         private_vblank->add_front = add_front;
1668
1669         return TDM_ERROR_NONE;
1670 }
1671 /* LCOV_EXCL_STOP */
1672
1673 INTERN tdm_error
1674 tdm_vblank_set_resource(tdm_vblank *vblank, struct wl_resource *resource)
1675 {
1676         tdm_private_vblank *private_vblank = vblank;
1677
1678         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
1679         TDM_RETURN_VAL_IF_FAIL(private_vblank->resource == NULL, TDM_ERROR_OPERATION_FAILED);
1680
1681         private_vblank->resource = resource;
1682
1683         return TDM_ERROR_NONE;
1684 }
1685
1686 INTERN double
1687 tdm_vblank_get_stamp(tdm_vblank *vblank)
1688 {
1689         tdm_private_vblank *private_vblank = vblank;
1690
1691         TDM_RETURN_VAL_IF_FAIL(tdm_vblank_is_valid(vblank), TDM_ERROR_INVALID_PARAMETER);
1692
1693         return private_vblank->stamp;
1694 }
1695
1696 static unsigned int
1697 _tdm_vblank_get_waiting_count(tdm_private_vblank *private_vblank)
1698 {
1699         tdm_vblank_wait_info *wait_info = NULL;
1700         unsigned int count = 0;
1701
1702         LIST_FOR_EACH_ENTRY(wait_info, &private_vblank->HW_wait_list, link) {
1703                 count++;
1704         }
1705
1706         LIST_FOR_EACH_ENTRY(wait_info, &private_vblank->SW_wait_list, link) {
1707                 count++;
1708         }
1709
1710         return count;
1711 }
1712
1713 static void
1714 _tdm_vblank_get_client_information(tdm_private_vblank *private_vblank, pid_t *pid, const char **name)
1715 {
1716         struct wl_client *client;
1717
1718         if (!private_vblank->resource)
1719                 goto no_client;
1720
1721         client = wl_resource_get_client(private_vblank->resource);
1722         if (!client)
1723                 goto no_client;
1724
1725         wl_client_get_credentials(client, pid, NULL, NULL);
1726         *name = tdm_server_get_client_name(*pid);
1727
1728         return;
1729
1730 no_client:
1731         *pid = 0;
1732         *name = NULL;
1733         return;
1734 }
1735
1736 /* LCOV_EXCL_START */
1737 INTERN void
1738 tdm_vblank_get_vblank_list_information(tdm_display *dpy, char *reply, int *len)
1739 {
1740         tdm_private_vblank *v = NULL;
1741         tdm_output_dpms dpms = TDM_OUTPUT_DPMS_OFF;
1742         tdm_output *output = tdm_display_get_output(dpy, 0, NULL);
1743
1744         if (output)
1745                 tdm_output_get_dpms(output, &dpms);
1746
1747         TDM_SNPRINTF(reply, len, "[Client Vblank List]\n");
1748         TDM_SNPRINTF(reply, len, "* DPMS: %s\n", tdm_dpms_str(dpms));
1749         TDM_SNPRINTF(reply, len, "* global fps: %u\n", vblank_global_fps);
1750         TDM_SNPRINTF(reply, len, "----------------------------------------------------------------------------------\n");
1751         TDM_SNPRINTF(reply, len, "Name                 Type Wait Interval Sequence Fps Ignore Offset Fake Process\n");
1752         TDM_SNPRINTF(reply, len, "----------------------------------------------------------------------------------\n");
1753
1754         pthread_mutex_lock(&valid_list_lock);
1755         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
1756                 const char *proc_name = NULL;
1757                 pid_t pid = 0;
1758                 unsigned int count;
1759
1760                 _tdm_vblank_get_client_information(v, &pid, &proc_name);
1761
1762                 count = _tdm_vblank_get_waiting_count(v);
1763
1764                 TDM_SNPRINTF(reply, len, "%-8s(%p) ", v->name, v);
1765                 TDM_SNPRINTF(reply, len, "%-4s ", (v->last_type == VBLANK_EVENT_TYPE_HW) ? "HW" : "SW");
1766                 TDM_SNPRINTF(reply, len, "%-4s ", (count > 0) ? "O" : " ");
1767                 TDM_SNPRINTF(reply, len, "%-8d ", v->last_interval);
1768                 TDM_SNPRINTF(reply, len, "%-8u ", v->last_seq);
1769                 TDM_SNPRINTF(reply, len, "%-3u ", v->fps);
1770                 TDM_SNPRINTF(reply, len, "%-6u ", v->ignore_global_fps);
1771                 TDM_SNPRINTF(reply, len, "%-6d ", v->offset);
1772                 TDM_SNPRINTF(reply, len, "%-4u ", v->enable_fake);
1773                 TDM_SNPRINTF(reply, len, "%s(pid:%d)\n", (proc_name) ? proc_name : "Unknown", pid);
1774         }
1775         pthread_mutex_unlock(&valid_list_lock);
1776
1777         TDM_SNPRINTF(reply, len, "\n");
1778 }
1779 /* LCOV_EXCL_STOP */
1780