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         unsigned int watch_output_changes;
  67 } tdm_server_output_info;
  68
  69 typedef struct _tdm_server_vblank_info {
  70         struct list_head link;
  71         tdm_server_output_info *output_info;
  72         struct wl_resource *resource;
  73
  74         tdm_vblank *vblank;
  75         unsigned int stamp;
  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         double req_time;
  84 } tdm_server_wait_info;
  85
  86 typedef struct _tdm_server_client_info {
  87         struct list_head link;
  88         pid_t pid;
  89         char name[TDM_NAME_LEN];
  90         struct wl_resource *resource;
  91 } tdm_server_client_info;
  92
  93 static tdm_private_server *keep_private_server;
  94 static struct list_head client_list;
  95
  96 static void destroy_wait(tdm_server_wait_info *wait_info);
  97
  98 static void
  99 _tdm_server_get_process_name(pid_t pid, char *name, unsigned int size)
 100 {
 101         char proc[TDM_NAME_LEN], pname[TDM_NAME_LEN];
 102         FILE *h;
 103         size_t len;
 104
 105         snprintf(name, size, "Unknown");
 106
 107         snprintf(proc, TDM_NAME_LEN, "/proc/%d/cmdline", pid);
 108         h = fopen(proc, "r");
 109         if (!h)
 110                 return;
 111
 112         len = fread(pname, sizeof(char), TDM_NAME_LEN, h);
 113         if (len == 0) {
 114                 char *p = strncpy(pname, "NO NAME", sizeof(pname) - 1);
 115                 len = p - pname;
 116         }
 117         pname[len - 1] = '\0';
 118
 119         strncpy(name, pname, size - 1);
 120         name[size - 1] = '\0';
 121
 122         fclose(h);
 123 }
 124
 125 static tdm_output*
 126 _tdm_server_find_output(tdm_private_server *private_server, const char *name)
 127 {
 128         tdm_private_loop *private_loop = private_server->private_loop;
 129         tdm_output *found = NULL;
 130
 131         if (!strncasecmp(name, "primary", 7) || !strncasecmp(name, "default", 7))
 132                 found = tdm_display_get_output(private_loop->dpy, 0, NULL);
 133
 134         if (!found) {
 135                 int count = 0, i;
 136
 137                 tdm_display_get_output_count(private_loop->dpy, &count);
 138
 139                 for (i = 0; i < count; i++) {
 140                         tdm_output *output = tdm_display_get_output(private_loop->dpy, i, NULL);
 141                         tdm_output_conn_status status;
 142                         const char *model = NULL;
 143                         tdm_error ret;
 144
 145                         ret = tdm_output_get_conn_status(output, &status);
 146                         if (ret || status == TDM_OUTPUT_CONN_STATUS_DISCONNECTED)
 147                                 continue;
 148
 149                         ret = tdm_output_get_model_info(output, NULL, &model, NULL);
 150                         if (ret || !model)
 151                                 continue;
 152
 153                         if (strncmp(model, name, TDM_NAME_LEN))
 154                                 continue;
 155
 156                         found = output;
 157                         break;
 158                 }
 159         }
 160
 161         return found;
 162 }
 163
 164 static void
 165 _tdm_server_send_done(tdm_server_wait_info *wait_info, tdm_error error,
 166                                           unsigned int sequence, unsigned int tv_sec, unsigned int tv_usec)
 167 {
 168         tdm_server_wait_info *found;
 169         tdm_server_vblank_info *vblank_info;
 170
 171         if (!keep_private_server)
 172                 return;
 173
 174         LIST_FIND_ITEM(wait_info, &keep_private_server->wait_list,
 175                                    tdm_server_wait_info, link, found);
 176         if (!found) {
 177                 TDM_DBG("wait_info(%p) is destroyed", wait_info);
 178                 return;
 179         }
 180
 181         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 182                 TDM_DBG("req_id(%d) done", wait_info->req_id);
 183
 184         vblank_info = wait_info->vblank_info;
 185         wl_tdm_vblank_send_done(vblank_info->resource, wait_info->req_id,
 186                                                         sequence, tv_sec, tv_usec, error);
 187
 188         destroy_wait(wait_info);
 189 }
 190
 191 static void
 192 _tdm_server_cb_vblank(tdm_vblank *vblank, tdm_error error, unsigned int sequence,
 193                                           unsigned int tv_sec, unsigned int tv_usec, void *user_data)
 194 {
 195         _tdm_server_send_done((tdm_server_wait_info*)user_data, error, sequence, tv_sec, tv_usec);
 196 }
 197
 198 static void
 199 _tdm_server_cb_output_change(tdm_output *output, tdm_output_change_type type,
 200                                                          tdm_value value, void *user_data)
 201 {
 202         tdm_server_output_info *output_info = user_data;
 203         struct wl_client *client;
 204         pid_t pid = 0;
 205
 206         TDM_RETURN_IF_FAIL(output_info != NULL);
 207
 208         client = wl_resource_get_client(output_info->resource);
 209         TDM_RETURN_IF_FAIL(client != NULL);
 210
 211         wl_client_get_credentials(client, &pid, NULL, NULL);
 212
 213         if (!output_info->watch_output_changes) {
 214                 TDM_DBG("skip sending the output changes: pid(%d)", (unsigned int)pid);
 215                 return;
 216         }
 217
 218         TDM_DBG("send the output changes: %d", (unsigned int)pid);
 219
 220         switch (type) {
 221         case TDM_OUTPUT_CHANGE_DPMS:
 222                 wl_tdm_output_send_dpms(output_info->resource, value.u32, TDM_ERROR_NONE);
 223                 break;
 224         case TDM_OUTPUT_CHANGE_CONNECTION:
 225                 wl_tdm_output_send_connection(output_info->resource, value.u32, TDM_ERROR_NONE);
 226                 break;
 227         default:
 228                 break;
 229         }
 230 }
 231
 232 static void
 233 destroy_wait(tdm_server_wait_info *wait_info)
 234 {
 235         LIST_DEL(&wait_info->link);
 236         free(wait_info);
 237 }
 238
 239 static void
 240 destroy_vblank_callback(struct wl_resource *resource)
 241 {
 242         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 243         tdm_server_wait_info *w = NULL, *ww = NULL;
 244
 245         TDM_RETURN_IF_FAIL(vblank_info != NULL);
 246
 247         LIST_DEL(&vblank_info->link);
 248
 249         if (vblank_info->vblank)
 250                 tdm_vblank_destroy(vblank_info->vblank);
 251
 252         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &keep_private_server->wait_list, link) {
 253                 if (w->vblank_info == vblank_info)
 254                         destroy_wait(w);
 255         }
 256
 257         free(vblank_info);
 258 }
 259
 260 static void
 261 _tdm_server_vblank_cb_destroy(struct wl_client *client, struct wl_resource *resource)
 262 {
 263         wl_resource_destroy(resource);
 264 }
 265
 266 static void
 267 _tdm_server_vblank_cb_set_name(struct wl_client *client, struct wl_resource *resource, const char *name)
 268 {
 269         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 270
 271         tdm_vblank_set_name(vblank_info->vblank, name);
 272 }
 273
 274 static void
 275 _tdm_server_vblank_cb_set_fps(struct wl_client *client, struct wl_resource *resource, uint32_t fps)
 276 {
 277         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 278
 279         tdm_vblank_set_fps(vblank_info->vblank, fps);
 280 }
 281
 282 static void
 283 _tdm_server_vblank_cb_set_offset(struct wl_client *client, struct wl_resource *resource, int32_t offset)
 284 {
 285         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 286
 287         tdm_vblank_set_offset(vblank_info->vblank, offset);
 288 }
 289
 290 static void
 291 _tdm_server_vblank_cb_set_enable_fake(struct wl_client *client, struct wl_resource *resource, uint32_t enable_fake)
 292 {
 293         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 294
 295         tdm_vblank_set_enable_fake(vblank_info->vblank, enable_fake);
 296 }
 297
 298 static void
 299 _tdm_server_vblank_cb_wait_vblank(struct wl_client *client, struct wl_resource *resource,
 300                                                                   uint32_t interval, uint32_t req_id, uint32_t req_sec, uint32_t req_usec)
 301 {
 302         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 303         tdm_server_output_info *output_info = vblank_info->output_info;
 304         tdm_private_server *private_server = output_info->private_server;
 305         tdm_server_wait_info *wait_info;
 306         unsigned int enable_fake = 0;
 307         tdm_error ret;
 308
 309         wait_info = calloc(1, sizeof * wait_info);
 310         if (!wait_info) {
 311                 TDM_ERR("alloc failed");
 312                 ret = TDM_ERROR_OUT_OF_MEMORY;
 313                 goto wait_failed;
 314         }
 315
 316         LIST_ADDTAIL(&wait_info->link, &private_server->wait_list);
 317         wait_info->vblank_info = vblank_info;
 318         wait_info->req_id = req_id;
 319         wait_info->req_time = TDM_TIME(req_sec, req_usec);
 320
 321         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 322                 TDM_DBG("req_id(%d) wait", req_id);
 323
 324         ret = tdm_vblank_wait(vblank_info->vblank, req_sec, req_usec, interval, _tdm_server_cb_vblank, wait_info);
 325
 326         tdm_vblank_get_enable_fake(vblank_info->vblank, &enable_fake);
 327         if (!enable_fake && ret == TDM_ERROR_DPMS_OFF)
 328                 goto wait_failed;
 329
 330         TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, wait_failed);
 331
 332         return;
 333 wait_failed:
 334         wl_tdm_vblank_send_done(vblank_info->resource, req_id, 0, 0, 0, ret);
 335         if (wait_info)
 336                 destroy_wait(wait_info);
 337 }
 338
 339 static void
 340 _tdm_server_vblank_cb_wait_vblank_seq(struct wl_client *client, struct wl_resource *resource,
 341                                                                           uint32_t sequence, uint32_t req_id, uint32_t req_sec, uint32_t req_usec)
 342 {
 343         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 344         tdm_server_output_info *output_info = vblank_info->output_info;
 345         tdm_private_server *private_server = output_info->private_server;
 346         tdm_server_wait_info *wait_info;
 347         unsigned int enable_fake = 0;
 348         tdm_error ret;
 349
 350         wait_info = calloc(1, sizeof * wait_info);
 351         if (!wait_info) {
 352                 TDM_ERR("alloc failed");
 353                 ret = TDM_ERROR_OUT_OF_MEMORY;
 354                 goto wait_failed;
 355         }
 356
 357         LIST_ADDTAIL(&wait_info->link, &private_server->wait_list);
 358         wait_info->vblank_info = vblank_info;
 359         wait_info->req_id = req_id;
 360         wait_info->req_time = TDM_TIME(req_sec, req_usec);
 361
 362         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 363                 TDM_DBG("req_id(%d) wait", req_id);
 364
 365         ret = tdm_vblank_wait_seq(vblank_info->vblank, req_sec, req_usec, sequence, _tdm_server_cb_vblank, wait_info);
 366
 367         tdm_vblank_get_enable_fake(vblank_info->vblank, &enable_fake);
 368         if (!enable_fake && ret == TDM_ERROR_DPMS_OFF)
 369                 goto wait_failed;
 370
 371         TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, wait_failed);
 372
 373         return;
 374 wait_failed:
 375         wl_tdm_vblank_send_done(vblank_info->resource, req_id, 0, 0, 0, ret);
 376         if (wait_info)
 377                 destroy_wait(wait_info);
 378 }
 379
 380 static const struct wl_tdm_vblank_interface tdm_vblank_implementation = {
 381         _tdm_server_vblank_cb_destroy,
 382         _tdm_server_vblank_cb_set_name,
 383         _tdm_server_vblank_cb_set_fps,
 384         _tdm_server_vblank_cb_set_offset,
 385         _tdm_server_vblank_cb_set_enable_fake,
 386         _tdm_server_vblank_cb_wait_vblank,
 387         _tdm_server_vblank_cb_wait_vblank_seq,
 388 };
 389
 390 static void
 391 _tdm_server_output_cb_destroy(struct wl_client *client, struct wl_resource *resource)
 392 {
 393         wl_resource_destroy(resource);
 394 }
 395
 396 static void
 397 _tdm_server_output_cb_create_vblank(struct wl_client *client, struct wl_resource *resource, uint32_t id)
 398 {
 399         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 400         tdm_private_server *private_server = output_info->private_server;
 401         tdm_private_loop *private_loop = private_server->private_loop;
 402         struct wl_resource *vblank_resource;
 403         tdm_vblank *vblank;
 404         tdm_server_vblank_info *vblank_info;
 405
 406         vblank_resource =
 407                 wl_resource_create(client, &wl_tdm_vblank_interface,
 408                                                    wl_resource_get_version(resource), id);
 409         if (!vblank_resource) {
 410                 wl_resource_post_no_memory(resource);
 411                 TDM_ERR("wl_resource_create failed");
 412                 return;
 413         }
 414
 415         vblank = tdm_vblank_create(private_loop->dpy, output_info->output, NULL);
 416         if (!vblank) {
 417                 wl_resource_post_no_memory(resource);
 418                 wl_resource_destroy(vblank_resource);
 419                 TDM_ERR("tdm_vblank_create failed");
 420                 return;
 421         }
 422
 423         vblank_info = calloc(1, sizeof * vblank_info);
 424         if (!vblank_info) {
 425                 wl_resource_post_no_memory(resource);
 426                 wl_resource_destroy(vblank_resource);
 427                 tdm_vblank_destroy(vblank);
 428                 TDM_ERR("alloc failed");
 429                 return;
 430         }
 431
 432         LIST_ADDTAIL(&vblank_info->link, &output_info->vblank_list);
 433         vblank_info->output_info = output_info;
 434         vblank_info->resource = vblank_resource;
 435         vblank_info->vblank = vblank;
 436         vblank_info->stamp = (unsigned int)tdm_vblank_get_stamp(vblank);
 437
 438         tdm_vblank_set_resource(vblank, vblank_resource);
 439
 440         wl_resource_set_implementation(vblank_resource, &tdm_vblank_implementation,
 441                                                                    vblank_info, destroy_vblank_callback);
 442
 443         wl_tdm_vblank_send_stamp(vblank_info->resource, vblank_info->stamp);
 444
 445         if (tdm_ttrace_module & TDM_TTRACE_CLIENT) {
 446                 tdm_output *output = tdm_display_get_output(private_loop->dpy, tdm_ttrace_output, NULL);
 447                 if (output == output_info->output)
 448                         wl_tdm_vblank_send_ttrace(vblank_info->resource, 1);
 449         }
 450
 451         return;
 452 }
 453
 454 static void
 455 _tdm_server_output_cb_watch_output_changes(struct wl_client *client, struct wl_resource *resource, unsigned int enable)
 456 {
 457         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 458
 459         TDM_RETURN_IF_FAIL(output_info != NULL);
 460
 461         output_info->watch_output_changes = enable;
 462 }
 463
 464 static void
 465 _tdm_server_output_cb_get_connection(struct wl_client *client, struct wl_resource *resource)
 466 {
 467         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 468         tdm_output_conn_status status = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 469         tdm_error ret;
 470
 471         TDM_RETURN_IF_FAIL(output_info != NULL);
 472
 473         ret = tdm_output_get_conn_status(output_info->output, &status);
 474         TDM_GOTO_IF_FAIL(ret != TDM_ERROR_NONE, failed);
 475
 476         wl_tdm_output_send_connection(output_info->resource, status, ret);
 477
 478         return;
 479
 480 failed:
 481         wl_tdm_output_send_connection(output_info->resource, TDM_OUTPUT_CONN_STATUS_DISCONNECTED, ret);
 482 }
 483
 484 static void
 485 _tdm_server_output_cb_get_mode(struct wl_client *client, struct wl_resource *resource)
 486 {
 487         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 488         tdm_output_conn_status status = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 489         tdm_error ret;
 490
 491         TDM_RETURN_IF_FAIL(output_info != NULL);
 492
 493         ret = tdm_output_get_conn_status(output_info->output, &status);
 494         TDM_GOTO_IF_FAIL(ret != TDM_ERROR_NONE, failed);
 495
 496         if (status != TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 497                 const tdm_output_mode *mode = NULL;
 498                 unsigned int hdisplay, vdisplay, vrefresh;
 499
 500                 ret = tdm_output_get_mode(output_info->output, &mode);
 501                 TDM_GOTO_IF_FAIL(ret != TDM_ERROR_NONE, failed);
 502
 503                 hdisplay = (mode) ? mode->hdisplay : 0;
 504                 vdisplay = (mode) ? mode->vdisplay : 0;
 505                 vrefresh = (mode) ? mode->vrefresh : 0;
 506
 507                 wl_tdm_output_send_mode(output_info->resource, hdisplay, vdisplay, vrefresh, ret);
 508         } else {
 509                 wl_tdm_output_send_mode(output_info->resource, 0, 0, 0, TDM_ERROR_OUTPUT_DISCONNECTED);
 510         }
 511
 512         return;
 513 failed:
 514         wl_tdm_output_send_mode(output_info->resource, 0, 0, 0, ret);
 515 }
 516
 517 static void
 518 _tdm_server_output_cb_get_dpms(struct wl_client *client, struct wl_resource *resource)
 519 {
 520         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 521         tdm_output_conn_status status = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 522         tdm_error ret;
 523
 524         TDM_RETURN_IF_FAIL(output_info != NULL);
 525
 526         ret = tdm_output_get_conn_status(output_info->output, &status);
 527         TDM_GOTO_IF_FAIL(ret != TDM_ERROR_NONE, failed);
 528
 529         if (status != TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 530                 tdm_output_dpms dpms_value = TDM_OUTPUT_DPMS_OFF;
 531
 532                 ret = tdm_output_get_dpms(output_info->output, &dpms_value);
 533                 TDM_GOTO_IF_FAIL(ret != TDM_ERROR_NONE, failed);
 534
 535                 wl_tdm_output_send_dpms(output_info->resource, dpms_value, ret);
 536         } else {
 537                 wl_tdm_output_send_dpms(output_info->resource, TDM_OUTPUT_DPMS_OFF, TDM_ERROR_OUTPUT_DISCONNECTED);
 538         }
 539
 540         return;
 541 failed:
 542         wl_tdm_output_send_dpms(output_info->resource, TDM_OUTPUT_DPMS_OFF, ret);
 543 }
 544
 545 static const struct wl_tdm_output_interface tdm_output_implementation = {
 546         _tdm_server_output_cb_destroy,
 547         _tdm_server_output_cb_create_vblank,
 548         _tdm_server_output_cb_watch_output_changes,
 549         _tdm_server_output_cb_get_connection,
 550         _tdm_server_output_cb_get_mode,
 551         _tdm_server_output_cb_get_dpms,
 552 };
 553
 554 static void
 555 destroy_output_callback(struct wl_resource *resource)
 556 {
 557         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 558         tdm_server_vblank_info *v = NULL, *vv = NULL;
 559
 560         TDM_RETURN_IF_FAIL(output_info != NULL);
 561
 562         LIST_DEL(&output_info->link);
 563
 564         tdm_output_remove_change_handler(output_info->output,
 565                                                                          _tdm_server_cb_output_change, output_info);
 566
 567         LIST_FOR_EACH_ENTRY_SAFE(v, vv, &output_info->vblank_list, link) {
 568                 wl_resource_destroy(v->resource);
 569         }
 570
 571         free(output_info);
 572 }
 573
 574 static void
 575 _tdm_server_cb_create_output(struct wl_client *client, struct wl_resource *resource,
 576                                                          const char *name, uint32_t id)
 577 {
 578         tdm_private_server *private_server = wl_resource_get_user_data(resource);
 579         tdm_server_output_info *output_info;
 580         struct wl_resource *output_resource = NULL;
 581         tdm_output *output;
 582         tdm_output_conn_status status = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 583         tdm_error ret;
 584
 585         output = _tdm_server_find_output(private_server, name);
 586         if (!output) {
 587                 TDM_ERR("There is no '%s' output", name);
 588                 wl_resource_post_error(resource, WL_DISPLAY_ERROR_INVALID_OBJECT,
 589                                                            "There is no '%s' output", name);
 590                 return;
 591         }
 592
 593         output_resource =
 594                 wl_resource_create(client, &wl_tdm_output_interface,
 595                                                    wl_resource_get_version(resource), id);
 596         if (!output_resource) {
 597                 wl_resource_post_no_memory(resource);
 598                 TDM_ERR("wl_resource_create failed");
 599                 return;
 600         }
 601
 602         output_info = calloc(1, sizeof * output_info);
 603         if (!output_info) {
 604                 wl_resource_post_no_memory(resource);
 605                 wl_resource_destroy(output_resource);
 606                 TDM_ERR("alloc failed");
 607                 return;
 608         }
 609
 610         LIST_ADDTAIL(&output_info->link, &private_server->output_list);
 611         output_info->private_server = private_server;
 612         output_info->resource = output_resource;
 613         output_info->output = output;
 614         LIST_INITHEAD(&output_info->vblank_list);
 615
 616         tdm_output_add_change_handler(output, _tdm_server_cb_output_change, output_info);
 617
 618         wl_resource_set_implementation(output_resource, &tdm_output_implementation,
 619                                                                    output_info, destroy_output_callback);
 620
 621         ret = tdm_output_get_conn_status(output, &status);
 622         wl_tdm_output_send_connection(output_resource, status, ret);
 623
 624         if (status != TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 625                 tdm_output_dpms dpms_value = TDM_OUTPUT_DPMS_OFF;
 626                 const tdm_output_mode *mode = NULL;
 627                 unsigned int hdisplay, vdisplay, vrefresh;
 628
 629                 ret = tdm_output_get_mode(output, &mode);
 630                 hdisplay = (mode) ? mode->hdisplay : 0;
 631                 vdisplay = (mode) ? mode->vdisplay : 0;
 632                 vrefresh = (mode) ? mode->vrefresh : 0;
 633                 wl_tdm_output_send_mode(output_resource, hdisplay, vdisplay, vrefresh, ret);
 634
 635                 ret = tdm_output_get_dpms(output, &dpms_value);
 636                 wl_tdm_output_send_dpms(output_resource, dpms_value, ret);
 637         } else {
 638                 wl_tdm_output_send_mode(output_resource, 0, 0, 0, TDM_ERROR_OUTPUT_DISCONNECTED);
 639                 wl_tdm_output_send_dpms(output_resource, TDM_OUTPUT_DPMS_OFF, TDM_ERROR_OUTPUT_DISCONNECTED);
 640         }
 641 }
 642
 643 static void
 644 _tdm_server_cb_debug(struct wl_client *client, struct wl_resource *resource, const char *options)
 645 {
 646         tdm_private_server *private_server = wl_resource_get_user_data(resource);
 647         tdm_private_loop *private_loop = private_server->private_loop;
 648         char message[TDM_SERVER_REPLY_MSG_LEN];
 649         char *m;
 650         int len = sizeof(message), size;
 651         uid_t uid;
 652
 653         wl_client_get_credentials(client, NULL, &uid, NULL);
 654
 655         if (uid != 0) {
 656                 snprintf(message, len, "tdm-monitor: SHOULD be a superuser.\n");
 657                 TDM_ERR("%s", message);
 658         } else {
 659                 tdm_monitor_server_command(private_loop->dpy, options, message, &len);
 660         }
 661
 662         size = sizeof(message) - len;
 663         m = message;
 664
 665         wl_client_flush(client);
 666
 667         while (size > 0) {
 668                 char buffer[TDM_DEBUG_REPLY_MSG_LEN];
 669                 int copylen = TDM_MIN(size, sizeof(buffer) - 1);
 670
 671                 strncpy(buffer, m, copylen);
 672                 m += copylen;
 673                 size -= copylen;
 674
 675                 buffer[copylen] = '\0';
 676
 677                 wl_tdm_send_debug_message(resource, buffer);
 678         }
 679
 680         wl_tdm_send_debug_done(resource);
 681 }
 682
 683 static const struct wl_tdm_interface tdm_implementation = {
 684         _tdm_server_cb_debug,
 685         _tdm_server_cb_create_output,
 686 };
 687
 688 static void
 689 destroy_client(struct wl_resource *resource)
 690 {
 691         tdm_server_client_info *c = NULL, *cc = NULL;
 692         struct wl_client *client;
 693
 694         client = wl_resource_get_client(resource);
 695         TDM_RETURN_IF_FAIL(client != NULL);
 696
 697         LIST_FOR_EACH_ENTRY_SAFE(c, cc, &client_list, link) {
 698                 if (c->resource == resource) {
 699                         LIST_DEL(&c->link);
 700                         free(c);
 701                         return;
 702                 }
 703         }
 704 }
 705
 706 static void
 707 _tdm_server_bind(struct wl_client *client, void *data,
 708                                  uint32_t version, uint32_t id)
 709 {
 710         struct wl_resource *resource;
 711         tdm_server_client_info *cinfo;
 712
 713         resource = wl_resource_create(client, &wl_tdm_interface, version, id);
 714         if (!resource) {
 715                 wl_client_post_no_memory(client);
 716                 return;
 717         }
 718
 719         cinfo = calloc(1, sizeof(tdm_server_client_info));
 720         if (!cinfo) {
 721                 wl_client_post_no_memory(client);
 722                 wl_resource_destroy(resource);
 723                 return;
 724         }
 725
 726         cinfo->resource = resource;
 727
 728         LIST_ADDTAIL(&cinfo->link, &client_list);
 729         wl_client_get_credentials(client, &cinfo->pid, NULL, NULL);
 730         _tdm_server_get_process_name(cinfo->pid, cinfo->name, TDM_NAME_LEN);
 731
 732         wl_resource_set_implementation(resource, &tdm_implementation, data, destroy_client);
 733 }
 734
 735 static int
 736 _tdm_getgrnam_r(const char *name)
 737 {
 738         struct group *grp = NULL;
 739         struct group *grp_res = NULL;
 740         char* buf = NULL;
 741         size_t buf_len;
 742         int ret;
 743         int id;
 744
 745         buf_len = sysconf(_SC_GETGR_R_SIZE_MAX);
 746         if (buf_len == -1)
 747                 buf_len = 2048;
 748
 749         buf = calloc(1, buf_len * sizeof(char));
 750         if (!buf) {
 751                 TDM_ERR("creating buffer failed");
 752                 goto failed;
 753         }
 754
 755         grp = calloc(1, sizeof(struct group));
 756         if (!grp) {
 757                 TDM_ERR("creating group failed");
 758                 goto failed;
 759         }
 760
 761         ret = getgrnam_r(name, grp, buf, buf_len, &grp_res);
 762         if (ret < 0) {
 763                 TDM_ERR("getgrnam_r failed errno:%d(%m)", ret);
 764                 goto failed;
 765         }
 766
 767         if (grp_res == NULL) {
 768                 TDM_ERR("finding name:%s group failed", name);
 769                 goto failed;
 770         }
 771
 772         id = grp->gr_gid;
 773         free(buf);
 774         free(grp);
 775
 776         return id;
 777
 778 failed:
 779         if (buf)
 780                 free(buf);
 781         if (grp)
 782                 free(grp);
 783
 784         return -1;
 785 }
 786
 787 static void
 788 _tdm_socket_init(tdm_private_loop *private_loop)
 789 {
 790         const char *dir = NULL;
 791         char socket_path[TDM_NAME_LEN * 2];
 792         int ret = -1, len;
 793         uid_t uid;
 794         gid_t gid;
 795
 796         dir = getenv("XDG_RUNTIME_DIR");
 797         if (!dir) {
 798                 TDM_WRN("getting XDG_RUNTIME_DIR failed");
 799                 return;
 800         }
 801
 802         len = strlen(dir);
 803         if (len > TDM_NAME_LEN - 1) {
 804                 TDM_ERR("XDG_RUNTIME_DIR is too long\n");
 805                 return;
 806         }
 807
 808         strncpy(socket_path, dir, TDM_NAME_LEN - 1);
 809         socket_path[TDM_NAME_LEN - 1] = '\0';
 810
 811         strncat(socket_path, "/tdm-socket", 11);
 812         socket_path[TDM_NAME_LEN + 10] = '\0';
 813
 814         ret = chmod(socket_path, 509);
 815         if (ret < 0) {
 816                 TDM_WRN("changing modes of socket file failed:%s (%m)", socket_path);
 817                 return;
 818         }
 819
 820         ret = _tdm_getgrnam_r("root");
 821         if (ret < 0) {
 822                 TDM_WRN("getting uid failed");
 823                 return;
 824         }
 825         uid = ret;
 826
 827         ret = _tdm_getgrnam_r("display");
 828         if (ret < 0) {
 829                 TDM_WRN("getting gid failed");
 830                 return;
 831         }
 832         gid = ret;
 833
 834         ret = chown(socket_path, uid, gid);
 835         if (ret < 0) {
 836                 TDM_WRN("changing owner of socket file failed:%s (%m)", socket_path);
 837                 return;
 838         }
 839 }
 840
 841 INTERN tdm_error
 842 tdm_server_init(tdm_private_loop *private_loop)
 843 {
 844         tdm_private_server *private_server;
 845
 846         TDM_RETURN_VAL_IF_FAIL(private_loop, TDM_ERROR_OPERATION_FAILED);
 847         TDM_RETURN_VAL_IF_FAIL(private_loop->wl_display, TDM_ERROR_OPERATION_FAILED);
 848
 849         if (private_loop->private_server)
 850                 return TDM_ERROR_NONE;
 851
 852         if (wl_display_add_socket(private_loop->wl_display, "tdm-socket")) {
 853                 TDM_ERR("createing a tdm-socket failed");
 854                 return TDM_ERROR_OPERATION_FAILED;
 855         }
 856
 857         _tdm_socket_init(private_loop);
 858
 859         private_server = calloc(1, sizeof * private_server);
 860         if (!private_server) {
 861                 TDM_ERR("alloc failed");
 862                 return TDM_ERROR_OUT_OF_MEMORY;
 863         }
 864
 865         LIST_INITHEAD(&private_server->output_list);
 866         LIST_INITHEAD(&private_server->wait_list);
 867
 868         if (!wl_global_create(private_loop->wl_display, &wl_tdm_interface, 1,
 869                                                   private_server, _tdm_server_bind)) {
 870                 TDM_ERR("creating a global resource failed");
 871                 free(private_server);
 872                 return TDM_ERROR_OUT_OF_MEMORY;
 873         }
 874
 875         private_server->private_loop = private_loop;
 876         private_loop->private_server = private_server;
 877         keep_private_server = private_server;
 878
 879         LIST_INITHEAD(&client_list);
 880
 881         return TDM_ERROR_NONE;
 882 }
 883
 884 INTERN void
 885 tdm_server_deinit(tdm_private_loop *private_loop)
 886 {
 887         tdm_server_output_info *o = NULL, *oo = NULL;
 888         tdm_server_wait_info *w = NULL, *ww = NULL;
 889         tdm_server_client_info *c = NULL, *cc = NULL;
 890         tdm_private_server *private_server;
 891
 892         if (!private_loop->private_server)
 893                 return;
 894
 895         private_server = private_loop->private_server;
 896
 897         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_server->wait_list, link) {
 898                 destroy_wait(w);
 899         }
 900
 901         LIST_FOR_EACH_ENTRY_SAFE(o, oo, &private_server->output_list, link) {
 902                 wl_resource_destroy(o->resource);
 903         }
 904
 905         LIST_FOR_EACH_ENTRY_SAFE(c, cc, &client_list, link) {
 906                 wl_resource_destroy(c->resource);
 907         }
 908
 909         free(private_server);
 910         private_loop->private_server = NULL;
 911         keep_private_server = NULL;
 912 }
 913
 914 INTERN const char*
 915 tdm_server_get_client_name(pid_t pid)
 916 {
 917         tdm_server_client_info *c = NULL;
 918
 919         LIST_FOR_EACH_ENTRY(c, &client_list, link) {
 920                 if (c->pid == pid)
 921                         return (const char*)c->name;
 922         }
 923
 924         return NULL;
 925 }
 926
 927 INTERN tdm_error
 928 tdm_server_enable_ttrace_client_vblank(tdm_display *dpy, tdm_output *output, int enable)
 929 {
 930         tdm_private_server *private_server = keep_private_server;
 931         tdm_server_output_info *output_info = NULL;
 932
 933         if (!keep_private_server)
 934                 return TDM_ERROR_NONE;
 935
 936         LIST_FOR_EACH_ENTRY(output_info, &private_server->output_list, link) {
 937                 tdm_server_vblank_info *vblank_info = NULL;
 938
 939                 if (output && output_info->output != output)
 940                         continue;
 941
 942                 LIST_FOR_EACH_ENTRY(vblank_info, &output_info->vblank_list, link) {
 943                         wl_tdm_vblank_send_ttrace(vblank_info->resource, enable);
 944                 }
 945         }
 946
 947         return TDM_ERROR_NONE;
 948 }