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