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 <boram1288.park@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 #define WL_HIDE_DEPRECATED
  41
  42 #include <tdm-server-protocol.h>
  43
  44 #include "tdm_private.h"
  45
  46 /* CAUTION:
  47  * - tdm server doesn't care about thread things.
  48  * - DO NOT use the TDM internal functions here.
  49  *     However, the internal function which does lock/unlock the mutex of
  50  *     private_display in itself can be called.
  51  * - DO NOT use the tdm_private_display structure here.
  52  * - The callback function things can be called in main thread.
  53  */
  54
  55 struct _tdm_private_server {
  56         tdm_private_loop *private_loop;
  57         struct list_head output_list;
  58         struct list_head voutput_list;
  59         struct list_head wait_list;
  60 };
  61
  62 typedef struct _tdm_server_output_info {
  63         struct list_head link;
  64         tdm_private_server *private_server;
  65         struct wl_resource *resource;
  66         tdm_output *output;
  67         struct list_head vblank_list;
  68         unsigned int watch_output_changes;
  69 } tdm_server_output_info;
  70
  71 typedef struct _tdm_server_voutput_buffer {
  72         struct list_head link;
  73         struct wl_resource *wl_buffer;
  74         tbm_surface_h buffer;
  75 } tdm_server_voutput_buffer;
  76
  77 typedef struct _tdm_server_voutput_info {
  78         struct list_head link;
  79         tdm_private_server *private_server;
  80         struct wl_resource *resource;
  81         tdm_voutput *voutput;
  82         tdm_output *output;
  83
  84         tdm_output_conn_status status;
  85         struct {
  86                 int count;
  87                 tdm_output_mode *modes;
  88         } available_modes;
  89
  90         unsigned int mmwidth;
  91         unsigned int mmheight;
  92
  93         struct list_head buffer_list;
  94         tdm_server_voutput_buffer *attach_buffer;
  95         int committing;
  96 } tdm_server_voutput_info;
  97
  98 typedef struct _tdm_server_vblank_info {
  99         struct list_head link;
 100         tdm_server_output_info *output_info;
 101         struct wl_resource *resource;
 102
 103         tdm_vblank *vblank;
 104         unsigned int stamp;
 105 } tdm_server_vblank_info;
 106
 107 typedef struct _tdm_server_wait_info {
 108         struct list_head link;
 109         tdm_server_vblank_info *vblank_info;
 110
 111         unsigned int req_id;
 112         double req_time;
 113 } tdm_server_wait_info;
 114
 115 typedef struct _tdm_server_client_info {
 116         struct list_head link;
 117         pid_t pid;
 118         char name[TDM_NAME_LEN];
 119         struct wl_resource *resource;
 120 } tdm_server_client_info;
 121
 122 static tdm_private_server *keep_private_server;
 123 static struct list_head client_list;
 124
 125 static void destroy_wait(tdm_server_wait_info *wait_info);
 126
 127 static void
 128 _tdm_server_get_process_name(pid_t pid, char *name, unsigned int size)
 129 {
 130         char proc[TDM_NAME_LEN], pname[TDM_NAME_LEN];
 131         FILE *h;
 132         size_t len;
 133
 134         snprintf(name, size, "Unknown");
 135
 136         snprintf(proc, TDM_NAME_LEN, "/proc/%d/cmdline", pid);
 137         h = fopen(proc, "r");
 138         if (!h)
 139                 return;
 140
 141         len = fread(pname, sizeof(char), TDM_NAME_LEN, h);
 142         if (len == 0) {
 143                 char *p = strncpy(pname, "NO NAME", sizeof(pname) - 1);
 144                 len = p - pname;
 145         }
 146         pname[len - 1] = '\0';
 147
 148         strncpy(name, pname, size - 1);
 149         name[size - 1] = '\0';
 150
 151         fclose(h);
 152 }
 153
 154 /* LCOV_EXCL_START */
 155 static void
 156 _tdm_server_send_done(tdm_server_wait_info *wait_info, tdm_error error,
 157                                           unsigned int sequence, unsigned int tv_sec, unsigned int tv_usec)
 158 {
 159         tdm_server_wait_info *found;
 160         tdm_server_vblank_info *vblank_info;
 161
 162         TDM_RETURN_IF_FAIL(keep_private_server != NULL);
 163
 164         LIST_FIND_ITEM(wait_info, &keep_private_server->wait_list,
 165                                    tdm_server_wait_info, link, found);
 166         if (!found) {
 167                 TDM_ERR("wait_info(%p) is destroyed", wait_info);
 168                 return;
 169         }
 170
 171         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 172                 TDM_DBG("req_id(%d) done", wait_info->req_id);
 173
 174         vblank_info = wait_info->vblank_info;
 175
 176         if (tdm_ttrace_module & TDM_TTRACE_SERVER_VBLANK)
 177                 TDM_TRACE_ASYNC_END((int)wait_info->req_time, "TDM_Server_Vblank:%u", vblank_info->stamp);
 178
 179         wl_tdm_vblank_send_done(vblank_info->resource, wait_info->req_id,
 180                                                         sequence, tv_sec, tv_usec, error);
 181
 182         destroy_wait(wait_info);
 183 }
 184 /* LCOV_EXCL_STOP */
 185
 186 /* LCOV_EXCL_START */
 187 static void
 188 _tdm_server_cb_vblank(tdm_vblank *vblank, tdm_error error, unsigned int sequence,
 189                                           unsigned int tv_sec, unsigned int tv_usec, void *user_data)
 190 {
 191         _tdm_server_send_done((tdm_server_wait_info*)user_data, error, sequence, tv_sec, tv_usec);
 192 }
 193 /* LCOV_EXCL_STOP */
 194
 195 /* LCOV_EXCL_START */
 196 static void
 197 _tdm_server_cb_output_change(tdm_output *output, tdm_output_change_type type,
 198                                                          tdm_value value, void *user_data)
 199 {
 200         tdm_server_output_info *output_info = user_data;
 201         struct wl_client *client;
 202         pid_t pid = 0;
 203         tdm_output_conn_status status;
 204         tdm_error ret = TDM_ERROR_NONE;
 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, type:%d, value:%d", (unsigned int)pid, type, value.u32);
 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                 status = value.u32;
 226                 if (status == TDM_OUTPUT_CONN_STATUS_MODE_SETTED) {
 227                         const tdm_output_mode *mode = NULL;
 228                         unsigned int hdisplay, vdisplay, vrefresh;
 229
 230                         ret = tdm_output_get_mode(output_info->output, &mode);
 231                         if (ret == TDM_ERROR_NONE) {
 232                                 hdisplay = (mode) ? mode->hdisplay : 0;
 233                                 vdisplay = (mode) ? mode->vdisplay : 0;
 234                                 vrefresh = (mode) ? mode->vrefresh : 0;
 235
 236                                 wl_tdm_output_send_mode(output_info->resource, hdisplay, vdisplay, vrefresh, ret);
 237                         } else {
 238                                 wl_tdm_output_send_mode(output_info->resource, 0, 0, 0, ret);
 239                         }
 240                 }
 241                 wl_tdm_output_send_connection(output_info->resource, value.u32, TDM_ERROR_NONE);
 242                 break;
 243         default:
 244                 break;
 245         }
 246 }
 247 /* LCOV_EXCL_STOP */
 248
 249 static void
 250 destroy_wait(tdm_server_wait_info *wait_info)
 251 {
 252         LIST_DEL(&wait_info->link);
 253         free(wait_info);
 254 }
 255
 256 static void
 257 destroy_vblank_callback(struct wl_resource *resource)
 258 {
 259         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 260         tdm_server_wait_info *w = NULL, *ww = NULL;
 261
 262         TDM_RETURN_IF_FAIL(vblank_info != NULL);
 263
 264         LIST_DEL(&vblank_info->link);
 265
 266         if (vblank_info->vblank)
 267                 tdm_vblank_destroy(vblank_info->vblank);
 268
 269         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &keep_private_server->wait_list, link) {
 270                 if (w->vblank_info == vblank_info)
 271                         destroy_wait(w);
 272         }
 273
 274         free(vblank_info);
 275 }
 276
 277 /* LCOV_EXCL_START */
 278 static void
 279 _tdm_server_vblank_cb_destroy(struct wl_client *client, struct wl_resource *resource)
 280 {
 281         wl_resource_destroy(resource);
 282 }
 283 /* LCOV_EXCL_STOP */
 284
 285 /* LCOV_EXCL_START */
 286 static void
 287 _tdm_server_vblank_cb_set_name(struct wl_client *client, struct wl_resource *resource, const char *name)
 288 {
 289         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 290         tdm_error ret;
 291
 292         ret = tdm_vblank_set_name(vblank_info->vblank, name);
 293         TDM_RETURN_IF_FAIL(ret == TDM_ERROR_NONE);
 294 }
 295 /* LCOV_EXCL_STOP */
 296
 297 /* LCOV_EXCL_START */
 298 static void
 299 _tdm_server_vblank_cb_set_fps(struct wl_client *client, struct wl_resource *resource, uint32_t fps)
 300 {
 301         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 302         tdm_error ret;
 303
 304         ret = tdm_vblank_set_fps(vblank_info->vblank, fps);
 305         TDM_RETURN_IF_FAIL(ret == TDM_ERROR_NONE);
 306 }
 307 /* LCOV_EXCL_STOP */
 308
 309 /* LCOV_EXCL_START */
 310 static void
 311 _tdm_server_vblank_cb_set_offset(struct wl_client *client, struct wl_resource *resource, int32_t offset)
 312 {
 313         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 314         tdm_error ret;
 315
 316         ret = tdm_vblank_set_offset(vblank_info->vblank, offset);
 317         TDM_RETURN_IF_FAIL(ret == TDM_ERROR_NONE);
 318 }
 319 /* LCOV_EXCL_STOP */
 320
 321 static void
 322 _tdm_server_vblank_cb_set_enable_fake(struct wl_client *client, struct wl_resource *resource, uint32_t enable_fake)
 323 {
 324         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 325         tdm_error ret;
 326
 327         ret = tdm_vblank_set_enable_fake(vblank_info->vblank, enable_fake);
 328         TDM_RETURN_IF_FAIL(ret == TDM_ERROR_NONE);
 329 }
 330
 331 static void
 332 _tdm_server_vblank_cb_wait_vblank(struct wl_client *client, struct wl_resource *resource,
 333                                                                   uint32_t interval, uint32_t req_id, uint32_t req_sec, uint32_t req_usec)
 334 {
 335         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 336         tdm_server_output_info *output_info = vblank_info->output_info;
 337         tdm_private_server *private_server = output_info->private_server;
 338         tdm_server_wait_info *wait_info;
 339         unsigned int enable_fake = 0;
 340         tdm_error ret;
 341
 342         wait_info = calloc(1, sizeof * wait_info);
 343         if (!wait_info) {
 344                 /* LCOV_EXCL_START */
 345
 346                 TDM_ERR("alloc failed");
 347                 ret = TDM_ERROR_OUT_OF_MEMORY;
 348                 goto wait_failed;
 349
 350                 /* LCOV_EXCL_STOP */
 351         }
 352
 353         LIST_ADDTAIL(&wait_info->link, &private_server->wait_list);
 354         wait_info->vblank_info = vblank_info;
 355         wait_info->req_id = req_id;
 356         wait_info->req_time = TDM_TIME(req_sec, req_usec);
 357
 358         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 359                 TDM_DBG("req_id(%d) wait", req_id);
 360
 361         if (tdm_ttrace_module & TDM_TTRACE_SERVER_VBLANK)
 362                 TDM_TRACE_ASYNC_BEGIN((int)wait_info->req_time, "TDM_Server_Vblank:%u", vblank_info->stamp);
 363
 364         ret = tdm_vblank_wait(vblank_info->vblank, req_sec, req_usec, interval, _tdm_server_cb_vblank, wait_info);
 365
 366         tdm_vblank_get_enable_fake(vblank_info->vblank, &enable_fake);
 367         if (!enable_fake && ret == TDM_ERROR_DPMS_OFF)
 368                 goto wait_failed;
 369
 370         TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, wait_failed);
 371
 372         return;
 373 wait_failed:
 374         /* LCOV_EXCL_START */
 375
 376         wl_tdm_vblank_send_done(vblank_info->resource, req_id, 0, 0, 0, ret);
 377         if (wait_info)
 378                 destroy_wait(wait_info);
 379
 380         /* LCOV_EXCL_STOP */
 381 }
 382
 383 static void
 384 _tdm_server_vblank_cb_wait_vblank_seq(struct wl_client *client, struct wl_resource *resource,
 385                                                                           uint32_t sequence, uint32_t req_id, uint32_t req_sec, uint32_t req_usec)
 386 {
 387         tdm_server_vblank_info *vblank_info = wl_resource_get_user_data(resource);
 388         tdm_server_output_info *output_info = vblank_info->output_info;
 389         tdm_private_server *private_server = output_info->private_server;
 390         tdm_server_wait_info *wait_info;
 391         unsigned int enable_fake = 0;
 392         tdm_error ret;
 393
 394         wait_info = calloc(1, sizeof * wait_info);
 395         if (!wait_info) {
 396                 /* LCOV_EXCL_START */
 397
 398                 TDM_ERR("alloc failed");
 399                 ret = TDM_ERROR_OUT_OF_MEMORY;
 400                 goto wait_failed;
 401
 402                 /* LCOV_EXCL_STOP */
 403         }
 404
 405         LIST_ADDTAIL(&wait_info->link, &private_server->wait_list);
 406         wait_info->vblank_info = vblank_info;
 407         wait_info->req_id = req_id;
 408         wait_info->req_time = TDM_TIME(req_sec, req_usec);
 409
 410         if (tdm_debug_module & TDM_DEBUG_VBLANK)
 411                 TDM_DBG("req_id(%d) wait", req_id);
 412
 413         if (tdm_ttrace_module & TDM_TTRACE_SERVER_VBLANK)
 414                 TDM_TRACE_ASYNC_BEGIN((int)wait_info->req_time, "TDM_Server_Vblank:%u", vblank_info->stamp);
 415
 416         ret = tdm_vblank_wait_seq(vblank_info->vblank, req_sec, req_usec, sequence, _tdm_server_cb_vblank, wait_info);
 417
 418         tdm_vblank_get_enable_fake(vblank_info->vblank, &enable_fake);
 419         if (!enable_fake && ret == TDM_ERROR_DPMS_OFF)
 420                 goto wait_failed;
 421
 422         TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, wait_failed);
 423
 424         return;
 425 wait_failed:
 426         /* LCOV_EXCL_START */
 427
 428         wl_tdm_vblank_send_done(vblank_info->resource, req_id, 0, 0, 0, ret);
 429         if (wait_info)
 430                 destroy_wait(wait_info);
 431
 432         /* LCOV_EXCL_STOP */
 433 }
 434
 435 static const struct wl_tdm_vblank_interface tdm_vblank_implementation = {
 436         _tdm_server_vblank_cb_destroy,
 437         _tdm_server_vblank_cb_set_name,
 438         _tdm_server_vblank_cb_set_fps,
 439         _tdm_server_vblank_cb_set_offset,
 440         _tdm_server_vblank_cb_set_enable_fake,
 441         _tdm_server_vblank_cb_wait_vblank,
 442         _tdm_server_vblank_cb_wait_vblank_seq,
 443 };
 444
 445 /* LCOV_EXCL_START */
 446 static void
 447 _tdm_server_output_cb_destroy(struct wl_client *client, struct wl_resource *resource)
 448 {
 449         wl_resource_destroy(resource);
 450 }
 451 /* LCOV_EXCL_STOP */
 452
 453 static void
 454 _tdm_server_output_cb_create_vblank(struct wl_client *client, struct wl_resource *resource, uint32_t id)
 455 {
 456         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 457         tdm_private_server *private_server = output_info->private_server;
 458         tdm_private_loop *private_loop = private_server->private_loop;
 459         struct wl_resource *vblank_resource;
 460         tdm_vblank *vblank;
 461         tdm_server_vblank_info *vblank_info;
 462
 463         vblank_resource =
 464                 wl_resource_create(client, &wl_tdm_vblank_interface,
 465                                                    wl_resource_get_version(resource), id);
 466         if (!vblank_resource) {
 467                 /* LCOV_EXCL_START */
 468
 469                 wl_resource_post_no_memory(resource);
 470                 TDM_ERR("wl_resource_create failed");
 471                 return;
 472
 473                 /* LCOV_EXCL_STOP */
 474         }
 475
 476         vblank = tdm_vblank_create(private_loop->dpy, output_info->output, NULL);
 477         if (!vblank) {
 478                 /* LCOV_EXCL_START */
 479
 480                 wl_resource_post_no_memory(resource);
 481                 wl_resource_destroy(vblank_resource);
 482                 TDM_ERR("tdm_vblank_create failed");
 483                 return;
 484
 485                 /* LCOV_EXCL_STOP */
 486         }
 487
 488         vblank_info = calloc(1, sizeof * vblank_info);
 489         if (!vblank_info) {
 490                 /* LCOV_EXCL_START */
 491
 492                 wl_resource_post_no_memory(resource);
 493                 wl_resource_destroy(vblank_resource);
 494                 tdm_vblank_destroy(vblank);
 495                 TDM_ERR("alloc failed");
 496                 return;
 497
 498                 /* LCOV_EXCL_STOP */
 499         }
 500
 501         LIST_ADDTAIL(&vblank_info->link, &output_info->vblank_list);
 502         vblank_info->output_info = output_info;
 503         vblank_info->resource = vblank_resource;
 504         vblank_info->vblank = vblank;
 505         vblank_info->stamp = (unsigned int)tdm_vblank_get_stamp(vblank);
 506
 507         tdm_vblank_set_resource(vblank, vblank_resource);
 508
 509         wl_resource_set_implementation(vblank_resource, &tdm_vblank_implementation,
 510                                                                    vblank_info, destroy_vblank_callback);
 511
 512         wl_tdm_vblank_send_stamp(vblank_info->resource, vblank_info->stamp);
 513
 514         if (tdm_ttrace_module & TDM_TTRACE_CLIENT_VBLANK) {
 515                 tdm_output *output = tdm_display_get_output(private_loop->dpy, tdm_ttrace_output, NULL);
 516                 if (output == output_info->output)
 517                         wl_tdm_vblank_send_ttrace(vblank_info->resource, 1);
 518         }
 519
 520         return;
 521 }
 522
 523 /* LCOV_EXCL_START */
 524 static void
 525 _tdm_server_output_cb_watch_output_changes(struct wl_client *client, struct wl_resource *resource, unsigned int enable)
 526 {
 527         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 528
 529         TDM_RETURN_IF_FAIL(output_info != NULL);
 530
 531         output_info->watch_output_changes = enable;
 532 }
 533 /* LCOV_EXCL_STOP */
 534
 535 static void
 536 _tdm_server_output_cb_get_connection(struct wl_client *client, struct wl_resource *resource)
 537 {
 538         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 539         tdm_output_conn_status status = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 540         tdm_error ret;
 541
 542         TDM_RETURN_IF_FAIL(output_info != NULL);
 543
 544         ret = tdm_output_get_conn_status(output_info->output, &status);
 545         TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, failed);
 546
 547         wl_tdm_output_send_connection(output_info->resource, status, ret);
 548
 549         return;
 550
 551 failed:
 552         wl_tdm_output_send_connection(output_info->resource, TDM_OUTPUT_CONN_STATUS_DISCONNECTED, ret);
 553 }
 554
 555 static void
 556 _tdm_server_output_cb_get_mode(struct wl_client *client, struct wl_resource *resource)
 557 {
 558         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 559         tdm_output_conn_status status = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 560         tdm_error ret;
 561
 562         TDM_RETURN_IF_FAIL(output_info != NULL);
 563
 564         ret = tdm_output_get_conn_status(output_info->output, &status);
 565         TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, failed);
 566
 567         if (status != TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 568                 const tdm_output_mode *mode = NULL;
 569                 unsigned int hdisplay, vdisplay, vrefresh;
 570
 571                 ret = tdm_output_get_mode(output_info->output, &mode);
 572                 TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, failed);
 573
 574                 hdisplay = (mode) ? mode->hdisplay : 0;
 575                 vdisplay = (mode) ? mode->vdisplay : 0;
 576                 vrefresh = (mode) ? mode->vrefresh : 0;
 577
 578                 wl_tdm_output_send_mode(output_info->resource, hdisplay, vdisplay, vrefresh, ret);
 579         } else {
 580                 wl_tdm_output_send_mode(output_info->resource, 0, 0, 0, TDM_ERROR_OUTPUT_DISCONNECTED);
 581         }
 582
 583         return;
 584 failed:
 585         wl_tdm_output_send_mode(output_info->resource, 0, 0, 0, ret);
 586 }
 587
 588 static void
 589 _tdm_server_output_cb_get_dpms(struct wl_client *client, struct wl_resource *resource)
 590 {
 591         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 592         tdm_output_conn_status status = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 593         tdm_error ret;
 594
 595         TDM_RETURN_IF_FAIL(output_info != NULL);
 596
 597         ret = tdm_output_get_conn_status(output_info->output, &status);
 598         TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, failed);
 599
 600         if (status != TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 601                 tdm_output_dpms dpms_value = TDM_OUTPUT_DPMS_OFF;
 602
 603                 ret = tdm_output_get_dpms(output_info->output, &dpms_value);
 604                 TDM_GOTO_IF_FAIL(ret == TDM_ERROR_NONE, failed);
 605
 606                 wl_tdm_output_send_dpms(output_info->resource, dpms_value, ret);
 607         } else {
 608                 wl_tdm_output_send_dpms(output_info->resource, TDM_OUTPUT_DPMS_OFF, TDM_ERROR_OUTPUT_DISCONNECTED);
 609         }
 610
 611         return;
 612 failed:
 613         wl_tdm_output_send_dpms(output_info->resource, TDM_OUTPUT_DPMS_OFF, ret);
 614 }
 615
 616 static const struct wl_tdm_output_interface tdm_output_implementation = {
 617         _tdm_server_output_cb_destroy,
 618         _tdm_server_output_cb_create_vblank,
 619         _tdm_server_output_cb_watch_output_changes,
 620         _tdm_server_output_cb_get_connection,
 621         _tdm_server_output_cb_get_mode,
 622         _tdm_server_output_cb_get_dpms,
 623 };
 624
 625 static void
 626 destroy_output_callback(struct wl_resource *resource)
 627 {
 628         tdm_server_output_info *output_info = wl_resource_get_user_data(resource);
 629         tdm_server_vblank_info *v = NULL, *vv = NULL;
 630
 631         TDM_RETURN_IF_FAIL(output_info != NULL);
 632
 633         LIST_DEL(&output_info->link);
 634
 635         tdm_output_remove_change_handler(output_info->output,
 636                                                                          _tdm_server_cb_output_change, output_info);
 637
 638         LIST_FOR_EACH_ENTRY_SAFE(v, vv, &output_info->vblank_list, link) {
 639                 wl_resource_destroy(v->resource);
 640         }
 641
 642         free(output_info);
 643 }
 644
 645 static void
 646 _tdm_server_cb_create_output(struct wl_client *client, struct wl_resource *resource,
 647                                                          const char *name, uint32_t id)
 648 {
 649         tdm_private_server *private_server = wl_resource_get_user_data(resource);
 650         tdm_server_output_info *output_info;
 651         struct wl_resource *output_resource = NULL;
 652         tdm_output *output;
 653         tdm_output_conn_status status = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 654         tdm_error ret;
 655
 656         output = tdm_display_find_output(private_server->private_loop->dpy, name, NULL);
 657         if (!output) {
 658                 /* LCOV_EXCL_START */
 659
 660                 TDM_ERR("There is no '%s' output", name);
 661                 wl_resource_post_error(resource, WL_DISPLAY_ERROR_INVALID_OBJECT,
 662                                                            "There is no '%s' output", name);
 663                 return;
 664
 665                 /* LCOV_EXCL_STOP */
 666         }
 667
 668         output_resource =
 669                 wl_resource_create(client, &wl_tdm_output_interface,
 670                                                    wl_resource_get_version(resource), id);
 671         if (!output_resource) {
 672                 /* LCOV_EXCL_START */
 673
 674                 wl_resource_post_no_memory(resource);
 675                 TDM_ERR("wl_resource_create failed");
 676                 return;
 677
 678                 /* LCOV_EXCL_STOP */
 679         }
 680
 681         output_info = calloc(1, sizeof * output_info);
 682         if (!output_info) {
 683                 /* LCOV_EXCL_START */
 684
 685                 wl_resource_post_no_memory(resource);
 686                 wl_resource_destroy(output_resource);
 687                 TDM_ERR("alloc failed");
 688                 return;
 689
 690                 /* LCOV_EXCL_STOP */
 691         }
 692
 693         ret = tdm_output_add_change_handler(output, _tdm_server_cb_output_change, output_info);
 694         if (ret != TDM_ERROR_NONE) {
 695                 wl_resource_post_no_memory(resource);
 696                 wl_resource_destroy(output_resource);
 697                 free(output_info);
 698                 TDM_ERR("tdm_output_add_change_handler failed");
 699                 return;
 700         }
 701
 702         LIST_ADDTAIL(&output_info->link, &private_server->output_list);
 703         output_info->private_server = private_server;
 704         output_info->resource = output_resource;
 705         output_info->output = output;
 706         LIST_INITHEAD(&output_info->vblank_list);
 707
 708         wl_resource_set_implementation(output_resource, &tdm_output_implementation,
 709                                                                    output_info, destroy_output_callback);
 710
 711         ret = tdm_output_get_conn_status(output, &status);
 712         wl_tdm_output_send_connection(output_resource, status, ret);
 713
 714         if (status != TDM_OUTPUT_CONN_STATUS_DISCONNECTED) {
 715                 tdm_output_dpms dpms_value = TDM_OUTPUT_DPMS_OFF;
 716                 const tdm_output_mode *mode = NULL;
 717                 unsigned int hdisplay, vdisplay, vrefresh;
 718
 719                 ret = tdm_output_get_mode(output, &mode);
 720                 hdisplay = (mode) ? mode->hdisplay : 0;
 721                 vdisplay = (mode) ? mode->vdisplay : 0;
 722                 vrefresh = (mode) ? mode->vrefresh : 0;
 723                 wl_tdm_output_send_mode(output_resource, hdisplay, vdisplay, vrefresh, ret);
 724
 725                 ret = tdm_output_get_dpms(output, &dpms_value);
 726                 wl_tdm_output_send_dpms(output_resource, dpms_value, ret);
 727         } else {
 728                 wl_tdm_output_send_mode(output_resource, 0, 0, 0, TDM_ERROR_OUTPUT_DISCONNECTED);
 729                 wl_tdm_output_send_dpms(output_resource, TDM_OUTPUT_DPMS_OFF, TDM_ERROR_OUTPUT_DISCONNECTED);
 730         }
 731 }
 732
 733 static void _tdm_voutput_cb_destroy(struct wl_client *client, struct wl_resource *resource)
 734 {
 735         wl_resource_destroy(resource);
 736 }
 737
 738 static void
 739 _tdm_voutput_cb_set_available_modes(struct wl_client *client,
 740                                                                         struct wl_resource *resource,
 741                                                                         struct wl_array *modes)
 742 {
 743         tdm_server_voutput_info *voutput_info;
 744         tdm_output_mode *mode;
 745         int size, count = 0, i = 0;
 746
 747         voutput_info = wl_resource_get_user_data(resource);
 748
 749         voutput_info->available_modes.count = 0;
 750         if (voutput_info->available_modes.modes)
 751                 free(voutput_info->available_modes.modes);
 752
 753         wl_array_for_each(mode, modes)
 754                 count++;
 755         size = sizeof(tdm_output_mode);
 756
 757         voutput_info->available_modes.modes = malloc(count * size);
 758         voutput_info->available_modes.count = count;
 759
 760         wl_array_for_each(mode, modes)
 761                 memcpy(&voutput_info->available_modes.modes[i++], mode, size);
 762 }
 763
 764 static void
 765 _tdm_voutput_cb_set_physical_size(struct wl_client *client, struct wl_resource *resource,
 766                                                                   unsigned int mmwidth, unsigned int mmheight)
 767 {
 768         tdm_server_voutput_info *voutput_info;
 769
 770         voutput_info = wl_resource_get_user_data(resource);
 771
 772         voutput_info->mmwidth = mmwidth;
 773         voutput_info->mmheight = mmheight;
 774 }
 775
 776 static void
 777 _tdm_voutput_cb_set_mode(struct wl_client *client, struct wl_resource *resource, unsigned int index)
 778 {
 779         tdm_server_voutput_info *voutput_info = NULL;
 780         tdm_output *output = NULL;
 781         tdm_output_conn_status status = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 782         const tdm_output_mode *modes, *mode;
 783
 784         int count = 0;
 785         tdm_error ret;
 786
 787         voutput_info = wl_resource_get_user_data(resource);
 788         TDM_RETURN_IF_FAIL(voutput_info != NULL);
 789         output = voutput_info->output;
 790
 791         ret = tdm_output_get_conn_status(output, &status);
 792         TDM_RETURN_IF_FAIL(ret == TDM_ERROR_NONE);
 793         TDM_RETURN_IF_FAIL(status != TDM_OUTPUT_CONN_STATUS_DISCONNECTED);
 794
 795         ret = tdm_output_get_available_modes(output, &modes, &count);
 796         TDM_RETURN_IF_FAIL(index < count);
 797
 798         mode = &modes[index];
 799         TDM_DBG("mode set request to index:%d (%dx%d, %d)", index, mode->hdisplay, mode->vdisplay, mode->vrefresh);
 800
 801         ret = tdm_output_set_mode(output, mode);
 802         TDM_RETURN_IF_FAIL(ret == TDM_ERROR_NONE);
 803
 804         tdm_output_request_mode_set(voutput_info->output, index);
 805 }
 806
 807 static void
 808 _tdm_voutput_cb_connect(struct wl_client *client, struct wl_resource *resource)
 809 {
 810         tdm_server_voutput_info *voutput_info;
 811
 812         voutput_info = wl_resource_get_user_data(resource);
 813         voutput_info->status = TDM_OUTPUT_CONN_STATUS_CONNECTED;
 814
 815         tdm_voutput_set_physical_size(voutput_info->voutput, voutput_info->mmwidth, voutput_info->mmheight);
 816         tdm_voutput_set_available_mode(voutput_info->voutput, voutput_info->available_modes.modes, voutput_info->available_modes.count);
 817         tdm_voutput_connect(voutput_info->voutput);
 818 }
 819
 820 static void
 821 _tdm_voutput_cb_disconnect(struct wl_client *client, struct wl_resource *resource)
 822 {
 823         tdm_server_voutput_info *voutput_info;
 824
 825         voutput_info = wl_resource_get_user_data(resource);
 826         voutput_info->status = TDM_OUTPUT_CONN_STATUS_DISCONNECTED;
 827
 828         /* Do free resources when it's being disconnected */
 829         free(voutput_info->available_modes.modes);
 830         voutput_info->available_modes.modes = NULL;
 831         voutput_info->available_modes.count = 0;
 832         voutput_info->mmwidth = 0;
 833         voutput_info->mmheight = 0;
 834
 835         if (voutput_info->attach_buffer) {
 836                 tbm_surface_h buffer = voutput_info->attach_buffer->buffer;
 837                 tbm_surface_internal_unref(buffer);
 838                 voutput_info->committing = 0;
 839                 voutput_info->attach_buffer = NULL;
 840         }
 841
 842         tdm_voutput_disconnect(voutput_info->voutput);
 843 }
 844
 845 static void
 846 _tdm_voutput_cb_commit_done(struct wl_client *client, struct wl_resource *resource)
 847 {
 848         tdm_server_voutput_info *voutput_info;
 849         tbm_surface_h buffer;
 850
 851         voutput_info = wl_resource_get_user_data(resource);
 852         if (voutput_info->status != TDM_OUTPUT_CONN_STATUS_CONNECTED) {
 853                 TDM_DBG("not connected.");
 854                 return;
 855         }
 856
 857         buffer = voutput_info->attach_buffer->buffer;
 858         tbm_surface_internal_unref(buffer);
 859         voutput_info->committing = 0;
 860         voutput_info->attach_buffer = NULL;
 861
 862         tdm_voutput_commit_done(voutput_info->voutput);
 863 }
 864
 865 static const struct wl_tdm_voutput_interface tdm_voutput_implementation = {
 866         _tdm_voutput_cb_destroy,
 867         _tdm_voutput_cb_set_available_modes,
 868         _tdm_voutput_cb_set_physical_size,
 869         _tdm_voutput_cb_set_mode,
 870         _tdm_voutput_cb_connect,
 871         _tdm_voutput_cb_disconnect,
 872         _tdm_voutput_cb_commit_done
 873 };
 874
 875 static void
 876 _tdm_voutput_wl_buffer_destroy(struct wl_client *client, struct wl_resource *wl_buffer)
 877 {
 878         wl_resource_destroy(wl_buffer);
 879 }
 880
 881 static const struct wl_buffer_interface _tdm_voutput_buffer_impementation = {
 882         _tdm_voutput_wl_buffer_destroy
 883 };
 884
 885 static void
 886 _tdm_voutput_buffer_destory(struct wl_resource *wl_buffer)
 887 {
 888         tdm_server_voutput_info *voutput_info = NULL;
 889         tdm_server_voutput_buffer *vb = NULL, *vbb = NULL;
 890
 891         voutput_info = (tdm_server_voutput_info *)wl_resource_get_user_data(wl_buffer);
 892         TDM_RETURN_IF_FAIL(voutput_info != NULL);
 893
 894         LIST_FOR_EACH_ENTRY_SAFE(vb, vbb, &voutput_info->buffer_list, link) {
 895                 if (vb->wl_buffer == wl_buffer) {
 896                         tbm_surface_internal_unref(vb->buffer);
 897                         wl_resource_set_user_data(wl_buffer, NULL);
 898                         LIST_DEL(&vb->link);
 899                         free(vb);
 900                 }
 901         }
 902 }
 903
 904 struct wl_resource *
 905 _tdm_voutput_create_wl_buffer(tdm_server_voutput_info *voutput_info)
 906 {
 907         struct wl_client *wl_client;
 908         struct wl_resource *wl_buffer = NULL;
 909
 910         wl_client = wl_resource_get_client(voutput_info->resource);
 911
 912         /* create a wl_buffer resource */
 913         wl_buffer = wl_resource_create(wl_client, &wl_buffer_interface, 1, 0);
 914         TDM_RETURN_VAL_IF_FAIL(wl_buffer != NULL, NULL);
 915
 916         wl_resource_set_implementation(wl_buffer,
 917                                (void (**)(void)) &_tdm_voutput_buffer_impementation,
 918                                voutput_info, _tdm_voutput_buffer_destory);
 919
 920         return wl_buffer;
 921 }
 922
 923 struct wl_resource *
 924 _tdm_voutput_export_buffer(tdm_server_voutput_info *voutput_info,
 925                                                    tbm_surface_h buffer)
 926 {
 927         int bufs[TBM_SURF_PLANE_MAX] = { -1, -1, -1, -1};
 928         struct wl_resource *wl_buffer = NULL;
 929         int num_buf, is_fd = -1, i;
 930         tbm_surface_info_s info;
 931         uint32_t flags = 0;
 932         struct wl_array plane_buf_idx, plane_offset, plane_stride, plane_size;
 933         int *p;
 934
 935         TDM_RETURN_VAL_IF_FAIL(voutput_info != NULL, NULL);
 936         TDM_RETURN_VAL_IF_FAIL(buffer != NULL, NULL);
 937
 938         if (tbm_surface_get_info(buffer, &info) != TBM_SURFACE_ERROR_NONE) {
 939                 TDM_ERR("Failed to create buffer from surface");
 940                 return NULL;
 941         }
 942
 943         if (info.num_planes > 3) {
 944                 TDM_ERR("invalid num_planes(%d)", info.num_planes);
 945                 return NULL;
 946         }
 947
 948         num_buf = tbm_surface_internal_get_num_bos(buffer);
 949         if (num_buf == 0) {
 950                 TDM_ERR("surface doesn't have any bo.");
 951                 return NULL;
 952         }
 953
 954         for (i = 0; i < num_buf; i++) {
 955                 tbm_bo bo = tbm_surface_internal_get_bo(buffer, i);
 956                 if (bo == NULL) {
 957                         TDM_ERR("Failed to get bo from surface");
 958                         goto err;
 959                 }
 960
 961                 /* try to get fd first */
 962                 if (is_fd == -1 || is_fd == 1) {
 963                         bufs[i] = tbm_bo_export_fd(bo);
 964                         if (is_fd == -1 && bufs[i] >= 0)
 965                                 is_fd = 1;
 966                 }
 967
 968                 /* if fail to get fd, try to get name second */
 969                 if (is_fd == -1 || is_fd == 0) {
 970                         bufs[i] = tbm_bo_export(bo);
 971                         if (is_fd == -1 && bufs[i] > 0)
 972                                 is_fd = 0;
 973                 }
 974
 975                 if (is_fd == -1 ||
 976                     (is_fd == 1 && bufs[i] < 0) ||
 977                     (is_fd == 0 && bufs[i] <= 0)) {
 978                         TDM_ERR("Failed to export(is_fd:%d, bufs:%d)", is_fd, bufs[i]);
 979                         goto err;
 980                 }
 981         }
 982
 983         wl_buffer = _tdm_voutput_create_wl_buffer(voutput_info);
 984         if (!wl_buffer) {
 985                 TDM_ERR("Failed to create wl_buffer");
 986                 goto err;
 987         }
 988
 989         wl_array_init(&plane_buf_idx);
 990         wl_array_init(&plane_offset);
 991         wl_array_init(&plane_stride);
 992         wl_array_init(&plane_size);
 993
 994         for (i = 0; i < 3; i++) {
 995                 p = wl_array_add(&plane_buf_idx, sizeof(int));
 996                 *p = tbm_surface_internal_get_plane_bo_idx(buffer, i);
 997                 p = wl_array_add(&plane_offset, sizeof(int));
 998                 *p = info.planes[i].offset;
 999                 p = wl_array_add(&plane_stride, sizeof(int));
1000                 *p = info.planes[i].stride;
1001                 p = wl_array_add(&plane_size, sizeof(int));
1002                 *p = info.planes[i].size;
1003         }
1004
1005         if (is_fd == 1)
1006                 wl_tdm_voutput_send_buffer_set_with_fd(voutput_info->resource,
1007                                 wl_buffer,
1008                                 info.width, info.height, info.format, info.bpp, info.size, info.num_planes,
1009                                 &plane_buf_idx, &plane_offset, &plane_stride, &plane_size,
1010                                 flags, num_buf, bufs[0],
1011                                 (bufs[1] == -1) ? bufs[0] : bufs[1],
1012                                 (bufs[2] == -1) ? bufs[0] : bufs[2]);
1013         else
1014                 wl_tdm_voutput_send_buffer_set_with_id(voutput_info->resource,
1015                                 wl_buffer,
1016                                 info.width, info.height, info.format, info.bpp, info.size, info.num_planes,
1017                                 &plane_buf_idx, &plane_offset, &plane_stride, &plane_size,
1018                                 flags,
1019                                 num_buf, bufs[0], bufs[1], bufs[2]);
1020
1021         wl_array_release(&plane_buf_idx);
1022         wl_array_release(&plane_offset);
1023         wl_array_release(&plane_stride);
1024         wl_array_release(&plane_size);
1025
1026         for (i = 0; i < TBM_SURF_PLANE_MAX; i++) {
1027                 if (is_fd == 1 && (bufs[i] >= 0))
1028                         close(bufs[i]);
1029         }
1030
1031         return wl_buffer;
1032
1033 err:
1034         for (i = 0; i < TBM_SURF_PLANE_MAX; i++) {
1035                 if (is_fd == 1 && (bufs[i] >= 0))
1036                         close(bufs[i]);
1037         }
1038
1039         return NULL;
1040 }
1041
1042 tdm_server_voutput_buffer *
1043 _tdm_output_get_voutput_buffer(tdm_server_voutput_info *voutput_info, tbm_surface_h buffer)
1044 {
1045         tdm_server_voutput_buffer *voutput_buffer = NULL, *vb = NULL;
1046
1047         LIST_FOR_EACH_ENTRY(vb, &voutput_info->buffer_list, link) {
1048                 if (vb && vb->buffer == buffer) {
1049                         tbm_surface_internal_ref(vb->buffer);
1050                         return vb;
1051                 }
1052         }
1053
1054         tbm_surface_internal_ref(buffer);
1055         voutput_buffer = calloc(1, sizeof *voutput_buffer);
1056         if (!voutput_buffer) {
1057                 /* LCOV_EXCL_START */
1058
1059                 TDM_ERR("fail calloc");
1060                 tbm_surface_internal_unref(buffer);
1061                 return NULL;
1062
1063                 /* LCOV_EXCL_STOP */
1064         }
1065
1066         voutput_buffer->wl_buffer = _tdm_voutput_export_buffer(voutput_info, buffer);
1067         if (!voutput_buffer->wl_buffer) {
1068                 /* LCOV_EXCL_START */
1069
1070                 TDM_ERR("fail export buffer");
1071                 free(voutput_buffer);
1072                 tbm_surface_internal_unref(buffer);
1073                 return NULL;
1074
1075                 /* LCOV_EXCL_STOP */
1076         }
1077
1078         voutput_buffer->buffer = buffer;
1079         LIST_ADDTAIL(&voutput_buffer->link, &voutput_info->buffer_list);
1080
1081         return voutput_buffer;
1082 }
1083
1084 tdm_error
1085 tdm_voutput_attach_buffer(tdm_voutput *voutput, tbm_surface_h buffer)
1086 {
1087         tdm_private_server *private_server = keep_private_server;
1088         tdm_server_voutput_info *voutput_info = NULL, *vo = NULL;
1089         tdm_server_voutput_buffer *voutput_buffer = NULL;
1090
1091         TDM_RETURN_VAL_IF_FAIL(keep_private_server != NULL, TDM_ERROR_OPERATION_FAILED);
1092
1093         LIST_FOR_EACH_ENTRY(vo, &private_server->voutput_list, link) {
1094                 if (vo && vo->voutput == voutput) {
1095                         voutput_info = vo;
1096                         break;
1097                 }
1098         }
1099         TDM_RETURN_VAL_IF_FAIL(voutput_info != NULL, TDM_ERROR_INVALID_PARAMETER);
1100         TDM_RETURN_VAL_IF_FAIL(voutput_info->attach_buffer == NULL, TDM_ERROR_OPERATION_FAILED);
1101
1102         voutput_buffer = _tdm_output_get_voutput_buffer(voutput_info, buffer);
1103         TDM_RETURN_VAL_IF_FAIL(voutput_buffer != NULL, TDM_ERROR_OUT_OF_MEMORY);
1104
1105         voutput_info->attach_buffer = voutput_buffer;
1106
1107         wl_tdm_voutput_send_attach_buffer(voutput_info->resource, voutput_buffer->wl_buffer);
1108
1109         return TDM_ERROR_NONE;
1110 }
1111
1112 tdm_error
1113 tdm_voutput_commit_buffer(tdm_voutput *voutput)
1114 {
1115         tdm_private_server *private_server = keep_private_server;
1116         tdm_server_voutput_info *voutput_info = NULL, *vo = NULL;
1117
1118         TDM_RETURN_VAL_IF_FAIL(keep_private_server != NULL, TDM_ERROR_OPERATION_FAILED);
1119
1120         LIST_FOR_EACH_ENTRY(vo, &private_server->voutput_list, link) {
1121                 if (vo && vo->voutput == voutput) {
1122                         voutput_info = vo;
1123                         break;
1124                 }
1125         }
1126         TDM_RETURN_VAL_IF_FAIL(voutput_info != NULL, TDM_ERROR_INVALID_PARAMETER);
1127         TDM_RETURN_VAL_IF_FAIL(voutput_info->attach_buffer != NULL, TDM_ERROR_OPERATION_FAILED);
1128         TDM_RETURN_VAL_IF_FAIL(voutput_info->committing == 0, TDM_ERROR_OPERATION_FAILED);
1129
1130         tbm_surface_internal_ref(voutput_info->attach_buffer->buffer);
1131         voutput_info->committing = 1;
1132
1133         wl_tdm_voutput_send_commit(voutput_info->resource);
1134
1135         return TDM_ERROR_NONE;
1136 }
1137
1138 void
1139 tdm_voutput_cb_resource_destroy(struct wl_resource *resource)
1140 {
1141         tdm_server_voutput_info *voutput_info = wl_resource_get_user_data(resource);
1142         tdm_server_voutput_buffer *vb;
1143         tdm_voutput *voutput;
1144         tdm_error ret = TDM_ERROR_NONE;
1145
1146         TDM_RETURN_IF_FAIL(voutput_info != NULL);
1147
1148         voutput = voutput_info->voutput;
1149
1150         if (voutput)
1151                 ret = tdm_voutput_destroy(voutput);
1152         if (ret != TDM_ERROR_NONE)
1153                 TDM_ERR("_tdm_voutput_cb_destroy fail");
1154
1155         if (voutput_info->attach_buffer) {
1156                 tbm_surface_h buffer = voutput_info->attach_buffer->buffer;
1157                 tbm_surface_internal_unref(buffer);
1158                 voutput_info->committing = 0;
1159                 voutput_info->attach_buffer = NULL;
1160         }
1161
1162         LIST_FOR_EACH_ENTRY(vb, &voutput_info->buffer_list, link) {
1163                 if (!vb) continue;
1164
1165                 if (vb->wl_buffer)
1166                         wl_resource_destroy(vb->wl_buffer);
1167         }
1168
1169         LIST_DEL(&voutput_info->link);
1170
1171         /* Do free your own resource */
1172         free(voutput_info);
1173 }
1174
1175 static void
1176 _tdm_server_cb_create_virtual_output(struct wl_client *client, struct wl_resource *resource, const char *name, uint32_t id)
1177 {
1178         struct wl_resource *voutput_resource = NULL;
1179         tdm_private_server *private_server = wl_resource_get_user_data(resource);
1180         tdm_server_voutput_info *voutput_info;
1181         tdm_voutput *voutput;
1182         tdm_output *output;
1183         tdm_error ret;
1184
1185         output = tdm_display_find_output(private_server->private_loop->dpy, name, NULL);
1186         if (output) {
1187                 TDM_ERR("There is '%s' output, cannot create.", name);
1188                 wl_resource_post_error(resource, WL_DISPLAY_ERROR_INVALID_OBJECT,
1189                                                            "There is '%s' output", name);
1190                 return;
1191         }
1192
1193         voutput = tdm_voutput_create(private_server->private_loop->dpy, name, &ret);
1194         if (!voutput) {
1195                 TDM_ERR("voutput creation fail(%s)(%d).", name, ret);
1196                 wl_resource_post_error(resource, WL_DISPLAY_ERROR_NO_MEMORY,
1197                                                            "%s output creation fail", name);
1198                 return;
1199         }
1200
1201         output = tdm_display_find_output(private_server->private_loop->dpy, name, NULL);
1202         if (!output) {
1203                 TDM_ERR("There is no '%s' output.", name);
1204                 wl_resource_post_error(resource, WL_DISPLAY_ERROR_INVALID_OBJECT,
1205                                                            "There is '%s' output", name);
1206                 return;
1207         }
1208
1209         voutput_resource =
1210                 wl_resource_create(client, &wl_tdm_voutput_interface,
1211                                                    wl_resource_get_version(resource), id);
1212         if (!voutput_resource) {
1213                 /* LCOV_EXCL_START */
1214
1215                 wl_resource_post_no_memory(resource);
1216                 TDM_ERR("wl_resource_create failed");
1217                 return;
1218
1219                 /* LCOV_EXCL_STOP */
1220         }
1221
1222         voutput_info = calloc(1, sizeof * voutput_info);
1223         if (!voutput_info) {
1224                 /* LCOV_EXCL_START */
1225
1226                 wl_resource_post_no_memory(resource);
1227                 wl_resource_destroy(voutput_resource);
1228                 TDM_ERR("alloc failed");
1229                 return;
1230
1231                 /* LCOV_EXCL_STOP */
1232         }
1233
1234         LIST_ADDTAIL(&voutput_info->link, &private_server->voutput_list);
1235         voutput_info->private_server = private_server;
1236         voutput_info->resource = voutput_resource;
1237         voutput_info->voutput = voutput;
1238         voutput_info->output = output;
1239         LIST_INITHEAD(&voutput_info->buffer_list);
1240
1241         wl_resource_set_implementation(voutput_resource,
1242                                                                    &tdm_voutput_implementation,
1243                                                                    voutput_info,
1244                                                                    tdm_voutput_cb_resource_destroy);
1245
1246         wl_tdm_voutput_send_ack_message(voutput_resource, WL_TDM_VOUTPUT_MESSAGE_ADDED);
1247 }
1248
1249 /* LCOV_EXCL_START */
1250 static void
1251 _tdm_server_cb_debug(struct wl_client *client, struct wl_resource *resource, const char *options)
1252 {
1253         tdm_private_server *private_server = wl_resource_get_user_data(resource);
1254         tdm_private_loop *private_loop = private_server->private_loop;
1255         char message[TDM_SERVER_REPLY_MSG_LEN];
1256         char *m;
1257         int len = sizeof(message), size;
1258         uid_t uid;
1259
1260         wl_client_get_credentials(client, NULL, &uid, NULL);
1261
1262         if (uid != 0) {
1263                 snprintf(message, len, "tdm-monitor: SHOULD be a superuser.\n");
1264                 TDM_ERR("%s", message);
1265         } else {
1266                 tdm_monitor_server_command(private_loop->dpy, options, message, &len);
1267         }
1268
1269         size = sizeof(message) - len;
1270         m = message;
1271
1272         wl_client_flush(client);
1273
1274         while (size > 0) {
1275                 char buffer[TDM_DEBUG_REPLY_MSG_LEN];
1276                 int copylen = TDM_MIN(size, sizeof(buffer) - 1);
1277
1278                 strncpy(buffer, m, copylen);
1279                 m += copylen;
1280                 size -= copylen;
1281
1282                 buffer[copylen] = '\0';
1283
1284                 wl_tdm_send_debug_message(resource, buffer);
1285         }
1286
1287         wl_tdm_send_debug_done(resource);
1288 }
1289 /* LCOV_EXCL_STOP */
1290
1291 static const struct wl_tdm_interface tdm_implementation = {
1292         _tdm_server_cb_debug,
1293         _tdm_server_cb_create_output,
1294         _tdm_server_cb_create_virtual_output
1295 };
1296
1297 static void
1298 destroy_client(struct wl_resource *resource)
1299 {
1300         tdm_server_client_info *c = NULL, *cc = NULL;
1301         struct wl_client *client;
1302
1303         client = wl_resource_get_client(resource);
1304         TDM_RETURN_IF_FAIL(client != NULL);
1305
1306         LIST_FOR_EACH_ENTRY_SAFE(c, cc, &client_list, link) {
1307                 if (c->resource == resource) {
1308                         LIST_DEL(&c->link);
1309                         free(c);
1310                         return;
1311                 }
1312         }
1313 }
1314
1315 static void
1316 _tdm_server_bind(struct wl_client *client, void *data,
1317                                  uint32_t version, uint32_t id)
1318 {
1319         struct wl_resource *resource;
1320         tdm_server_client_info *cinfo;
1321
1322         resource = wl_resource_create(client, &wl_tdm_interface, version, id);
1323         if (!resource) {
1324                 /* LCOV_EXCL_START */
1325
1326                 wl_client_post_no_memory(client);
1327                 return;
1328
1329                 /* LCOV_EXCL_STOP */
1330         }
1331
1332         cinfo = calloc(1, sizeof(tdm_server_client_info));
1333         if (!cinfo) {
1334                 /* LCOV_EXCL_START */
1335
1336                 wl_client_post_no_memory(client);
1337                 wl_resource_destroy(resource);
1338                 return;
1339
1340                 /* LCOV_EXCL_STOP */
1341         }
1342
1343         cinfo->resource = resource;
1344
1345         LIST_ADDTAIL(&cinfo->link, &client_list);
1346         wl_client_get_credentials(client, &cinfo->pid, NULL, NULL);
1347         _tdm_server_get_process_name(cinfo->pid, cinfo->name, TDM_NAME_LEN);
1348
1349         wl_resource_set_implementation(resource, &tdm_implementation, data, destroy_client);
1350 }
1351
1352 INTERN tdm_error
1353 tdm_server_init(tdm_private_loop *private_loop)
1354 {
1355         tdm_private_server *private_server;
1356
1357         TDM_RETURN_VAL_IF_FAIL(private_loop, TDM_ERROR_OPERATION_FAILED);
1358         TDM_RETURN_VAL_IF_FAIL(private_loop->wl_display, TDM_ERROR_OPERATION_FAILED);
1359
1360         if (private_loop->private_server)
1361                 return TDM_ERROR_NONE;
1362
1363         if (wl_display_add_socket(private_loop->wl_display, "tdm-socket")) {
1364                 /* LCOV_EXCL_START */
1365
1366                 TDM_ERR("createing a tdm-socket failed");
1367                 return TDM_ERROR_OPERATION_FAILED;
1368
1369                 /* LCOV_EXCL_STOP */
1370         }
1371
1372         private_server = calloc(1, sizeof * private_server);
1373         if (!private_server) {
1374                 TDM_ERR("alloc failed");
1375                 return TDM_ERROR_OUT_OF_MEMORY;
1376         }
1377
1378         LIST_INITHEAD(&private_server->output_list);
1379         LIST_INITHEAD(&private_server->voutput_list);
1380         LIST_INITHEAD(&private_server->wait_list);
1381
1382         if (!wl_global_create(private_loop->wl_display, &wl_tdm_interface, 1,
1383                                                   private_server, _tdm_server_bind)) {
1384                 /* LCOV_EXCL_START */
1385
1386                 TDM_ERR("creating a global resource failed");
1387                 free(private_server);
1388                 return TDM_ERROR_OUT_OF_MEMORY;
1389
1390                 /* LCOV_EXCL_STOP */
1391         }
1392
1393         private_server->private_loop = private_loop;
1394         private_loop->private_server = private_server;
1395         keep_private_server = private_server;
1396
1397         LIST_INITHEAD(&client_list);
1398
1399         return TDM_ERROR_NONE;
1400 }
1401
1402 INTERN void
1403 tdm_server_deinit(tdm_private_loop *private_loop)
1404 {
1405         tdm_server_output_info *o = NULL, *oo = NULL;
1406         tdm_server_voutput_info *vo = NULL, *voo = NULL;
1407         tdm_server_wait_info *w = NULL, *ww = NULL;
1408         tdm_server_client_info *c = NULL, *cc = NULL;
1409         tdm_private_server *private_server;
1410
1411         if (!private_loop->private_server)
1412                 return;
1413
1414         private_server = private_loop->private_server;
1415
1416         LIST_FOR_EACH_ENTRY_SAFE(w, ww, &private_server->wait_list, link) {
1417                 destroy_wait(w);
1418         }
1419
1420         LIST_FOR_EACH_ENTRY_SAFE(o, oo, &private_server->output_list, link) {
1421                 wl_resource_destroy(o->resource);
1422         }
1423
1424         LIST_FOR_EACH_ENTRY_SAFE(vo, voo, &private_server->voutput_list, link) {
1425                 wl_resource_destroy(vo->resource);
1426         }
1427
1428         LIST_FOR_EACH_ENTRY_SAFE(c, cc, &client_list, link) {
1429                 wl_resource_destroy(c->resource);
1430         }
1431
1432         free(private_server);
1433         private_loop->private_server = NULL;
1434         keep_private_server = NULL;
1435 }
1436
1437 /* LCOV_EXCL_START */
1438 INTERN const char*
1439 tdm_server_get_client_name(pid_t pid)
1440 {
1441         tdm_server_client_info *c = NULL;
1442
1443         LIST_FOR_EACH_ENTRY(c, &client_list, link) {
1444                 if (c->pid == pid)
1445                         return (const char*)c->name;
1446         }
1447
1448         return NULL;
1449 }
1450 /* LCOV_EXCL_STOP */
1451
1452 /* LCOV_EXCL_START */
1453 INTERN tdm_error
1454 tdm_server_enable_ttrace_client_vblank(tdm_display *dpy, tdm_output *output, int enable)
1455 {
1456         tdm_private_server *private_server = keep_private_server;
1457         tdm_server_output_info *output_info = NULL;
1458
1459         if (!keep_private_server)
1460                 return TDM_ERROR_NONE;
1461
1462         LIST_FOR_EACH_ENTRY(output_info, &private_server->output_list, link) {
1463                 tdm_server_vblank_info *vblank_info = NULL;
1464
1465                 if (output && output_info->output != output)
1466                         continue;
1467
1468                 LIST_FOR_EACH_ENTRY(vblank_info, &output_info->vblank_list, link) {
1469                         wl_tdm_vblank_send_ttrace(vblank_info->resource, enable);
1470                 }
1471         }
1472
1473         return TDM_ERROR_NONE;
1474 }
1475 /* LCOV_EXCL_STOP */