32.lua

htc manila 2 sourcecode

-- Decompiled using luadec 0.6 by sztupy (http://winmo.sztupy.hu)
-- Command line was: -l ;;0,4;0,4,25;;0,6,9,18;0,5,11;0,5,19;;0,4;0,4;0,0,0,0,0,0,0,0,4,8,12,16,20,24,28;0,10,15,31,35,39,43,125,134;;;;;9;; 1f3be060_manila_1F730.luac 

trace("Loaded Updates & Data Script\n")
require("theme")
require("CheckboxControl")
UpdatesAndData_MapVisibleElements = {}
UpdatesAndData_MapSettingsItemUI = {}
UpdatesAndData_ItemListGenerator = nil
if _config_os == "windowsmobile" then
   require("machine_status_svc")
   UpdatesAndData_MachineStatus = MachineStatus()
end
UpdatesAndDataSettingsItemUI = class()
UpdatesAndDataSettingsItemUI.__init = function(l_1_0, l_1_1, l_1_2, l_1_3, l_1_4, l_1_5, l_1_6, l_1_7, l_1_8, l_1_9)
   l_1_0.Text = l_1_1
   l_1_0.CheckboxVisible = l_1_2
   l_1_0.Texture = l_1_3
   l_1_0.TextureWidth = l_1_4
   l_1_0.TextureHeight = l_1_5
   l_1_0.IconWidth = l_1_6
   l_1_0.IconHeight = l_1_7
   l_1_0.StoreKey = l_1_8
   l_1_0.ReverseCheckbox = l_1_9
end

UpdatesAndData_HandleCheckboxToggle = function(l_2_0)
   local l_2_1 = l_2_0.Namespace:FindName("CheckboxComponent")
   trace("Toggle value for " .. UpdatesAndData_MapSettingsItemUI[l_2_0.Tag.Data].StoreKey .. "\n")
   if _config_os == "windowsmobile" then
      local x = not l_2_1.Tag.Value
      if x then
         UpdatesAndData_ShowDataSettingWarningDialog(l_2_0)
      else
         UpdateDataCheckbox(l_2_0)
      end
   else
      ToggleCheckbox(l_2_1)
   end
end

CheckboxDataElement = nil
UpdatesAndData_ShowDataSettingWarningDialog = function(l_3_0)
   CheckDataElement = l_3_0
   local l_3_1 = URL("Manila://Confirmation.dialog")
   l_3_1.Parameters:AddParameter("Title", Locale:GetString("IDS_DATA_WARNING_TITLE"))
   l_3_1.Parameters:AddParameter("ContentString", Locale:GetString("IDS_DATA_WARNING_MSG"))
   local l_3_2 = _application.DialogManager:GetDialog(l_3_1)
   l_3_2.OnExit:connect(UpdatesAndData_ShowDataSettingWarningDialogReturned)
   l_3_2:Show()
end

UpdatesAndData_ShowDataSettingWarningDialogReturned = function(l_4_0)
   l_4_0.OnExit:disconnect(UpdatesAndData_ShowDataSettingWarningDialogReturned)
   if l_4_0.Result.ExitType ~= DialogExitType_Cancel and CheckDataElement ~= nil then
      UpdateDataCheckbox(CheckDataElement)
   else
      trace("Not reattempting download.")
   end
end

UpdateDataCheckbox = function(l_5_0)
   if l_5_0 ~= nil then
      local l_5_1 = l_5_0.Namespace:FindName("CheckboxComponent")
      local l_5_2 = not l_5_1.Tag.Value
      if UpdatesAndData_MapSettingsItemUI[l_5_0.Tag.Data].ReverseCheckbox then
         l_5_2 = not l_5_2
      end
      local l_5_3 = 0
      if l_5_2 then
         l_5_3 = 1
      end
      _application.Store:SetIntValue(Lifetime_Permanent, UpdatesAndData_MapSettingsItemUI[l_5_0.Tag.Data].StoreKey, l_5_3)
      UpdatesAndData_InitializeListviewItem(l_5_0)
   end
end

UpdatesAndData_HandleMouseDown = function(l_6_0)
   local l_6_1 = UpdatesAndDataListView:GetIndexAtMousePoint(l_6_0._xmouse, l_6_0._ymouse)
   if l_6_1 ~= -1 then
      local l_6_2 = UpdatesAndData_ItemListGenerator:GetItem(l_6_1)
      l_6_2:Focus()
   end
end

UpdatesAndData_HandleMouseRelease = function(l_7_0)
   local l_7_1 = UpdatesAndDataListView:GetIndexAtMousePoint(l_7_0._xmouse, l_7_0._ymouse)
   if l_7_1 == -1 then
      trace("Couldn't find index in listview\n")
   else
      if l_7_1 == UpdatesAndData_ItemListGenerator.SelectedIndex then
         local l_7_2 = UpdatesAndData_ItemListGenerator:GetItem(l_7_1)
         if l_7_2.Tag ~= nil and l_7_2.Tag.Data ~= nil then
            trace("Hit: " .. UpdatesAndData_MapSettingsItemUI[l_7_2.Tag.Data].Text .. "\n")
            if UpdatesAndData_MapSettingsItemUI[l_7_2.Tag.Data].CheckboxVisible then
               UpdatesAndData_HandleCheckboxToggle(l_7_2)
            else
               UpdatesAndData_HandleButtonSet(l_7_2)
            end
         end
      end
   end
end

UpdatesAndData_HandleKeyDown = function(l_8_0, l_8_1, l_8_2)
   if l_8_1.Code == KeyCode_Return or l_8_1.Code == KeyCode_Space then
      if UpdatesAndData_MapSettingsItemUI[l_8_0.Tag.Data].CheckboxVisible then
         UpdatesAndData_HandleCheckboxToggle(l_8_0)
      else
         UpdatesAndData_HandleButtonSet(l_8_0)
      end         
      l_8_2.value = true
   end
end

UpdatesAndData_ItemSelectedFunc = function(l_9_0)
   local l_9_1 = l_9_0.Namespace:FindName("Selector")
   l_9_1._visible = true
   l_9_0.Namespace:FindName("Text").Color = GetMainTextSelectedColor()
end

UpdatesAndData_ItemDeselectedFunc = function(l_10_0)
   local l_10_1 = l_10_0.Namespace:FindName("Selector")
   l_10_1._visible = false
   l_10_0.Namespace:FindName("Text").Color = GetMainTextUnselectedColor()
end

FreeUnusedAssets = function(l_11_0, l_11_1, l_11_2, l_11_3, l_11_4, l_11_5, l_11_6, l_11_7)
   local l_11_8 = l_11_0.Namespace:FindName("TextComponent")
   local l_11_9 = l_11_0.Namespace:FindName("TextWithDetailComponent")
   local l_11_10 = l_11_0.Namespace:FindName("IconComponent")
   local l_11_11 = l_11_0.Namespace:FindName("SliderComponent")
   local l_11_12 = l_11_0.Namespace:FindName("OnOffButtonComponent")
   local l_11_13 = l_11_0.Namespace:FindName("RadioButtonComponent")
   local l_11_14 = l_11_0.Namespace:FindName("CheckboxComponent")
   if not l_11_1 then
      l_11_8.Duration = 0
   else
      l_11_8.Duration = 40
   end
   if not l_11_2 then
      l_11_9.Duration = 0
   else
      l_11_9.Duration = 40
   end
   if not l_11_3 then
      l_11_10.Duration = 0
   else
      l_11_10.Duration = 40
   end
   if not l_11_4 then
      l_11_11.Duration = 0
   else
      l_11_11.Duration = 40
   end
   if not l_11_5 then
      l_11_12.Duration = 0
   else
      l_11_12.Duration = 40
   end
   if not l_11_6 then
      l_11_13.Duration = 0
   else
      l_11_13.Duration = 40
   end
   if not l_11_7 then
      l_11_14.Duration = 0
   else
      l_11_14.Duration = 40
   end
end

UpdatesAndData_InitializeListviewItem = function(l_12_0)
   local l_12_1 = l_12_0.Namespace:FindName("TextWithDetailComponent")
   l_12_1._visible = false
   l_12_1 = l_12_0.Namespace:FindName("TextComponent")
   l_12_1._visible = true
   local l_12_2 = l_12_0.Namespace:FindName("Text")
   l_12_2.String = UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].Text
   l_12_2.FontSize = 26
   local l_12_3 = UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].Texture ~= nil
   local l_12_4 = l_12_0.Namespace:FindName("IconComponent")
   local l_12_5 = l_12_0.Namespace:FindName("Icon")
   local l_12_6 = l_12_0.Namespace:FindName("IconBox")
   if l_12_3 then
      l_12_1.Position.x = 60
      l_12_4._visible = true
      l_12_5:SetTextureRef(UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].Texture)
      local c = UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].IconWidth / UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].TextureWidth
      local c2 = UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].IconHeight / UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].TextureHeight
      l_12_5.TextureCoords:set(0, 0, c, c2)
      l_12_5.Size.width = UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].IconWidth
      l_12_5.Size.height = UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].IconHeight
      l_12_5.Position.x = (l_12_6.Size.width - l_12_5.Size.width) / 2
      l_12_5.Position.y = l_12_6.Position.y - (l_12_6.Size.height - l_12_5.Size.height) / 2
   else
      l_12_1.Position.x = 0
      l_12_4._visible = false
   end
   local l_12_7 = l_12_0.Namespace:FindName("CheckboxComponent")
   if UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].CheckboxVisible then
      l_12_7._visible = true
      local l_12_8 = false
      if _config_os == "windowsmobile" then
        l_12_8 = _application.Store:GetIntValue(Lifetime_Permanent, UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].StoreKey) ~= 0
      end        
      if UpdatesAndData_MapSettingsItemUI[l_12_0.Tag.Data].ReverseCheckbox then
         l_12_8 = not l_12_8
      end
      InitializeCheckbox(l_12_7, l_12_8)
   else
      l_12_7._visible = false
   end
   FreeUnusedAssets(l_12_0, true, false, l_12_3, false, false, false, true)
   if UpdatesAndData_HandleItemCreated_Operator ~= nil then
      UpdatesAndData_HandleItemCreated_Operator(l_12_0)
   end
