src/message-port.c

   1 /*
   2  * Message Port
   3  * Copyright (c) 2015 Samsung Electronics Co., Ltd.
   4  *
   5  * Licensed under the Apache License, Version 2.0 (the License);
   6  * you may not use this file except in compliance with the License.
   7  * You may obtain a copy of the License at
   8  *
   9  *     http://www.apache.org/licenses/LICENSE-2.0
  10  *
  11  * Unless required by applicable law or agreed to in writing, software
  12  * distributed under the License is distributed on an "AS IS" BASIS,
  13  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  14  * See the License for the specific language governing permissions and
  15  * limitations under the License.
  16  */
  17
  18 /**
  19  * @file        message-port.cpp
  20  * @brief       This is the implementation file for the MessagePort.
  21  */
  22
  23 #include <sys/socket.h>
  24 #include <stdlib.h>
  25 #include <stdio.h>
  26 #include <glib.h>
  27 #include <gio/gio.h>
  28 #include <aul/aul.h>
  29 #include <openssl/md5.h>
  30 #include <bundle.h>
  31 #include <bundle_internal.h>
  32 #include <pkgmgr-info.h>
  33 #include <aul.h>
  34 #include <gio/gio.h>
  35 #include <gio/gunixfdlist.h>
  36
  37 #include "message-port.h"
  38 #include "message-port-log.h"
  39
  40 #define MAX_PACKAGE_STR_SIZE 512
  41 #define MESSAGEPORT_BUS_NAME_PREFIX "org.tizen.messageport._"
  42 #define MESSAGEPORT_OBJECT_PATH "/org/tizen/messageport"
  43 #define MESSAGEPORT_INTERFACE_PREFIX "org.tizen.messageport._"
  44
  45 #define DBUS_SERVICE_DBUS "org.freedesktop.DBus"
  46 #define DBUS_PATH_DBUS "/org/freedesktop/DBus"
  47 #define DBUS_INTERFACE_DBUS "org.freedesktop.DBus"
  48
  49 #define DBUS_RELEASE_NAME_REPLY_RELEASED        1 /* *< Service was released from the given name */
  50 #define DBUS_RELEASE_NAME_REPLY_NON_EXISTENT    2 /* *< The given name does not exist on the bus */
  51 #define DBUS_RELEASE_NAME_REPLY_NOT_OWNER       3 /* *< Service is not an owner of the given name */
  52 #define HEADER_LEN 8
  53 #define MAX_RETRY_CNT 2
  54 #define SOCK_PAIR_SENDER 0
  55 #define SOCK_PAIR_RECEIVER 1
  56
  57
  58 #define retvm_if(expr, val, fmt, arg...) do { \
  59         if (expr) { \
  60                 _LOGE(fmt, ##arg); \
  61                 _LOGE("(%s) -> %s() return", #expr, __func__); \
  62                 return val; \
  63         } \
  64 } while (0)
  65
  66 #define retv_if(expr, val) do { \
  67         if (expr) { \
  68                 _LOGE("(%s) -> %s() return", #expr, __func__); \
  69                 return val; \
  70         } \
  71 } while (0)
  72
  73 #define FREE_AND_NULL(ptr) do { \
  74         if (ptr) { \
  75                 free((void *)ptr); \
  76                 ptr = NULL; \
  77         } \
  78 } while (0)
  79
  80 static bool _initialized = false;
  81 static GDBusConnection *__gdbus_conn;
  82 static char *__app_id;
  83 static GHashTable *__local_port_info;
  84 static GHashTable *__remote_app_info;
  85 static GHashTable *__sender_appid_hash;
  86 static GHashTable *__trusted_app_list_hash;
  87 static GHashTable *__callback_info_hash;
  88 static const int MAX_MESSAGE_SIZE = 16 * 1024;
  89
  90 enum __certificate_info_type {
  91         UNKNOWN = 0,
  92         CERTIFICATE_MATCH,
  93         CERTIFICATE_NOT_MATCH,
  94 };
  95
  96 typedef struct message_port_pkt {
  97         int remote_port_name_len;
  98         char *remote_port_name;
  99         bool is_bidirection;
 100         bool is_trusted;
 101         int data_len;
 102         unsigned char *data;
 103 } message_port_pkt_s;
 104
 105 typedef struct message_port_callback_info {
 106         messageport_message_cb callback;
 107         int local_id;
 108         char *remote_app_id;
 109         GIOChannel *gio_read;
 110         int g_src_id;
 111 } message_port_callback_info_s;
 112
 113 typedef struct message_port_local_port_info {
 114         messageport_message_cb callback;
 115         bool is_trusted;
 116         char *port_name;
 117         int local_id;
 118 } message_port_local_port_info_s;
 119
 120 typedef struct message_port_remote_port_info {
 121         char *sender_id;
 122         char *remote_app_id;
 123         int certificate_info;
 124         GList *port_list;
 125 } message_port_remote_app_info_s;
 126
 127 typedef struct port_list_info {
 128         char *port_name;
 129         char *encoded_bus_name;
 130         bool is_trusted;
 131         int send_sock_fd;
 132         int watcher_id;
 133         bool exist;
 134 } port_list_info_s;
 135
 136 static void __callback_info_free(gpointer data)
 137 {
 138         message_port_callback_info_s *callback_info = (message_port_callback_info_s *)data;
 139         GError *error = NULL;
 140         if (callback_info == NULL)
 141                 return;
 142
 143         if (callback_info->remote_app_id)
 144                 free(callback_info->remote_app_id);
 145
 146         if (callback_info->gio_read != NULL) {
 147                 g_io_channel_shutdown(callback_info->gio_read, TRUE, &error);
 148                 if (error) {
 149                         _LOGE("g_io_channel_shutdown error : %s", error->message);
 150                         g_error_free(error);
 151                 }
 152                 g_io_channel_unref(callback_info->gio_read);
 153                 callback_info->gio_read = NULL;
 154         }
 155
 156         if (callback_info->g_src_id != 0) {
 157                 g_source_remove(callback_info->g_src_id);
 158                 callback_info->g_src_id = 0;
 159         }
 160
 161         free(callback_info);
 162 }
 163
 164 static void __callback_info_free_by_info(message_port_callback_info_s *callback_info)
 165 {
 166
 167         GList *callback_info_list = g_hash_table_lookup(__callback_info_hash, GUINT_TO_POINTER(callback_info->local_id));
 168         GList *find_list;
 169
 170         if (callback_info_list == NULL)
 171                 return;
 172
 173         find_list = g_list_find(callback_info_list, callback_info);
 174         if (find_list == NULL)
 175                 return;
 176
 177         callback_info_list = g_list_remove_link(callback_info_list, find_list);
 178         __callback_info_free(callback_info);
 179 }
 180
 181 static void __hash_destroy_callback_info(gpointer data)
 182 {
 183
 184         GList *callback_list = (GList *)data;
 185         if (callback_list != NULL)
 186                 g_list_free_full(callback_list, __callback_info_free);
 187 }
 188
 189 static char *__get_encoded_name(const char *remote_app_id, const char *port_name, bool is_trusted)
 190 {
 191
 192         int prefix_len = strlen(MESSAGEPORT_BUS_NAME_PREFIX);
 193         int postfix_len = 1;
 194         char *postfix = is_trusted ? "1" : "0";
 195
 196         unsigned char c[MD5_DIGEST_LENGTH] = {0};
 197         char *md5_interface = NULL;
 198         char *temp;
 199         int index = 0;
 200         MD5_CTX mdContext;
 201         int encoded_bus_name_len = prefix_len + postfix_len + (MD5_DIGEST_LENGTH * 2) + 2;
 202         int bus_name_len = strlen(remote_app_id) + strlen(port_name) + 2;
 203         char *bus_name = (char *)calloc(bus_name_len, sizeof(char));
 204         if (bus_name == NULL) {
 205                 _LOGE("bus_name calloc failed");
 206                 return 0;
 207         }
 208
 209         snprintf(bus_name, bus_name_len, "%s_%s", remote_app_id, port_name);
 210
 211         MD5_Init(&mdContext);
 212         MD5_Update(&mdContext, bus_name, bus_name_len);
 213         MD5_Final(c, &mdContext);
 214
 215         md5_interface = (char *)calloc(encoded_bus_name_len , sizeof(char));
 216         if (md5_interface == NULL) {
 217                 if (bus_name)
 218                         free(bus_name);
 219
 220                 _LOGE("md5_interface calloc failed!!");
 221                 return 0;
 222         }
 223
 224         snprintf(md5_interface, encoded_bus_name_len, "%s", MESSAGEPORT_BUS_NAME_PREFIX);
 225         temp = md5_interface;
 226         temp += prefix_len;
 227
 228         for (index = 0; index < MD5_DIGEST_LENGTH; index++) {
 229                 snprintf(temp, 3, "%02x", c[index]);
 230                 temp += 2;
 231         }
 232
 233         if (postfix && postfix_len > 0)
 234                 snprintf(temp, encoded_bus_name_len - (temp - md5_interface), "%s", postfix);
 235         if (bus_name)
 236                 free(bus_name);
 237
 238         _LOGI("encoded_bus_name : %s ", md5_interface);
 239
 240         return md5_interface;
 241 }
 242
 243 static int __remote_port_compare_cb(gconstpointer a, gconstpointer b)
 244 {
 245         port_list_info_s *key1 = (port_list_info_s *)a;
 246         port_list_info_s *key2 = (port_list_info_s *)b;
 247
 248         if (key1->is_trusted == key2->is_trusted)
 249                 return strcmp(key1->port_name, key2->port_name);
 250
 251         return 1;
 252 }
 253
 254
 255 static bool __is_preloaded(const char *local_appid, const char *remote_appid)
 256 {
 257         _LOGI("IsPreloaded");
 258
 259         bool preload_local = false;
 260         bool preload_remote = false;
 261
 262         pkgmgrinfo_appinfo_h handle = NULL;
 263         int ret = pkgmgrinfo_appinfo_get_usr_appinfo(local_appid, getuid(), &handle);
 264         if (ret != PMINFO_R_OK) {
 265                 _LOGE("Failed to get the appinfo. %d", ret);
 266                 pkgmgrinfo_appinfo_destroy_appinfo(handle);
 267                 return false;
 268         }
 269         ret = pkgmgrinfo_appinfo_is_preload(handle, &preload_local);
 270         if (ret != PMINFO_R_OK) {
 271                 _LOGE("Failed to check the preloaded application. %d", ret);
 272                 pkgmgrinfo_appinfo_destroy_appinfo(handle);
 273                 return false;
 274         }
 275         ret = pkgmgrinfo_appinfo_get_usr_appinfo(remote_appid, getuid(), &handle);
 276         if (ret != PMINFO_R_OK) {
 277                 _LOGE("Failed to get the appinfo. %d", ret);
 278                 pkgmgrinfo_appinfo_destroy_appinfo(handle);
 279                 return false;
 280         }
 281         ret = pkgmgrinfo_appinfo_is_preload(handle, &preload_remote);
 282         if (ret != PMINFO_R_OK) {
 283                 _LOGE("Failed to check the preloaded application. %d", ret);
 284                 pkgmgrinfo_appinfo_destroy_appinfo(handle);
 285                 return false;
 286         }
 287
 288         if (preload_local && preload_remote) {
 289                 pkgmgrinfo_appinfo_destroy_appinfo(handle);
 290                 return true;
 291         }
 292         pkgmgrinfo_appinfo_destroy_appinfo(handle);
 293         return false;
 294 }
 295
 296 static int __check_certificate(const char *local_appid, const char *remote_appid)
 297 {
 298         _LOGI("CheckCertificate");
 299
 300         pkgmgrinfo_cert_compare_result_type_e res;
 301         int ret = pkgmgrinfo_pkginfo_compare_usr_app_cert_info(local_appid, remote_appid, getuid(), &res);
 302         if (ret < 0) {
 303                 _LOGE(":CheckCertificate() Failed");
 304                 return MESSAGEPORT_ERROR_IO_ERROR;
 305         }
 306         if (res != PMINFO_CERT_COMPARE_MATCH) {
 307                 _LOGE("CheckCertificate() Failed : MESSAGEPORT_ERROR_CERTIFICATE_NOT_MATCH");
 308                 return MESSAGEPORT_ERROR_CERTIFICATE_NOT_MATCH;
 309         }
 310
 311         return MESSAGEPORT_ERROR_NONE;
 312 }
 313
 314 static void on_name_appeared(GDBusConnection *connection,
 315                 const gchar     *name,
 316                 const gchar     *name_owner,
 317                 gpointer         user_data)
 318 {
 319         _LOGI("name appeared : %s %s", __app_id, name);
 320 }
 321
 322 static void on_name_vanished(GDBusConnection *connection,
 323                 const gchar     *name,
 324                 gpointer         user_data)
 325 {
 326         _LOGI("name vanished : %s", name);
 327         port_list_info_s *pli = (port_list_info_s *)user_data;
 328         g_bus_unwatch_name(pli->watcher_id);
 329         pli->exist = false;
 330         pli->watcher_id = 0;
 331         _LOGI("name vanished socket : %d", pli->send_sock_fd);
 332         if (pli->send_sock_fd > 0) {
 333                 close(pli->send_sock_fd);
 334                 pli->send_sock_fd = 0;
 335         }
 336 }
 337
 338 static int __get_local_port_info(int id, message_port_local_port_info_s **info)
 339 {
 340         message_port_local_port_info_s *mi = (message_port_local_port_info_s *)g_hash_table_lookup(__local_port_info, GINT_TO_POINTER(id));
 341
 342         if (mi == NULL)
 343                 return MESSAGEPORT_ERROR_INVALID_PARAMETER;
 344         *info = mi;
 345
 346         return MESSAGEPORT_ERROR_NONE;
 347 }
 348
 349 static port_list_info_s *__set_remote_port_info(const char *remote_app_id, const char *remote_port, bool is_trusted)
 350 {
 351         int ret_val = MESSAGEPORT_ERROR_NONE;
 352         port_list_info_s *port_info = (port_list_info_s *)calloc(1, sizeof(port_list_info_s));
 353
 354         if (!port_info) {
 355                 ret_val = MESSAGEPORT_ERROR_OUT_OF_MEMORY;
 356                 goto out;
 357         }
 358         port_info->port_name = strdup(remote_port);
 359         if (!port_info->port_name) {
 360                 ret_val = MESSAGEPORT_ERROR_OUT_OF_MEMORY;
 361                 goto out;
 362         }
 363         port_info->is_trusted = is_trusted;
 364         port_info->encoded_bus_name = __get_encoded_name(remote_app_id, remote_port, is_trusted);
 365         if (port_info->encoded_bus_name == NULL) {
 366                 ret_val = MESSAGEPORT_ERROR_OUT_OF_MEMORY;
 367                 goto out;
 368         }
 369         port_info->send_sock_fd = 0;
 370 out:
 371         if (ret_val != MESSAGEPORT_ERROR_NONE) {
 372                 if (port_info) {
 373                         FREE_AND_NULL(port_info->port_name);
 374                         FREE_AND_NULL(port_info->encoded_bus_name);
 375                         free(port_info);
 376                 }
 377                 return NULL;
 378         }
 379         return port_info;
 380 }
 381
 382 static message_port_remote_app_info_s *__set_remote_app_info(const char *remote_app_id, const char *remote_port, bool is_trusted)
 383 {
 384         message_port_remote_app_info_s *remote_app_info = NULL;
 385         int ret_val = MESSAGEPORT_ERROR_NONE;
 386
 387         remote_app_info = (message_port_remote_app_info_s *)calloc(1, sizeof(message_port_remote_app_info_s));
 388         if (!remote_app_info) {
 389                 ret_val = MESSAGEPORT_ERROR_OUT_OF_MEMORY;
 390                 goto out;
 391         }
 392
 393         remote_app_info->remote_app_id = strdup(remote_app_id);
 394         if (remote_app_info->remote_app_id == NULL) {
 395                 ret_val = MESSAGEPORT_ERROR_OUT_OF_MEMORY;;
 396                 goto out;
 397         }
 398
 399 out:
 400         if (ret_val != MESSAGEPORT_ERROR_NONE) {
 401                 if (remote_app_info) {
 402                         FREE_AND_NULL(remote_app_info->remote_app_id);
 403                         FREE_AND_NULL(remote_app_info);
 404                 }
 405                 return NULL;
 406         }
 407         return remote_app_info;
 408 }
 409
 410 static int __get_remote_port_info(const char *remote_app_id, const char *remote_port, bool is_trusted,
 411                 message_port_remote_app_info_s **mri, port_list_info_s **pli)
 412 {
 413         message_port_remote_app_info_s *remote_app_info = NULL;
 414         port_list_info_s port_info;
 415         GList *cb_list = NULL;
 416         int ret_val = MESSAGEPORT_ERROR_NONE;
 417
 418         remote_app_info = (message_port_remote_app_info_s *)g_hash_table_lookup(__remote_app_info, remote_app_id);
 419
 420         if (remote_app_info == NULL) {
 421                 remote_app_info = __set_remote_app_info(remote_app_id, remote_port, is_trusted);
 422
 423                 if (remote_app_info == NULL) {
 424                         ret_val = MESSAGEPORT_ERROR_OUT_OF_MEMORY;
 425                         goto out;
 426                 }
 427                 g_hash_table_insert(__remote_app_info, remote_app_info->remote_app_id, remote_app_info);
 428         }
 429         *mri = remote_app_info;
 430
 431         port_info.port_name = strdup(remote_port);
 432         port_info.is_trusted = is_trusted;
 433         cb_list = g_list_find_custom(remote_app_info->port_list, &port_info,
 434                                         (GCompareFunc)__remote_port_compare_cb);
 435         if (port_info.port_name)
 436                 free(port_info.port_name);
 437         if (cb_list == NULL) {
 438                 port_list_info_s *tmp = __set_remote_port_info(remote_app_id, remote_port, is_trusted);
 439                 if (tmp == NULL) {
 440                         ret_val = MESSAGEPORT_ERROR_OUT_OF_MEMORY;
 441                         goto out;
 442                 }
 443                 remote_app_info->port_list = g_list_append(remote_app_info->port_list, tmp);
 444                 *pli = tmp;
 445         } else {
 446                 *pli = (port_list_info_s *)cb_list->data;
 447         }
 448         if ((*pli)->watcher_id < 1) {
 449                 LOGI("watch remote port : %s", (*pli)->encoded_bus_name);
 450                 (*pli)->watcher_id = g_bus_watch_name_on_connection(
 451                                         __gdbus_conn,
 452                                         (*pli)->encoded_bus_name,
 453                                         G_BUS_NAME_WATCHER_FLAGS_NONE,
 454                                         on_name_appeared,
 455                                         on_name_vanished,
 456                                         *pli,
 457                                         NULL);
 458         }
 459 out:
 460
 461         return ret_val;
 462 }
 463
 464 static bool __is_local_port_registed(const char *local_port, bool trusted, int *local_id, message_port_local_port_info_s **lpi)
 465 {
 466         GHashTableIter iter;
 467         gpointer key, value;
 468
 469         g_hash_table_iter_init(&iter, __local_port_info);
 470         while (g_hash_table_iter_next(&iter, &key, &value)) {
 471                 message_port_local_port_info_s *mi = (message_port_local_port_info_s *)value;
 472
 473                 if ((mi->is_trusted == trusted) && strcmp(mi->port_name, local_port) == 0) {
 474                         *local_id = mi->local_id;
 475                         if (lpi != NULL)
 476                                 *lpi = mi;
 477                         return true;
 478                 }
 479         }
 480         return false;
 481 }
 482
 483 static int __get_sender_pid(GDBusConnection *conn, const char *sender_name)
 484 {
 485         GDBusMessage *msg = NULL;
 486         GDBusMessage *reply = NULL;
 487         GError *err = NULL;
 488         GVariant *body;
 489         int pid = 0;
 490
 491         msg = g_dbus_message_new_method_call("org.freedesktop.DBus", "/org/freedesktop/DBus",
 492                         "org.freedesktop.DBus", "GetConnectionUnixProcessID");
 493         if (!msg) {
 494                 _LOGE("Can't allocate new method call");
 495                 goto out;
 496         }
 497
 498         g_dbus_message_set_body(msg, g_variant_new("(s)", sender_name));
 499         reply = g_dbus_connection_send_message_with_reply_sync(conn, msg,
 500                                                         G_DBUS_SEND_MESSAGE_FLAGS_NONE, -1, NULL, NULL, &err);
 501
 502         if (!reply) {
 503                 if (err != NULL) {
 504                         _LOGE("Failed to get pid [%s]", err->message);
 505                         g_error_free(err);
 506                 }
 507                 goto out;
 508         }
 509
 510         body = g_dbus_message_get_body(reply);
 511         g_variant_get(body, "(u)", &pid);
 512
 513 out:
 514         if (msg)
 515                 g_object_unref(msg);
 516         if (reply)
 517                 g_object_unref(reply);
 518
 519         return pid;
 520 }
 521
 522 static int __write_socket(int fd,
 523                 const char *buffer,
 524                 unsigned int nbytes,
 525                 unsigned int *bytes_write)
 526 {
 527         unsigned int left = nbytes;
 528         ssize_t nb;
 529         int retry_cnt = 0;
 530
 531         *bytes_write = 0;
 532         while (left && (retry_cnt < MAX_RETRY_CNT)) {
 533                 nb = write(fd, buffer, left);
 534                 if (nb == -1) {
 535                         if (errno == EINTR) {
 536                                 LOGE("__write_socket: EINTR error continue ...");
 537                                 retry_cnt++;
 538                                 continue;
 539                         }
 540                         LOGE("__write_socket: ...error fd %d: errno %d\n", fd, errno);
 541                         return MESSAGEPORT_ERROR_IO_ERROR;
 542                 }
 543
 544                 left -= nb;
 545                 buffer += nb;
 546                 *bytes_write += nb;
 547                 retry_cnt = 0;
 548         }
 549         return MESSAGEPORT_ERROR_NONE;
 550 }
 551
 552 static int __write_string_to_socket(int fd, const char *buffer, int string_len)
 553 {
 554         unsigned int nb;
 555         if (__write_socket(fd, (char *)&string_len, sizeof(string_len), &nb) != MESSAGEPORT_ERROR_NONE) {
 556                 _LOGE("write string_len fail");
 557                 return MESSAGEPORT_ERROR_IO_ERROR;
 558         }
 559
 560         if (string_len > 0) {
 561                 if (__write_socket(fd, buffer, string_len, &nb) != MESSAGEPORT_ERROR_NONE) {
 562                         _LOGE("wirte buffer fail");
 563                         return MESSAGEPORT_ERROR_IO_ERROR;
 564                 }
 565         }
 566         return MESSAGEPORT_ERROR_NONE;
 567 }
 568
 569 static int __read_socket(int fd,
 570                 char *buffer,
 571                 unsigned int nbytes,
 572                 unsigned int *bytes_read)
 573 {
 574         unsigned int left = nbytes;
 575         ssize_t nb;
 576         int retry_cnt = 0;
 577
 578         *bytes_read = 0;
 579         while (left && (retry_cnt < MAX_RETRY_CNT)) {
 580                 nb = read(fd, buffer, left);
 581                 if (nb == 0) {
 582                         LOGE("__read_socket: ...read EOF, socket closed %d: nb %d\n", fd, nb);
 583                         return MESSAGEPORT_ERROR_IO_ERROR;
 584                 } else if (nb == -1) {
 585                         if (errno == EINTR) {
 586                                 LOGE("__read_socket: EINTR error continue ...");
 587                                 retry_cnt++;
 588                                 continue;
 589                         }
 590                         LOGE("__read_socket: ...error fd %d: errno %d\n", fd, errno);
 591                         return MESSAGEPORT_ERROR_IO_ERROR;
 592                 }
 593
 594                 left -= nb;
 595                 buffer += nb;
 596                 *bytes_read += nb;
 597                 retry_cnt = 0;
 598         }
 599         return MESSAGEPORT_ERROR_NONE;
 600 }
 601
 602 static int __read_string_from_socket(int fd, char **buffer, int *string_len)
 603 {
 604         unsigned int nb;
 605         if (__read_socket(fd, (char *)string_len, sizeof(*string_len), &nb) != MESSAGEPORT_ERROR_NONE) {
 606                 LOGE("read socket fail");
 607                 return MESSAGEPORT_ERROR_IO_ERROR;
 608         }
 609         if (*string_len > 0 && *string_len < MAX_MESSAGE_SIZE) {
 610                 *buffer = (char *)calloc(*string_len, sizeof(char));
 611                 if (*buffer == NULL) {
 612                         LOGE("Out of memory.");
 613                         return MESSAGEPORT_ERROR_IO_ERROR;
 614                 }
 615                 if (__read_socket(fd, *buffer, *string_len, &nb) != MESSAGEPORT_ERROR_NONE) {
 616                         LOGE("read socket fail");
 617                         return MESSAGEPORT_ERROR_IO_ERROR;
 618                 }
 619         } else {
 620                 LOGE("Invalid string len %d", &string_len);
 621                 return MESSAGEPORT_ERROR_IO_ERROR;
 622         }
 623         return MESSAGEPORT_ERROR_NONE;
 624 }
 625
 626 message_port_pkt_s *__message_port_recv_raw(int fd)
 627 {
 628         message_port_pkt_s *pkt = NULL;
 629         unsigned int nb;
 630
 631         pkt = (message_port_pkt_s *)calloc(sizeof(message_port_pkt_s), 1);
 632         if (pkt == NULL) {
 633                 close(fd);
 634                 return NULL;
 635         }
 636
 637         if (__read_string_from_socket(fd, (char **)&pkt->remote_port_name, &pkt->remote_port_name_len) != MESSAGEPORT_ERROR_NONE) {
 638                 LOGE("read socket fail: port_name");
 639                 free(pkt->remote_port_name);
 640                 free(pkt);
 641                 return NULL;
 642         }
 643
 644         if (__read_socket(fd, (char *)&pkt->is_bidirection, sizeof(pkt->is_bidirection), &nb) != MESSAGEPORT_ERROR_NONE) {
 645                 LOGE("read socket fail: is_bidirection");
 646                 free(pkt->remote_port_name);
 647                 free(pkt);
 648                 return NULL;
 649         }
 650
 651         if (__read_socket(fd, (char *)&pkt->is_trusted, sizeof(pkt->is_trusted), &nb) != MESSAGEPORT_ERROR_NONE) {
 652                 LOGE("read socket fail: is_trusted");
 653                 free(pkt->remote_port_name);
 654                 free(pkt);
 655                 return NULL;
 656         }
 657
 658         if (__read_string_from_socket(fd, (char **)&pkt->data, &pkt->data_len) != MESSAGEPORT_ERROR_NONE) {
 659                 LOGE("read socket fail: data");
 660                 free(pkt->remote_port_name);
 661                 free(pkt);
 662                 return NULL;
 663         }
 664
 665         return pkt;
 666 }
 667
 668 static gboolean __socket_request_handler(GIOChannel *gio,
 669                 GIOCondition cond,
 670                 gpointer data)
 671 {
 672         int fd = 0;
 673         message_port_callback_info_s *mi;
 674         message_port_pkt_s *pkt;
 675         bundle *kb = NULL;
 676         GError *error = NULL;
 677
 678         mi = (message_port_callback_info_s *)data;
 679         if (mi == NULL) {
 680
 681                 g_io_channel_shutdown(gio, TRUE, &error);
 682                 if (error) {
 683                         _LOGE("g_io_channel_shutdown error : %s", error->message);
 684                         g_error_free(error);
 685                 }
 686                 g_io_channel_unref(gio);
 687                 return FALSE;
 688         }
 689
 690         if (cond == G_IO_HUP) {
 691
 692                 _LOGI("socket G_IO_HUP");
 693                 __callback_info_free_by_info(mi);
 694                 return FALSE;
 695
 696         } else {
 697
 698                 if ((fd = g_io_channel_unix_get_fd(gio)) < 0) {
 699                         _LOGE("fail to get fd from io channel");
 700                         __callback_info_free_by_info(mi);
 701                         return FALSE;
 702                 }
 703
 704                 if ((pkt = __message_port_recv_raw(fd)) == NULL) {
 705                         _LOGE("recv error on SOCKET");
 706                         __callback_info_free_by_info(mi);
 707                         return FALSE;
 708                 }
 709
 710                 kb = bundle_decode(pkt->data, pkt->data_len);
 711                 if (pkt->is_bidirection)
 712                         mi->callback(mi->local_id, mi->remote_app_id, pkt->remote_port_name, pkt->is_trusted, kb, NULL);
 713                 else
 714                         mi->callback(mi->local_id, mi->remote_app_id, NULL, pkt->is_trusted, kb, NULL);
 715
 716                 bundle_free(kb);
 717                 if (pkt) {
 718                         if (pkt->remote_port_name)
 719                                 free(pkt->remote_port_name);
 720                         if (pkt->data)
 721                                 free(pkt->data);
 722                         free(pkt);
 723                 }
 724         }
 725
 726         return TRUE;
 727 }
 728
 729 static bool send_message(GVariant *parameters, GDBusMethodInvocation *invocation)
 730 {
 731         char *local_port = NULL;
 732         char *local_appid = NULL;
 733         char *remote_appid = NULL;
 734         char *remote_port = NULL;
 735         gboolean local_trusted = false;
 736         gboolean remote_trusted = false;
 737         gboolean bi_dir = false;
 738         int len = 0;
 739
 740         bundle *data = NULL;
 741         bundle_raw *raw = NULL;
 742         message_port_local_port_info_s *mi;
 743         int local_reg_id = 0;
 744         message_port_callback_info_s *callback_info;
 745         GList *callback_info_list = NULL;
 746
 747         char buf[1024];
 748         GDBusMessage *msg;
 749         GUnixFDList *fd_list;
 750         int fd_len;
 751         int *returned_fds = NULL;
 752         int fd;
 753
 754         g_variant_get(parameters, "(&s&sbb&s&sbu&s)", &local_appid, &local_port, &local_trusted, &bi_dir,
 755                         &remote_appid, &remote_port, &remote_trusted, &len, &raw);
 756
 757         if (!remote_port) {
 758                 _LOGE("Invalid argument : remote_port is NULL");
 759                 goto out;
 760         }
 761         if (!remote_appid) {
 762                 _LOGE("Invalid argument : remote_appid is NULL");
 763                 goto out;
 764         }
 765         if (!__is_local_port_registed(remote_port, remote_trusted, &local_reg_id, &mi)) {
 766                 _LOGE("Invalid argument : remote_port:(%s) trusted(%d)", remote_port, remote_trusted);
 767                 goto out;
 768         }
 769         if (!local_appid) {
 770                 _LOGE("Invalid argument : local_appid");
 771                 goto out;
 772         }
 773         if (!local_port) {
 774                 _LOGE("Invalid argument : local_port");
 775                 goto out;
 776         }
 777         if (strcmp(remote_appid, __app_id) != 0) {
 778                 _LOGE("Invalid argument : remote_appid (%s)", remote_appid);
 779                 goto out;
 780         }
 781         if (strcmp(remote_port, mi->port_name) != 0) {
 782                 _LOGE("Invalid argument : remote_port (%s)", remote_port);
 783                 goto out;
 784         }
 785         if (!len) {
 786                 _LOGE("Invalid argument : data_len");
 787                 goto out;
 788         }
 789         if (remote_trusted) {
 790                 if (g_hash_table_lookup(__trusted_app_list_hash, (gpointer)local_appid) == NULL) {
 791                         if (!__is_preloaded(local_appid, remote_appid)) {
 792                                 int ret = __check_certificate(local_appid, remote_appid);
 793                                 if (ret == MESSAGEPORT_ERROR_NONE)
 794                                         g_hash_table_insert(__trusted_app_list_hash, local_appid, "TRUE");
 795                                 else {
 796                                         _LOGE("The application (%s) is not signed with the same certificate",
 797                                                         local_appid);
 798                                         goto out;
 799                                 }
 800                         }
 801                 }
 802         }
 803
 804         callback_info = (message_port_callback_info_s *)calloc(1, sizeof(message_port_callback_info_s));
 805         if (callback_info == NULL)
 806                 goto out;
 807
 808         callback_info->local_id = mi->local_id;
 809         callback_info->remote_app_id = strdup(local_appid);
 810         callback_info->callback = mi->callback;
 811
 812         msg = g_dbus_method_invocation_get_message(invocation);
 813         fd_list = g_dbus_message_get_unix_fd_list(msg);
 814
 815         /* When application send message to self fd_list is NULL */
 816         if (fd_list != NULL) {
 817                 returned_fds = g_unix_fd_list_steal_fds(fd_list, &fd_len);
 818                 if (returned_fds == NULL) {
 819                         _LOGE("fail to get fds");
 820                         __callback_info_free(callback_info);
 821                         return -1;
 822                 }
 823                 fd = returned_fds[0];
 824
 825                 LOGI("g_unix_fd_list_get %d fd: [%d]", fd_len, fd);
 826                 if (fd > 0) {
 827
 828                         callback_info->gio_read = g_io_channel_unix_new(fd);
 829                         if (!callback_info->gio_read) {
 830                                 _LOGE("Error is %s\n", strerror_r(errno, buf, sizeof(buf)));
 831                                 __callback_info_free(callback_info);
 832                                 return -1;
 833                         }
 834
 835                         callback_info->g_src_id = g_io_add_watch(callback_info->gio_read, G_IO_IN | G_IO_HUP,
 836                                         __socket_request_handler, (gpointer)callback_info);
 837                         if (callback_info->g_src_id == 0) {
 838                                 _LOGE("fail to add watch on socket");
 839                                 __callback_info_free(callback_info);
 840                                 return -1;
 841                         }
 842
 843                         callback_info_list = g_hash_table_lookup(__callback_info_hash, GUINT_TO_POINTER(mi->local_id));
 844                         if (callback_info_list == NULL) {
 845                                 callback_info_list = g_list_append(callback_info_list, callback_info);
 846                                 g_hash_table_insert(__callback_info_hash, GUINT_TO_POINTER(mi->local_id), callback_info_list);
 847                         } else {
 848                                 callback_info_list = g_list_append(callback_info_list, callback_info);
 849                         }
 850                 }
 851         }
 852
 853         data = bundle_decode(raw, len);
 854         if (!data) {
 855                 _LOGE("Invalid argument : message");
 856                 goto out;
 857         }
 858
 859         LOGI("call calback %s", local_appid);
 860         if (bi_dir)
 861                 mi->callback(mi->local_id, local_appid, local_port, local_trusted, data, NULL);
 862         else
 863                 mi->callback(mi->local_id, local_appid, NULL, false, data, NULL);
 864         bundle_free(data);
 865 out:
 866         if (returned_fds)
 867                 free(returned_fds);
 868
 869         return true;
 870 }
 871
 872 static int __check_remote_port(const char *remote_app_id, const char *remote_port, bool is_trusted, bool *exist)
 873 {
 874         _LOGI("Check a remote port : [%s:%s]", remote_app_id, remote_port);
 875
 876         GVariant *result = NULL;
 877         GError *err = NULL;
 878         int ret_val = MESSAGEPORT_ERROR_NONE;
 879         char *bus_name = NULL;
 880         message_port_remote_app_info_s *remote_app_info = NULL;
 881         port_list_info_s *port_info = NULL;
 882         int local_reg_id = 0;
 883         message_port_local_port_info_s *mi = NULL;
 884         gboolean name_exist = false;
 885
 886         _LOGI("remote_app_id, app_id :[%s : %s] ", remote_app_id, __app_id);
 887
 888         ret_val = __get_remote_port_info(remote_app_id, remote_port, is_trusted, &remote_app_info, &port_info);
 889         if (ret_val != MESSAGEPORT_ERROR_NONE)
 890                 return ret_val;
 891
 892         /* self check */
 893         if (strcmp(remote_app_id, __app_id) == 0) {
 894
 895                 _LOGI("__is_local_port_registed ");
 896                 if (!__is_local_port_registed(remote_port, is_trusted, &local_reg_id, &mi))
 897                         *exist = false;
 898                 else
 899                         *exist = true;
 900
 901                 _LOGI("__is_local_port_registed : %d ", *exist);
 902                 return MESSAGEPORT_ERROR_NONE;
 903         }
 904
 905         port_info->exist = false;
 906         bus_name = port_info->encoded_bus_name;
 907
 908         result = g_dbus_connection_call_sync(
 909                         __gdbus_conn,
 910                         DBUS_SERVICE_DBUS,
 911                         DBUS_PATH_DBUS,
 912                         DBUS_INTERFACE_DBUS,
 913                         "NameHasOwner",
 914                         g_variant_new("(s)", bus_name),
 915                         G_VARIANT_TYPE("(b)"),
 916                         G_DBUS_CALL_FLAGS_NONE,
 917                         -1,
 918                         NULL,
 919                         &err);
 920
 921         if (err || (result == NULL)) {
 922                 if (err) {
 923                         _LOGE("No reply. error = %s", err->message);
 924                         g_error_free(err);
 925                 }
 926                 ret_val = MESSAGEPORT_ERROR_RESOURCE_UNAVAILABLE;
 927         } else {
 928                 g_variant_get(result, "(b)", &name_exist);
 929
 930                 if (!name_exist) {
 931                         LOGE("Name not exist %s", bus_name);
 932                         *exist = false;
 933                         ret_val = MESSAGEPORT_ERROR_NONE;
 934                 } else {
 935
 936                         if (is_trusted) {
 937                                 if (remote_app_info->certificate_info != CERTIFICATE_MATCH) {
 938                                         if (!__is_preloaded(__app_id, remote_app_id)) {
 939                                                 if (__check_certificate(__app_id, remote_app_id) != MESSAGEPORT_ERROR_NONE) {
 940                                                         ret_val = MESSAGEPORT_ERROR_CERTIFICATE_NOT_MATCH;
 941                                                         goto out;
 942                                                 }
 943                                         }
 944                                         remote_app_info->certificate_info = CERTIFICATE_MATCH;
 945                                 }
 946                         }
 947                         port_info->exist = true;
 948                         *exist = true;
 949                         ret_val = MESSAGEPORT_ERROR_NONE;
 950                 }
 951         }
 952 out:
 953         if (result)
 954                 g_variant_unref(result);
 955
 956         return ret_val;
 957 }
 958
 959 static void __on_sender_name_appeared(GDBusConnection *connection,
 960                 const gchar     *name,
 961                 const gchar     *name_owner,
 962                 gpointer         user_data)
 963 {
 964         _LOGI("sender name appeared : %s", name);
 965 }
 966
 967 static void __on_sender_name_vanished(GDBusConnection *connection,
 968                 const gchar     *name,
 969                 gpointer         user_data)
 970 {
 971         gboolean remove_result = FALSE;
 972         int *watcher_id = (int *)user_data;
 973         remove_result = g_hash_table_remove(__sender_appid_hash, (gpointer)name);
 974         if (!remove_result)
 975                 _LOGE("Fail to remove sender appid from hash : %s", name);
 976
 977         g_bus_unwatch_name(*watcher_id);
 978         free(watcher_id);
 979 }
 980
 981 static bool __check_sender_validation(GVariant *parameters, const char *sender, GDBusConnection *conn)
 982 {
 983         int ret = 0;
 984         char buffer[MAX_PACKAGE_STR_SIZE] = {0, };
 985         char *local_appid = NULL;
 986         int pid = __get_sender_pid(conn, sender);
 987         int *watcher_id = (int *)calloc(1, sizeof(int));
 988
 989         ret = aul_app_get_appid_bypid(pid, buffer, sizeof(buffer));
 990         if (ret != AUL_R_OK) {
 991                 _LOGE("Failed to get the sender ID: (%s) (%d)", sender, pid);
 992                 free(watcher_id);
 993                 return false;
 994         }
 995
 996         g_variant_get_child(parameters, 0, "&s", &local_appid);
 997         if (local_appid == NULL) {
 998                 _LOGE("appid is NULL : (%s) (%d)", sender, pid);
 999                 free(watcher_id);
1000                 return false;
1001         }
1002
1003         if (strncmp(buffer, local_appid, MAX_PACKAGE_STR_SIZE) == 0) {
1004                 _LOGI("insert sender !!!!! %s", sender);
1005                 g_hash_table_insert(__sender_appid_hash, (gpointer)strdup(sender), GINT_TO_POINTER(pid));
1006                 *watcher_id = g_bus_watch_name_on_connection(
1007                                         __gdbus_conn,
1008                                         sender,
1009                                         G_BUS_NAME_WATCHER_FLAGS_NONE,
1010                                         __on_sender_name_appeared,
1011                                         __on_sender_name_vanished,
1012                                         watcher_id,
1013                                         NULL);
1014         } else {
1015                 free(watcher_id);
1016                 return false;
1017         }
1018         return true;
1019 }
1020
1021 static void __dbus_method_call_handler(GDBusConnection *conn,
1022                                 const gchar *sender, const gchar *object_path,
1023                                 const gchar *iface_name, const gchar *method_name,
1024                                 GVariant *parameters, GDBusMethodInvocation *invocation,
1025                                 gpointer user_data)
1026 {
1027         _LOGI("method_name: %s, sender: %s", method_name, sender);
1028         gpointer sender_pid = g_hash_table_lookup(__sender_appid_hash, sender);
1029         if (sender_pid == NULL) {
1030                 if (!__check_sender_validation(parameters, sender, conn))
1031                         goto out;
1032         }
1033         if (g_strcmp0(method_name, "send_message") == 0)
1034                 send_message(parameters, invocation);
1035 out:
1036         g_dbus_method_invocation_return_value(invocation, NULL);
1037 }
1038
1039 static const GDBusInterfaceVTable interface_vtable = {
1040         __dbus_method_call_handler,
1041         NULL,
1042         NULL
1043 };
1044
1045 static int __dbus_init(void)
1046 {
1047         bool ret = false;
1048         GError *error = NULL;
1049
1050         __gdbus_conn = g_bus_get_sync(G_BUS_TYPE_SESSION, NULL, &error);
1051         if (__gdbus_conn == NULL) {
1052                 if (error != NULL) {
1053                         _LOGE("Failed to get dbus [%s]", error->message);
1054                         g_error_free(error);
1055                 }
1056                 goto out;
1057         }
1058
1059         ret = true;
1060
1061 out:
1062         if (!__gdbus_conn)
1063                 g_object_unref(__gdbus_conn);
1064
1065         return ret;
1066
1067 }
1068
1069 int __register_dbus_interface(const char *port_name, bool is_trusted)
1070 {
1071
1072         GDBusNodeInfo *introspection_data = NULL;
1073         int registration_id = 0;
1074
1075         static gchar introspection_prefix[] =
1076                 "<node>"
1077                 "  <interface name='";
1078
1079         static gchar introspection_postfix[] =
1080                 "'>"
1081                 "        <method name='send_message'>"
1082                 "          <arg type='s' name='local_appid' direction='in'/>"
1083                 "          <arg type='s' name='local_port' direction='in'/>"
1084                 "          <arg type='b' name='local_trusted' direction='in'/>"
1085                 "          <arg type='b' name='bi_dir' direction='in'/>"
1086                 "          <arg type='s' name='remote_appid' direction='in'/>"
1087                 "          <arg type='s' name='remote_port' direction='in'/>"
1088                 "          <arg type='b' name='remote_trusted' direction='in'/>"
1089                 "          <arg type='u' name='data_len' direction='in'/>"
1090                 "          <arg type='s' name='data' direction='in'/>"
1091                 "        </method>"
1092                 "  </interface>"
1093                 "</node>";
1094
1095         char *introspection_xml = NULL;
1096         int introspection_xml_len = 0;
1097
1098
1099         int owner_id = 0;
1100         GError *error = NULL;
1101         char *bus_name = NULL;
1102         char *interface_name = NULL;
1103         GVariant *result = NULL;
1104
1105         bus_name = __get_encoded_name(__app_id, port_name, is_trusted);
1106         if (!bus_name) {
1107                 _LOGE("Fail to get bus name");
1108                 goto out;
1109         }
1110         interface_name = bus_name;
1111
1112         introspection_xml_len = strlen(introspection_prefix) + strlen(interface_name) +
1113                 strlen(introspection_postfix) + 1;
1114
1115         introspection_xml = (char *)calloc(introspection_xml_len, sizeof(char));
1116         if (!introspection_xml) {
1117                 _LOGE("out of memory");
1118                 goto out;
1119         }
1120
1121
1122         result = g_dbus_connection_call_sync(
1123                         __gdbus_conn,
1124                         DBUS_SERVICE_DBUS,
1125                         DBUS_PATH_DBUS,
1126                         DBUS_INTERFACE_DBUS,
1127                         "RequestName",
1128                         g_variant_new("(su)", bus_name, G_BUS_NAME_OWNER_FLAGS_NONE),
1129                         G_VARIANT_TYPE("(u)"),
1130                         G_DBUS_CALL_FLAGS_NONE,
1131                         -1,
1132                         NULL,
1133                         &error);
1134         if (error) {
1135                 _LOGE("RequestName fail : %s", error->message);
1136                 goto out;
1137         }
1138         if (result == NULL) {
1139                 _LOGE("fail to get name NULL");
1140                 goto out;
1141         }
1142         g_variant_get(result, "(u)", &owner_id);
1143         if (owner_id == 0) {
1144                 _LOGE("Acquiring the own name is failed");
1145                 goto out;
1146         }
1147
1148         _LOGI("Acquiring the own name : %d", owner_id);
1149
1150         snprintf(introspection_xml, introspection_xml_len, "%s%s%s", introspection_prefix, interface_name, introspection_postfix);
1151
1152         introspection_data = g_dbus_node_info_new_for_xml(introspection_xml, NULL);
1153         if (!introspection_data) {
1154                 _LOGE("g_dbus_node_info_new_for_xml() is failed.");
1155                 goto out;
1156         }
1157
1158         registration_id = g_dbus_connection_register_object(__gdbus_conn,
1159                                                 MESSAGEPORT_OBJECT_PATH, introspection_data->interfaces[0],
1160                                                 &interface_vtable, NULL, NULL, NULL);
1161
1162         _LOGI("registration_id %d", registration_id);
1163
1164         if (registration_id == 0) {
1165                 _LOGE("Failed to g_dbus_connection_register_object");
1166                 goto out;
1167         }
1168
1169 out:
1170         if (introspection_data)
1171                 g_dbus_node_info_unref(introspection_data);
1172         if (introspection_xml)
1173                 free(introspection_xml);
1174         if (bus_name)
1175                 free(bus_name);
1176         if (result)
1177                 g_variant_unref(result);
1178
1179
1180         return registration_id;
1181 }
1182
1183 /* LCOV_EXCL_START */
1184 void __list_free_port_list(gpointer data)
1185 {
1186         port_list_info_s *n = (port_list_info_s *)data;
1187
1188         FREE_AND_NULL(n->encoded_bus_name);
1189         FREE_AND_NULL(n->port_name);
1190         FREE_AND_NULL(n);
1191 }
1192 /* LCOV_EXCL_STOP */
1193
1194 /* LCOV_EXCL_START */
1195 static void __hash_destory_local_value(gpointer data)
1196 {
1197         message_port_local_port_info_s *mli = (message_port_local_port_info_s *)data;
1198         if (mli) {
1199                 if (mli->port_name)
1200                         free(mli->port_name);
1201                 free(mli);
1202         }
1203 }
1204 /* LCOV_EXCL_STOP */
1205
1206 /* LCOV_EXCL_START */
1207 static void __hash_destory_remote_value(gpointer data)
1208 {
1209         message_port_remote_app_info_s *mri = (message_port_remote_app_info_s *)data;
1210         if (mri) {
1211                 FREE_AND_NULL(mri->sender_id);
1212                 FREE_AND_NULL(mri->remote_app_id);
1213                 if (mri->port_list)
1214                         g_list_free_full(mri->port_list, __list_free_port_list);
1215
1216                 free(mri);
1217         }
1218 }
1219 /* LCOV_EXCL_STOP */
1220
1221 static bool __initialize(void)
1222 {
1223
1224 #if !GLIB_CHECK_VERSION(2, 35, 0)
1225         g_type_init();
1226 #endif
1227
1228         int pid = getpid();
1229         int ret = 0;
1230         char buffer[MAX_PACKAGE_STR_SIZE] = {0, };
1231
1232         _LOGI("initialize");
1233         ret = aul_app_get_appid_bypid(pid, buffer, sizeof(buffer));
1234         retvm_if(ret != AUL_R_OK, false, "Failed to get the application ID: %d", ret);
1235
1236         __app_id = strdup(buffer);
1237         retvm_if(!__app_id, false, "Malloc failed");
1238         _LOGI("init : %s", __app_id);
1239
1240         if (__local_port_info == NULL) {
1241                 __local_port_info = g_hash_table_new_full(g_direct_hash,  g_direct_equal, NULL, __hash_destory_local_value);
1242                 retvm_if(!__local_port_info, false, "fail to create __local_port_info");
1243         }
1244
1245         if (__remote_app_info == NULL) {
1246                 __remote_app_info = g_hash_table_new_full(g_str_hash, g_str_equal, NULL, __hash_destory_remote_value);
1247                 retvm_if(!__remote_app_info, false, "fail to create __remote_app_info");
1248         }
1249
1250         if (__sender_appid_hash == NULL) {
1251                 __sender_appid_hash = g_hash_table_new_full(g_str_hash, g_str_equal, free, NULL);
1252                 retvm_if(!__sender_appid_hash, false, "fail to create __sender_appid_hash");
1253         }
1254
1255         if (__trusted_app_list_hash == NULL) {
1256                 __trusted_app_list_hash = g_hash_table_new(g_str_hash, g_str_equal);
1257                 retvm_if(!__trusted_app_list_hash, false, "fail to create __trusted_app_list_hash");
1258         }
1259
1260         if (__callback_info_hash == NULL) {
1261                 __callback_info_hash = g_hash_table_new_full(g_direct_hash, g_direct_equal, NULL, __hash_destroy_callback_info);
1262                 retvm_if(!__trusted_app_list_hash, false, "fail to create __trusted_app_list_hash");
1263         }
1264
1265         if (!__dbus_init())
1266                 return false;
1267         _initialized = true;
1268
1269         return true;
1270 }
1271
1272
1273 static bool __message_port_register_port(const int local_id, const char *local_port, bool is_trusted, messageport_message_cb callback)
1274 {
1275         message_port_local_port_info_s *mi = (message_port_local_port_info_s *)calloc(1, sizeof(message_port_local_port_info_s));
1276         retvm_if(!mi, false, "Malloc failed");
1277
1278         mi->callback = callback;
1279         mi->is_trusted = is_trusted;
1280         mi->port_name = strdup(local_port);
1281         if (mi->port_name == NULL) {
1282                 _LOGE("Malloc failed (%s)", local_port);
1283                 free(mi);
1284                 return false;
1285         }
1286         mi->local_id = local_id;
1287
1288         g_hash_table_insert(__local_port_info, GINT_TO_POINTER(mi->local_id), mi);
1289         return true;
1290 }
1291
1292 static int __register_message_port(const char *local_port, bool is_trusted, messageport_message_cb callback)
1293 {
1294         _SECURE_LOGI("Register a message port : [%s:%s]", __app_id, local_port);
1295
1296         int local_id = 0;
1297
1298         /* Check the message port is already registed */
1299         if (__is_local_port_registed(local_port, is_trusted, &local_id, NULL))
1300                 return local_id;
1301
1302         local_id = __register_dbus_interface(local_port, is_trusted);
1303         if (local_id < 1) {
1304                 _LOGE("register_dbus_interface fail !!");
1305                 return MESSAGEPORT_ERROR_OUT_OF_MEMORY;
1306         }
1307
1308         if (!__message_port_register_port(local_id, local_port, is_trusted, callback))
1309                 return MESSAGEPORT_ERROR_OUT_OF_MEMORY;
1310
1311         return local_id;
1312 }
1313
1314 int __message_port_send_async(int sockfd, bundle *kb, const char *local_port,
1315                 bool local_trusted, bool is_bidirection)
1316 {
1317         int ret = 0;
1318         int data_len;
1319         int local_port_len = 0;
1320         unsigned int nb;
1321         bundle_raw *kb_data = NULL;
1322
1323         if (local_port != NULL)
1324                 local_port_len = strlen(local_port) + 1;
1325
1326         if (__write_string_to_socket(sockfd, local_port, local_port_len) != MESSAGEPORT_ERROR_NONE) {
1327                 _LOGE("write local_port fail");
1328                 return MESSAGEPORT_ERROR_IO_ERROR;
1329         }
1330
1331         if (__write_socket(sockfd, (char *)&is_bidirection, sizeof(is_bidirection), &nb) != MESSAGEPORT_ERROR_NONE) {
1332                 _LOGE("write is_bidirection fail");
1333                 return MESSAGEPORT_ERROR_IO_ERROR;
1334         }
1335
1336         if (__write_socket(sockfd, (char *)&local_trusted, sizeof(local_trusted), &nb) != MESSAGEPORT_ERROR_NONE) {
1337                 _LOGE("write local_trusted fail");
1338                 return MESSAGEPORT_ERROR_IO_ERROR;
1339         }
1340
1341         bundle_encode(kb, &kb_data, &data_len);
1342         if (kb_data == NULL) {
1343                 _LOGE("bundle encode fail");
1344                 ret = MESSAGEPORT_ERROR_IO_ERROR;
1345                 goto out;
1346         }
1347
1348         if (data_len > MAX_MESSAGE_SIZE) {
1349                 _LOGE("bigger than max size\n");
1350                 ret = MESSAGEPORT_ERROR_MAX_EXCEEDED;
1351                 goto out;
1352         }
1353
1354         if (__write_string_to_socket(sockfd, (void *)kb_data, data_len) != MESSAGEPORT_ERROR_NONE) {
1355                 _LOGE("write kb_data fail");
1356                 ret = MESSAGEPORT_ERROR_IO_ERROR;
1357         }
1358 out:
1359         if (kb_data)
1360                 free(kb_data);
1361
1362         return ret;
1363 }
1364
1365 static int __message_port_send_message(const char *remote_appid, const char *remote_port,
1366                 const char *local_port, bool trusted_message, bool local_trusted, bool bi_dir, bundle *message)
1367 {
1368
1369         int ret = MESSAGEPORT_ERROR_NONE;
1370         GUnixFDList *fd_list = NULL;
1371
1372         int len = 0;
1373         bundle_raw *raw = NULL;
1374         char *bus_name = NULL;
1375         char *interface_name = NULL;
1376
1377         message_port_remote_app_info_s *remote_app_info = NULL;
1378         port_list_info_s *port_info = NULL;
1379         GDBusMessage *msg = NULL;
1380         GError *err = NULL;
1381         GVariant *body = NULL;
1382         int sock_pair[2] = {0,};
1383
1384         ret = __get_remote_port_info(remote_appid, remote_port, trusted_message, &remote_app_info, &port_info);
1385         if (ret != MESSAGEPORT_ERROR_NONE)
1386                 return ret;
1387
1388         if (port_info->exist == false) {
1389                 bool exist = false;
1390                 _LOGI("port exist check !!");
1391                 ret =  __check_remote_port(remote_appid, remote_port, trusted_message, &exist);
1392                 if (ret != MESSAGEPORT_ERROR_NONE) {
1393                         goto out;
1394                 } else if (!exist) {
1395                         ret = MESSAGEPORT_ERROR_MESSAGEPORT_NOT_FOUND;
1396                         goto out;
1397                 }
1398         }
1399
1400         if (port_info->send_sock_fd > 0) {
1401                 ret = __message_port_send_async(port_info->send_sock_fd, message,
1402                                 (local_port) ? local_port : "", local_trusted, bi_dir);
1403         } else {
1404
1405                 bus_name = port_info->encoded_bus_name;
1406                 interface_name = bus_name;
1407
1408                 if (bundle_encode(message, &raw, &len) != BUNDLE_ERROR_NONE) {
1409                         ret = MESSAGEPORT_ERROR_INVALID_PARAMETER;
1410                         goto out;
1411                 }
1412
1413                 if (MAX_MESSAGE_SIZE < len) {
1414                         _LOGE("The size of message (%d) has exceeded the maximum limit.", len);
1415                         ret = MESSAGEPORT_ERROR_MAX_EXCEEDED;
1416                         goto out;
1417                 }
1418
1419                 body = g_variant_new("(ssbbssbus)", __app_id, (local_port) ? local_port : "", local_trusted, bi_dir,
1420                                 remote_appid, remote_port, trusted_message, len, raw);
1421                 if (strcmp(remote_appid, __app_id) != 0) { /* self send */
1422
1423                         /*  if message-port fail to get socket pair, communicate using GDBus */
1424                         if (aul_request_message_port_socket_pair(sock_pair) != AUL_R_OK) {
1425                                 _LOGE("error create socket pair");
1426                         } else {
1427
1428                                 _LOGI("sock pair : %d, %d",
1429                                                 sock_pair[SOCK_PAIR_SENDER], sock_pair[SOCK_PAIR_RECEIVER]);
1430                                 fd_list = g_unix_fd_list_new();
1431                                 g_unix_fd_list_append(fd_list, sock_pair[SOCK_PAIR_RECEIVER], &err);
1432                                 if (err != NULL) {
1433                                         _LOGE("g_unix_fd_list_append [%s]", err->message);
1434                                         ret = MESSAGEPORT_ERROR_IO_ERROR;
1435                                         g_error_free(err);
1436                                         goto out;
1437                                 }
1438                                 port_info->send_sock_fd = sock_pair[SOCK_PAIR_SENDER];
1439                                 close(sock_pair[SOCK_PAIR_RECEIVER]);
1440                         }
1441                 }
1442
1443                 msg = g_dbus_message_new_method_call(bus_name, MESSAGEPORT_OBJECT_PATH, interface_name, "send_message");
1444                 if (!msg) {
1445                         _LOGE("Can't allocate new method call");
1446                         ret = MESSAGEPORT_ERROR_OUT_OF_MEMORY;
1447                         goto out;
1448                 }
1449
1450                 g_dbus_message_set_unix_fd_list(msg, fd_list);
1451                 g_dbus_message_set_body(msg, body);
1452                 g_dbus_connection_send_message(__gdbus_conn, msg, G_DBUS_SEND_MESSAGE_FLAGS_NONE, NULL, &err);
1453                 if (err != NULL) {
1454                         _LOGE("No reply. error = %s", err->message);
1455                         g_error_free(err);
1456                         ret = MESSAGEPORT_ERROR_IO_ERROR;
1457                         goto out;
1458                 }
1459
1460
1461         }
1462
1463 out:
1464         if (msg)
1465                 g_object_unref(msg);
1466         if (raw)
1467                 bundle_free_encoded_rawdata(&raw);
1468         if (fd_list)
1469                 g_object_unref(fd_list);
1470
1471
1472         return ret;
1473 }
1474
1475 int __message_send_bidirectional_message(int id, const char *remote_app_id, const char *remote_port,  bool trusted_message, bundle *message)
1476 {
1477         message_port_local_port_info_s *local_info;
1478         int ret = __get_local_port_info(id, &local_info);
1479         if (ret != MESSAGEPORT_ERROR_NONE)
1480                 return ret;
1481
1482         _LOGI("bidirectional_message %s", local_info->port_name);
1483         return __message_port_send_message(remote_app_id, remote_port,
1484                         local_info->port_name, trusted_message, local_info->is_trusted, true, message);
1485 }
1486
1487 int messageport_unregister_local_port(int local_port_id, bool trusted_port)
1488 {
1489
1490         GVariant *result;
1491         char *bus_name = NULL;
1492         GError *err = NULL;
1493         int ret = 0;
1494
1495         _LOGI("unregister : %d", local_port_id);
1496
1497         message_port_local_port_info_s *mi =
1498                 (message_port_local_port_info_s *)
1499                 g_hash_table_lookup(__local_port_info, GINT_TO_POINTER(local_port_id));
1500         if (mi == NULL)
1501                 return MESSAGEPORT_ERROR_MESSAGEPORT_NOT_FOUND;
1502
1503         if (mi->is_trusted != trusted_port)
1504                 return MESSAGEPORT_ERROR_INVALID_PARAMETER;
1505
1506         g_hash_table_remove(__callback_info_hash, GUINT_TO_POINTER(local_port_id));
1507
1508         bus_name = __get_encoded_name(__app_id, mi->port_name, mi->is_trusted);
1509         if (bus_name == NULL)
1510                 return MESSAGEPORT_ERROR_OUT_OF_MEMORY;
1511
1512         g_dbus_connection_unregister_object(__gdbus_conn, local_port_id);
1513
1514         result = g_dbus_connection_call_sync(
1515                         __gdbus_conn,
1516                         DBUS_SERVICE_DBUS,
1517                         DBUS_PATH_DBUS,
1518                         DBUS_INTERFACE_DBUS,
1519                         "ReleaseName",
1520                         g_variant_new("(s)", bus_name),
1521                         G_VARIANT_TYPE("(u)"),
1522                         G_DBUS_CALL_FLAGS_NONE,
1523                         -1,
1524                         NULL,
1525                         &err);
1526
1527         if (bus_name)
1528                 free(bus_name);
1529
1530         if (err) {
1531                 _LOGE("RequestName fail : %s", err->message);
1532                 g_error_free(err);
1533                 return MESSAGEPORT_ERROR_MESSAGEPORT_NOT_FOUND;
1534         }
1535         g_variant_get(result, "(u)", &ret);
1536
1537         if (result)
1538                 g_variant_unref(result);
1539
1540         if (ret != DBUS_RELEASE_NAME_REPLY_RELEASED) {
1541
1542                 if (ret == DBUS_RELEASE_NAME_REPLY_NON_EXISTENT) {
1543                         _LOGE("Port Not exist");
1544                         return MESSAGEPORT_ERROR_MESSAGEPORT_NOT_FOUND;
1545                 } else if (ret == DBUS_RELEASE_NAME_REPLY_NOT_OWNER) {
1546                         _LOGE("Try to release not owned name. MESSAGEPORT_ERROR_INVALID_PARAMETER");
1547                         return MESSAGEPORT_ERROR_INVALID_PARAMETER;
1548                 }
1549         }
1550
1551
1552         g_hash_table_remove(__local_port_info, GINT_TO_POINTER(local_port_id));
1553
1554         return MESSAGEPORT_ERROR_NONE;
1555 }
1556
1557 int messageport_register_local_port(const char *local_port, messageport_message_cb callback)
1558 {
1559         if (!_initialized) {
1560                 if (!__initialize())
1561                         return MESSAGEPORT_ERROR_IO_ERROR;
1562         }
1563
1564         return __register_message_port(local_port, false, callback);
1565 }
1566
1567 int messageport_register_trusted_local_port(const char *local_port, messageport_message_cb callback)
1568 {
1569         if (!_initialized) {
1570                 if (!__initialize())
1571                         return MESSAGEPORT_ERROR_IO_ERROR;
1572         }
1573
1574         return __register_message_port(local_port, true, callback);
1575
1576 }
1577
1578 int messageport_check_remote_port(const char *remote_app_id, const char *remote_port, bool *exist)
1579 {
1580         if (!_initialized) {
1581                 if (!__initialize())
1582                         return MESSAGEPORT_ERROR_IO_ERROR;
1583         }
1584
1585         int ret = __check_remote_port(remote_app_id, remote_port, false, exist);
1586         if (ret == MESSAGEPORT_ERROR_MESSAGEPORT_NOT_FOUND) {
1587                 *exist = false;
1588                 ret = MESSAGEPORT_ERROR_NONE;
1589         }
1590
1591         return ret;
1592 }
1593
1594 int messageport_check_trusted_remote_port(const char *remote_app_id, const char *remote_port, bool *exist)
1595 {
1596         if (!_initialized) {
1597                 if (!__initialize())
1598                         return MESSAGEPORT_ERROR_IO_ERROR;
1599         }
1600
1601         int ret = __check_remote_port(remote_app_id, remote_port, true, exist);
1602         if (ret == MESSAGEPORT_ERROR_MESSAGEPORT_NOT_FOUND) {
1603                 *exist = false;
1604                 ret = MESSAGEPORT_ERROR_NONE;
1605         }
1606
1607         return ret;
1608 }
1609
1610 int messageport_send_message(const char *remote_app_id, const char *remote_port, bundle *message)
1611 {
1612         if (!_initialized) {
1613                 if (!__initialize())
1614                         return MESSAGEPORT_ERROR_IO_ERROR;
1615         }
1616
1617         return __message_port_send_message(remote_app_id, remote_port, NULL, false, false, false, message);
1618 }
1619
1620 int messageport_send_trusted_message(const char *remote_app_id, const char *remote_port, bundle *message)
1621 {
1622         if (!_initialized) {
1623                 if (!__initialize())
1624                         return MESSAGEPORT_ERROR_IO_ERROR;
1625         }
1626
1627         return __message_port_send_message(remote_app_id, remote_port, NULL, true, false, false, message);
1628 }
1629
1630 int messageport_send_bidirectional_message(int id, const char *remote_app_id, const char *remote_port,
1631                 bundle *message)
1632 {
1633         if (!_initialized) {
1634                 if (!__initialize())
1635                         return MESSAGEPORT_ERROR_IO_ERROR;
1636         }
1637
1638         return __message_send_bidirectional_message(id, remote_app_id, remote_port, false, message);
1639 }
1640
1641 int messageport_send_bidirectional_trusted_message(int id, const char *remote_app_id, const char *remote_port,
1642                 bundle *message)
1643 {
1644         if (!_initialized) {
1645                 if (!__initialize())
1646                         return MESSAGEPORT_ERROR_IO_ERROR;
1647         }
1648         return __message_send_bidirectional_message(id, remote_app_id, remote_port, true, message);
1649 }
1650