FReport_Gen add option Send report to pastebin.com

i-nex · Feb 13, 2012 · 0cf58ab · 0cf58ab
1 parent 5121464
commit 0cf58ab
Show file tree

Hide file tree

Showing 6 changed files with 97 additions and 35 deletions.
diff --git a/src/i-nex/.lang/.pot b/src/i-nex/.lang/.pot
@@ -18,7 +18,7 @@ msgstr ""
 msgid "About"
 msgstr ""
 
-#: About.form:45 FReport_Gen.form:60 Finfosys.form:1829
+#: About.form:45 FReport_Gen.form:65 Finfosys.form:1829
 msgid "Close"
 msgstr ""
 
@@ -114,54 +114,62 @@ msgstr ""
 msgid "I-Nex Home page"
 msgstr ""
 
-#: FReport_Gen.form:27
+#: FReport_Gen.form:32
 msgid "Generate report"
 msgstr ""
 
-#: FReport_Gen.form:51
+#: FReport_Gen.form:56
 msgid "Generate"
 msgstr ""
 
-#: FReport_Gen.form:71
+#: FReport_Gen.form:76
 msgid "CPU Tab"
 msgstr ""
 
-#: FReport_Gen.form:77
+#: FReport_Gen.form:82
 msgid "Motherboard / Bios Tab"
 msgstr ""
 
-#: FReport_Gen.form:83
+#: FReport_Gen.form:88
 msgid "Sound Tab"
 msgstr ""
 
-#: FReport_Gen.form:89
+#: FReport_Gen.form:94
 msgid "Graphics Tab"
 msgstr ""
 
-#: FReport_Gen.form:95
+#: FReport_Gen.form:100
 msgid "System Tab"
 msgstr ""
 
-#: FReport_Gen.form:105
+#: FReport_Gen.form:110
 msgid "Include lspci"
 msgstr ""
 
-#: FReport_Gen.form:111
+#: FReport_Gen.form:116
 msgid "Include lsusb"
 msgstr ""
 
-#: FReport_Gen.form:117
+#: FReport_Gen.form:122
 msgid "Include /proc/scsi/scsi"
 msgstr ""
 
-#: FReport_Gen.form:123
+#: FReport_Gen.form:128
 msgid "Include dmesg"
 msgstr ""
 
-#: FReport_Gen.form:129
+#: FReport_Gen.form:134
 msgid "Include unity support test"
 msgstr ""
 
+#: FReport_Gen.form:156
+msgid "Send report to pastebin.com   "
+msgstr ""
+
+#: FReport_Gen.form:168
+msgid "Open link in default web browser"
+msgstr ""
+
 #: Finfosys.form:268
 msgid "CPU"
 msgstr ""

diff --git a/src/i-nex/.lang/FReport_Gen.pot b/src/i-nex/.lang/FReport_Gen.pot
@@ -14,55 +14,63 @@ msgstr ""
 "Content-Type: text/plain; charset=UTF-8\n"
 "Content-Transfer-Encoding: 8bit\n"
 
-#: FReport_Gen.form:27
+#: FReport_Gen.form:32
 msgid "Generate report"
 msgstr ""
 
-#: FReport_Gen.form:51
+#: FReport_Gen.form:56
 msgid "Generate"
 msgstr ""
 
-#: FReport_Gen.form:60
+#: FReport_Gen.form:65
 msgid "Close"
 msgstr ""
 
-#: FReport_Gen.form:71
+#: FReport_Gen.form:76
 msgid "CPU Tab"
 msgstr ""
 
-#: FReport_Gen.form:77
+#: FReport_Gen.form:82
 msgid "Motherboard / Bios Tab"
 msgstr ""
 
-#: FReport_Gen.form:83
+#: FReport_Gen.form:88
 msgid "Sound Tab"
 msgstr ""
 
-#: FReport_Gen.form:89
+#: FReport_Gen.form:94
 msgid "Graphics Tab"
 msgstr ""
 
-#: FReport_Gen.form:95
+#: FReport_Gen.form:100
 msgid "System Tab"
 msgstr ""
 
-#: FReport_Gen.form:105
+#: FReport_Gen.form:110
 msgid "Include lspci"
 msgstr ""
 
-#: FReport_Gen.form:111
+#: FReport_Gen.form:116
 msgid "Include lsusb"
 msgstr ""
 
-#: FReport_Gen.form:117
+#: FReport_Gen.form:122
 msgid "Include /proc/scsi/scsi"
 msgstr ""
 
-#: FReport_Gen.form:123
+#: FReport_Gen.form:128
 msgid "Include dmesg"
 msgstr ""
 
-#: FReport_Gen.form:129
+#: FReport_Gen.form:134
 msgid "Include unity support test"
 msgstr ""
 