end

UpdatesAndData_HandleItemCreated = function(l_13_0, l_13_1)
   l_13_1.Tag = {}
   l_13_1.Tag.Data = l_13_0
   UpdatesAndData_MapVisibleElements[UpdatesAndData_MapSettingsItemUI[l_13_0]] = l_13_1
   l_13_1.Focusable = true
   l_13_1.OnSelected:connect(UpdatesAndData_ItemSelectedFunc)
   l_13_1.OnDeselected:connect(UpdatesAndData_ItemDeselectedFunc)
   l_13_1.onKeyDown:connect(UpdatesAndData_HandleKeyDown)
   UpdatesAndData_InitializeListviewItem(l_13_1)
end

UpdatesAndData_HandleItemDestroyed = function(l_14_0)
   UpdatesAndData_MapVisibleElements[UpdatesAndData_MapSettingsItemUI[l_14_0.Tag.Data]] = nil
   l_14_0.onKeyDown:disconnect(UpdatesAndData_HandleKeyDown)
   l_14_0.OnSelected:disconnect(UpdatesAndData_ItemSelectedFunc)
   l_14_0.OnDeselected:disconnect(UpdatesAndData_ItemDeselectedFunc)
end

UpdatesAndData_CompareItems = function(l_15_0, l_15_1)
   return 0
