src/tdm_server.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 #include "tdm-server-protocol.h"
  44
  45 /* CAUTION:
  46  * - tdm server doesn't care about thread things.
  47  * - DO NOT use the TDM internal functions here.
  48  *     However, the internal function which does lock/unlock the mutex of
  49  *     private_display in itself can be called.
  50  * - DO NOT use the tdm_private_display structure here.
  51  * - The callback function things can be called in main thread.
  52  */
  53
  54 struct _tdm_private_server {
  55         tdm_private_loop *private_loop;
  56         struct list_head output_list;
  57         struct list_head wait_list;
  58 };
  59
  60 typedef struct _tdm_server_output_info {
  61         struct list_head link;
  62         tdm_private_server *private_server;
  63         struct wl_resource *resource;
  64         tdm_output *output;
  65         struct list_head vblank_list;
  66 } tdm_server_output_info;
  67
  68 typedef struct _tdm_server_vblank_info {
  69         struct list_head link;
  70         struct list_head valid_link;
  71
  72         tdm_server_output_info *output_info;
  73         struct wl_resource *resource;
  74
  75         tdm_vblank *vblank;
  76 } tdm_server_vblank_info;
  77
  78 typedef struct _tdm_server_wait_info {
  79         struct list_head link;
  80         tdm_server_vblank_info *vblank_info;
  81
  82         unsigned int req_id;
  83 } tdm_server_wait_info;
  84
  85 static tdm_private_server *keep_private_server;
  86 static struct list_head valid_vblank_list;
  87
  88 static void destroy_wait(tdm_server_wait_info *wait_info);
  89
  90 static tdm_output*
  91 _tdm_server_find_output(tdm_private_server *private_server, const char *name)
  92 {
  93         tdm_private_loop *private_loop = private_server->private_loop;
  94         tdm_output *found = NULL;
  95
  96         if (!strncasecmp(name, "primary", 7) || !strncasecmp(name, "default", 7))
  97                 found = tdm_display_get_output(private_loop->dpy, 0, NULL);
  98
  99         if (!found) {
 100                 int count = 0, i;
 101
 102                 tdm_display_get_output_count(private_loop->dpy, &count);
 103
 104                 for (i = 0; i < count; i++) {
 105                         tdm_output *output = tdm_display_get_output(private_loop->dpy, i, NULL);
 106                         tdm_output_conn_status status;
 107                         const char *model = NULL;
 108                         tdm_error ret;
 109
 110                         ret = tdm_output_get_conn_status(output, &status);
 111                         if (ret || status == TDM_OUTPUT_CONN_STATUS_DISCONNECTED)
 112                                 continue;
 113
 114                         ret = tdm_output_get_model_info(output, NULL, &model, NULL);
 115                         if (ret || !model)
 116                                 continue;
 117
 118                         if (strncmp(model, name, TDM_NAME_LEN))
 119                                 continue;
 120
 121                         found = output;
 122                         break;
 123                 }
 124         }
 125
 126         return found;
 127 }
 128
 129 static void
 130 _tdm_server_send_done(tdm_server_wait_info *wait_info, tdm_error error,
 131                                           unsigned int sequence, unsigned int tv_sec, unsigned int tv_usec)
 132 {
 133         tdm_server_wait_info *found;
 134         tdm_server_vblank_info *vblank_info;
 135
 136         if (!keep_private_server)
 137                 return;
 138
 139         LIST_FIND_ITEM(wait_info, &keep_private_server->wait_list,
 140                                    tdm_server_wait_info, link, found);
 141         if (!found) {
 142                 TDM_DBG("wait_info(%p) is destroyed", wait_info);
 143                 return;
 144         }
 145
 146         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 147                 TDM_INFO("req_id(%d) done", wait_info->req_id);
 148
 149         TDM_TRACE_COUNT(ServerDoneVBlank, wait_info->req_id);
 150
 151         vblank_info = wait_info->vblank_info;
 152         wl_tdm_vblank_send_done(vblank_info->resource, wait_info->req_id,
 153                                                         sequence, tv_sec, tv_usec, error);
 154         destroy_wait(wait_info);
 155 }
 156
 157 static void
 158 _tdm_server_cb_vblank(tdm_vblank *vblank, tdm_error error, unsigned int sequence,
 159                                           unsigned int tv_sec, unsigned int tv_usec, void *user_data)
 160 {
 161         _tdm_server_send_done((tdm_server_wait_info*)user_data, error, sequence, tv_sec, tv_usec);
 162 }
 163
 164 static void
 165 _tdm_server_cb_output_change(tdm_output *output, tdm_output_change_type type,
 166                                                          tdm_value value, void *user_data)
 167 {
 168         tdm_server_output_info *output_info = user_data;
 169
 170         TDM_RETURN_IF_FAIL(output_info != NULL);
 171
 172         switch (type) {
 173         case TDM_OUTPUT_CHANGE_DPMS:
 174                 wl_tdm_output_send_dpms(output_info->resource, value.u32);
 175                 break;
 176         case TDM_OUTPUT_CHANGE_CONNECTION:
 177                 wl_tdm_output_send_connection(output_info->resource, value.u32);
 178                 break;
 179         default:
 180                 break;
 181         }
 182 }
 183
 184 static void
 185 destroy_wait(tdm_server_wait_info *wait_info)
 186 {
 187         LIST_DEL(&wait_info->link);
 188         free(wait_info);
 189 }
 190
 191 static void
 192 destroy_vblank_callback(struct wl_resource *resource)
 193 {
 194         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 195         tdm_server_wait_info *w = NULL, *ww = NULL;
 196
 197         TDM_RETURN_IF_FAIL(vblank_info != NULL);
 198
 199         if (vblank_info->vblank)
 200                 tdm_vblank_destroy(vblank_info->vblank);
 201
 202         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &keep_private_server->wait_list, link) {
 203                 if (w->vblank_info == vblank_info)
 204                         destroy_wait(w);
 205         }
 206
 207         LIST_DEL(&vblank_info->link);
 208         LIST_DEL(&vblank_info->valid_link);
 209
 210         free(vblank_info);
 211 }
 212
 213 static void
 214 _tdm_server_vblank_cb_destroy(struct wl_client *client, struct wl_resource *resource)
 215 {
 216         wl_resource_destroy(resource);
 217 }
 218
 219 static void
 220 _tdm_server_vblank_cb_set_name(struct wl_client *client, struct wl_resource *resource, const char *name)
 221 {
 222         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 223
 224         tdm_vblank_set_name(vblank_info->vblank, name);
 225 }
 226
 227 static void
 228 _tdm_server_vblank_cb_set_fps(struct wl_client *client, struct wl_resource *resource, uint32_t fps)
 229 {
 230         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 231
 232         tdm_vblank_set_fps(vblank_info->vblank, fps);
 233 }
 234
 235 static void
 236 _tdm_server_vblank_cb_set_offset(struct wl_client *client, struct wl_resource *resource, int32_t offset)
 237 {
 238         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 239
 240         tdm_vblank_set_offset(vblank_info->vblank, offset);
 241 }
 242
 243 static void
 244 _tdm_server_vblank_cb_set_enable_fake(struct wl_client *client, struct wl_resource *resource, uint32_t enable_fake)
 245 {
 246         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 247
 248         tdm_vblank_set_enable_fake(vblank_info->vblank, enable_fake);
 249 }
 250
 251 static void
 252 _tdm_server_vblank_cb_wait_vblank(struct wl_client *client, struct wl_resource *resource,
 253                                                                   uint32_t interval, uint32_t req_id, uint32_t req_sec, uint32_t req_usec)
 254 {
 255         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 256         tdm_server_output_info *output_info = vblank_info->output_info;
 257         tdm_private_server *private_server = output_info->private_server;
 258         tdm_server_wait_info *wait_info;
 259         unsigned int enable_fake = 0;
 260         tdm_error ret;
 261
 262         TDM_TRACE_COUNT(ServerWaitVBlank, req_id);
 263
 264         wait_info = calloc(1, sizeof * wait_info);
 265         if (!wait_info) {
 266                 TDM_ERR("alloc failed");
 267                 ret = TDM_ERROR_OUT_OF_MEMORY;
 268                 goto wait_failed;
 269         }
 270
 271         LIST_ADDTAIL(&wait_info->link, &private_server->wait_list);
 272         wait_info->vblank_info = vblank_info;
 273         wait_info->req_id = req_id;
 274
 275         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 276                 TDM_INFO("req_id(%d) wait", req_id);
 277
 278         ret = tdm_vblank_wait(vblank_info->vblank, req_sec, req_usec, interval, _tdm_server_cb_vblank, wait_info);
 279
 280         tdm_vblank_get_enable_fake(vblank_info->vblank, &enable_fake);
 281         if (!enable_fake && ret == TDM_ERROR_DPMS_OFF)
 282                 goto wait_failed;
 283
 284         TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, wait_failed);
 285
 286         return;
 287 wait_failed:
 288         wl_tdm_vblank_send_done(vblank_info->resource, req_id, 0, 0, 0, ret);
 289         if (wait_info)
 290                 destroy_wait(wait_info);
 291 }
 292
 293 static void
 294 _tdm_server_vblank_cb_wait_vblank_seq(struct wl_client *client, struct wl_resource *resource,
 295                                                                           uint32_t sequence, uint32_t req_id, uint32_t req_sec, uint32_t req_usec)
 296 {
 297         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 298         tdm_server_output_info *output_info = vblank_info->output_info;
 299         tdm_private_server *private_server = output_info->private_server;
 300         tdm_server_wait_info *wait_info;
 301         unsigned int enable_fake = 0;
 302         tdm_error ret;
 303
 304         TDM_TRACE_COUNT(ServerWaitVBlank, req_id);
 305
 306         wait_info = calloc(1, sizeof * wait_info);
 307         if (!wait_info) {
 308                 TDM_ERR("alloc failed");
 309                 ret = TDM_ERROR_OUT_OF_MEMORY;
 310                 goto wait_failed;
 311         }
 312
 313         LIST_ADDTAIL(&wait_info->link, &private_server->wait_list);
 314         wait_info->vblank_info = vblank_info;
 315         wait_info->req_id = req_id;
 316
 317         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 318                 TDM_INFO("req_id(%d) wait", req_id);
 319
 320         ret = tdm_vblank_wait_seq(vblank_info->vblank, req_sec, req_usec, sequence, _tdm_server_cb_vblank, wait_info);
 321
 322         tdm_vblank_get_enable_fake(vblank_info->vblank, &enable_fake);
 323         if (!enable_fake && ret == TDM_ERROR_DPMS_OFF)
 324                 goto wait_failed;
 325
 326         TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, wait_failed);
 327
 328         return;
 329 wait_failed:
 330         wl_tdm_vblank_send_done(vblank_info->resource, req_id, 0, 0, 0, ret);
 331         if (wait_info)
 332                 destroy_wait(wait_info);
 333 }
 334
 335 static const struct wl_tdm_vblank_interface tdm_vblank_implementation = {
 336         _tdm_server_vblank_cb_destroy,
 337         _tdm_server_vblank_cb_set_name,
 338         _tdm_server_vblank_cb_set_fps,
 339         _tdm_server_vblank_cb_set_offset,
 340         _tdm_server_vblank_cb_set_enable_fake,
 341         _tdm_server_vblank_cb_wait_vblank,
 342         _tdm_server_vblank_cb_wait_vblank_seq,
 343 };
 344
 345 static void
 346 _tdm_server_output_cb_destroy(struct wl_client *client, struct wl_resource *resource)
 347 {
 348         wl_resource_destroy(resource);
 349 }
 350
 351 static void
 352 _tdm_server_output_cb_create_vblank(struct wl_client *client, struct wl_resource *resource, uint32_t id)
 353 {
 354         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 355         tdm_private_server *private_server = output_info->private_server;
 356         tdm_private_loop *private_loop = private_server->private_loop;
 357         struct wl_resource *vblank_resource;
 358         tdm_vblank *vblank;
 359         tdm_server_vblank_info *vblank_info;
 360
 361         vblank_resource =
 362                 wl_resource_create(client, &wl_tdm_vblank_interface,
 363                                                    wl_resource_get_version(resource), id);
 364         if (!vblank_resource) {
 365                 wl_resource_post_no_memory(resource);
 366                 TDM_ERR("wl_resource_create failed");
 367                 return;
 368         }
 369
 370         vblank = tdm_vblank_create(private_loop->dpy, output_info->output, NULL);
 371         if (!vblank) {
 372                 wl_resource_post_no_memory(resource);
 373                 wl_resource_destroy(vblank_resource);
 374                 TDM_ERR("tdm_vblank_create failed");
 375                 return;
 376         }
 377
 378         vblank_info = calloc(1, sizeof * vblank_info);
 379         if (!vblank_info) {
 380                 wl_resource_post_no_memory(resource);
 381                 wl_resource_destroy(vblank_resource);
 382                 tdm_vblank_destroy(vblank);
 383                 TDM_ERR("alloc failed");
 384                 return;
 385         }
 386
 387         LIST_ADDTAIL(&vblank_info->link, &output_info->vblank_list);
 388         LIST_ADDTAIL(&vblank_info->valid_link, &valid_vblank_list);
 389
 390         vblank_info->output_info = output_info;
 391         vblank_info->resource = vblank_resource;
 392         vblank_info->vblank = vblank;
 393
 394         wl_resource_set_implementation(vblank_resource, &tdm_vblank_implementation,
 395                                                                    vblank_info, destroy_vblank_callback);
 396
 397         return;
 398 }
 399
 400 static const struct wl_tdm_output_interface tdm_output_implementation = {
 401         _tdm_server_output_cb_destroy,
 402         _tdm_server_output_cb_create_vblank,
 403 };
 404
 405 static void
 406 destroy_output_callback(struct wl_resource *resource)
 407 {
 408         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 409         tdm_server_vblank_info *v = NULL, *vv = NULL;
 410
 411         TDM_RETURN_IF_FAIL(output_info != NULL);
 412
 413         tdm_output_remove_change_handler(output_info->output,
 414                                                                          _tdm_server_cb_output_change, output_info);
 415
 416         LIST_FOR_EACH_ENTRY_SAFE(v, vv, &output_info->vblank_list, link) {
 417                 wl_resource_destroy(v->resource);
 418         }
 419
 420         LIST_DEL(&output_info->link);
 421         free(output_info);
 422 }
 423
 424 static void
 425 _tdm_server_cb_create_output(struct wl_client *client, struct wl_resource *resource,
 426                                                          const char *name, uint32_t id)
 427 {
 428         tdm_private_server *private_server = wl_resource_get_user_data(resource);
 429         tdm_server_output_info *output_info;
 430         struct wl_resource *output_resource = NULL;
 431         tdm_output *output;
 432         const tdm_output_mode *mode = NULL;
 433         tdm_output_dpms dpms_value;
 434         tdm_output_conn_status status;
 435
 436         output = _tdm_server_find_output(private_server, name);
 437         if (!output) {
 438                 TDM_ERR("There is no '%s' output", name);
 439                 wl_resource_post_error(resource, WL_DISPLAY_ERROR_INVALID_OBJECT,
 440                                                            "There is no '%s' output", name);
 441                 return;
 442         }
 443
 444         tdm_output_get_mode(output, &mode);
 445         if (!mode) {
 446                 TDM_ERR("no mode for '%s' output", name);
 447                 wl_resource_post_error(resource, WL_DISPLAY_ERROR_INVALID_OBJECT,
 448                                                            "no mode for '%s' output", name);
 449                 return;
 450         }
 451
 452         tdm_output_get_dpms(output, &dpms_value);
 453         tdm_output_get_conn_status(output, &status);
 454
 455         output_resource =
 456                 wl_resource_create(client, &wl_tdm_output_interface,
 457                                                    wl_resource_get_version(resource), id);
 458         if (!output_resource) {
 459                 wl_resource_post_no_memory(resource);
 460                 TDM_ERR("wl_resource_create failed");
 461                 return;
 462         }
 463
 464         output_info = calloc(1, sizeof * output_info);
 465         if (!output_info) {
 466                 wl_resource_post_no_memory(resource);
 467                 wl_resource_destroy(output_resource);
 468                 TDM_ERR("alloc failed");
 469                 return;
 470         }
 471
 472         LIST_ADDTAIL(&output_info->link, &private_server->output_list);
 473         output_info->private_server = private_server;
 474         output_info->resource = output_resource;
 475         output_info->output = output;
 476         LIST_INITHEAD(&output_info->vblank_list);
 477
 478         tdm_output_add_change_handler(output, _tdm_server_cb_output_change, output_info);
 479
 480         wl_resource_set_implementation(output_resource, &tdm_output_implementation,
 481                                                                    output_info, destroy_output_callback);
 482
 483         wl_tdm_output_send_mode(output_resource, mode->hdisplay, mode->vdisplay, mode->vrefresh);
 484         wl_tdm_output_send_dpms(output_resource, dpms_value);
 485         wl_tdm_output_send_connection(output_resource, status);
 486 }
 487
 488 static void
 489 _tdm_server_cb_debug(struct wl_client *client, struct wl_resource *resource, const char *options)
 490 {
 491         tdm_private_server *private_server = wl_resource_get_user_data(resource);
 492         tdm_private_loop *private_loop = private_server->private_loop;
 493         char message[TDM_SERVER_REPLY_MSG_LEN];
 494         int size = sizeof(message);
 495         uid_t uid;
 496
 497         wl_client_get_credentials(client, NULL, &uid, NULL);
 498
 499         if (uid != 0) {
 500                 snprintf(message, size, "tdm-monitor: SHOULD be a superuser.\n");
 501                 TDM_ERR("%s", message);
 502         } else {
 503                 tdm_monitor_server_command(private_loop->dpy, options, message, &size);
 504         }
 505
 506         wl_tdm_send_debug_done(resource, message);
 507 }
 508
 509 static void
 510 _tdm_server_cb_set_client_vblank_fps(struct wl_client *client, struct wl_resource *resource,
 511                                                                          unsigned int pid, const char *name, unsigned int fps)
 512 {
 513         tdm_error ret = tdm_server_set_client_vblank_fps(pid, name, fps);
 514         TDM_RETURN_IF_FAIL(ret == TDM_ERROR_NONE);
 515
 516         TDM_INFO("'%s' vblank fps(PID: '%u'): %u", name, pid, fps);
 517 }
 518
 519 static const struct wl_tdm_interface tdm_implementation = {
 520         _tdm_server_cb_debug,
 521         _tdm_server_cb_create_output,
 522         _tdm_server_cb_set_client_vblank_fps,
 523 };
 524
 525 static void
 526 _tdm_server_bind(struct wl_client *client, void *data,
 527                                  uint32_t version, uint32_t id)
 528 {
 529         struct wl_resource *resource;
 530
 531         resource = wl_resource_create(client, &wl_tdm_interface, version, id);
 532         if (!resource) {
 533                 wl_client_post_no_memory(client);
 534                 return;
 535         }
 536
 537         wl_resource_set_implementation(resource, &tdm_implementation, data, NULL);
 538 }
 539
 540 INTERN tdm_error
 541 tdm_server_init(tdm_private_loop *private_loop)
 542 {
 543         tdm_private_server *private_server;
 544
 545         TDM_RETURN_VAL_IF_FAIL(private_loop, TDM_ERROR_OPERATION_FAILED);
 546         TDM_RETURN_VAL_IF_FAIL(private_loop->wl_display, TDM_ERROR_OPERATION_FAILED);
 547
 548         if (private_loop->private_server)
 549                 return TDM_ERROR_NONE;
 550
 551         if (wl_display_add_socket(private_loop->wl_display, "tdm-socket")) {
 552                 TDM_ERR("createing a tdm-socket failed");
 553                 return TDM_ERROR_OPERATION_FAILED;
 554         }
 555
 556         private_server = calloc(1, sizeof * private_server);
 557         if (!private_server) {
 558                 TDM_ERR("alloc failed");
 559                 return TDM_ERROR_OUT_OF_MEMORY;
 560         }
 561
 562         LIST_INITHEAD(&private_server->output_list);
 563         LIST_INITHEAD(&private_server->wait_list);
 564
 565         if (!wl_global_create(private_loop->wl_display, &wl_tdm_interface, 1,
 566                                                   private_server, _tdm_server_bind)) {
 567                 TDM_ERR("creating a global resource failed");
 568                 free(private_server);
 569                 return TDM_ERROR_OUT_OF_MEMORY;
 570         }
 571
 572         LIST_INITHEAD(&valid_vblank_list);
 573
 574         private_server->private_loop = private_loop;
 575         private_loop->private_server = private_server;
 576         keep_private_server = private_server;
 577
 578         return TDM_ERROR_NONE;
 579 }
 580
 581 INTERN void
 582 tdm_server_deinit(tdm_private_loop *private_loop)
 583 {
 584         tdm_server_output_info *o = NULL, *oo = NULL;
 585         tdm_server_wait_info *w = NULL, *ww = NULL;
 586         tdm_private_server *private_server;
 587
 588         if (!private_loop->private_server)
 589                 return;
 590
 591         private_server = private_loop->private_server;
 592
 593         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_server->wait_list, link) {
 594                 destroy_wait(w);
 595         }
 596
 597         LIST_FOR_EACH_ENTRY_SAFE(o, oo, &private_server->output_list, link) {
 598                 wl_resource_destroy(o->resource);
 599         }
 600
 601         free(private_server);
 602         private_loop->private_server = NULL;
 603         keep_private_server = NULL;
 604 }
 605
 606 INTERN tdm_error
 607 tdm_server_set_client_vblank_fps(unsigned int pid, const char *name, unsigned int fps)
 608 {
 609         tdm_server_vblank_info *v;
 610
 611         TDM_RETURN_VAL_IF_FAIL(pid > 0, TDM_ERROR_INVALID_PARAMETER);
 612         TDM_RETURN_VAL_IF_FAIL(fps > 0, TDM_ERROR_INVALID_PARAMETER);
 613
 614         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 615                 struct wl_client *client = wl_resource_get_client(v->resource);
 616                 pid_t client_pid = 0;
 617                 const char *vblank_name = NULL;
 618
 619                 if (!client)
 620                         continue;
 621
 622                 wl_client_get_credentials(client, &client_pid, NULL, NULL);
 623
 624                 if (client_pid != pid)
 625                         continue;
 626
 627                 if (name && strncmp(name, TDM_VBLANK_DEFAULT_NAME, TDM_NAME_LEN)) {
 628                         tdm_vblank_get_name(v->vblank, &vblank_name);
 629                         if (strncmp(vblank_name, name, TDM_NAME_LEN))
 630                                 continue;
 631                 }
 632
 633                 tdm_vblank_set_fps(v->vblank, fps);
 634         }
 635
 636         return TDM_ERROR_NONE;
 637 }
 638
 639 static void
 640 _tdm_server_get_process_name(pid_t pid, char *name, unsigned int size)
 641 {
 642         char proc[TDM_NAME_LEN], pname[TDM_NAME_LEN];
 643         FILE *h;
 644         size_t len;
 645
 646         snprintf(proc, TDM_NAME_LEN, "/proc/%d/cmdline", pid);
 647         h = fopen(proc, "r");
 648         if (!h)
 649                 return;
 650
 651         len = fread(pname, sizeof(char), TDM_NAME_LEN, h);
 652         if (len == 0) {
 653                 char *p = strncpy(pname, "NO NAME", sizeof(pname) - 1);
 654                 len = p - pname;
 655         }
 656         pname[len - 1] = '\0';
 657
 658         strncpy(name, pname, size - 1);
 659         name[size - 1] = '\0';
 660
 661         fclose(h);
 662 }
 663
 664 INTERN void
 665 tdm_server_get_vblank_list_information(tdm_display *dpy, char *reply, int *len)
 666 {
 667         tdm_server_vblank_info *v;
 668
 669         TDM_SNPRINTF(reply, len, "[Client Vblank List]\n");
 670         TDM_SNPRINTF(reply, len, "---------------------------------------------------------------\n");
 671         TDM_SNPRINTF(reply, len, "name         fps offset fake process\n");
 672         TDM_SNPRINTF(reply, len, "---------------------------------------------------------------\n");
 673
 674         LIST_FOR_EACH_ENTRY(v, &valid_vblank_list, valid_link) {
 675                 struct wl_client *client = wl_resource_get_client(v->resource);
 676                 const char *vbl_name = NULL;
 677                 char proc_name[TDM_NAME_LEN];
 678                 unsigned int fps = 0, fake = 0;
 679                 int offset = 0;
 680                 pid_t pid = 0;
 681
 682                 tdm_vblank_get_name(v->vblank, &vbl_name);
 683                 tdm_vblank_get_fps(v->vblank, &fps);
 684                 tdm_vblank_get_offset(v->vblank, &offset);
 685                 tdm_vblank_get_enable_fake(v->vblank, &fake);
 686
 687                 snprintf(proc_name, TDM_NAME_LEN, "Unknown");
 688                 if (client) {
 689                         wl_client_get_credentials(client, &pid, NULL, NULL);
 690                         _tdm_server_get_process_name(pid, proc_name, TDM_NAME_LEN);
 691                 }
 692
 693                 TDM_SNPRINTF(reply, len, "%-12s %u  %d      %u    %s (pid: %u)\n",
 694                                          vbl_name, fps, offset, fake, proc_name, pid);
 695         }
 696
 697         TDM_SNPRINTF(reply, len, "\n");
 698 }
 699