src/tdm_vblank.c

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