Add Validate Service

src/i-nex/.project

@@ -4,7 +4,6 @@ Title=I-Nex
 Startup=Start_App_Args
 Icon=logo/i-nex.0.4.x.png
 Version=0.6.4
-VersionFile=1
 Component=gb.image
 Component=gb.qt4
 Component=gb.form

src/i-nex/.settings

@@ -24,32 +24,31 @@ SearchComment=False
 SearchString=True
 
 [OpenFile]
-Active=1
 File[1]=".src/Finfosys.form"
-File[2]=".src/Global.class:183.77"
+File[2]=".src/Global.class:204.27"
 File[3]=".src/About.form"
 File[4]=".src/About.class:26.46"
 File[5]=".src/battery.module:15.70"
-File[6]=".src/Disk_Drives.module:141.54"
+File[6]=".src/Disk_Drives.module:19.29"
 File[7]=".src/ScreenShot.form"
-File[8]=".src/ScreenShot.class:15.70"
-File[9]=".src/ScreenShotM.module:15.70"
+File[8]=".src/ScreenShot.class:30.42"
+File[9]=".src/ScreenShotM.module:18.0"
 File[10]=".src/USB_Drives.module:15.70"
 File[11]=".src/Asound_Drives.module:43.3"
 File[12]=".src/FReport_Gen.form"
-File[13]=".src/FReport_Gen.class:15.70"
+File[13]=".src/FReport_Gen.class:158.33"
 File[14]=".src/Start_App_Args.form"
 File[15]=".src/Start_App_Args.class:15.70"
 File[16]=".src/ChkPrm.module:15.70"
 File[17]=".src/thermal_zone.module:67.10"
 File[18]=".src/FModules.form"
 File[19]=".src/FModules.class:15.70"
 File[20]=".src/Input_Devices.module:15.70"
-File[21]=".src/net.module:15.70"
+File[21]=".src/Network.module:15.70"
 File[22]="Data/report-ng.sh:5.3"
-File[23]=".src/Distribution_Detect.module:15.70"
-File[24]=".src/FFlags.module:70.19"
-File[25]=".src/Finfosys.class:719.0"
+File[23]=".src/Distribution_Detect.module:54.74"
+File[24]=".src/FFlags.module:19.14"
+File[25]=".src/Finfosys.class:504.44"
 File[26]=".src/FDF.form"
 File[27]=".src/FDF.class:15.70"
 File[28]=".src/FNET_R_T.form"
@@ -58,38 +57,42 @@ File[30]=".src/FGraphic.module:15.70"
 File[31]=".src/FCPU.module:15.70"
 File[32]=".src/FUdisks.form"
 File[33]=".src/FUdisks.class:15.70"
-File[34]=".src/FCpudb.module:15.70"
-File[35]=".src/JSON.module:109.7"
-File[36]=".src/Settings.class:15.70"
-File[37]=".src/Main.module:15.70"
+File[34]=".src/FCpudb.module:69.34"
+File[35]=".src/JSON.module:194.20"
+File[36]=".src/Settings.class:486.2"
+File[37]=".src/Main.module:27.38"
 File[38]=".src/_Settings_Keys.class:15.70"
 File[39]=".src/FDirDialog.form"
 File[40]=".src/FFileDialog.form"
 File[41]=".src/Dialog.class:15.70"
 File[42]=".src/Mdecode.module:15.70"
-File[43]=".src/Reports/MCPU_REPORT.module:48.53"
+File[43]=".src/Reports/MCPU_REPORT.module:15.17"
 File[44]=".src/Reports/MMOBO_REPORT.module:20.60"
-File[45]=".src/Reports/MGPU_REPORT.module:24.35"
+File[45]=".src/Reports/MGPU_REPORT.module:55.0"
 File[46]=".src/Reports/MSOUND_REPORT.module:13.14"
 File[47]=".src/Reports/MPastebinit.module:22.35"
-File[48]=".src/Reports/MSYSTEM_REPORT.module:39.1"
+File[48]=".src/Reports/MSYSTEM_REPORT.module:3.29"
 File[49]=".src/Reports/MKERNEL_REPORT.module:19.1"
 File[50]=".src/Reports/MInclude.module:72.15"
