tools/stktest.c

   1 /*
   2  *
   3  *  oFono - Open Source Telephony
   4  *
   5  *  Copyright (C) 2008-2011  Intel Corporation. All rights reserved.
   6  *
   7  *  This program is free software; you can redistribute it and/or modify
   8  *  it under the terms of the GNU General Public License version 2 as
   9  *  published by the Free Software Foundation.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program; if not, write to the Free Software
  18  *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  19  *
  20  */
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include <config.h>
  24 #endif
  25
  26 #include <stdio.h>
  27 #include <errno.h>
  28 #include <fcntl.h>
  29 #include <unistd.h>
  30 #include <stdlib.h>
  31 #include <string.h>
  32 #include <signal.h>
  33 #include <netinet/in.h>
  34 #include <arpa/inet.h>
  35
  36 #include <gdbus.h>
  37 #include <gatchat/gatserver.h>
  38
  39 #define OFONO_SERVICE   "org.ofono"
  40 #define STKTEST_PATH    "/stktest"
  41 #define STKTEST_ERROR   "org.ofono.stktest"
  42 #define OFONO_MANAGER_INTERFACE         OFONO_SERVICE ".Manager"
  43 #define OFONO_MODEM_INTERFACE           OFONO_SERVICE ".Modem"
  44 #define OFONO_STK_INTERFACE             OFONO_SERVICE ".SimToolkit"
  45 #define OFONO_STKAGENT_INTERFACE        OFONO_SERVICE ".SimToolkitAgent"
  46
  47 #define LISTEN_PORT     12765
  48
  49 enum test_state {
  50         TEST_STATE_POWERING_UP = 1,
  51         TEST_STATE_REGISTERING_AGENT,
  52         TEST_STATE_RUNNING,
  53         TEST_STATE_POWERING_DOWN,
  54 };
  55
  56 static GMainLoop *main_loop = NULL;
  57 static volatile sig_atomic_t __terminated = 0;
  58
  59 /* DBus related */
  60 static DBusConnection *conn;
  61 static gboolean ofono_running = FALSE;
  62 static guint modem_changed_watch;
  63 enum test_state state;
  64
  65 /* Emulator setup */
  66 static guint server_watch;
  67 static GAtServer *emulator;
  68
  69 /* Emulated modem state variables */
  70 static int modem_mode = 0;
  71
  72 static gboolean create_tcp(void);
  73
  74 static const char *to_hex(const unsigned char *data, unsigned int len)
  75 {
  76         static char buf[512+1];
  77         unsigned int i;
  78
  79         for (i = 0; i < len; i++)
  80                 sprintf(buf + i * 2, "%02hhX", data[i]);
  81
  82         buf[i*2] = '\0';
  83
  84         return buf;
  85 }
  86
  87 static void send_proactive_command(const unsigned char *pdu, unsigned int len)
  88 {
  89         char buf[1024];
  90
  91         sprintf(buf, "+CUSATP: %s", to_hex(pdu, len));
  92         g_at_server_send_unsolicited(emulator, buf);
  93 }
  94
  95 static DBusMessage *stktest_error_invalid_args(DBusMessage *msg)
  96 {
  97         return g_dbus_create_error(msg, STKTEST_ERROR ".InvalidArguments",
  98                                         "Invalid arguments provided");
  99 }
 100
 101 static DBusMessage *agent_release(DBusConnection *conn, DBusMessage *msg,
 102                                         void *data)
 103 {
 104         g_print("Got Release");
 105
 106         return dbus_message_new_method_return(msg);
 107 }
 108
 109 static DBusMessage *agent_display_text(DBusConnection *conn, DBusMessage *msg,
 110                                         void *data)
 111 {
 112         const char *text;
 113         unsigned char icon_id;
 114         dbus_bool_t urgent;
 115
 116         if (dbus_message_get_args(msg, NULL, DBUS_TYPE_STRING, &text,
 117                                                 DBUS_TYPE_BYTE, &icon_id,
 118                                                 DBUS_TYPE_BOOLEAN, &urgent,
 119                                                 DBUS_TYPE_INVALID) == FALSE)
 120                 return stktest_error_invalid_args(msg);
 121
 122         g_print("Got DisplayText with: %s, %u, %d\n", text, icon_id, urgent);
 123
 124         return dbus_message_new_method_return(msg);
 125 }
 126
 127 static void server_debug(const char *str, void *data)
 128 {
 129         g_print("%s: %s\n", (char *) data, str);
 130 }
 131
 132 static void cgmi_cb(GAtServer *server, GAtServerRequestType type,
 133                         GAtResult *cmd, gpointer user)
 134 {
 135         switch (type) {
 136         case G_AT_SERVER_REQUEST_TYPE_COMMAND_ONLY:
 137                 g_at_server_send_info(server, "oFono", TRUE);
 138                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 139                 break;
 140         case G_AT_SERVER_REQUEST_TYPE_SUPPORT:
 141                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 142                 break;
 143         default:
 144                 g_at_server_send_final(server, G_AT_SERVER_RESULT_ERROR);
 145         };
 146 }
 147
 148 static void cgmm_cb(GAtServer *server, GAtServerRequestType type,
 149                         GAtResult *cmd, gpointer user)
 150 {
 151         switch (type) {
 152         case G_AT_SERVER_REQUEST_TYPE_COMMAND_ONLY:
 153                 g_at_server_send_info(server, "oFono pre-1.0", TRUE);
 154                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 155                 break;
 156         case G_AT_SERVER_REQUEST_TYPE_SUPPORT:
 157                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 158                 break;
 159         default:
 160                 g_at_server_send_final(server, G_AT_SERVER_RESULT_ERROR);
 161         };
 162 }
 163
 164 static void cgmr_cb(GAtServer *server, GAtServerRequestType type,
 165                         GAtResult *cmd, gpointer user)
 166 {
 167         char buf[256];
 168
 169         switch (type) {
 170         case G_AT_SERVER_REQUEST_TYPE_COMMAND_ONLY:
 171                 sprintf(buf, "oFono pre-1.0 version: %s", VERSION);
 172                 g_at_server_send_info(server, buf, TRUE);
 173                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 174                 break;
 175         case G_AT_SERVER_REQUEST_TYPE_SUPPORT:
 176                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 177                 break;
 178         default:
 179                 g_at_server_send_final(server, G_AT_SERVER_RESULT_ERROR);
 180         };
 181 }
 182
 183 static void cgsn_cb(GAtServer *server, GAtServerRequestType type,
 184                         GAtResult *cmd, gpointer user)
 185 {
 186         switch (type) {
 187         case G_AT_SERVER_REQUEST_TYPE_COMMAND_ONLY:
 188                 g_at_server_send_info(server, "123456789", TRUE);
 189                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 190                 break;
 191         case G_AT_SERVER_REQUEST_TYPE_SUPPORT:
 192                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 193                 break;
 194         default:
 195                 g_at_server_send_final(server, G_AT_SERVER_RESULT_ERROR);
 196         };
 197 }
 198
 199 static gboolean send_ok(gpointer user)
 200 {
 201         GAtServer *server = user;
 202
 203         g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 204
 205         return FALSE;
 206 }
 207
 208 static void cfun_cb(GAtServer *server, GAtServerRequestType type,
 209                         GAtResult *cmd, gpointer user)
 210 {
 211         char buf[12];
 212
 213         switch (type) {
 214         case G_AT_SERVER_REQUEST_TYPE_SUPPORT:
 215                 g_at_server_send_info(server, "+CFUN: (0-1,4)", TRUE);
 216                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 217                 break;
 218         case G_AT_SERVER_REQUEST_TYPE_QUERY:
 219                 snprintf(buf, sizeof(buf), "+CFUN: %d", modem_mode);
 220                 g_at_server_send_info(server, buf, TRUE);
 221                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 222                 break;
 223         case G_AT_SERVER_REQUEST_TYPE_SET:
 224         {
 225                 GAtResultIter iter;
 226                 int mode;
 227
 228                 g_at_result_iter_init(&iter, cmd);
 229                 g_at_result_iter_next(&iter, "");
 230
 231                 if (g_at_result_iter_next_number(&iter, &mode) == FALSE)
 232                         goto error;
 233
 234                 if (mode != 0 && mode != 1)
 235                         goto error;
 236
 237                 if (modem_mode == mode) {
 238                         g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 239                         break;
 240                 }
 241
 242                 modem_mode = mode;
 243                 g_timeout_add_seconds(1, send_ok, server);
 244                 break;
 245         }
 246         default:
 247                 goto error;
 248         };
 249
 250         return;
 251
 252 error:
 253         g_at_server_send_final(server, G_AT_SERVER_RESULT_ERROR);
 254 }
 255
 256 static void cusatt_cb(GAtServer *server, GAtServerRequestType type,
 257                         GAtResult *cmd, gpointer user)
 258 {
 259         char buf[12];
 260
 261         switch (type) {
 262         case G_AT_SERVER_REQUEST_TYPE_SUPPORT:
 263                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 264                 break;
 265         case G_AT_SERVER_REQUEST_TYPE_QUERY:
 266                 g_at_server_send_ext_final(server, "+CME ERROR: 4");
 267                 break;
 268         case G_AT_SERVER_REQUEST_TYPE_SET:
 269         {
 270                 GAtResultIter iter;
 271                 const unsigned char *pdu;
 272                 int len;
 273
 274                 g_at_result_iter_init(&iter, cmd);
 275                 g_at_result_iter_next(&iter, "");
 276
 277                 if (g_at_result_iter_next_hexstring(&iter, &pdu, &len) == FALSE)
 278                         goto error;
 279
 280                 g_at_server_send_final(server, G_AT_SERVER_RESULT_OK);
 281                 break;
 282         }
 283         default:
 284                 goto error;
 285         };
 286
 287         return;
 288
 289 error:
 290         g_at_server_send_final(server, G_AT_SERVER_RESULT_ERROR);
 291 }
 292 static void listen_again(gpointer user_data)
 293 {
 294         if (create_tcp() == TRUE)
 295                 return;
 296
 297         g_print("Error listening to socket\n");
 298         g_main_loop_quit(main_loop);
 299 }
 300
 301 static void setup_emulator(GAtServer *server)
 302 {
 303         g_at_server_set_debug(server, server_debug, "Server");
 304
 305         g_at_server_register(server, "+CGMI", cgmi_cb, NULL, NULL);
 306         g_at_server_register(server, "+CGMM", cgmm_cb, NULL, NULL);
 307         g_at_server_register(server, "+CGMR", cgmr_cb, NULL, NULL);
 308         g_at_server_register(server, "+CGSN", cgsn_cb, NULL, NULL);
 309         g_at_server_register(server, "+CFUN", cfun_cb, NULL, NULL);
 310         g_at_server_register(server, "+CUSATT", cusatt_cb, NULL, NULL);
 311
 312         g_at_server_set_disconnect_function(server, listen_again, NULL);
 313 }
 314
 315 static gboolean on_socket_connected(GIOChannel *chan, GIOCondition cond,
 316                                                         gpointer user)
 317 {
 318         struct sockaddr saddr;
 319         unsigned int len = sizeof(saddr);
 320         int fd;
 321         GIOChannel *client_io = NULL;
 322
 323         if (cond != G_IO_IN)
 324                 goto error;
 325
 326         fd = accept(g_io_channel_unix_get_fd(chan), &saddr, &len);
 327         if (fd == -1)
 328                 goto error;
 329
 330         client_io = g_io_channel_unix_new(fd);
 331
 332         emulator = g_at_server_new(client_io);
 333         g_io_channel_unref(client_io);
 334
 335         if (emulator == NULL)
 336                 goto error;
 337
 338         setup_emulator(emulator);
 339
 340 error:
 341         server_watch = 0;
 342         return FALSE;
 343 }
 344
 345 static gboolean create_tcp(void)
 346 {
 347         struct sockaddr_in addr;
 348         int sk;
 349         int reuseaddr = 1;
 350         GIOChannel *server_io;
 351
 352         sk = socket(PF_INET, SOCK_STREAM, 0);
 353         if (sk < 0) {
 354                 g_print("Can't create tcp/ip socket: %s (%d)\n",
 355                                                 strerror(errno), errno);
 356                 return FALSE;
 357         }
 358
 359         memset(&addr, 0, sizeof(addr));
 360
 361         addr.sin_family = AF_INET;
 362         addr.sin_addr.s_addr = INADDR_ANY;
 363         addr.sin_port = htons(LISTEN_PORT);
 364
 365         setsockopt(sk, SOL_SOCKET, SO_REUSEADDR, &reuseaddr, sizeof(reuseaddr));
 366         if (bind(sk, (struct sockaddr *) &addr, sizeof(struct sockaddr)) < 0) {
 367                 g_print("Can't bind socket: %s (%d)", strerror(errno), errno);
 368                 close(sk);
 369                 return FALSE;
 370         }
 371
 372         if (listen(sk, 1) < 0) {
 373                 g_print("Can't listen on socket: %s (%d)",
 374                                                 strerror(errno), errno);
 375                 close(sk);
 376                 return FALSE;
 377         }
 378
 379         g_print("new tcp is created at tcp port %d\n", LISTEN_PORT);
 380
 381         server_io = g_io_channel_unix_new(sk);
 382         g_io_channel_set_close_on_unref(server_io, TRUE);
 383
 384         server_watch = g_io_add_watch_full(server_io,
 385                                 G_PRIORITY_DEFAULT,
 386                                 G_IO_IN | G_IO_HUP | G_IO_ERR | G_IO_NVAL,
 387                                 on_socket_connected, NULL, NULL);
 388
 389         g_io_channel_unref(server_io);
 390
 391         return TRUE;
 392 }
 393
 394 static gboolean has_stk_interface(DBusMessageIter *iter)
 395 {
 396         DBusMessageIter entry;
 397
 398         dbus_message_iter_recurse(iter, &entry);
 399
 400         while (dbus_message_iter_get_arg_type(&entry) == DBUS_TYPE_STRING) {
 401                 const char *interface;
 402
 403                 dbus_message_iter_get_basic(&entry, &interface);
 404
 405                 if (g_str_equal(interface, OFONO_STK_INTERFACE) == TRUE)
 406                         return TRUE;
 407
 408                 dbus_message_iter_next(&entry);
 409         }
 410
 411         return FALSE;
 412 }
 413
 414 static int send_with_reply(const char *path, const char *interface,
 415                                 const char *method, DBusPendingCall **call,
 416                                 DBusPendingCallNotifyFunction cb,
 417                                 void *user_data, DBusFreeFunction free_func,
 418                                 int timeout, int type, ...)
 419 {
 420         DBusMessage *msg;
 421         DBusPendingCall *c;
 422         va_list args;
 423         int err;
 424
 425         msg = dbus_message_new_method_call(OFONO_SERVICE, path,
 426                                                 interface, method);
 427         if (msg == NULL) {
 428                 g_printerr("Unable to allocate new D-Bus %s message\n", method);
 429                 err = -ENOMEM;
 430                 goto fail;
 431         }
 432
 433         va_start(args, type);
 434
 435         if (!dbus_message_append_args_valist(msg, type, args)) {
 436                 va_end(args);
 437                 err = -EIO;
 438                 goto fail;
 439         }
 440
 441         va_end(args);
 442
 443         if (timeout > 0)
 444                 timeout *= 1000;
 445
 446         if (!dbus_connection_send_with_reply(conn, msg, &c, timeout)) {
 447                 g_printerr("Sending %s failed\n", method);
 448                 err = -EIO;
 449                 goto fail;
 450         }
 451
 452         if (call != NULL)
 453                 *call = c;
 454
 455         dbus_pending_call_set_notify(c, cb, user_data, free_func);
 456         dbus_pending_call_unref(c);
 457
 458         dbus_message_unref(msg);
 459
 460         return 0;
 461
 462 fail:
 463         if (free_func && user_data)
 464                 free_func(user_data);
 465
 466         if (msg)
 467                 dbus_message_unref(msg);
 468
 469         return err;
 470 }
 471
 472 static void set_property_reply(DBusPendingCall *call, void *user_data)
 473 {
 474         DBusMessage *reply = dbus_pending_call_steal_reply(call);
 475         DBusError err;
 476
 477         dbus_error_init(&err);
 478
 479         if (dbus_set_error_from_message(&err, reply) == TRUE) {
 480                 g_printerr("%s: %s\n", err.name, err.message);
 481                 dbus_error_free(&err);
 482         }
 483
 484         dbus_message_unref(reply);
 485 }
 486
 487 static int set_property(const char *path, const char *interface,
 488                         const char *key, int type, const void *val,
 489                         DBusPendingCallNotifyFunction notify,
 490                         gpointer user_data,
 491                         DBusFreeFunction destroy)
 492 {
 493         DBusMessage *msg;
 494         DBusMessageIter iter, value;
 495         DBusPendingCall *call;
 496         const char *signature;
 497
 498         msg = dbus_message_new_method_call(OFONO_SERVICE, path, interface,
 499                                                 "SetProperty");
 500         if (msg == NULL)
 501                 return -ENOMEM;
 502
 503         dbus_message_set_auto_start(msg, FALSE);
 504
 505         dbus_message_iter_init_append(msg, &iter);
 506
 507         dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &key);
 508
 509         switch (type) {
 510         case DBUS_TYPE_BOOLEAN:
 511                 signature = DBUS_TYPE_BOOLEAN_AS_STRING;
 512                 break;
 513         default:
 514                 dbus_message_unref(msg);
 515                 return -EINVAL;
 516         }
 517
 518         dbus_message_iter_open_container(&iter, DBUS_TYPE_VARIANT,
 519                                                         signature, &value);
 520         dbus_message_iter_append_basic(&value, type, val);
 521         dbus_message_iter_close_container(&iter, &value);
 522
 523         if (dbus_connection_send_with_reply(conn, msg, &call, -1) == FALSE) {
 524                 dbus_message_unref(msg);
 525                 return -EIO;
 526         }
 527
 528         dbus_message_unref(msg);
 529
 530         if (call == NULL)
 531                 return -EINVAL;
 532
 533         dbus_pending_call_set_notify(call, notify, user_data, destroy);
 534
 535         dbus_pending_call_unref(call);
 536
 537         return 0;
 538 }
 539
 540 static void register_agent_reply(DBusPendingCall *call, void *user_data)
 541 {
 542         DBusMessage *reply = dbus_pending_call_steal_reply(call);
 543         DBusError err;
 544
 545         dbus_error_init(&err);
 546
 547         if (dbus_set_error_from_message(&err, reply) == TRUE) {
 548                 g_printerr("%s: %s\n", err.name, err.message);
 549                 dbus_error_free(&err);
 550         }
 551
 552         dbus_message_unref(reply);
 553
 554         state = TEST_STATE_RUNNING;
 555 }
 556
 557 static void register_agent()
 558 {
 559         const char *path = "/default";
 560         int status;
 561
 562         g_print("Gained STK interface, registering agent...\n");
 563
 564         status = send_with_reply(STKTEST_PATH, OFONO_STK_INTERFACE,
 565                                         "RegisterAgent", NULL,
 566                                         register_agent_reply, NULL, NULL, 1,
 567                                         DBUS_TYPE_OBJECT_PATH, &path,
 568                                         DBUS_TYPE_INVALID);
 569
 570         if (status < 0) {
 571                 g_printerr("Unable to register agent with oFono\n");
 572                 g_main_loop_quit(main_loop);
 573                 return;
 574         }
 575
 576         state = TEST_STATE_REGISTERING_AGENT;
 577 }
 578
 579 static gboolean modem_changed(DBusConnection *conn,
 580                                 DBusMessage *msg, void *user_data)
 581 {
 582         DBusMessageIter iter, value;
 583         const char *path, *key;
 584         gboolean has_stk;
 585
 586         if (dbus_message_iter_init(msg, &iter) == FALSE)
 587                 return TRUE;
 588
 589         path = dbus_message_get_path(msg);
 590
 591         if (g_str_equal(STKTEST_PATH, path) == FALSE)
 592                 return TRUE;
 593
 594         dbus_message_iter_get_basic(&iter, &key);
 595
 596         dbus_message_iter_next(&iter);
 597         dbus_message_iter_recurse(&iter, &value);
 598
 599         if (g_str_equal(key, "Interfaces") == FALSE)
 600                 return TRUE;
 601
 602         has_stk = has_stk_interface(&value);
 603
 604         switch (state) {
 605         case TEST_STATE_POWERING_UP:
 606                 if (has_stk)
 607                         register_agent();
 608                 break;
 609         case TEST_STATE_REGISTERING_AGENT:
 610         case TEST_STATE_RUNNING:
 611                 if (has_stk == FALSE)
 612                         g_printerr("Unexpectedly lost STK interface\n");
 613                 /* Fall through */
 614         case TEST_STATE_POWERING_DOWN:
 615                 break;
 616         };
 617
 618         return TRUE;
 619 }
 620
 621 static void powerup(void)
 622 {
 623         dbus_bool_t powered = TRUE;
 624
 625         state = TEST_STATE_POWERING_UP;
 626         set_property(STKTEST_PATH, OFONO_MODEM_INTERFACE, "Powered",
 627                         DBUS_TYPE_BOOLEAN, &powered,
 628                         set_property_reply, NULL, NULL);
 629 }
 630
 631 static void get_modems_reply(DBusPendingCall *call, void *user_data)
 632 {
 633         DBusMessage *reply = dbus_pending_call_steal_reply(call);
 634         DBusMessageIter iter, list;
 635         DBusError err;
 636         gboolean found = FALSE;
 637
 638         dbus_error_init(&err);
 639
 640         if (dbus_set_error_from_message(&err, reply) == TRUE) {
 641                 g_printerr("%s: %s\n", err.name, err.message);
 642                 dbus_error_free(&err);
 643                 goto done;
 644         }
 645
 646         if (dbus_message_has_signature(reply, "a(oa{sv})") == FALSE)
 647                 goto done;
 648
 649         if (dbus_message_iter_init(reply, &iter) == FALSE)
 650                 goto done;
 651
 652         dbus_message_iter_recurse(&iter, &list);
 653
 654         while (dbus_message_iter_get_arg_type(&list) == DBUS_TYPE_STRUCT) {
 655                 DBusMessageIter entry;
 656                 const char *path;
 657
 658                 dbus_message_iter_recurse(&list, &entry);
 659                 dbus_message_iter_get_basic(&entry, &path);
 660
 661                 if (g_str_equal(path, STKTEST_PATH))
 662                         found = TRUE;
 663
 664                 dbus_message_iter_next(&list);
 665         }
 666
 667 done:
 668         dbus_message_unref(reply);
 669
 670         if (found == FALSE) {
 671                 g_printerr("STK Test modem not found\n");
 672                 g_main_loop_quit(main_loop);
 673                 return;
 674         }
 675
 676         g_print("Test modem found\n");
 677
 678         modem_changed_watch = g_dbus_add_signal_watch(conn, OFONO_SERVICE,
 679                                                         STKTEST_PATH,
 680                                                         OFONO_MODEM_INTERFACE,
 681                                                         "PropertyChanged",
 682                                                         modem_changed,
 683                                                         NULL, NULL);
 684
 685         if (create_tcp() == FALSE) {
 686                 g_printerr("Unable to listen on modem emulator socket\n");
 687                 g_main_loop_quit(main_loop);
 688         }
 689
 690         powerup();
 691 }
 692
 693 static int get_modems(DBusConnection *conn)
 694 {
 695         DBusMessage *msg;
 696         DBusPendingCall *call;
 697
 698         msg = dbus_message_new_method_call(OFONO_SERVICE, "/",
 699                                         OFONO_MANAGER_INTERFACE, "GetModems");
 700         if (msg == NULL)
 701                 return -ENOMEM;
 702
 703         dbus_message_set_auto_start(msg, FALSE);
 704
 705         g_print("getting modems\n");
 706
 707         if (dbus_connection_send_with_reply(conn, msg, &call, -1) == FALSE) {
 708                 dbus_message_unref(msg);
 709                 return -EIO;
 710         }
 711
 712         dbus_message_unref(msg);
 713
 714         if (call == NULL)
 715                 return -EINVAL;
 716
 717         dbus_pending_call_set_notify(call, get_modems_reply, conn, NULL);
 718
 719         dbus_pending_call_unref(call);
 720
 721         return 0;
 722 }
 723
 724 static const GDBusMethodTable agent_methods[] = {
 725         { GDBUS_METHOD("Release", NULL, NULL, agent_release) },
 726         { GDBUS_METHOD("DisplayText",
 727                 GDBUS_ARGS({ "text", "s" }, { "icon_id", "y" },
 728                                 { "urgent", "b" }), NULL,
 729                                 agent_display_text) },
 730         { },
 731 };
 732
 733 static void ofono_connect(DBusConnection *conn, void *user_data)
 734 {
 735         g_print("starting telephony interface\n");
 736
 737         if (!g_dbus_register_interface(conn, "/default",
 738                                         OFONO_STKAGENT_INTERFACE,
 739                                         agent_methods, NULL, NULL,
 740                                         NULL, NULL)) {
 741                 g_printerr("Unable to register local agent");
 742                 g_main_loop_quit(main_loop);
 743         }
 744
 745         ofono_running = TRUE;
 746         get_modems(conn);
 747 }
 748
 749 static void ofono_disconnect(DBusConnection *conn, void *user_data)
 750 {
 751         g_print("stopping telephony interface\n");
 752
 753         g_dbus_unregister_interface(conn, "/default", OFONO_STKAGENT_INTERFACE);
 754
 755         ofono_running = FALSE;
 756
 757         g_dbus_remove_watch(conn, modem_changed_watch);
 758         modem_changed_watch = 0;
 759
 760         if (server_watch) {
 761                 g_source_remove(server_watch);
 762                 server_watch = 0;
 763         }
 764
 765         g_at_server_unref(emulator);
 766         emulator = NULL;
 767 }
 768
 769 static void sig_term(int sig)
 770 {
 771         if (__terminated > 0)
 772                 return;
 773
 774         __terminated = 1;
 775
 776         g_print("Terminating\n");
 777
 778         g_main_loop_quit(main_loop);
 779 }
 780
 781 static void disconnect_callback(DBusConnection *conn, void *user_data)
 782 {
 783         g_printerr("D-Bus disconnect\n");
 784
 785         g_main_loop_quit(main_loop);
 786 }
 787
 788 static gboolean option_version = FALSE;
 789
 790 static GOptionEntry options[] = {
 791         { "version", 'v', 0, G_OPTION_ARG_NONE, &option_version,
 792                                 "Show version information and exit" },
 793         { NULL },
 794 };
 795
 796 int main(int argc, char **argv)
 797 {
 798         GOptionContext *context;
 799         GError *error = NULL;
 800         DBusError err;
 801         guint watch;
 802         struct sigaction sa;
 803
 804         context = g_option_context_new(NULL);
 805         g_option_context_add_main_entries(context, options, NULL);
 806
 807         if (g_option_context_parse(context, &argc, &argv, &error) == FALSE) {
 808                 if (error != NULL) {
 809                         g_printerr("%s\n", error->message);
 810                         g_error_free(error);
 811                 } else
 812                         g_printerr("An unknown error occurred\n");
 813                 exit(1);
 814         }
 815
 816         g_option_context_free(context);
 817
 818         if (option_version == TRUE) {
 819                 printf("%s\n", VERSION);
 820                 exit(0);
 821         }
 822
 823         main_loop = g_main_loop_new(NULL, FALSE);
 824
 825         dbus_error_init(&err);
 826
 827         conn = g_dbus_setup_bus(DBUS_BUS_SYSTEM, NULL, &err);
 828         if (conn == NULL) {
 829                 if (dbus_error_is_set(&err) == TRUE) {
 830                         fprintf(stderr, "%s\n", err.message);
 831                         dbus_error_free(&err);
 832                 } else
 833                         fprintf(stderr, "Can't register with system bus\n");
 834                 exit(1);
 835         }
 836
 837         g_dbus_set_disconnect_function(conn, disconnect_callback, NULL, NULL);
 838
 839         memset(&sa, 0, sizeof(sa));
 840         sa.sa_handler = sig_term;
 841         sigaction(SIGINT, &sa, NULL);
 842         sigaction(SIGTERM, &sa, NULL);
 843
 844         watch = g_dbus_add_service_watch(conn, OFONO_SERVICE,
 845                                 ofono_connect, ofono_disconnect, NULL, NULL);
 846
 847         g_main_loop_run(main_loop);
 848
 849         g_dbus_remove_watch(conn, watch);
 850
 851         if (ofono_running == TRUE)
 852                 ofono_disconnect(conn, NULL);
 853
 854         dbus_connection_unref(conn);
 855
 856         g_main_loop_unref(main_loop);
 857
 858         return 0;
 859 }