packaging.in/murphy.lua

   1 with_system_controller = false
   2 with_amb = false
   3 verbose = 0
   4
   5 m = murphy.get()
   6
   7 -- try loading the various logging plugins
   8 m:try_load_plugin('systemd')
   9 m:try_load_plugin('dlog')
  10
  11 -- load the console plugin
  12 m:try_load_plugin('console')
  13
  14 m:try_load_plugin('console.disabled', 'webconsole', {
  15                   address = 'wsck:127.0.0.1:3000/murphy',
  16                   httpdir = '/usr/share/murphy/webconsole' });
  17
  18 -- load the dbus plugin
  19 if m:plugin_exists('dbus') then
  20     m:load_plugin('dbus')
  21 end
  22
  23 -- load the native resource plugin
  24 if m:plugin_exists('resource-native') then
  25     m:load_plugin('resource-native')
  26     m:info("native resource plugin loaded")
  27 else
  28     m:info("No native resource plugin found...")
  29 end
  30
  31 -- load the dbus resource plugin
  32 m:try_load_plugin('resource-dbus', {
  33     dbus_bus = "system",
  34     dbus_service = "org.Murphy",
  35     dbus_track = true,
  36     default_zone = "driver",
  37     default_class = "implicit"
  38 })
  39
  40 -- load the domain control plugin
  41 if m:plugin_exists('domain-control') then
  42     m:load_plugin('domain-control')
  43 else
  44     m:info("No domain-control plugin found...")
  45 end
  46
  47 if m:plugin_exists('glib') then
  48     m:load_plugin('glib')
  49 else
  50     m:info("No glib plugin found...")
  51 end
  52
  53 -- load the AMB plugin
  54 if m:plugin_exists('amb') then
  55     m:try_load_plugin('amb')
  56
  57     if builtin.method.amb_initiate and
  58        builtin.method.amb_update
  59     then
  60         with_amb = true
  61     end
  62 else
  63     m:info("No amb plugin found...")
  64 end
  65
  66 -- load the ASM resource plugin
  67 if m:plugin_exists('resource-asm') then
  68     m:try_load_plugin('resource-asm', {
  69         zone = "driver",
  70         share_mmplayer = "player:AVP,mandatory,exclusive,strict",
  71         ignored_argv0 = "WebProcess"
  72     })
  73 else
  74     m:info("No audio session manager plugin found...")
  75 end
  76
  77 if m:plugin_exists('system-controller') then
  78     with_system_controller = true
  79 elseif m:plugin_exists('ivi-resource-manager') then
  80     m:load_plugin('ivi-resource-manager')
  81     with_system_controller = false
  82 end
  83
  84 -- define application classes
  85 application_class {
  86     name     = "interrupt",
  87     priority = 99,
  88     modal    = true ,
  89     share    = false,
  90     order    = "fifo"
  91 }
  92
  93 application_class {
  94     name     = "emergency",
  95     priority = 80,
  96     modal    = false,
  97     share    = false,
  98     order    = "fifo"
  99 }
 100 application_class {
 101     name     = "alert",
 102     priority = 51,
 103     modal    = false,
 104     share    = false,
 105     order    = "fifo"
 106 }
 107
 108 application_class {
 109     name     = "navigator",
 110     priority = 50,
 111     modal    = false,
 112     share    = true,
 113     order    = "fifo"
 114 }
 115
 116 application_class {
 117     name     = "phone",
 118     priority = 6 ,
 119     modal    = false,
 120     share    = true ,
 121     order    = "lifo"
 122 }
 123 application_class {
 124     name     = "camera",
 125     priority = 5,
 126     modal    = false,
 127     share    = false,
 128     order    = "lifo"
 129 }
 130
 131 application_class { name="event"    , priority=4 , modal=false, share=true , order="fifo" }
 132 application_class { name="game"     , priority=3 , modal=false, share=false, order="lifo" }
 133 --# doesn't need to be created here, ivi-resource-manager creates it if loaded
 134 --#application_class { name="basic"    , priority=2 , modal=false, share=false, order="lifo" }
 135 application_class { name="player"   , priority=1 , modal=false, share=true , order="lifo" }
 136 application_class { name="implicit" , priority=0 , modal=false, share=false, order="lifo" }
 137
 138 -- define zone attributes
 139 zone.attributes {
 140     type = {mdb.string, "common", "rw"},
 141     location = {mdb.string, "anywhere", "rw"}
 142 }
 143
 144 -- define zones
 145 zone {
 146      name = "driver",
 147      attributes = {
 148          type = "common",
 149          location = "front-left"
 150      }
 151 }
 152
 153 zone {
 154      name = "passanger1",
 155      attributes = {
 156          type = "private",
 157          location = "front-right"
 158      }
 159 }
 160
 161 zone {
 162      name = "passanger2",
 163      attributes = {
 164          type = "private",
 165          location = "back-left"
 166      }
 167 }
 168
 169 zone {
 170      name = "passanger3",
 171      attributes = {
 172          type = "private",
 173          location = "back-right"
 174      }
 175 }
 176
 177 zone {
 178      name = "passanger4",
 179      attributes = {
 180          type = "private",
 181          location = "back-left"
 182      }
 183 }
 184
 185
 186 -- define resource classes
 187 if not m:plugin_exists('ivi-resource-manager') and
 188    not with_system_controller
 189 then
 190    resource.class {
 191         name = "audio_playback",
 192         shareable = true,
 193         attributes = {
 194             role = { mdb.string, "music", "rw" },
 195             pid = { mdb.string, "<unknown>", "rw" },
 196             policy = { mdb.string, "relaxed", "rw" }
 197         }
 198    }
 199 end
 200
 201 resource.class {
 202      name = "audio_recording",
 203      shareable = true,
 204      attributes = {
 205          role   = { mdb.string, "music"    , "rw" },
 206          pid    = { mdb.string, "<unknown>", "rw" },
 207          policy = { mdb.string, "relaxed"  , "rw" }
 208      }
 209 }
 210
 211 resource.class {
 212      name = "video_playback",
 213      shareable = false,
 214 }
 215
 216 resource.class {
 217      name = "video_recording",
 218      shareable = false
 219 }
 220
 221 resource.class {
 222      name = "speech_recognition",
 223      shareable = true
 224 }
 225
 226 resource.class {
 227      name = "speech_synthesis",
 228      shareable = true
 229 }
 230
 231 if not m:plugin_exists('ivi-resource-manager') and
 232    not with_system_controller
 233 then
 234     resource.method.veto = {
 235         function(zone, rset, grant, owners, req_set)
 236             return true
 237          end
 238     }
 239 end
 240
 241 -- test for creating selections
 242 mdb.select {
 243            name = "audio_owner",
 244            table = "audio_playback_owner",
 245            columns = {"application_class"},
 246            condition = "zone_name = 'driver'"
 247 }
 248
 249 mdb.select {
 250            name = "vehicle_speed",
 251            table = "amb_vehicle_speed",
 252            columns = {"value"},
 253            condition = "key = 'VehicleSpeed'"
 254 }
 255
 256 element.lua {
 257    name    = "speed2volume",
 258    inputs  = { speed = mdb.select.vehicle_speed, param = 9 },
 259    outputs = {  mdb.table { name = "speedvol",
 260                             index = {"zone", "device"},
 261                             columns = {{"zone", mdb.string, 16},
 262                                        {"device", mdb.string, 16},
 263                                        {"value", mdb.floating}},
 264                             create = true
 265                            }
 266              },
 267    oldvolume = 0.0,
 268    update  = function(self)
 269                 speed = self.inputs.speed.single_value
 270                 if (speed) then
 271                     volume = (speed - 144.0) / 7.0
 272                 else
 273                     volume = 0.0
 274                 end
 275                 diff = volume - self.oldvolume
 276                 if (diff*diff > self.inputs.param) then
 277                     print("*** element "..self.name.." update "..volume)
 278                     self.oldvolume = volume
 279                     mdb.table.speedvol:replace({zone = "driver", device = "speakers", value = volume})
 280                 end
 281              end
 282 }
 283
 284 mdb.select {
 285     name = "amb_state",
 286     table = "amb_state",
 287     columns = { "state" },
 288     condition = "id = 0"
 289 }
 290
 291 -- Night mode processing chain
 292
 293 mdb.select {
 294     name = "exterior_brightness",
 295     table = "amb_exterior_brightness",
 296     columns = { "value" },
 297     condition = "key = 'ExteriorBrightness'"
 298 }
 299
 300 element.lua {
 301     name    = "nightmode",
 302     inputs  = { brightness = mdb.select.exterior_brightness },
 303     oldmode = -1;
 304     outputs = {
 305         mdb.table {
 306             name = "amb_nightmode",
 307             index = { "id" },
 308             create = true,
 309             columns = {
 310                 { "id", mdb.unsigned },
 311                 { "night_mode", mdb.unsigned }
 312             }
 313         }
 314     },
 315     update = function(self)
 316         -- This is a trivial function to calculate night mode. Later, we will
 317         -- need a better threshold value and hysteresis to prevent oscillation.
 318
 319         brightness = self.inputs.brightness.single_value
 320
 321         if not brightness then
 322             return
 323         end
 324
 325         print("*** element "..self.name.." update brightness: "..brightness)
 326
 327         if brightness > 300 then
 328             mode = 0
 329         else
 330             mode = 1
 331         end
 332
 333         print("*** resulting mode: ".. mode)
 334
 335         if not (mode == self.oldmode) then
 336             mdb.table.amb_nightmode:replace({ id = 0, night_mode = mode })
 337         end
 338
 339         self.oldmode = mode
 340     end
 341 }
 342
 343 mdb.select {
 344     name = "select_night_mode",
 345     table = "amb_nightmode",
 346     columns = { "night_mode" },
 347     condition = "id = 0"
 348 }
 349
 350 if with_amb then
 351     sink.lua {
 352         name = "night_mode",
 353         inputs = { NightMode = mdb.select.select_night_mode,
 354                    amb_state = mdb.select.amb_state },
 355         property = "NightMode",
 356         type = "b",
 357         initiate = builtin.method.amb_initiate,
 358         update = builtin.method.amb_update
 359     }
 360 end
 361
 362 -- Night mode general handlers
 363
 364 sink.lua {
 365     name = "nightmode_homescreen",
 366     inputs = { owner = mdb.select.select_night_mode },
 367     initiate = function(self)
 368         -- data = mdb.select.select_night_mode.single_value
 369         return true
 370     end,
 371     update = function(self)
 372         data = mdb.select.select_night_mode.single_value
 373
 374         if verbose > 1 then
 375             print("Night mode updated: " .. tostring(data))
 376         end
 377
 378         if sc then
 379             -- tell homescreen that night mode was updated
 380             sc:send_message(homescreen, m:JSON({command=0x60001,arg=m:JSON({stateid=2,state=data})}))
 381         end
 382         return true
 383     end
 384 }
 385
 386 -- Driving mode processing chain
 387
 388 element.lua {
 389     name    = "drivingmode",
 390     inputs  = { speed = mdb.select.vehicle_speed },
 391     oldmode = -1;
 392     outputs = {
 393         mdb.table {
 394             name = "amb_drivingmode",
 395             index = { "id" },
 396             create = true,
 397             columns = {
 398                 { "id", mdb.unsigned },
 399                 { "driving_mode", mdb.unsigned }
 400             }
 401         }
 402     },
 403     update = function(self)
 404
 405         speed = self.inputs.speed.single_value
 406
 407         if not speed then
 408             return
 409         end
 410
 411         if speed == 0 then
 412             mode = 0
 413         else
 414             mode = 1
 415         end
 416
 417         if not (mode == self.oldmode) then
 418             mdb.table.amb_drivingmode:replace({ id = 0, driving_mode = mode })
 419         end
 420
 421         self.oldmode = mode
 422     end
 423 }
 424
 425 mdb.select {
 426     name = "select_driving_mode",
 427     table = "amb_drivingmode",
 428     columns = { "driving_mode" },
 429     condition = "id = 0"
 430 }
 431
 432 if with_amb then
 433     sink.lua {
 434         name = "driving_mode",
 435         inputs = { DrivingMode = mdb.select.select_driving_mode,
 436                    amb_state = mdb.select.amb_state },
 437         property = "DrivingMode",
 438         type = "u",
 439         initiate = builtin.method.amb_initiate,
 440         update = builtin.method.amb_update
 441     }
 442 end
 443
 444 -- turn signals (left, right)
 445
 446 mdb.select {
 447     name = "winker",
 448     table = "amb_turn_signal",
 449     columns = { "value" },
 450     condition = "key = 'TurnSignal'"
 451 }
 452
 453 -- define three categories
 454
 455 mdb.select {
 456     name = "undefined_applications",
 457     table = "aul_applications",
 458     columns = { "appid" },
 459     condition = "category = '<undefined>'"
 460 }
 461
 462 mdb.select {
 463     name = "basic_applications",
 464     table = "aul_applications",
 465     columns = { "appid" },
 466     condition = "category = 'basic'"
 467 }
 468
 469 mdb.select {
 470     name = "entertainment_applications",
 471     table = "aul_applications",
 472     columns = { "appid" },
 473     condition = "category = 'entertainment'"
 474 }
 475
 476 function ft(t)
 477     -- filter the object garbage out of the tables
 478     ret = {}
 479
 480     for k,v in pairs(t) do
 481         if k ~= "userdata" and k ~= "new" then
 482             ret[k] = v
 483         end
 484     end
 485
 486     return ret
 487 end
 488
 489 function getApplication(appid)
 490     local conf = nil
 491
 492     -- find the correct local application definition
 493
 494     for k,v in pairs(ft(application)) do
 495         if appid == v.appid then
 496             conf = v
 497             break
 498         end
 499     end
 500
 501     return conf
 502 end
 503
 504 function regulateApplications(t, regulation)
 505     for k,v in pairs(ft(t)) do
 506
 507         -- iterate through the undefined and entertainment apps, see if
 508         -- they have been overruled in local config
 509
 510         local conf = getApplication(v.appid)
 511
 512         if conf and conf.resource_class ~= "player" then
 513             -- override, don't disable
 514             resmgr:disable_screen_by_appid("*", "*", v.appid, false)
 515         else
 516             resmgr:disable_screen_by_appid("*", "*", v.appid, regulation == 1)
 517         end
 518     end
 519 end
 520
 521 -- regulation (on), use "select_driving_mode"
 522
 523 sink.lua {
 524     name = "driving_regulation",
 525     inputs = { owner = mdb.select.select_driving_mode },
 526     initiate = function(self)
 527         -- local data = mdb.select.select_driving_mode.single_value
 528         return true
 529     end,
 530     update = function(self)
 531         local data = mdb.select.select_driving_mode.single_value
 532
 533         if verbose > 1 then
 534             print("Driving mode updated: " .. tostring(data))
 535         end
 536
 537         if not sc then
 538             return true
 539         end
 540
 541         -- tell homescreen that driving mode was updated
 542         sc:send_message(homescreen, m:JSON({command=0x60001,arg=m:JSON({stateid=1,state=data})}))
 543
 544         --[[
 545         -- bulk handle the applications that need requisites
 546         r = requisite { driving = true }
 547         resmgr:disable_screen_by_requisite("*", "*", r, data == 1)
 548         --]]
 549
 550         regulateApplications(ft(mdb.select.entertainment_applications), data)
 551         regulateApplications(ft(mdb.select.undefined_applications), data)
 552
 553         return true
 554     end
 555 }
 556 --[[
 557 sink.lua {
 558     name = "regulated_app_change",
 559     inputs = { undef = mdb.select.undefined_applications,
 560                entertainment = mdb.select.entertainment_applications },
 561     initiate = function(self)
 562         return true
 563     end,
 564     update = function(self)
 565         local data = mdb.select.select_driving_mode.single_value
 566
 567         if not sc then
 568             return
 569         end
 570
 571         if verbose > 1 then
 572             print("regulated application list was changed")
 573         end
 574
 575         regulateApplications(ft(mdb.select.entertainment_applications), data)
 576         regulateApplications(ft(mdb.select.undefined_applications), data)
 577
 578         return true
 579     end
 580 }
 581 --]]
 582
 583 -- shift position (parking, reverse, other)
 584
 585 mdb.select {
 586     name = "gear_position",
 587     table = "amb_gear_position",
 588     columns = { "value" },
 589     condition = "key = 'GearPosition'"
 590 }
 591
 592 -- cameras (back, front, left, right)
 593
 594 element.lua {
 595     name    = "camera_state",
 596     inputs  = { winker = mdb.select.winker, gear = mdb.select.gear_position },
 597     oldmode = -1;
 598     outputs = {
 599         mdb.table {
 600             name = "target_camera_state",
 601             index = { "id" },
 602             create = true,
 603             columns = {
 604                 { "id", mdb.unsigned },
 605                 { "front_camera", mdb.unsigned },
 606                 { "back_camera", mdb.unsigned },
 607                 { "right_camera", mdb.unsigned },
 608                 { "left_camera", mdb.unsigned }
 609             }
 610         }
 611     },
 612     update = function(self)
 613
 614         front_camera = 0
 615         back_camera = 0
 616         right_camera = 0
 617         left_camera = 0
 618
 619         if self.inputs.gear == 128 then
 620             back_camera = 1
 621         elseif self.inputs.winker == 1 then
 622             right_camera = 1
 623         elseif self.inputs.winker == 2 then
 624             left_camera = 1
 625         end
 626
 627         mdb.table.target_camera_state:replace({ id = 0, front_camera = front_camera, back_camera = back_camera, right_camera = right_camera, left_camera = left_camera })
 628
 629     end
 630 }
 631
 632 -- load the telephony plugin
 633 m:try_load_plugin('telephony')
 634
 635
 636 -- system controller test setup
 637
 638 if not with_system_controller then
 639    return
 640 end
 641
 642 m:load_plugin('system-controller')
 643
 644 window_manager_operation_names = {
 645     [1] = "create",
 646     [2] = "destroy"
 647 }
 648
 649 function window_manager_operation_name(oper)
 650     local name = window_manager_operation_names[oper]
 651     if name then return name end
 652     return "<unknown " .. tostring(oper) .. ">"
 653 end
 654
 655 window_operation_names = {
 656     [1] = "create",
 657     [2] = "destroy",
 658     [3] = "name_change",
 659     [4] = "visible",
 660     [5] = "configure",
 661     [6] = "active"
 662 }
 663
 664 function window_operation_name(oper)
 665     local name = window_operation_names[oper]
 666     if name then return name end
 667     return "<unknown " .. tostring(oper) .. ">"
 668 end
 669
 670 layer_operation_names = {
 671     [1] = "create",
 672     [2] = "destroy",
 673     [3] = "visible"
 674 }
 675
 676 function layer_operation_name(oper)
 677     local name = layer_operation_names[oper]
 678     if name then return name end
 679     return "<unknown " .. tostring(oper) .. ">"
 680 end
 681
 682 input_manager_operation_names = {
 683     [1] = "create",
 684     [2] = "destroy",
 685     [3] = "ready"
 686 }
 687
 688 function input_manager_operation_name(oper)
 689     local name = input_manager_operation_names[oper]
 690     if name then return name end
 691     return "<unknown " .. tostring(oper) .. ">"
 692 end
 693
 694 input_operation_names = {
 695     [1] = "create",
 696     [2] = "destroy",
 697     [3] = "update"
 698 }
 699
 700 function input_operation_name(oper)
 701     local name = input_operation_names[oper]
 702     if name then return name end
 703     return "<unknown " .. tostring(oper) .. ">"
 704 end
 705
 706 code_operation_names = {
 707     [1] = "create",
 708     [2] = "destroy",
 709     [3] = "state_change"
 710 }
 711
 712 function code_operation_name(oper)
 713     local name = code_operation_names[oper]
 714     if name then return name end
 715     return "<unknown " .. tostring(oper) .. ">"
 716 end
 717
 718 command_names = {
 719     [0x00001] = "send_appid",
 720     [0x10001] = "create",
 721     [0x10002] = "destroy",
 722     [0x10003] = "show",
 723     [0x10004] = "hide",
 724     [0x10005] = "move",
 725     [0x10006] = "change_active",
 726     [0x10007] = "change_layer",
 727     [0x10008] = "change_attr",
 728     [0x10009] = "name",
 729     [0x10011] = "map_thumb",
 730     [0x10012] = "unmap_thumb",
 731     [0x10020] = "show layer",
 732     [0x10021] = "hide_layer",
 733     [0x10022] = "change_layer_attr",
 734     [0x20001] = "add_input",
 735     [0x20002] = "del_input",
 736     [0x20003] = "send_input",
 737     [0x40001] = "acquire_res",
 738     [0x40002] = "release_res",
 739     [0x40003] = "deprive_res",
 740     [0x40004] = "waiting_res",
 741     [0x40005] = "revert_res",
 742     [0x40011] = "create_res",
 743     [0x40012] = "destroy_res",
 744     [0x50001] = "set_region",
 745     [0x50002] = "unset_region",
 746     [0x60001] = "change_state"
 747 }
 748
 749 function command_name(command)
 750     local name = command_names[command]
 751     if name then return name end
 752     return "<unknown " .. tostring(command) .. ">"
 753 end
 754
 755 input_layer = {
 756    [3] = true, -- input
 757    [4] = true, -- touch
 758    [5] = true  -- cursor
 759 }
 760
 761 resmgr = resource_manager {
 762   screen_event_handler = function(self, ev)
 763                              local event = ev.event
 764                              local surface = ev.surface
 765
 766                              if event == "grant" then
 767                                  if verbose > 0 then
 768                                     print("*** make visible surface "..surface)
 769                                  end
 770                                  local a = animation({})
 771                                  local r = m:JSON({surface = surface,
 772                                                    visible = 1,
 773                                                    raise   = 1})
 774                                  wmgr:window_request(r,a,0)
 775                                  elseif event == "revoke" then
 776                                  if verbose > 0 then
 777                                     print("*** hide surface "..surface)
 778                                  end
 779                                  local a = animation({})
 780                                  local r = m:JSON({surface = ev.surface,
 781                                                    visible = 0})
 782                                  wmgr:window_request(r,a,0)
 783
 784                              elseif event == "create" then
 785
 786                                if verbose > 0 then
 787                                     print("*** screen resource event: " ..
 788                                           tostring(ev))
 789                                  end
 790
 791                                 -- For now, consider every application to be an "entertainment"
 792                                 -- application. Whitelist those applications that we know. Later
 793                                 -- check the aul_applications table for actual category (when
 794                                 -- we get the categories there).
 795
 796                                 local regulation = mdb.select.select_driving_mode.single_value
 797
 798                                 if regulation == 1 then
 799                                     conf = getApplication(ev.appid)
 800
 801                                     -- disable only non-whitelisted applications
 802                                     if not conf or conf.resource_class == "player" then
 803                                         resmgr:disable_screen_by_appid("*", "*", ev.appid, true)
 804                                     end
 805                                 end
 806
 807                              elseif event == "destroy" then
 808                                if verbose > 0 then
 809                                     print("*** screen resource event: " ..
 810                                           tostring(ev))
 811                                  end
 812                              else
 813                                  if verbose > 0 then
 814                                     print("*** screen resource event: " ..
 815                                           tostring(ev))
 816                                  end
 817                              end
 818                          end,
 819   audio_event_handler = function(self, ev)
 820                              local event = ev.event
 821                              local appid = ev.appid
 822                              local audioid = ev.audioid
 823
 824                              if event == "grant" then
 825                                  if verbose > 0 or true then
 826                                     print("*** grant audio to "..appid..
 827                                           " ("..audioid..") in '" ..
 828                                           ev.zone .. "' zone")
 829                                  end
 830                              elseif event == "revoke" then
 831                                  if verbose > 0 or true then
 832                                     print("*** revoke audio from "..appid..
 833                                           " ("..audioid..") in '" ..
 834                                           ev.zone .. "' zone")
 835                                  end
 836                              else
 837                                  if verbose > 0 or true then
 838                                     print("*** audio resource event: " ..
 839                                           tostring(ev))
 840                                  end
 841                              end
 842                         end
 843 }
 844
 845 resclnt = resource_client {}
 846
 847 wmgr = window_manager {
 848   geometry = function(self, w,h, v)
 849                   if type(v) == "function" then
 850                       return v(w,h)
 851                   end
 852                   return v
 853              end,
 854
 855   application = function(self, appid)
 856                      if appid then
 857                          local app = application_lookup(appid)
 858                          if not app then
 859                              app = application_lookup("default")
 860                          end
 861                          return app
 862                      end
 863                      return { privileges = {screen="none", audio="none"} }
 864                 end,
 865
 866   outputs = { { name  = "Center",
 867                 id    = 0,
 868                 zone  = "driver",
 869                 areas = { Status = {
 870                               id     = 0,
 871                               pos_x  = 0,
 872                               pos_y  = 0,
 873                               width  = function(w,h) return w end,
 874                               height = 64
 875                           },
 876                           Full = {
 877                               id     = 1,
 878                               pos_x  = 0,
 879                               pos_y  = 64,
 880                               width  = function(w,h) return w end,
 881                               height = function(w,h) return h-64-128 end
 882                           },
 883                           Upper = {
 884                               id     = 2,
 885                               pos_x  = 0,
 886                               pos_y  = 64,
 887                               width  = function(w,h) return w end,
 888                               height = function(w,h) return (h-64-128)/2 end
 889                           },
 890                           Lower = {
 891                               id     = 3,
 892                               pos_x  = 0,
 893                               pos_y  = function(w,h) return (h-64-128)/2+64 end,
 894                               width  = function(w,h) return w end,
 895                               height = function(w,h) return (h-64-128)/2 end
 896                           },
 897                           UpperLeft = {
 898                               id     = 4,
 899                               pos_x  = 0,
 900                               pos_y  = 64,
 901                               width  = function(w,h) return w/2 end,
 902                               height = function(w,h) return (h-64-128)/2 end
 903                           },
 904                           UpperRight = {
 905                               id     = 5,
 906                               pos_x  = function(w,h) return w/2 end,
 907                               pos_y  = 64,
 908                               width  = function(w,h) return w/2 end,
 909                               height = function(w,h) return (h-64-128)/2 end
 910                           },
 911                           LowerLeft = {
 912                               id     = 6,
 913                               pos_x  = 0,
 914                               pos_y  = function(w,h) return (h-64-128/2)+64 end,
 915                               width  = function(w,h) return w/2 end,
 916                               height = function(w,h) return (h-64-128)/2 end
 917                           },
 918                           LowerRight = {
 919                               id     = 7,
 920                               pos_x  = function(w,h) return w/2 end,
 921                               pos_y  = function(w,h) return (h-64-128/2)+64 end,
 922                               width  = function(w,h) return w/2 end,
 923                               height = function(w,h) return (h-64-128)/2 end
 924                           },
 925                           SysApp = {
 926                               id     = 8,
 927                               pos_x  = 0,
 928                               pos_y  = 64,
 929                               width  = function(w,h) return w end,
 930                               height = function(w,h) return h-64-128 end
 931                           },
 932                           ["SysApp.Left"] = {
 933                               id     = 9,
 934                               pos_x  = 0,
 935                               pos_y  = 64,
 936                               width  = function(w,h) return w/2-181 end,
 937                               height = function(w,h) return h-64-128 end
 938                           },
 939                           ["SysApp.Right"] = {
 940                               id     = 10,
 941                               pos_x  = function(w,h) return w/2+181 end,
 942                               pos_y  = 64,
 943                               width  = function(w,h) return w/2-181 end,
 944                               height = function(w,h) return h-64-128 end
 945                           },
 946                         }
 947                },
 948                { name  = "Mid",
 949                  zone  = "driver",
 950                  id    = 1
 951                }
 952
 953   },
 954   layers = { {      0, "Background"   , 1 },
 955              {      1, "Application"  , 2 },
 956              {      2, "Softkeyboard" , 4 },
 957              {      3, "HomeScreen"   , 2 },
 958              {      4, "ControlBar"   , 2 },
 959              {      5, "InterruptApp" , 2 },
 960              {      6, "OnScreen"     , 2 },
 961              {    101, "Input"        , 3 },
 962              {    102, "Cursor"       , 5 },
 963              {    103, "Startup"      , 6 },
 964              { 0x1000, "Background"   , 1 },
 965              { 0x2000, "Normal"       , 2 },
 966              { 0x3000, "Fullscreen"   , 2 },
 967              { 0x4000, "InputPanel"   , 3 },
 968              { 0xA000, "Touch"        , 4 },
 969              { 0xB000, "Cursor"       , 5 },
 970              { 0xC000, "Startup"      , 6 }
 971   },
 972
 973
 974   manager_update = function(self, oper)
 975                        if verbose > 0 then
 976                            print("### <== WINDOW MANAGER UPDATE:" ..
 977                                  window_manager_operation_name(oper))
 978                        end
 979                        if oper == 1 then
 980                            local umask = window_mask { raise   = true,
 981                                                        visible = true,
 982                                                        active  = true }
 983                            local rmask = window_mask { active  = true }
 984                            local req = m:JSON({
 985                                        passthrough_update  = umask:tointeger(),
 986                                        passthrough_request = rmask:tointeger()
 987                            })
 988                            self:manager_request(req)
 989                        end
 990                    end,
 991
 992   window_update = function(self, oper, win, mask)
 993                       if verbose > 0 then
 994                           print("### <== WINDOW UPDATE oper:" ..
 995                                 window_operation_name(oper) ..
 996                                 " mask: " .. tostring(mask))
 997                           if verbose > 1 then
 998                               print(win)
 999                           end
1000                       end
1001
1002                       local arg = m:JSON({ surface = win.surface,
1003                                            winname = win.name,
1004                       })
1005                       local command = 0
1006
1007                       if oper == 1 then -- create
1008                            local layertype = win.layertype
1009                            if layertype and input_layer[layertype] then
1010                                if verbose > 0 then
1011                                    print("ignoring input panel creation")
1012                                end
1013                                return
1014                            end
1015                            command     = 0x10001
1016                       elseif oper == 2 then -- destroy
1017                            command     = 0x10002
1018                       elseif oper == 3 then  -- namechange
1019                            command     = 0x10009
1020                       elseif oper == 4 or oper == 5 then --visible or configure
1021                            command     = 0x10008
1022                            arg.zone    = win.area
1023                            arg.node    = win.node
1024                            arg.layer   = win.layer
1025                            arg.pos_x   = win.pos_x
1026                            arg.pos_y   = win.pos_y
1027                            arg.width   = win.width
1028                            arg.height  = win.height
1029                            arg.raise   = win.raise
1030                            arg.visible = win.visible
1031                            arg.active  = win.active
1032                       elseif oper == 6 then -- active
1033                            command     = 0x10006
1034                            arg.active  = win.active
1035                       else
1036                            if verbose > 0 then
1037                                print("### nothing to do")
1038                            end
1039                            return
1040                       end
1041
1042                       local msg = m:JSON({ command = command,
1043                                            appid   = win.appid,
1044                                            pid     = win.pid,
1045                                            arg     = arg
1046                       })
1047                       if verbose > 0 then
1048                           print("### <== sending " ..
1049                                 command_name(msg.command) ..
1050                                 " window message to '" .. win.name .. "'")
1051                           if verbose > 1 then
1052                               print(msg)
1053                           end
1054                       end
1055                       sc:send_message(homescreen, msg)
1056
1057                       if oper == 1 then -- create
1058                           local i = input_layer[win.layertype]
1059                           local p = self:application(win.appid)
1060                           local s = p.privileges.screen
1061
1062                           if s == "system" then
1063                               local a = animation({})
1064                               local r = m:JSON({surface = win.surface,
1065                                                 visible = 1,
1066                                                 raise   = 1})
1067                               self:window_request(r,a,0)
1068                           else
1069                               if i then
1070                                   if verbose > 0 then
1071                                       print("do not make resource for " ..
1072                                             "input window")
1073                                   end
1074                               else
1075                                   resclnt:resource_set_create("screen",
1076                                                                "driver",
1077                                                                win.appid,
1078                                                                win.surface)
1079                               end
1080                           end
1081                       elseif oper == 2 then -- destroy
1082                           resclnt:resource_set_destroy("screen", win.surface)
1083                       elseif oper == 6 then -- active
1084                           if win.active then
1085                               local i = input_layer[win.layertype]
1086                               local p = self:application(win.appid)
1087                               local s = p.privileges.screen
1088                               local surface = win.surface
1089                               if not i and s ~= "system" then
1090                                  resclnt:resource_set_acquire("screen",surface)
1091                                  resmgr:window_raise(win.appid, surface, 1)
1092                               end
1093                           end
1094                       end
1095                   end,
1096
1097   layer_update = function(self, oper, layer, mask)
1098                       if verbose > 0 then
1099                           print("### LAYER UPDATE:" ..
1100                                 layer_operation_name(oper) ..
1101                                 " mask: " .. tostring(mask))
1102                           if verbose > 1 then
1103                               print(layer)
1104                           end
1105                       end
1106                       if oper == 3 then -- visible
1107                          local command = 0x10022
1108                          local msg = m:JSON({
1109                                          command = command,
1110                                          appid = "",
1111                                          arg = m:JSON({layer = layer.id,
1112                                                        visible = layer.visible
1113                                          })
1114                                 })
1115                          if verbose > 0 then
1116                             print("### <== sending "..command_name(command)..
1117                                   " layer message")
1118                             if verbose > 1 then
1119                                 print(msg)
1120                             end
1121                          end
1122                          sc:send_message(homescreen, msg)
1123                       else
1124                            if verbose > 0 then
1125                                print("### nothing to do")
1126                            end
1127                       end
1128                  end,
1129
1130   output_update = function(self, oper, out, mask)
1131                       local idx = out.index
1132                       if verbose > 0 then
1133                           print("### OUTPUT UPDATE:" .. oper ..
1134                                 " mask: "..tostring(mask))
1135                       end
1136                       print(out)
1137                       local outdef = self.outputs[idx+1]
1138                       if (oper == 1) then -- create
1139                           if outdef then
1140                               self:output_request(m:JSON({index = idx,
1141                                                           id    = outdef.id,
1142                                                           name  = outdef.name
1143                                                           }))
1144                           end
1145                       elseif (oper == 5) then -- done
1146                           local ads = outdef.areas
1147                           local on = outdef.name
1148                           if ads then
1149                               for name,ad in pairs(ads) do
1150                                   local can = wmgr:canonical_name(on.."."..name)
1151                                   local a = m:JSON({name   = name,
1152                                                     output = out.index})
1153                                   for fld,val in pairs(ad) do
1154                                       a[fld] = self:geometry(out.width,
1155                                                              out.height,
1156                                                              val)
1157                                    end
1158                                    self:area_create(a)
1159                                    resmgr:area_create(area[can], outdef.zone)
1160                               end
1161                           end
1162                       end
1163                   end
1164 }
1165
1166
1167 imgr = input_manager {
1168   inputs = {{ name = "G27 Racing Wheel",
1169               id = 0,
1170               switch = { [2] = {appid="org.tizen.ico.app-soundsample"      },
1171                          [3] = {appid="org.tizen.ico.homescreen", keycode=1},
1172                          [4] = {appid="org.tizen.ico.app-soundsample"      },
1173                          [5] = {appid="org.tizen.ico.homescreen", keycode=2}
1174              }}
1175   },
1176
1177   manager_update = function(self, oper)
1178                        if verbose > 0 then
1179                            print("### <== INPUT MANAGER UPDATE:" ..
1180                                  input_manager_operation_name(oper))
1181                        end
1182                    end,
1183
1184   input_update = function(self, oper, inp, mask)
1185                      if verbose > 0 then
1186                          print("### INPUT UPDATE:" ..
1187                                 input_operation_name(oper) ..
1188                                 " mask: " .. tostring(mask))
1189                           if verbose > 1 then
1190                               print(inp)
1191                           end
1192                       end
1193                  end,
1194   code_update  = function(self, oper, code, mask)
1195                      if verbose > 0 then
1196                          print("### CODE UPDATE: mask: " .. tostring(mask))
1197                          if verbose > 1 then
1198                              print(code)
1199                          end
1200                      end
1201                      local msg = m:JSON({ command = 1,
1202                                           appid = "org.tizen.ico.homescreen",
1203                                           arg = m:JSON({ device = code.device,
1204                                                          time = code.time,
1205                                                          input = code.input,
1206                                                          code = code.id,
1207                                                          state = code.state
1208                                            })
1209                      })
1210                      if verbose > 0 then
1211                          print("### <== sending " ..
1212                                command_name(msg.command) ..
1213                                " input message")
1214                          if verbose > 1 then
1215                              print(msg)
1216                          end
1217                      end
1218                      sc:send_message(homescreen, msg)
1219                  end
1220 }
1221
1222 sc = m:get_system_controller()
1223
1224 -- resource sets
1225 sets = {}
1226
1227 -- user manager
1228 um = m:UserManager()
1229
1230 connected = false
1231 homescreen = ""
1232
1233 -- these shoud be before wmgr:connect() is called
1234 if verbose > 0 then
1235    print("====== creating applications ======")
1236 end
1237 application {
1238     appid          = "default",
1239     area           = "Center.Full",
1240     privileges     = { screen = "none", audio = "none" },
1241     resource_class = "player",
1242     screen_priority = 0
1243 }
1244
1245 application {
1246     appid           = "weston",
1247     area            = "Center.Full",
1248     privileges      = { screen = "system", audio = "none" },
1249     resource_class  = "implicit",
1250     screen_priority = 30
1251 }
1252
1253 application {
1254     appid           = "org.tizen.ico.homescreen",
1255     area            = "Center.Full",
1256     privileges      = { screen = "system", audio = "system" },
1257     resource_class  = "player",
1258     screen_priority = 20
1259 }
1260
1261 application {
1262     appid           = "org.tizen.ico.statusbar",
1263     area            = "Center.Status",
1264     privileges      = { screen = "system", audio = "none" },
1265     resource_class  = "player",
1266     screen_priority = 20
1267 }
1268
1269 application {
1270     appid           = "org.tizen.ico.login",
1271     area            = "Center.Full",
1272     privileges      = { screen = "system", audio = "system" },
1273     resource_class  = "player",
1274     screen_priority = 20
1275 }
1276
1277 application {
1278     appid           = "org.tizen.ico.camera_left",
1279     area            = "Center.SysApp.Left",
1280     privileges      = { screen = "system", audio = "none" },
1281     requisites      = { screen = "blinker_left", audio = "none" },
1282     resource_class  = "player",
1283     screen_priority = 30
1284 }
1285
1286 application {
1287     appid           = "org.tizen.ico.camera_right",
1288     area            = "Center.SysApp.Right",
1289     privileges      = { screen = "system", audio = "none" },
1290     requisites      = { screen = "blinker_right", audio = "none" },
1291     resource_class  = "player",
1292     screen_priority = 30
1293 }
1294
1295 application {
1296     appid           = "net.zmap.navi",
1297     area            = "Center.Full",
1298     privileges      = { screen = "none", audio = "none" },
1299     resource_class  = "navigator",
1300     screen_priority = 30
1301 }
1302
1303 if sc then
1304     sc.client_handler = function (self, cid, msg)
1305         local command = msg.command
1306         if verbose > 0 then
1307             print('### ==> client handler:')
1308             if verbose > 1 then
1309                 print(msg)
1310             end
1311         end
1312         if not connected then
1313             print('Setting homescreen='..msg.appid)
1314             homescreen = msg.appid
1315             print('Trying to connect to wayland...')
1316             connected = wmgr:connect()
1317         end
1318         if connected and command then
1319             if command == 1 then -- send_appid
1320                 local driving_mode = mdb.select.select_driving_mode.single_value
1321                 local night_mode = mdb.select.select_night_mode.single_value
1322
1323                 if not driving_mode then driving_mode = 0 end
1324                 if not night_mode then night_mode = 0 end
1325
1326                 local reply = m:JSON({ command = 0x60001,
1327                                        arg     = m:JSON({ stateid = 1,
1328                                                           state   = driving_mode})
1329                                      })
1330                  if verbose > 0 then
1331                      print("### <== sending " ..
1332                            command_name(command) .. " message")
1333                      if verbose > 1 then
1334                          print(reply)
1335                      end
1336                  end
1337                  sc:send_message(homescreen, reply)
1338
1339                  reply = m:JSON({ command = 0x60001,
1340                                   arg     = m:JSON({ stateid = 2,
1341                                                      state   = night_mode})
1342                                 })
1343                  if verbose > 0 then
1344                      print("### <== sending " ..
1345                            command_name(command) .. " message")
1346                      if verbose > 1 then
1347                          print(reply)
1348                      end
1349                  end
1350                  sc:send_message(homescreen, reply)
1351             end
1352         end
1353     end
1354
1355     sc.generic_handler = function (self, cid, msg)
1356         if verbose > 0 then
1357             print('### ==> generic handler:')
1358             if verbose > 1 then
1359                print(msg)
1360             end
1361         end
1362     end
1363
1364     sc.window_handler = function (self, cid, msg)
1365         if verbose > 0 then
1366             print('### ==> received ' ..
1367                    command_name(msg.command) .. ' message')
1368             if verbose > 1 then
1369                 print(tostring(msg))
1370             end
1371         end
1372
1373         local a = animation({})
1374         local nores = false
1375         if msg.command == 0x10003 then       -- ico SHOW command
1376             local raise_mask = 0x01000000
1377             local lower_mask = 0x02000000
1378             local nores_mask = 0x40000000
1379             local time_mask  = 0x00ffffff
1380             msg.arg.visible = 1
1381             if msg.arg then
1382                 local time = 200
1383                 if  msg.arg.anim_time then
1384                     local t = msg.arg.anim_time
1385                     time = m:AND(t, time_mask)
1386                     nores = not m:AND(t, nores_mask)
1387                     if m:AND(t, raise_mask) then
1388                         msg.arg.raise = 1
1389                     elseif m:AND(t, lower_mask) then
1390                         msg.arg.raise = 0
1391                     end
1392                 end
1393                 if msg.arg.anim_name then
1394                     a.show = { msg.arg.anim_name, time }
1395                     print('time: ' .. tostring(a.show[2]))
1396                 end
1397             end
1398             if not nores then
1399                 local p = wmgr:application(msg.appid)
1400                 local s = p.privileges.screen
1401                 if s == "system" then
1402                     nores = true
1403                 end
1404             end
1405             if verbose > 2 then
1406                 print('### ==> SHOW')
1407                 print(tostring(msg.arg))
1408             end
1409             if nores then
1410                 wmgr:window_request(msg.arg, a, 0)
1411             else
1412                 local surface = msg.arg.surface
1413                 resclnt:resource_set_acquire("screen", surface)
1414                 resmgr:window_raise(msg.appid, surface, 1)
1415             end
1416         elseif msg.command == 0x10004 then   -- ico HIDE command
1417             local raise_mask = 0x01000000
1418             local lower_mask = 0x02000000
1419             local nores_mask = 0x40000000
1420             local time_mask  = 0x00ffffff
1421             msg.arg.visible = 0
1422             if msg.arg then
1423                 local time = 200
1424                 if msg.arg.anim_time then
1425                     local t = msg.arg.anim_time
1426                     time = m:AND(t, time_mask)
1427                     nores = not m:AND(t, nores_mask)
1428                 end
1429                 if msg.arg.anim_name then
1430                     a.hide = { msg.arg.anim_name, time }
1431                     print('hide animation time: ' .. tostring(a.hide[2]))
1432                 end
1433             end
1434             if not nores then
1435                 local p = wmgr:application(msg.appid)
1436                 local s = p.privileges.screen
1437                 if s == "system" then
1438                     nores = true
1439                 end
1440             end
1441             if verbose > 2 then
1442                 print('### ==> HIDE REQUEST')
1443                 print(tostring(msg.arg))
1444             end
1445             if nores then
1446                 wmgr:window_request(msg.arg, a, 0)
1447             else
1448                 resmgr:window_raise(msg.appid, msg.arg.surface, -1)
1449             end
1450         elseif msg.command == 0x10005 then   -- ico MOVE
1451             if verbose > 2 then
1452                 print('### ==> MOVE REQUEST')
1453                 print(tostring(msg.arg))
1454             end
1455             wmgr:window_request(msg.arg, a, 0)
1456             -- TODO: handle if area changed
1457         elseif msg.command == 0x10006 then   -- ico ACTIVE
1458             if not msg.arg.active then
1459                 msg.arg.active = 3 -- pointer + keyboard
1460             end
1461             if verbose > 2 then
1462                 print('### ==> ACTIVE REQUEST')
1463                 print(tostring(msg.arg))
1464             end
1465             wmgr:window_request(msg.arg, a, 0)
1466         elseif msg.command == 0x10007 then   -- ico CHANGE_LAYER
1467             if verbose > 2 then
1468                 print('### ==> CHANGE_LAYER REQUEST')
1469                 print(tostring(msg.arg))
1470             end
1471             --[[
1472             if msg.arg.layer ~= 4 or msg.arg.layer ~= 5 then
1473                 print("do not change layer for other than cursor or touch")
1474                 return
1475             end
1476             --]]
1477             wmgr:window_request(msg.arg, a, 0)
1478         elseif msg.command == 0x10011 then   -- ico MAP_THUMB
1479             local framerate = msg.arg.framerate
1480             if not framerate or framerate < 0 then
1481                 framerate = 0
1482             end
1483             msg.arg.map = 1
1484             if verbose > 2 then
1485                 print('### ==> MAP_THUMB REQUEST')
1486                 print(msg.arg)
1487                 print('framerate: '..framerate)
1488             end
1489             wmgr:window_request(msg.arg, a, framerate)
1490         elseif msg.command == 0x10012 then   -- ico UNMAP_THUMB
1491             msg.arg.map = 0
1492             if verbose > 2 then
1493                 print('### ==> UNMAP_THUMB REQUEST')
1494                 print(msg.arg)
1495             end
1496             wmgr:window_request(msg.arg, a, 0)
1497         elseif msg.command == 0x10020 then   -- ico SHOW_LAYER command
1498             msg.arg.visible = 1
1499             if verbose > 2 then
1500                 print('### ==> SHOW_LAYER REQUEST')
1501                 print(msg.arg)
1502             end
1503             wmgr:layer_request(msg.arg)
1504         elseif msg.command == 0x10021 then   -- ico HIDE_LAYER command
1505             msg.arg.visible = 0
1506             if verbose > 2 then
1507                 print('### ==> HIDE_LAYER REQUEST')
1508                 print(msg.arg)
1509             end
1510             wmgr:layer_request(msg.arg)
1511         end
1512     end
1513
1514     sc.input_handler = function (self, cid, msg)
1515         if verbose > 0 then
1516             print('### ==> input handler: ' .. command_name(msg.command))
1517             if verbose > 1 then
1518                 print(msg)
1519             end
1520         end
1521         if msg.command == 0x20001 then -- add_input
1522             msg.arg.appid = msg.appid
1523             if verbose > 2 then
1524                 print('### ==> ADD_INPUT REQUEST')
1525                 print(tostring(msg.arg))
1526             end
1527             imgr:input_request(msg.arg)
1528         elseif msg.command == 0x20002 then -- del_input
1529             msg.arg.appid = ''
1530             if verbose > 2 then
1531                 print('### ==> DEL_INPUT REQUEST')
1532                 print(tostring(msg.arg))
1533             end
1534             imgr:input_request(msg.arg)
1535         elseif msg.command == 0x20003 then -- send_input
1536         end
1537     end
1538
1539     sc.user_handler = function (self, cid, msg)
1540         if verbose > 0 then
1541             print('### ==> user handler: ' .. command_name(msg.command))
1542             if verbose > 1 then
1543                 print(msg)
1544             end
1545         end
1546
1547         if not um then
1548             print("User Manager not initialized")
1549             return
1550         end
1551
1552         if msg.command == 0x00030001 then -- MSG_CMD_CHANGE_USER
1553             print("command CHANGE_USER")
1554             if not msg.arg then
1555                 print("invalid message")
1556                 return
1557             end
1558
1559             username = msg.arg.user
1560             passwd = msg.arg.pass
1561
1562             if not username then
1563                 username = ""
1564             end
1565
1566             if not passwd then
1567                 passwd = ""
1568             end
1569
1570             success = um:changeUser(username, passwd)
1571
1572             if not success then
1573                 reply = m.JSON({
1574                     appid = msg.appid,
1575                     command = cmd
1576                 })
1577                 if sc:send_message(msg.appid, reply) then
1578                     print('*** sent authentication failed message')
1579                 else
1580                     print('*** failed to send authentication failed message')
1581                 end
1582             end
1583
1584         elseif msg.command == 0x00030002 then -- MSG_CMD_GET_USERLIST
1585             print("command GET_USERLIST")
1586             if not msg.appid then
1587                 print("invalid message")
1588                 return
1589             end
1590
1591             users, currentUser = um:getUserList()
1592
1593             if not users then
1594                 print("failed to get user list")
1595                 return
1596             end
1597
1598             nUsers = 0
1599
1600             for i,v in pairs(users) do
1601                 nUsers = nUsers + 1
1602             end
1603
1604             if not currentUser then
1605                 currentUser = ""
1606             end
1607
1608             if verbose > 1 then
1609                 print("current user: " .. currentUser)
1610                 print("user list:")
1611                 for i,v in pairs(users) do
1612                     print(v)
1613                 end
1614             end
1615
1616             reply = m.JSON({
1617                 appid = msg.appid,
1618                 command = cmd,
1619                 arg = m.JSON({
1620                     user_num = nUsers,
1621                     user_list = users,
1622                     user_login = currentUser
1623                 })
1624             })
1625
1626             if verbose > 1 then
1627                 print("### <== GetUserList reply: " .. tostring(reply))
1628             end
1629
1630             if sc:send_message(msg.appid, reply) then
1631                 print('*** reply OK')
1632             else
1633                 print('*** reply FAILED')
1634             end
1635
1636         elseif msg.command == 0x00030003 then -- MSG_CMD_GET_LASTINFO
1637             print("command GET_LASTINFO")
1638             if not msg.appid then
1639                 print("invalid message")
1640                 return
1641             end
1642
1643             lastInfo = um:getLastInfo(msg.appid)
1644
1645             if not lastInfo then
1646                 print("failed to get last info for app" .. msg.appid)
1647                 return
1648             end
1649
1650             reply = m.JSON({
1651                 appid = msg.appid,
1652                 command = cmd,
1653                 arg = m.JSON({
1654                     lastinfo = lastinfo
1655                 })
1656             })
1657
1658             if sc:send_message(msg.appid, reply) then
1659                 print('*** reply OK')
1660             else
1661                 print('*** reply FAILED')
1662             end
1663
1664         elseif msg.command == 0x00030004 then -- MSG_CMD_SET_LASTINFO
1665             print("command SET_LASTINFO")
1666             if not msg.arg or not msg.appid then
1667                 print("invalid message")
1668                 return
1669             end
1670
1671             lastInfo = um:setLastInfo(msg.appid, msg.arg.lastinfo)
1672         end
1673     end
1674
1675     sc.resource_handler = function (self, cid, msg)
1676         if verbose > 0 then
1677             print('### ==> resource handler: ' .. command_name(msg.command))
1678             if verbose > 1 then
1679                 print(msg)
1680             end
1681         end
1682
1683         createResourceSet = function (ctl, client, msg)
1684             cb = function(rset, data)
1685                 print("> resource callback")
1686
1687                 -- type is either basic (0) or interrupt (1)
1688                 requestType = 0
1689                 if msg.res.type then
1690                     requestType = msg.res.type
1691                 end
1692
1693                 if rset.acquired then
1694                     cmd = 0x00040001 -- acquire
1695                 else
1696                     cmd = 0x00040002 -- release
1697                 end
1698
1699                 reply = m.JSON({
1700                         appid = data.client,
1701                         command = cmd,
1702                         res = {
1703                             type = requestType
1704                         }
1705                     })
1706
1707                 if rset.resources.audio_playback then
1708                     reply.res.sound = {
1709                         zone = "driver",
1710                         name = msg.appid,
1711                         adjust = 0,
1712                         -- id = "0"
1713                     }
1714                 end
1715
1716                 if rset.resources.display then
1717                     reply.res.window = {
1718                         zone = "driver",
1719                         name = msg.appid,
1720                         -- id = "0"
1721                     }
1722                 end
1723
1724                 if rset.resources.input then
1725                     reply.res.input = {
1726                         name = msg.appid,
1727                         event = 0
1728                     }
1729                 end
1730                 print("sending message to client: " .. data.client)
1731
1732                 if sc:send_message(data.client, reply) then
1733                     print('*** reply OK')
1734                 else
1735                     print('*** reply FAILED')
1736                 end
1737             end
1738
1739             rset = m:ResourceSet({
1740                     application_class = "player",
1741                     zone = "driver", -- msg.zone ("full")
1742                     callback = cb
1743                 })
1744
1745             rset.data = {
1746                 cid = cid,
1747                 ctl = ctl
1748             }
1749
1750             if msg.res.sound then
1751                 rset:addResource({
1752                         resource_name = "audio_playback"
1753                     })
1754                 rset.resources.audio_playback.attributes.pid = tostring(msg.pid)
1755                 rset.resources.audio_playback.attributes.appid = msg.appid
1756                 print("sound name: " .. msg.res.sound.name)
1757                 print("sound zone:" .. msg.res.sound.zone)
1758                 print("sound adjust: " .. tostring(msg.res.sound.adjust))
1759                 if msg.res.sound.id then
1760                     print("sound id: " .. msg.res.sound.id)
1761                 end
1762             end
1763
1764             if msg.res.input then
1765                 rset:addResource({
1766                         resource_name = "input"
1767                     })
1768                 rset.resources.input.attributes.pid = tostring(msg.pid)
1769                 rset.resources.input.attributes.appid = msg.appid
1770                 print("input name: " .. msg.res.sound.name)
1771                 print("input event:" .. tostring(msg.res.input.event))
1772             end
1773
1774             if msg.res.window then
1775                 rset:addResource({
1776                         resource_name = "display"
1777                     })
1778                 rset.resources.display.attributes.pid = tostring(msg.pid)
1779                 rset.resources.display.attributes.appid = msg.appid
1780                 print("display name: " .. msg.res.display.name)
1781                 print("display zone:" .. msg.res.display.zone)
1782                 if msg.res.display.id then
1783                     print("display id: " .. msg.res.display.id)
1784                 end
1785             end
1786
1787             return rset
1788         end
1789
1790         -- parse the message
1791
1792         -- fields common to all messages:
1793         --      msg.command
1794         --      msg.appid
1795         --      msg.pid
1796
1797         if msg.command == 0x00040011 then -- MSG_CMD_CREATE_RES
1798             print("command CREATE")
1799
1800             if not sets.cid then
1801                 sets.cid = createResourceSet(self, cid, msg)
1802             end
1803
1804         elseif msg.command == 0x00040012 then -- MSG_CMD_DESTORY_RES
1805             print("command DESTROY")
1806
1807             if sets.cid then
1808                 sets.cid:release()
1809             end
1810
1811             sets.cid = nil -- garbage collecting
1812
1813         elseif msg.command == 0x00040001 then -- MSG_CMD_ACQUIRE_RES
1814             print("command ACQUIRE")
1815
1816             if not sets.cid then
1817                 sets.cid = createResourceSet(self, cid, msg)
1818             end
1819
1820             sets.cid:acquire()
1821
1822         elseif msg.command == 0x00040002 then -- MSG_CMD_RELEASE_RES
1823             print("command RELEASE")
1824
1825             if sets.cid then
1826                 sets.cid:release()
1827             end
1828
1829         elseif msg.command == 0x00040003 then -- MSG_CMD_DEPRIVE_RES
1830             print("command DEPRIVE")
1831
1832         elseif msg.command == 0x00040004 then -- MSG_CMD_WAITING_RES
1833             print("command WAITING")
1834
1835         elseif msg.command == 0x00040005 then -- MSG_CMD_REVERT_RES
1836             print("command REVERT")
1837         end
1838     end
1839
1840     sc.inputdev_handler = function (self, cid, msg)
1841         if verbose > 0 then
1842             print('*** inputdev handler: ' .. command_name(msg.command))
1843             if verbose > 1 then
1844                 print(msg)
1845             end
1846         end
1847     end
1848 end