-File[51]=".src/Reports/MDRIVES_REPORT.module:12.40"
+File[51]=".src/Reports/MDRIVES_REPORT.module:7.0"
 File[52]=".src/FInputDate.form"
-File[53]=".src/MInit.module:15.70"
+File[53]=".src/MInit.module:48.32"
 File[54]=".src/FEDID.form"
-File[55]=".src/FEDID.class:15.70"
+File[55]=".src/FEDID.class:44.17"
 File[56]=".src/Logger.class:15.70"
 File[57]=".src/Formatter.module:15.70"
 File[58]=".src/FDirDialog.class:15.70"
-File[59]=".src/FFileDialog.class:15.70"
+File[59]=".src/FFileDialog.class:99.2"
 File[60]=".src/FInputDate.class:15.70"
 File[61]=".src/FDIMM.form"
 File[62]=".src/FDIMM.class:15.70"
-File[63]=".src/Reports/FCPUID_REPORT.module:2.0"
-File[64]=".src/MCPUSAGE.module:31.0"
-Count=64
+File[63]=".src/Reports/FCPUID_REPORT.module:28.92"
+File[64]=".src/MCPUSAGE.module:9.65"
+File[65]=".src/Reports/VALIDATE.module:124.37"
+Active=66
+File[66]=".src/FValidate.form"
+File[67]=".src/FValidate.class:29.0"
+Count=67
 
 [Watches]
 Count=0

src/i-nex/.src/Distribution_Detect.module

@@ -53,6 +53,7 @@ Public Sub _inits()
 
  If DV Like "*Ubuntu*" And DE Like "*KDE*" Then
   Finfosys.PictureBox2.Picture = Picture["Database/Distlogos/kubuntu.png"]
+  Finfosys.PictureBox2.Name = "kubuntu.png"
  Endif
  If DV Like "*Ubuntu*" And DE Like "*XFCE*" Then
   Finfosys.PictureBox2.Picture = Picture["Database/Distlogos/xubuntu.png"]

src/i-nex/.src/FCpudb.module

@@ -70,7 +70,7 @@ Public Sub _inits()
   cpucache = Replace(Replace(Replace(cpucache, "Triple", ""), "Six", ""), "Quad", "")
   For z = 0 To database["DATABASE"].Count - 1
     If database["DATABASE"][z]["PROCESSOR_MODEL_NAME"] Like "*" & cpucache & "*" Then 
-
+      Finfosys.PictureBox3.Name = database["DATABASE"][z]["PROCESSOR_SOCKET_IMAGE"]
       Finfosys.PictureBox3.Picture = Picture["Database/Logos/" & database["DATABASE"][z]["PROCESSOR_SOCKET_IMAGE"] & ""]
       Finfosys.Label103.Text = " Integrated GPU: " & database["DATABASE"][z]["PROCESSOR_INTEGRATEDGRAPHIC"]
       Finfosys.Label104.Text = " TDP: " & database["DATABASE"][z]["PROCESSOR_TDP"]

src/i-nex/.src/FValidate.class

@@ -0,0 +1,33 @@
+' Gambas class file
+
+
+Public Sub Form_Open()
+
+  If Settings["Window/X"] = Null Then
+     Me.Center
+  Else
+     Try Me.X = (Settings["Window/X", Me.X] - 45)
+     Try Me.Y = (Settings["Window/Y", Me.Y] + 200)
+  Endif
+  Try TextBox1.Text = Settings["Cerbero/USERNAME"]
+  Try TextBox2.Text = Settings["Cerbero/API"]
+End
+
+Public Sub Button3_Click()
+
+ Me.Close
+
+End
+
+Public Sub Button2_Click()
+
+ Settings["Cerbero/USERNAME"] = TextBox1.Text
+ Settings["Cerbero/API"] = TextBox2.Text
+ TextBox3.Text = VALIDATE.SendReportToServer(User.Home & "/.i-nex/VALID", "Validate", "http://i-nex.pl/", TextBox1.Text, TextBox2.Text)
+End
+
+Public Sub Button1_Click()
+
+ Desktop.Open(TextBox3.Text)
+
+End

src/i-nex/.src/FValidate.form