+#: FReport_Gen.form:156
+msgid "Send report to pastebin.com   "
+msgstr ""
+
+#: FReport_Gen.form:168
+msgid "Open link in default web browser"
+msgstr ""
+
diff --git a/src/i-nex/.settings b/src/i-nex/.settings
@@ -17,7 +17,6 @@ SearchString=True
 [OpenFile]
 File[1]=".src/Finfosys.form"
 File[2]=".src/Finfosys.class:581.0"
-Active=3
 File[3]=".src/Global.class:111.36"
 File[4]=".src/About.form"
 File[5]=".src/About.class:63.30"
@@ -31,9 +30,10 @@ File[12]=".src/USB_Drives.module:28.30"
 File[13]=".src/Asound_Drives.module:36.32"
 File[14]=".src/HWmon_coretemp.module:3.18"
 File[15]=".src/Input_Devices.module:36.27"
-File[16]=".src/Reportm.module:337.3"
+File[16]=".src/Reportm.module:343.34"
 File[17]=".src/FReport_Gen.form"
-File[18]=".src/FReport_Gen.class:5.47"
+Active=18
+File[18]=".src/FReport_Gen.class:55.95"
 File[19]=".src/Start_App_Args.form"
 File[20]=".src/Start_App_Args.class:3.25"
 File[21]=".src/ChkPrm.module:7.48"

diff --git a/src/i-nex/.src/FReport_Gen.class b/src/i-nex/.src/FReport_Gen.class
@@ -20,11 +20,14 @@ Public Sub Button1_Click()
  Reportm._generate(CheckBox1.Value, CheckBox2.Value, CheckBox3.Value, CheckBox4.Value, ButtonBox1.Text)
  Reportm.desktop_support(CheckBox10.Value, ButtonBox1.Text)
  Reportm.include(CheckBox6.Value, CheckBox7.Value, CheckBox8.Value, CheckBox9.Value, ButtonBox1.Text)
+ TextBox1.Text = Reportm.pastebin(CheckBox11.Value, ButtonBox1.Text)
  Endif
  If (Application.Args[1] = "--gen_report") Then
   Finfosys.Close
  Endif
+ If CheckBox11.Value = False Then
  Try Me.Close
+ Endif
 End
 
 Public Sub ButtonBox1_Click()
@@ -43,4 +46,15 @@ Public Sub Button2_Click()
  Endif
  Me.Close
 
-End
+End
+
+Public Sub Button3_Click()
+ If TextBox1.Text Like "*http*" Then
+  Desktop.Open(TextBox1.Text)
+ Else 
+  Debug "Pastebin link not detect"
+  Message.Warning("Please select the Send to pastebin and then click on the  generate button.\nThis will take you to pastebin site. ")
+ Endif
+
+
+End
diff --git a/src/i-nex/.src/FReport_Gen.form b/src/i-nex/.src/FReport_Gen.form
@@ -35,7 +35,7 @@
     }
   }
   { HPanel1 HPanel
-    Move(6,6,210,180)
+    Move(6,6,210,144)
     { CheckBox1 CheckBox
       Move(0,0,156,24)
       Expand = True
@@ -63,7 +63,7 @@
     }
   }
   { HPanel2 HPanel
-    Move(222,6,210,180)
+    Move(222,6,210,144)
     { CheckBox6 CheckBox
       Move(0,0,144,24)
       Expand = True
@@ -91,9 +91,30 @@
     }
   }
   { Separator1 Separator
-    Move(216,0,6,192)
+    Move(216,0,6,150)
   }
   { Separator2 Separator
-    Move(6,186,426,12)
+    Move(0,186,438,12)
+  }
+  { Separator3 Separator
+    Move(0,150,438,12)
+  }
+  { HBox2 HBox
+    Move(6,162,396,24)
+    { CheckBox11 CheckBox
+      Move(0,0,144,24)
+      AutoResize = True
+      Text = ("Send report to pastebin.com   ")
+    }
+    { TextBox1 TextBox
+      Move(180,0,144,24)
+      Expand = True
+      ReadOnly = True
+    }
+  }
+  { Button3 Button
+    Move(408,162,24,24)
+    ToolTip = ("Open link in default web browser")
+    Picture = Picture["icon:/16/network"]
   }
 }
diff --git a/src/i-nex/.src/Reportm.module b/src/i-nex/.src/Reportm.module
@@ -335,4 +335,15 @@ Public Sub desktop_support(unity As Boolean, save_dir As String)
   PBV(1)
   TextInfo("Include Unity Support Test... ... ... ... Done")
   Endif
-End
+End
+
+Public Function pastebin(Send As Boolean, Directory As String) As String
+  Dim links As String
+  If Send = True Then
+  Shell "cat " & Directory & " | /usr/share/i-nex/pastebin -t text" Wait To links
+  links = Replace(links, "\n", "")
+  Return links
+  Else
+  Debug "Report not be send to pastebin.com"
+  Endif
+End