end

UpdatesAndData_DoneSoftkeyCallback = function()
   _application.Navigation:NavigateBack()
end

UpdatesAndData_OnStoreValueChanged = function()
   trace("reg key changed\n")
   local l_17_0 = UpdatesAndDataListView:GetGenerator():GetItem(0)
   UpdatesAndData_InitializeListviewItem(l_17_0)
   l_17_0 = UpdatesAndDataListView:GetGenerator():GetItem(1)
end

UpdatesAndData_PageCreate = function()
   AutoDownloadDataUI = UpdatesAndDataSettingsItemUI("[[IDS_DOWNLOADDATAAUTO]]", true, nil, nil, nil, nil, nil, "Data.AutoDownloadOff", true)
   DownloadWhenRoamingUI = UpdatesAndDataSettingsItemUI("[[IDS_DOWNLOADDATAWHENROAMING]]", true, nil, nil, nil, nil, nil, "Data.DownloadWhenRoaming", false)
   UpdatesAndData_MapSettingsItemUI = {[0] = AutoDownloadDataUI, [1] = DownloadWhenRoamingUI}
   UpdatesAndData_ItemListLayout = SequentialLayout()
   UpdatesAndData_ItemListLayout:SetItemSize(480, 80, 0)
   UpdatesAndData_ItemListLayout.DisableVirtualization = false
   UpdatesAndDataListView:SetLayout(UpdatesAndData_ItemListLayout)
   UpdatesAndDataCollection = VectorNotifyint()
   for i = 0, 1 do
      UpdatesAndDataCollection:push_back(i)
   end
   UpdatesAndData_ItemListGenerator = SequentialLibraryGeneratorint(UpdatesAndDataCollection, UpdatesAndDataListView:GetMovie(), UpdatesAndDataListView.ComponentLibraryName, UpdatesAndDataListView.ComponentLibraryID)
   UpdatesAndData_ItemListGenerator.GroupFunction:connect(UpdatesAndData_CompareItems)
   UpdatesAndData_ItemListGenerator.ItemCreated:connect(UpdatesAndData_HandleItemCreated)
   UpdatesAndData_ItemListGenerator.ItemDestroyed:connect(UpdatesAndData_HandleItemDestroyed)
   UpdatesAndData_ItemListGenerator.RecycleItems = true
   UpdatesAndDataListView:SetGenerator(UpdatesAndData_ItemListGenerator)
   UpdatesAndDataListView.onMouseDown:connect(UpdatesAndData_HandleMouseDown)
   UpdatesAndDataListView.onMouseUp:connect(UpdatesAndData_HandleMouseRelease)
   UpdatesAndDataListView:Focus()
   if _config_os == "windowsmobile" then
      _application:SetLeftSoftkey(Softkey(Locale:GetString("IDS_BACK"), UpdatesAndData_DoneSoftkeyCallback))
      _application:SetRightSoftkey(Softkey("", nil))
   end
end

if _application.Store:GetStringValue(Lifetime_Permanent, "EnableLandscape") == "true" then
   require("Settings\\SettingsPage_Landscape")
   _UpdatesAndDataPage_ScreenRotation = SettingsPage_ScreenRotation(UpdatesAndDataListView, Camera_2D, Camera_3D, Mask)
end
UpdatesAndData_PageCreate()