@@ -0,0 +1,44 @@
+# Gambas Form File 3.0
+
+{ Form Form
+  MoveScaled(0,0,86,17)
+  Resizable = False
+  { TextBox1 TextBox
+    MoveScaled(16,1,69,4)
+  }
+  { TextBox2 TextBox
+    MoveScaled(16,5,69,4)
+  }
+  { Label1 Label
+    MoveScaled(1,1,15,4)
+    Font = Font["Bold,8"]
+    Text = ("Username:")
+  }
+  { Label2 Label
+    MoveScaled(1,5,15,4)
+    Font = Font["Bold,8"]
+    Text = ("Private API Key:")
+  }
+  { TextBox3 TextBox
+    MoveScaled(16,9,65,4)
+  }
+  { Button1 Button
+    MoveScaled(81,9,4,4)
+    Picture = Picture["AppIcons/applications-internet.png"]
+  }
+  { Button2 Button
+    MoveScaled(69,13,16,4)
+    Text = ("Send")
+    Picture = Picture["AppIcons/dialog-ok.png"]
+  }
+  { Label3 Label
+    MoveScaled(1,9,15,4)
+    Font = Font["Bold,8"]
+    Text = ("Link:")
+  }
+  { Button3 Button
+    MoveScaled(58,13,11,4)
+    Text = ("Close")
+    Picture = Picture["AppIcons/application-exit2.png"]
+  }
+}

src/i-nex/.src/Finfosys.class

@@ -29,7 +29,8 @@ Public Logs As New Logger
 Public GDF As String
 Public BUFFER As String
 Public DATAT As Collection
-
+Public UNAME As Collection
+Public USAGE As Collection
 Public Sub Form_Open()
   Dim default_display_manager As Boolean = Exist("/etc/X11/default-display-manager")
   Dim cpus As String
@@ -220,7 +221,7 @@ Public Sub Form_Open()
   Logs("Check for Input Drives", Logger.Info)
       Object.Call(Input_Devices, "_inits")
   Logs("Check available network devices", Logger.Info)
-      Object.Call(net, "inits")
+      Object.Call(nets, "inits")
   Logs("Check available graphic DSub, DVI etc", Logger.Info)
       Object.Call(FGraphic, "_inits")
   Logs("Call to Graphic", Logger.Info)
@@ -269,7 +270,6 @@ Public Sub kernel()
   Dim found_kernels, All_Kernels, for_add, Kernel_command_line As String
   Dim kernels, i As Integer
   Dim UNAME_DATA As String
-  Dim UNAME As Collection
   Try Exec ["/usr/bin/i-nex-uname"] Wait To UNAME_DATA
   Try UNAME = JSON.Decode(UNAME_DATA)
   Shell "ls /boot | grep 'vmlinuz*' | wc -l" Wait To All_Kernels
@@ -472,14 +472,13 @@ Public Sub Wykrywanie_procesorow()
 End
 
 Public Sub Button2_Click()
-   ScreenShotM.pic = Desktop.Screenshot(Me.X, Me.Y, Me.W + 4, Me.H + 30)
+   ScreenShotM.pic = Desktop.Screenshot(Me.X, Me.Y, Me.W + 12, Me.H + 30)
    ScreenShot.Show
 End
 
 Public Sub dospam_uptime()
   Dim Users As String
   Dim USAGE_BUFFER As String
-  Dim USAGE As Collection
   Shell "users | tr ' ' '\n' | wc -l" Wait To Users
   Exec [ChkPrm.ChkExecDir("i-nex-usage")] Wait To USAGE_BUFFER
   USAGE = JSON.Decode(USAGE_BUFFER)
@@ -725,10 +724,10 @@ Public Sub Button13_Click()
 End
 
 Public Sub ComboBox2_Click()
- net.get_informations_about_net_interface()
- TextBox56.Text = net.subsystem_device
- TextBox57.Text = net.subsystem_vendor
- TextArea4.Text = net.lspci
+ nets.get_informations_about_net_interface()
+ TextBox56.Text = nets.subsystem_device
+ TextBox57.Text = nets.subsystem_vendor
+ TextArea4.Text = nets.lspci
 End
 
 Public Sub Button8_Click()
@@ -912,3 +911,9 @@ Public Sub Form_Close()
   Me.Close
 
 End
+
+Public Sub Button17_Click()
+ VALIDATE._inits()
+ FValidate.Show
+
+End