packaging.in/murphy.lua

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