├── Executable Decryptor UI.vbproj
├── Executable Decryptor UI.vbproj.user
├── Executable Decryptor UI_TemporaryKey.pfx
├── ExtraForm.Designer.vb
├── ExtraForm.resx
├── ExtraForm.vb
├── Form1.Designer.vb
├── Form1.resx
├── Form1.vb
├── FrontEndForSocat.vb
├── GearICON.ico
├── Logger.vb
├── README.md
└── packages.config


/Executable Decryptor UI.vbproj:
--------------------------------------------------------------------------------
  1 | <?xml version="1.0" encoding="utf-8"?>
  2 | <Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
  3 |   <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
  4 |   <PropertyGroup>
  5 |     <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
  6 |     <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
  7 |     <ProjectGuid>{2860CB3A-A918-455F-B825-0BCBD45E2648}</ProjectGuid>
  8 |     <OutputType>WinExe</OutputType>
  9 |     <StartupObject>Executable_Decryptor_UI.My.MyApplication</StartupObject>
 10 |     <RootNamespace>Executable_Decryptor_UI</RootNamespace>
 11 |     <AssemblyName>Executable Decryptor UI</AssemblyName>
 12 |     <FileAlignment>512</FileAlignment>
 13 |     <MyType>WindowsForms</MyType>
 14 |     <TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
 15 |     <AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
 16 |     <Deterministic>true</Deterministic>
 17 |     <IsWebBootstrapper>false</IsWebBootstrapper>
 18 |     <PublishUrl>publish\</PublishUrl>
 19 |     <Install>true</Install>
 20 |     <InstallFrom>Disk</InstallFrom>
 21 |     <UpdateEnabled>false</UpdateEnabled>
 22 |     <UpdateMode>Foreground</UpdateMode>
 23 |     <UpdateInterval>7</UpdateInterval>
 24 |     <UpdateIntervalUnits>Days</UpdateIntervalUnits>
 25 |     <UpdatePeriodically>false</UpdatePeriodically>
 26 |     <UpdateRequired>false</UpdateRequired>
 27 |     <MapFileExtensions>false</MapFileExtensions>
 28 |     <ApplicationRevision>0</ApplicationRevision>
 29 |     <ApplicationVersion>1.0.0.%2a</ApplicationVersion>
 30 |     <UseApplicationTrust>false</UseApplicationTrust>
 31 |     <PublishWizardCompleted>true</PublishWizardCompleted>
 32 |     <BootstrapperEnabled>true</BootstrapperEnabled>
 33 |   </PropertyGroup>
 34 |   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
 35 |     <PlatformTarget>AnyCPU</PlatformTarget>
 36 |     <DebugSymbols>true</DebugSymbols>
 37 |     <DebugType>full</DebugType>
 38 |     <DefineDebug>true</DefineDebug>
 39 |     <DefineTrace>true</DefineTrace>
 40 |     <OutputPath>bin\Debug\</OutputPath>
 41 |     <DocumentationFile>Executable Decryptor UI.xml</DocumentationFile>
 42 |     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
 43 |   </PropertyGroup>
 44 |   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
 45 |     <PlatformTarget>AnyCPU</PlatformTarget>
 46 |     <DebugType>pdbonly</DebugType>
 47 |     <DefineDebug>false</DefineDebug>
 48 |     <DefineTrace>true</DefineTrace>
 49 |     <Optimize>true</Optimize>
 50 |     <OutputPath>bin\Release\</OutputPath>
 51 |     <DocumentationFile>Executable Decryptor UI.xml</DocumentationFile>
 52 |     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
 53 |   </PropertyGroup>
 54 |   <PropertyGroup>
 55 |     <OptionExplicit>On</OptionExplicit>
 56 |   </PropertyGroup>
 57 |   <PropertyGroup>
 58 |     <OptionCompare>Binary</OptionCompare>
 59 |   </PropertyGroup>
 60 |   <PropertyGroup>
 61 |     <OptionStrict>Off</OptionStrict>
 62 |   </PropertyGroup>
 63 |   <PropertyGroup>
 64 |     <OptionInfer>On</OptionInfer>
 65 |   </PropertyGroup>
 66 |   <PropertyGroup>
 67 |     <ApplicationIcon>GearICON.ico</ApplicationIcon>
 68 |   </PropertyGroup>
 69 |   <PropertyGroup>
 70 |     <ManifestCertificateThumbprint>FDB6BCCC13FBDD67B708576A8B61289C09FBABCA</ManifestCertificateThumbprint>
 71 |   </PropertyGroup>
 72 |   <PropertyGroup>
 73 |     <ManifestKeyFile>Executable Decryptor UI_TemporaryKey.pfx</ManifestKeyFile>
 74 |   </PropertyGroup>
 75 |   <PropertyGroup>
 76 |     <GenerateManifests>true</GenerateManifests>
 77 |   </PropertyGroup>
 78 |   <PropertyGroup>
 79 |     <SignManifests>true</SignManifests>
 80 |   </PropertyGroup>
 81 |   <ItemGroup>
 82 |     <Reference Include="HtmlAgilityPack, Version=1.11.57.0, Culture=neutral, PublicKeyToken=bd319b19eaf3b43a, processorArchitecture=MSIL">
 83 |       <HintPath>..\packages\HtmlAgilityPack.1.11.57\lib\Net45\HtmlAgilityPack.dll</HintPath>
 84 |     </Reference>
 85 |     <Reference Include="Microsoft.Bcl.AsyncInterfaces, Version=5.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
 86 |       <HintPath>..\packages\Microsoft.Bcl.AsyncInterfaces.5.0.0\lib\net461\Microsoft.Bcl.AsyncInterfaces.dll</HintPath>
 87 |     </Reference>
 88 |     <Reference Include="netstandard, Version=2.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51" />
 89 |     <Reference Include="SharpCompress, Version=0.35.0.0, Culture=neutral, PublicKeyToken=afb0a02973931d96, processorArchitecture=MSIL">
 90 |       <HintPath>..\packages\SharpCompress.0.35.0\lib\netstandard2.0\SharpCompress.dll</HintPath>
 91 |     </Reference>
 92 |     <Reference Include="System" />
 93 |     <Reference Include="System.Buffers, Version=4.0.3.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
 94 |       <HintPath>..\packages\System.Buffers.4.5.1\lib\net461\System.Buffers.dll</HintPath>
 95 |     </Reference>
 96 |     <Reference Include="System.Data" />
 97 |     <Reference Include="System.Deployment" />
 98 |     <Reference Include="System.Drawing" />
 99 |     <Reference Include="System.Memory, Version=4.0.1.2, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
100 |       <HintPath>..\packages\System.Memory.4.5.5\lib\net461\System.Memory.dll</HintPath>
101 |     </Reference>
102 |     <Reference Include="System.Numerics" />
103 |     <Reference Include="System.Numerics.Vectors, Version=4.1.4.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
104 |       <HintPath>..\packages\System.Numerics.Vectors.4.5.0\lib\net46\System.Numerics.Vectors.dll</HintPath>
105 |     </Reference>
106 |     <Reference Include="System.Runtime.CompilerServices.Unsafe, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
107 |       <HintPath>..\packages\System.Runtime.CompilerServices.Unsafe.6.0.0\lib\net461\System.Runtime.CompilerServices.Unsafe.dll</HintPath>
108 |     </Reference>
109 |     <Reference Include="System.Text.Encoding.CodePages, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
110 |       <HintPath>..\packages\System.Text.Encoding.CodePages.8.0.0\lib\netstandard2.0\System.Text.Encoding.CodePages.dll</HintPath>
111 |     </Reference>
112 |     <Reference Include="System.Threading.Tasks.Extensions, Version=4.2.0.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
113 |       <HintPath>..\packages\System.Threading.Tasks.Extensions.4.5.4\lib\net461\System.Threading.Tasks.Extensions.dll</HintPath>
114 |     </Reference>
115 |     <Reference Include="System.Windows.Forms" />
116 |     <Reference Include="System.Xml" />
117 |     <Reference Include="System.Core" />
118 |     <Reference Include="System.Xml.Linq" />
119 |     <Reference Include="System.Data.DataSetExtensions" />
120 |     <Reference Include="System.Net.Http" />
121 |     <Reference Include="ZstdSharp, Version=0.7.4.0, Culture=neutral, PublicKeyToken=8d151af33a4ad5cf, processorArchitecture=MSIL">
122 |       <HintPath>..\packages\ZstdSharp.Port.0.7.4\lib\netstandard2.0\ZstdSharp.dll</HintPath>
123 |     </Reference>
124 |   </ItemGroup>
125 |   <ItemGroup>
126 |     <Import Include="Microsoft.VisualBasic" />
127 |     <Import Include="System" />
128 |     <Import Include="System.Collections" />
129 |     <Import Include="System.Collections.Generic" />
130 |     <Import Include="System.Data" />
131 |     <Import Include="System.Drawing" />
132 |     <Import Include="System.Diagnostics" />
133 |     <Import Include="System.Windows.Forms" />
134 |     <Import Include="System.Linq" />
135 |     <Import Include="System.Xml.Linq" />
136 |     <Import Include="System.Threading.Tasks" />
137 |   </ItemGroup>
138 |   <ItemGroup>
139 |     <Compile Include="ExtraForm.Designer.vb">
140 |       <DependentUpon>ExtraForm.vb</DependentUpon>
141 |     </Compile>
142 |     <Compile Include="ExtraForm.vb">
143 |       <SubType>Form</SubType>
144 |     </Compile>
145 |     <Compile Include="Form1.vb">
146 |       <SubType>Form</SubType>
147 |     </Compile>
148 |     <Compile Include="Form1.Designer.vb">
149 |       <DependentUpon>Form1.vb</DependentUpon>
150 |       <SubType>Form</SubType>
151 |     </Compile>
152 |     <Compile Include="FrontEndForSocat.vb" />
153 |     <Compile Include="Logger.vb" />
154 |     <Compile Include="My Project\AssemblyInfo.vb" />
155 |     <Compile Include="My Project\Application.Designer.vb">
156 |       <AutoGen>True</AutoGen>
157 |       <DependentUpon>Application.myapp</DependentUpon>
158 |     </Compile>
159 |     <Compile Include="My Project\Resources.Designer.vb">
160 |       <AutoGen>True</AutoGen>
161 |       <DesignTime>True</DesignTime>
162 |       <DependentUpon>Resources.resx</DependentUpon>
163 |     </Compile>
164 |     <Compile Include="My Project\Settings.Designer.vb">
165 |       <AutoGen>True</AutoGen>
166 |       <DependentUpon>Settings.settings</DependentUpon>
167 |       <DesignTimeSharedInput>True</DesignTimeSharedInput>
168 |     </Compile>
169 |     <Compile Include="payload\CommonModules.vb" />
170 |     <Compile Include="payload\PayloadV2.vb" />
171 |     <Compile Include="payload\UpdChecker.vb" />
172 |   </ItemGroup>
173 |   <ItemGroup>
174 |     <EmbeddedResource Include="ExtraForm.resx">
175 |       <DependentUpon>ExtraForm.vb</DependentUpon>
176 |     </EmbeddedResource>
177 |     <EmbeddedResource Include="Form1.resx">
178 |       <DependentUpon>Form1.vb</DependentUpon>
179 |     </EmbeddedResource>
180 |     <EmbeddedResource Include="My Project\Resources.resx">
181 |       <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
182 |       <LastGenOutput>Resources.Designer.vb</LastGenOutput>
183 |       <CustomToolNamespace>My.Resources</CustomToolNamespace>
184 |       <SubType>Designer</SubType>
185 |     </EmbeddedResource>
186 |   </ItemGroup>
187 |   <ItemGroup>
188 |     <None Include="Executable Decryptor UI_TemporaryKey.pfx" />
189 |     <None Include="My Project\Application.myapp">
190 |       <Generator>MyApplicationCodeGenerator</Generator>
191 |       <LastGenOutput>Application.Designer.vb</LastGenOutput>
192 |     </None>
193 |     <None Include="My Project\Settings.settings">
194 |       <Generator>SettingsSingleFileGenerator</Generator>
195 |       <CustomToolNamespace>My</CustomToolNamespace>
196 |       <LastGenOutput>Settings.Designer.vb</LastGenOutput>
197 |     </None>
198 |     <None Include="App.config" />
199 |     <None Include="packages.config" />
200 |   </ItemGroup>
201 |   <ItemGroup>
202 |     <BootstrapperPackage Include=".NETFramework,Version=v4.6.1">
203 |       <Visible>False</Visible>
204 |       <ProductName>Microsoft .NET Framework 4.6.1 %28x86 and x64%29</ProductName>
205 |       <Install>true</Install>
206 |     </BootstrapperPackage>
207 |     <BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
208 |       <Visible>False</Visible>
209 |       <ProductName>.NET Framework 3.5 SP1</ProductName>
210 |       <Install>false</Install>
211 |     </BootstrapperPackage>
212 |   </ItemGroup>
213 |   <ItemGroup>
214 |     <Content Include="GearICON.ico" />
215 |     <None Include="Resources\input_circle_FILL0_wght400_GRAD0_opsz24.png" />
216 |     <None Include="Resources\counter_2_FILL0_wght400_GRAD0_opsz24.png" />
217 |     <None Include="Resources\counter_1_FILL0_wght400_GRAD0_opsz24.png" />
218 |     <None Include="Resources\settings_FILL0_wght400_GRAD0_opsz24.png" />
219 |     <None Include="Resources\rule_folder_FILL0_wght400_GRAD0_opsz24.png" />
220 |   </ItemGroup>
221 |   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
222 | </Project>


--------------------------------------------------------------------------------
/Executable Decryptor UI.vbproj.user:
--------------------------------------------------------------------------------
 1 | <?xml version="1.0" encoding="utf-8"?>
 2 | <Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
 3 |   <PropertyGroup>
 4 |     <PublishUrlHistory>publish\</PublishUrlHistory>
 5 |     <InstallUrlHistory />
 6 |     <SupportUrlHistory />
 7 |     <UpdateUrlHistory />
 8 |     <BootstrapperUrlHistory />
 9 |     <ErrorReportUrlHistory />
10 |     <FallbackCulture>en-US</FallbackCulture>
11 |     <VerifyUploadedFiles>false</VerifyUploadedFiles>
12 |   </PropertyGroup>
13 | </Project>


--------------------------------------------------------------------------------
/Executable Decryptor UI_TemporaryKey.pfx:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/rajeshca911/Executable-Decryptor-UI/ac7502dc4ab0348c83d39b83cc04946468cdd22c/Executable Decryptor UI_TemporaryKey.pfx


--------------------------------------------------------------------------------
/ExtraForm.Designer.vb:
--------------------------------------------------------------------------------
  1 | <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
  2 | Partial Class ExtraForm
  3 |     Inherits System.Windows.Forms.Form
  4 | 
  5 |     'Form overrides dispose to clean up the component list.
  6 |     <System.Diagnostics.DebuggerNonUserCode()> _
  7 |     Protected Overrides Sub Dispose(ByVal disposing As Boolean)
  8 |         Try
  9 |             If disposing AndAlso components IsNot Nothing Then
 10 |                 components.Dispose()
 11 |             End If
 12 |         Finally
 13 |             MyBase.Dispose(disposing)
 14 |         End Try
 15 |     End Sub
 16 | 
 17 |     'Required by the Windows Form Designer
 18 |     Private components As System.ComponentModel.IContainer
 19 | 
 20 |     'NOTE: The following procedure is required by the Windows Form Designer
 21 |     'It can be modified using the Windows Form Designer.  
 22 |     'Do not modify it using the code editor.
 23 |     <System.Diagnostics.DebuggerStepThrough()> _
 24 |     Private Sub InitializeComponent()
 25 |         Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
 26 |         Me.Button4 = New System.Windows.Forms.Button()
 27 |         Me.Button3 = New System.Windows.Forms.Button()
 28 |         Me.TxtPython = New System.Windows.Forms.TextBox()
 29 |         Me.Label4 = New System.Windows.Forms.Label()
 30 |         Me.IpTextBox = New System.Windows.Forms.TextBox()
 31 |         Me.Label3 = New System.Windows.Forms.Label()
 32 |         Me.BtnSave = New System.Windows.Forms.Button()
 33 |         Me.PayloadTxtbox = New System.Windows.Forms.TextBox()
 34 |         Me.Label2 = New System.Windows.Forms.Label()
 35 |         Me.Label1 = New System.Windows.Forms.Label()
 36 |         Me.PayloadportTxtbox = New System.Windows.Forms.TextBox()
 37 |         Me.statlabel = New System.Windows.Forms.Label()
 38 |         Me.Button2 = New System.Windows.Forms.Button()
 39 |         Me.Button1 = New System.Windows.Forms.Button()
 40 |         Me.TableLayoutPanel1.SuspendLayout()
 41 |         Me.SuspendLayout()
 42 |         '
 43 |         'TableLayoutPanel1
 44 |         '
 45 |         Me.TableLayoutPanel1.ColumnCount = 3
 46 |         Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 40.72848!))
 47 |         Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 59.27152!))
 48 |         Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 44.0!))
 49 |         Me.TableLayoutPanel1.Controls.Add(Me.Button4, 2, 3)
 50 |         Me.TableLayoutPanel1.Controls.Add(Me.Button3, 2, 2)
 51 |         Me.TableLayoutPanel1.Controls.Add(Me.TxtPython, 1, 3)
 52 |         Me.TableLayoutPanel1.Controls.Add(Me.Label4, 0, 3)
 53 |         Me.TableLayoutPanel1.Controls.Add(Me.IpTextBox, 1, 0)
 54 |         Me.TableLayoutPanel1.Controls.Add(Me.Label3, 0, 0)
 55 |         Me.TableLayoutPanel1.Controls.Add(Me.BtnSave, 1, 4)
 56 |         Me.TableLayoutPanel1.Controls.Add(Me.PayloadTxtbox, 1, 2)
 57 |         Me.TableLayoutPanel1.Controls.Add(Me.Label2, 0, 2)
 58 |         Me.TableLayoutPanel1.Controls.Add(Me.Label1, 0, 1)
 59 |         Me.TableLayoutPanel1.Controls.Add(Me.PayloadportTxtbox, 1, 1)
 60 |         Me.TableLayoutPanel1.Location = New System.Drawing.Point(12, 12)
 61 |         Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
 62 |         Me.TableLayoutPanel1.RowCount = 5
 63 |         Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 20.0!))
 64 |         Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 20.0!))
 65 |         Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 20.0!))
 66 |         Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 20.0!))
 67 |         Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 20.0!))
 68 |         Me.TableLayoutPanel1.Size = New System.Drawing.Size(326, 142)
 69 |         Me.TableLayoutPanel1.TabIndex = 0
 70 |         '
 71 |         'Button4
 72 |         '
 73 |         Me.Button4.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
 74 |         Me.Button4.Location = New System.Drawing.Point(284, 87)
 75 |         Me.Button4.Name = "Button4"
 76 |         Me.Button4.Size = New System.Drawing.Size(35, 22)
 77 |         Me.Button4.TabIndex = 7
 78 |         Me.Button4.Text = "..."
 79 |         Me.Button4.UseVisualStyleBackColor = True
 80 |         '
 81 |         'Button3
 82 |         '
 83 |         Me.Button3.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
 84 |         Me.Button3.Location = New System.Drawing.Point(284, 59)
 85 |         Me.Button3.Name = "Button3"
 86 |         Me.Button3.Size = New System.Drawing.Size(35, 22)
 87 |         Me.Button3.TabIndex = 6
 88 |         Me.Button3.Text = "..."
 89 |         Me.Button3.UseVisualStyleBackColor = True
 90 |         '
 91 |         'TxtPython
 92 |         '
 93 |         Me.TxtPython.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
 94 |         Me.TxtPython.Location = New System.Drawing.Point(117, 87)
 95 |         Me.TxtPython.Name = "TxtPython"
 96 |         Me.TxtPython.Size = New System.Drawing.Size(156, 25)
 97 |         Me.TxtPython.TabIndex = 6
 98 |         '
 99 |         'Label4
100 |         '
101 |         Me.Label4.AutoSize = True
102 |         Me.Label4.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
103 |         Me.Label4.Location = New System.Drawing.Point(3, 84)
104 |         Me.Label4.Name = "Label4"
105 |         Me.Label4.Size = New System.Drawing.Size(90, 17)
106 |         Me.Label4.TabIndex = 6
107 |         Me.Label4.Text = "Python Script"
108 |         '
109 |         'IpTextBox
110 |         '
111 |         Me.IpTextBox.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
112 |         Me.IpTextBox.Location = New System.Drawing.Point(117, 3)
113 |         Me.IpTextBox.Name = "IpTextBox"
114 |         Me.IpTextBox.Size = New System.Drawing.Size(156, 25)
115 |         Me.IpTextBox.TabIndex = 5
116 |         '
117 |         'Label3
118 |         '
119 |         Me.Label3.AutoSize = True
120 |         Me.Label3.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
121 |         Me.Label3.Location = New System.Drawing.Point(3, 0)
122 |         Me.Label3.Name = "Label3"
123 |         Me.Label3.Size = New System.Drawing.Size(73, 17)
124 |         Me.Label3.TabIndex = 4
125 |         Me.Label3.Text = "IP Address"
126 |         '
127 |         'BtnSave
128 |         '
129 |         Me.BtnSave.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
130 |         Me.BtnSave.Location = New System.Drawing.Point(117, 115)
131 |         Me.BtnSave.Name = "BtnSave"
132 |         Me.BtnSave.Size = New System.Drawing.Size(80, 24)
133 |         Me.BtnSave.TabIndex = 2
134 |         Me.BtnSave.Text = "Save"
135 |         Me.BtnSave.UseVisualStyleBackColor = True
136 |         '
137 |         'PayloadTxtbox
138 |         '
139 |         Me.PayloadTxtbox.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
140 |         Me.PayloadTxtbox.Location = New System.Drawing.Point(117, 59)
141 |         Me.PayloadTxtbox.Name = "PayloadTxtbox"
142 |         Me.PayloadTxtbox.Size = New System.Drawing.Size(156, 25)
143 |         Me.PayloadTxtbox.TabIndex = 2
144 |         '
145 |         'Label2
146 |         '
147 |         Me.Label2.AutoSize = True
148 |         Me.Label2.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
149 |         Me.Label2.Location = New System.Drawing.Point(3, 56)
150 |         Me.Label2.Name = "Label2"
151 |         Me.Label2.Size = New System.Drawing.Size(61, 28)
152 |         Me.Label2.TabIndex = 3
153 |         Me.Label2.Text = "Dumper Payload"
154 |         '
155 |         'Label1
156 |         '
157 |         Me.Label1.AutoSize = True
158 |         Me.Label1.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
159 |         Me.Label1.Location = New System.Drawing.Point(3, 28)
160 |         Me.Label1.Name = "Label1"
161 |         Me.Label1.Size = New System.Drawing.Size(86, 17)
162 |         Me.Label1.TabIndex = 0
163 |         Me.Label1.Text = "Payload Port"
164 |         '
165 |         'PayloadportTxtbox
166 |         '
167 |         Me.PayloadportTxtbox.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
168 |         Me.PayloadportTxtbox.Location = New System.Drawing.Point(117, 31)
169 |         Me.PayloadportTxtbox.Name = "PayloadportTxtbox"
170 |         Me.PayloadportTxtbox.Size = New System.Drawing.Size(156, 25)
171 |         Me.PayloadportTxtbox.TabIndex = 1
172 |         Me.PayloadportTxtbox.Text = "9020"
173 |         '
174 |         'statlabel
175 |         '
176 |         Me.statlabel.AutoSize = True
177 |         Me.statlabel.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
178 |         Me.statlabel.Location = New System.Drawing.Point(12, 313)
179 |         Me.statlabel.Name = "statlabel"
180 |         Me.statlabel.Size = New System.Drawing.Size(20, 17)
181 |         Me.statlabel.TabIndex = 4
182 |         Me.statlabel.Text = "**"
183 |         '
184 |         'Button2
185 |         '
186 |         Me.Button2.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
187 |         Me.Button2.Image = Global.Executable_Decryptor_UI.My.Resources.Resources.input_circle_FILL0_wght400_GRAD0_opsz24
188 |         Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
189 |         Me.Button2.Location = New System.Drawing.Point(18, 241)
190 |         Me.Button2.Name = "Button2"
191 |         Me.Button2.Size = New System.Drawing.Size(198, 28)
192 |         Me.Button2.TabIndex = 5
193 |         Me.Button2.Text = "Send Payload"
194 |         Me.Button2.UseVisualStyleBackColor = True
195 |         '
196 |         'Button1
197 |         '
198 |         Me.Button1.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
199 |         Me.Button1.Image = Global.Executable_Decryptor_UI.My.Resources.Resources.rule_folder_FILL0_wght400_GRAD0_opsz24
200 |         Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
201 |         Me.Button1.Location = New System.Drawing.Point(18, 207)
202 |         Me.Button1.Name = "Button1"
203 |         Me.Button1.Size = New System.Drawing.Size(198, 28)
204 |         Me.Button1.TabIndex = 3
205 |         Me.Button1.Text = "Verify Executables"
206 |         Me.Button1.UseVisualStyleBackColor = True
207 |         '
208 |         'ExtraForm
209 |         '
210 |         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
211 |         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
212 |         Me.ClientSize = New System.Drawing.Size(384, 341)
213 |         Me.Controls.Add(Me.Button2)
214 |         Me.Controls.Add(Me.statlabel)
215 |         Me.Controls.Add(Me.Button1)
216 |         Me.Controls.Add(Me.TableLayoutPanel1)
217 |         Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.SizableToolWindow
218 |         Me.MaximumSize = New System.Drawing.Size(400, 380)
219 |         Me.MinimumSize = New System.Drawing.Size(400, 380)
220 |         Me.Name = "ExtraForm"
221 |         Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
222 |         Me.Text = "Extra"
223 |         Me.TableLayoutPanel1.ResumeLayout(False)
224 |         Me.TableLayoutPanel1.PerformLayout()
225 |         Me.ResumeLayout(False)
226 |         Me.PerformLayout()
227 | 
228 |     End Sub
229 | 
230 |     Friend WithEvents TableLayoutPanel1 As TableLayoutPanel
231 |     Friend WithEvents PayloadportTxtbox As TextBox
232 |     Friend WithEvents Label1 As Label
233 |     Friend WithEvents BtnSave As Button
234 |     Friend WithEvents PayloadTxtbox As TextBox
235 |     Friend WithEvents Label2 As Label
236 |     Friend WithEvents Button1 As Button
237 |     Friend WithEvents statlabel As Label
238 |     Friend WithEvents Button2 As Button
239 |     Friend WithEvents IpTextBox As TextBox
240 |     Friend WithEvents Label3 As Label
241 |     Friend WithEvents TxtPython As TextBox
242 |     Friend WithEvents Label4 As Label
243 |     Friend WithEvents Button4 As Button
244 |     Friend WithEvents Button3 As Button
245 | End Class
246 | 


--------------------------------------------------------------------------------
/ExtraForm.resx:
--------------------------------------------------------------------------------
  1 | <?xml version="1.0" encoding="utf-8"?>
  2 | <root>
  3 |   <!-- 
  4 |     Microsoft ResX Schema 
  5 |     
  6 |     Version 2.0
  7 |     
  8 |     The primary goals of this format is to allow a simple XML format 
  9 |     that is mostly human readable. The generation and parsing of the 
 10 |     various data types are done through the TypeConverter classes 
 11 |     associated with the data types.
 12 |     
 13 |     Example:
 14 |     
 15 |     ... ado.net/XML headers & schema ...
 16 |     <resheader name="resmimetype">text/microsoft-resx</resheader>
 17 |     <resheader name="version">2.0</resheader>
 18 |     <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
 19 |     <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
 20 |     <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
 21 |     <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
 22 |     <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
 23 |         <value>[base64 mime encoded serialized .NET Framework object]</value>
 24 |     </data>
 25 |     <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
 26 |         <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
 27 |         <comment>This is a comment</comment>
 28 |     </data>
 29 |                 
 30 |     There are any number of "resheader" rows that contain simple 
 31 |     name/value pairs.
 32 |     
 33 |     Each data row contains a name, and value. The row also contains a 
 34 |     type or mimetype. Type corresponds to a .NET class that support 
 35 |     text/value conversion through the TypeConverter architecture. 
 36 |     Classes that don't support this are serialized and stored with the 
 37 |     mimetype set.
 38 |     
 39 |     The mimetype is used for serialized objects, and tells the 
 40 |     ResXResourceReader how to depersist the object. This is currently not 
 41 |     extensible. For a given mimetype the value must be set accordingly:
 42 |     
 43 |     Note - application/x-microsoft.net.object.binary.base64 is the format 
 44 |     that the ResXResourceWriter will generate, however the reader can 
 45 |     read any of the formats listed below.
 46 |     
 47 |     mimetype: application/x-microsoft.net.object.binary.base64
 48 |     value   : The object must be serialized with 
 49 |             : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
 50 |             : and then encoded with base64 encoding.
 51 |     
 52 |     mimetype: application/x-microsoft.net.object.soap.base64
 53 |     value   : The object must be serialized with 
 54 |             : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
 55 |             : and then encoded with base64 encoding.
 56 | 
 57 |     mimetype: application/x-microsoft.net.object.bytearray.base64
 58 |     value   : The object must be serialized into a byte array 
 59 |             : using a System.ComponentModel.TypeConverter
 60 |             : and then encoded with base64 encoding.
 61 |     -->
 62 |   <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
 63 |     <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
 64 |     <xsd:element name="root" msdata:IsDataSet="true">
 65 |       <xsd:complexType>
 66 |         <xsd:choice maxOccurs="unbounded">
 67 |           <xsd:element name="metadata">
 68 |             <xsd:complexType>
 69 |               <xsd:sequence>
 70 |                 <xsd:element name="value" type="xsd:string" minOccurs="0" />
 71 |               </xsd:sequence>
 72 |               <xsd:attribute name="name" use="required" type="xsd:string" />
 73 |               <xsd:attribute name="type" type="xsd:string" />
 74 |               <xsd:attribute name="mimetype" type="xsd:string" />
 75 |               <xsd:attribute ref="xml:space" />
 76 |             </xsd:complexType>
 77 |           </xsd:element>
 78 |           <xsd:element name="assembly">
 79 |             <xsd:complexType>
 80 |               <xsd:attribute name="alias" type="xsd:string" />
 81 |               <xsd:attribute name="name" type="xsd:string" />
 82 |             </xsd:complexType>
 83 |           </xsd:element>
 84 |           <xsd:element name="data">
 85 |             <xsd:complexType>
 86 |               <xsd:sequence>
 87 |                 <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
 88 |                 <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
 89 |               </xsd:sequence>
 90 |               <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
 91 |               <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
 92 |               <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
 93 |               <xsd:attribute ref="xml:space" />
 94 |             </xsd:complexType>
 95 |           </xsd:element>
 96 |           <xsd:element name="resheader">
 97 |             <xsd:complexType>
 98 |               <xsd:sequence>
 99 |                 <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
100 |               </xsd:sequence>
101 |               <xsd:attribute name="name" type="xsd:string" use="required" />
102 |             </xsd:complexType>
103 |           </xsd:element>
104 |         </xsd:choice>
105 |       </xsd:complexType>
106 |     </xsd:element>
107 |   </xsd:schema>
108 |   <resheader name="resmimetype">
109 |     <value>text/microsoft-resx</value>
110 |   </resheader>
111 |   <resheader name="version">
112 |     <value>2.0</value>
113 |   </resheader>
114 |   <resheader name="reader">
115 |     <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
116 |   </resheader>
117 |   <resheader name="writer">
118 |     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
119 |   </resheader>
120 | </root>


--------------------------------------------------------------------------------
/ExtraForm.vb:
--------------------------------------------------------------------------------
  1 | Imports System.IO
  2 | Imports System.Text
  3 | Imports Executable_Decryptor_UI.PS5_Payload_Sender
  4 | 
  5 | Public Class ExtraForm
  6 |     Private Sub BtnSave_Click(sender As Object, e As EventArgs) Handles BtnSave.Click
  7 |         Dim portnumber As Integer, payload As String = ""
  8 |         If Not String.IsNullOrEmpty(Me.PayloadTxtbox.Text) Then
  9 |             payload = Me.PayloadTxtbox.Text
 10 |         End If
 11 | 
 12 |         If Not Integer.TryParse(PayloadportTxtbox.Text, portnumber) Then
 13 |             ' Parsing Unsuccessful, use the parsed value
 14 | 
 15 |             MessageBox.Show("Portnumber not Changed !! " & vbNewLine & "Invalid Number")
 16 |             Exit Sub
 17 |         End If
 18 |         My.Settings.Payload = payload
 19 |         My.Settings.PayloadPort = portnumber
 20 |         My.Settings.Save()
 21 |         MessageBox.Show("Values Updated!! ")
 22 |         showsettingvalues()
 23 |     End Sub
 24 | 
 25 |     Private Sub ExtraForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
 26 |         showsettingvalues
 27 | 
 28 |     End Sub
 29 | 
 30 |     Private Sub showsettingvalues()
 31 |         PayloadportTxtbox.Text = My.Settings.PayloadPort
 32 |         PayloadTxtbox.Text = My.Settings.Payload.ToString
 33 |         IpTextBox.Text = My.Settings.PS5IP.ToString
 34 |         Dim pythonscript As String = My.Settings.PyScript.ToString
 35 |         If Not String.IsNullOrEmpty(pythonscript) Then
 36 |             TxtPython.Text = pythonscript
 37 |         Else
 38 |             TxtPython.Text = "make_fself_python3-1.py"
 39 |         End If
 40 |     End Sub
 41 | 
 42 |     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
 43 |         Dim selectedFolder As String = BrowseFolder()
 44 |         If Not String.IsNullOrEmpty(selectedFolder) Then
 45 |             statlabel.Text = selectedFolder
 46 |             Dim Sd As String = VerifyDirectoryfiles(selectedFolder)
 47 |             MessageBox.Show(Sd, "Executables Verification", MessageBoxButtons.OK, MessageBoxIcon.None)
 48 |         End If
 49 |     End Sub
 50 | 
 51 |     Function VerifyDirectoryfiles(folderpath As String) As String
 52 |         Dim Rtext As New StringBuilder()
 53 | 
 54 |         Dim fileExtensions As String() = {".sprx", ".prx", ".bin"}
 55 |         Dim kilobytesToRead As Integer = 2
 56 |         ' Check if the directory exists
 57 | 
 58 |         Console.WriteLine("directory exists")
 59 |         ' Get all files with specified extensions
 60 |         For Each fileExtension In fileExtensions
 61 |             Dim files = Directory.GetFiles(folderpath, "*" & fileExtension, SearchOption.AllDirectories)
 62 |             For Each filePath In files
 63 |                 ' Read and check the content
 64 |                 Dim Fname As String = Path.GetFileName(filePath)
 65 |                 If FileContainsElfString(filePath) Then
 66 |                     Rtext.AppendLine(Fname & " - Valid")
 67 | 
 68 |                 Else
 69 |                     Rtext.AppendLine(Fname & " - inValid")
 70 | 
 71 |                 End If
 72 |                 'If Execute(filePath) Then
 73 |                 '    writelog($"File {filePath} has the ELF string in the first 3 letters.")
 74 |                 'Else
 75 |                 '    writelog($"File {filePath} does not have the ELF string in the first 3 letters.")
 76 |                 'End If
 77 |             Next
 78 |         Next
 79 |         ' Form1.CMDView.AppendText("Executables have been decrypted! You may proceed to replace them.")
 80 | 
 81 |         Return Rtext.ToString
 82 |     End Function
 83 | 
 84 |     Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
 85 |         Dim fpload As String = BrowseForFile("Binary and ELF Files|*.bin;*.elf|Binary Files (*.bin)|*.bin|ELF Files (*.elf)|*.elf|All Files|*.*")
 86 |         If Not String.IsNullOrEmpty(fpload) Then
 87 |             Me.statlabel.Text = fpload
 88 |             Dim psip As String = Me.IpTextBox.Text
 89 |             Dim portnum As Integer = CInt(Me.PayloadportTxtbox.Text)
 90 |             Dim psender As New PayloadV2()
 91 |             Dim isConnected As Boolean = psender.Connect2PS5(psip, portnum)
 92 | 
 93 |             If isConnected Then
 94 |                 Try
 95 |                     Application.DoEvents()
 96 |                     ' Specify the path to your test.bin payload
 97 |                     'Dim payloadPath As String = "C:\path\to\test.bin"
 98 | 
 99 |                     ' Send the payload
100 |                     psender.SendPayload(fpload)
101 | 
102 |                     ' Disconnect after sending
103 |                     psender.DisconnectPayload()
104 | 
105 |                     MessageBox.Show("Payload sent successfully!")
106 | 
107 |                 Catch ex As Exception
108 | 
109 |                     MessageBox.Show("Error while sending payload: " & ex.Message)
110 |                     Exit Sub
111 |                 End Try
112 |             Else
113 |                 MessageBox.Show("IP Not Found !!" & vbNewLine & $"{psip}:{portnum}", "Host Not Found")
114 |             End If
115 | 
116 |         End If
117 |         Me.statlabel.Text = "Idle...zzz"
118 |     End Sub
119 | 
120 |     Function BrowseForFile(Ifilter As String) As String
121 |         Dim openFileDialog As New OpenFileDialog()
122 |         '"Binary and ELF Files|*.bin;*.elf|Binary Files (*.bin)|*.bin|ELF Files (*.elf)|*.elf|All Files|*.*"
123 |         openFileDialog.Filter = Ifilter
124 | 
125 | 
126 |         If openFileDialog.ShowDialog() = DialogResult.OK Then
127 | 
128 |             Return openFileDialog.FileName
129 |         Else
130 | 
131 |             Return String.Empty
132 |         End If
133 |     End Function
134 | 
135 |     Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
136 |         Dim dfile As String = BrowseForFile("Binary and ELF Files|*.bin;*.elf|Binary Files (*.bin)|*.bin|ELF Files (*.elf)|*.elf|All Files|*.*")
137 |         If Not String.IsNullOrEmpty(dfile) Then
138 |             PayloadTxtbox.Text = dfile
139 |         End If
140 |     End Sub
141 | 
142 |     Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
143 |         Dim dfile As String = BrowseForFile("Python Files (*.py)|*.py|All Files|*.*")
144 |         If Not String.IsNullOrEmpty(dfile) Then
145 |             TxtPython.Text = dfile
146 |         End If
147 |     End Sub
148 | End Class


--------------------------------------------------------------------------------
/Form1.Designer.vb:
--------------------------------------------------------------------------------
  1 | <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
  2 | Partial Class Form1
  3 |     Inherits System.Windows.Forms.Form
  4 | 
  5 |     'Form overrides dispose to clean up the component list.
  6 |     <System.Diagnostics.DebuggerNonUserCode()> _
  7 |     Protected Overrides Sub Dispose(ByVal disposing As Boolean)
  8 |         Try
  9 |             If disposing AndAlso components IsNot Nothing Then
 10 |                 components.Dispose()
 11 |             End If
 12 |         Finally
 13 |             MyBase.Dispose(disposing)
 14 |         End Try
 15 |     End Sub
 16 | 
 17 |     'Required by the Windows Form Designer
 18 |     Private components As System.ComponentModel.IContainer
 19 | 
 20 |     'NOTE: The following procedure is required by the Windows Form Designer
 21 |     'It can be modified using the Windows Form Designer.  
 22 |     'Do not modify it using the code editor.
 23 |     <System.Diagnostics.DebuggerStepThrough()> _
 24 |     Private Sub InitializeComponent()
 25 |         Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
 26 |         Me.Panel1 = New System.Windows.Forms.Panel()
 27 |         Me.Button2 = New System.Windows.Forms.Button()
 28 |         Me.Label3 = New System.Windows.Forms.Label()
 29 |         Me.Label2 = New System.Windows.Forms.Label()
 30 |         Me.BtnCredits = New System.Windows.Forms.Button()
 31 |         Me.BtnSignExecutables = New System.Windows.Forms.Button()
 32 |         Me.Button1 = New System.Windows.Forms.Button()
 33 |         Me.Label1 = New System.Windows.Forms.Label()
 34 |         Me.PortTxtBOX = New System.Windows.Forms.TextBox()
 35 |         Me.IPTextBOX = New System.Windows.Forms.TextBox()
 36 |         Me.BtnRun = New System.Windows.Forms.Button()
 37 |         Me.Panel2 = New System.Windows.Forms.Panel()
 38 |         Me.Verlabel = New System.Windows.Forms.Label()
 39 |         Me.Statlabel = New System.Windows.Forms.Label()
 40 |         Me.CMDView = New System.Windows.Forms.RichTextBox()
 41 |         Me.Panel1.SuspendLayout()
 42 |         Me.Panel2.SuspendLayout()
 43 |         Me.SuspendLayout()
 44 |         '
 45 |         'Panel1
 46 |         '
 47 |         Me.Panel1.Controls.Add(Me.Button2)
 48 |         Me.Panel1.Controls.Add(Me.Label3)
 49 |         Me.Panel1.Controls.Add(Me.Label2)
 50 |         Me.Panel1.Controls.Add(Me.BtnCredits)
 51 |         Me.Panel1.Controls.Add(Me.BtnSignExecutables)
 52 |         Me.Panel1.Controls.Add(Me.Button1)
 53 |         Me.Panel1.Controls.Add(Me.Label1)
 54 |         Me.Panel1.Controls.Add(Me.PortTxtBOX)
 55 |         Me.Panel1.Controls.Add(Me.IPTextBOX)
 56 |         Me.Panel1.Controls.Add(Me.BtnRun)
 57 |         Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
 58 |         Me.Panel1.Location = New System.Drawing.Point(0, 0)
 59 |         Me.Panel1.Name = "Panel1"
 60 |         Me.Panel1.Size = New System.Drawing.Size(710, 104)
 61 |         Me.Panel1.TabIndex = 1
 62 |         '
 63 |         'Button2
 64 |         '
 65 |         Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
 66 |         Me.Button2.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
 67 |         Me.Button2.Image = Global.Executable_Decryptor_UI.My.Resources.Resources.settings_FILL0_wght400_GRAD0_opsz24
 68 |         Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
 69 |         Me.Button2.Location = New System.Drawing.Point(539, 54)
 70 |         Me.Button2.Name = "Button2"
 71 |         Me.Button2.Size = New System.Drawing.Size(147, 35)
 72 |         Me.Button2.TabIndex = 9
 73 |         Me.Button2.Text = "Extras"
 74 |         Me.Button2.UseVisualStyleBackColor = True
 75 |         '
 76 |         'Label3
 77 |         '
 78 |         Me.Label3.AutoSize = True
 79 |         Me.Label3.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
 80 |         Me.Label3.Location = New System.Drawing.Point(43, 42)
 81 |         Me.Label3.Name = "Label3"
 82 |         Me.Label3.Size = New System.Drawing.Size(54, 17)
 83 |         Me.Label3.TabIndex = 8
 84 |         Me.Label3.Text = "(PS5 IP)"
 85 |         '
 86 |         'Label2
 87 |         '
 88 |         Me.Label2.AutoSize = True
 89 |         Me.Label2.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
 90 |         Me.Label2.Location = New System.Drawing.Point(180, 42)
 91 |         Me.Label2.Name = "Label2"
 92 |         Me.Label2.Size = New System.Drawing.Size(73, 17)
 93 |         Me.Label2.TabIndex = 7
 94 |         Me.Label2.Text = "(Klog Port)"
 95 |         '
 96 |         'BtnCredits
 97 |         '
 98 |         Me.BtnCredits.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
 99 |         Me.BtnCredits.BackColor = System.Drawing.Color.Tan
100 |         Me.BtnCredits.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
101 |         Me.BtnCredits.Location = New System.Drawing.Point(138, 72)
102 |         Me.BtnCredits.Name = "BtnCredits"
103 |         Me.BtnCredits.Size = New System.Drawing.Size(115, 26)
104 |         Me.BtnCredits.TabIndex = 6
105 |         Me.BtnCredits.Text = "Credits"
106 |         Me.BtnCredits.UseVisualStyleBackColor = False
107 |         '
108 |         'BtnSignExecutables
109 |         '
110 |         Me.BtnSignExecutables.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
111 |         Me.BtnSignExecutables.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
112 |         Me.BtnSignExecutables.Image = Global.Executable_Decryptor_UI.My.Resources.Resources.counter_2_FILL0_wght400_GRAD0_opsz24
113 |         Me.BtnSignExecutables.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
114 |         Me.BtnSignExecutables.Location = New System.Drawing.Point(539, 13)
115 |         Me.BtnSignExecutables.Name = "BtnSignExecutables"
116 |         Me.BtnSignExecutables.Size = New System.Drawing.Size(147, 35)
117 |         Me.BtnSignExecutables.TabIndex = 5
118 |         Me.BtnSignExecutables.Text = "         Sign Elfs"
119 |         Me.BtnSignExecutables.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
120 |         Me.BtnSignExecutables.UseVisualStyleBackColor = True
121 |         '
122 |         'Button1
123 |         '
124 |         Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
125 |         Me.Button1.BackColor = System.Drawing.Color.Orange
126 |         Me.Button1.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
127 |         Me.Button1.Location = New System.Drawing.Point(16, 72)
128 |         Me.Button1.Name = "Button1"
129 |         Me.Button1.Size = New System.Drawing.Size(115, 26)
130 |         Me.Button1.TabIndex = 4
131 |         Me.Button1.Text = "Instructions"
132 |         Me.Button1.UseVisualStyleBackColor = False
133 |         '
134 |         'Label1
135 |         '
136 |         Me.Label1.AutoSize = True
137 |         Me.Label1.Font = New System.Drawing.Font("Segoe UI Black", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
138 |         Me.Label1.Location = New System.Drawing.Point(153, 15)
139 |         Me.Label1.Name = "Label1"
140 |         Me.Label1.Size = New System.Drawing.Size(15, 21)
141 |         Me.Label1.TabIndex = 3
142 |         Me.Label1.Text = ":"
143 |         '
144 |         'PortTxtBOX
145 |         '
146 |         Me.PortTxtBOX.Font = New System.Drawing.Font("Segoe UI Semibold", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
147 |         Me.PortTxtBOX.Location = New System.Drawing.Point(174, 12)
148 |         Me.PortTxtBOX.Name = "PortTxtBOX"
149 |         Me.PortTxtBOX.Size = New System.Drawing.Size(87, 27)
150 |         Me.PortTxtBOX.TabIndex = 2
151 |         Me.PortTxtBOX.Text = "9023"
152 |         Me.PortTxtBOX.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
153 |         '
154 |         'IPTextBOX
155 |         '
156 |         Me.IPTextBOX.Font = New System.Drawing.Font("Segoe UI Semibold", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
157 |         Me.IPTextBOX.Location = New System.Drawing.Point(16, 12)
158 |         Me.IPTextBOX.Name = "IPTextBOX"
159 |         Me.IPTextBOX.Size = New System.Drawing.Size(135, 27)
160 |         Me.IPTextBOX.TabIndex = 1
161 |         Me.IPTextBOX.Text = "111"
162 |         Me.IPTextBOX.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
163 |         '
164 |         'BtnRun
165 |         '
166 |         Me.BtnRun.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
167 |         Me.BtnRun.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
168 |         Me.BtnRun.Image = Global.Executable_Decryptor_UI.My.Resources.Resources.counter_1_FILL0_wght400_GRAD0_opsz24
169 |         Me.BtnRun.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
170 |         Me.BtnRun.Location = New System.Drawing.Point(386, 12)
171 |         Me.BtnRun.Name = "BtnRun"
172 |         Me.BtnRun.Size = New System.Drawing.Size(147, 35)
173 |         Me.BtnRun.TabIndex = 0
174 |         Me.BtnRun.Text = "        Inject && Run"
175 |         Me.BtnRun.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
176 |         Me.BtnRun.UseVisualStyleBackColor = True
177 |         '
178 |         'Panel2
179 |         '
180 |         Me.Panel2.Controls.Add(Me.Verlabel)
181 |         Me.Panel2.Controls.Add(Me.Statlabel)
182 |         Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom
183 |         Me.Panel2.Location = New System.Drawing.Point(0, 549)
184 |         Me.Panel2.Name = "Panel2"
185 |         Me.Panel2.Size = New System.Drawing.Size(710, 26)
186 |         Me.Panel2.TabIndex = 2
187 |         '
188 |         'Verlabel
189 |         '
190 |         Me.Verlabel.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
191 |         Me.Verlabel.Cursor = System.Windows.Forms.Cursors.Hand
192 |         Me.Verlabel.Font = New System.Drawing.Font("Segoe UI Semibold", 11.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
193 |         Me.Verlabel.Location = New System.Drawing.Point(428, 3)
194 |         Me.Verlabel.Name = "Verlabel"
195 |         Me.Verlabel.Size = New System.Drawing.Size(279, 20)
196 |         Me.Verlabel.TabIndex = 1
197 |         Me.Verlabel.Text = "ver"
198 |         Me.Verlabel.TextAlign = System.Drawing.ContentAlignment.MiddleRight
199 |         '
200 |         'Statlabel
201 |         '
202 |         Me.Statlabel.AutoSize = True
203 |         Me.Statlabel.Font = New System.Drawing.Font("Segoe UI Semibold", 11.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
204 |         Me.Statlabel.Location = New System.Drawing.Point(12, 3)
205 |         Me.Statlabel.Name = "Statlabel"
206 |         Me.Statlabel.Size = New System.Drawing.Size(101, 20)
207 |         Me.Statlabel.TabIndex = 0
208 |         Me.Statlabel.Text = "@rajeshca911"
209 |         '
210 |         'CMDView
211 |         '
212 |         Me.CMDView.BackColor = System.Drawing.SystemColors.InactiveCaptionText
213 |         Me.CMDView.Dock = System.Windows.Forms.DockStyle.Fill
214 |         Me.CMDView.Font = New System.Drawing.Font("Segoe UI Semibold", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
215 |         Me.CMDView.ForeColor = System.Drawing.Color.White
216 |         Me.CMDView.Location = New System.Drawing.Point(0, 104)
217 |         Me.CMDView.Name = "CMDView"
218 |         Me.CMDView.ReadOnly = True
219 |         Me.CMDView.Size = New System.Drawing.Size(710, 445)
220 |         Me.CMDView.TabIndex = 0
221 |         Me.CMDView.Text = "Tool Front End Created By:" & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(10) & "@rajeshca911" & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(10) & "Credits :" & Global.Microsoft.VisualBasic.ChrW(10)
222 |         '
223 |         'Form1
224 |         '
225 |         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
226 |         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
227 |         Me.ClientSize = New System.Drawing.Size(710, 575)
228 |         Me.Controls.Add(Me.CMDView)
229 |         Me.Controls.Add(Me.Panel2)
230 |         Me.Controls.Add(Me.Panel1)
231 |         Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
232 |         Me.MinimumSize = New System.Drawing.Size(726, 613)
233 |         Me.Name = "Form1"
234 |         Me.Text = "DecryptorUI"
235 |         Me.Panel1.ResumeLayout(False)
236 |         Me.Panel1.PerformLayout()
237 |         Me.Panel2.ResumeLayout(False)
238 |         Me.Panel2.PerformLayout()
239 |         Me.ResumeLayout(False)
240 | 
241 |     End Sub
242 |     Friend WithEvents Panel1 As Panel
243 |     Friend WithEvents Panel2 As Panel
244 |     Friend WithEvents BtnRun As Button
245 |     Friend WithEvents CMDView As RichTextBox
246 |     Friend WithEvents Label1 As Label
247 |     Friend WithEvents PortTxtBOX As TextBox
248 |     Friend WithEvents IPTextBOX As TextBox
249 |     Friend WithEvents Statlabel As Label
250 |     Friend WithEvents Button1 As Button
251 |     Friend WithEvents BtnSignExecutables As Button
252 |     Friend WithEvents BtnCredits As Button
253 |     Friend WithEvents Label2 As Label
254 |     Friend WithEvents Label3 As Label
255 |     Friend WithEvents Button2 As Button
256 |     Friend WithEvents Verlabel As Label
257 | End Class
258 | 


--------------------------------------------------------------------------------
/Form1.resx:
--------------------------------------------------------------------------------
  1 | <?xml version="1.0" encoding="utf-8"?>
  2 | <root>
  3 |   <!-- 
  4 |     Microsoft ResX Schema 
  5 |     
  6 |     Version 2.0
  7 |     
  8 |     The primary goals of this format is to allow a simple XML format 
  9 |     that is mostly human readable. The generation and parsing of the 
 10 |     various data types are done through the TypeConverter classes 
 11 |     associated with the data types.
 12 |     
 13 |     Example:
 14 |     
 15 |     ... ado.net/XML headers & schema ...
 16 |     <resheader name="resmimetype">text/microsoft-resx</resheader>
 17 |     <resheader name="version">2.0</resheader>
 18 |     <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
 19 |     <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
 20 |     <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
 21 |     <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
 22 |     <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
 23 |         <value>[base64 mime encoded serialized .NET Framework object]</value>
 24 |     </data>
 25 |     <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
 26 |         <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
 27 |         <comment>This is a comment</comment>
 28 |     </data>
 29 |                 
 30 |     There are any number of "resheader" rows that contain simple 
 31 |     name/value pairs.
 32 |     
 33 |     Each data row contains a name, and value. The row also contains a 
 34 |     type or mimetype. Type corresponds to a .NET class that support 
 35 |     text/value conversion through the TypeConverter architecture. 
 36 |     Classes that don't support this are serialized and stored with the 
 37 |     mimetype set.
 38 |     
 39 |     The mimetype is used for serialized objects, and tells the 
 40 |     ResXResourceReader how to depersist the object. This is currently not 
 41 |     extensible. For a given mimetype the value must be set accordingly:
 42 |     
 43 |     Note - application/x-microsoft.net.object.binary.base64 is the format 
 44 |     that the ResXResourceWriter will generate, however the reader can 
 45 |     read any of the formats listed below.
 46 |     
 47 |     mimetype: application/x-microsoft.net.object.binary.base64
 48 |     value   : The object must be serialized with 
 49 |             : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
 50 |             : and then encoded with base64 encoding.
 51 |     
 52 |     mimetype: application/x-microsoft.net.object.soap.base64
 53 |     value   : The object must be serialized with 
 54 |             : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
 55 |             : and then encoded with base64 encoding.
 56 | 
 57 |     mimetype: application/x-microsoft.net.object.bytearray.base64
 58 |     value   : The object must be serialized into a byte array 
 59 |             : using a System.ComponentModel.TypeConverter
 60 |             : and then encoded with base64 encoding.
 61 |     -->
 62 |   <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
 63 |     <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
 64 |     <xsd:element name="root" msdata:IsDataSet="true">
 65 |       <xsd:complexType>
 66 |         <xsd:choice maxOccurs="unbounded">
 67 |           <xsd:element name="metadata">
 68 |             <xsd:complexType>
 69 |               <xsd:sequence>
 70 |                 <xsd:element name="value" type="xsd:string" minOccurs="0" />
 71 |               </xsd:sequence>
 72 |               <xsd:attribute name="name" use="required" type="xsd:string" />
 73 |               <xsd:attribute name="type" type="xsd:string" />
 74 |               <xsd:attribute name="mimetype" type="xsd:string" />
 75 |               <xsd:attribute ref="xml:space" />
 76 |             </xsd:complexType>
 77 |           </xsd:element>
 78 |           <xsd:element name="assembly">
 79 |             <xsd:complexType>
 80 |               <xsd:attribute name="alias" type="xsd:string" />
 81 |               <xsd:attribute name="name" type="xsd:string" />
 82 |             </xsd:complexType>
 83 |           </xsd:element>
 84 |           <xsd:element name="data">
 85 |             <xsd:complexType>
 86 |               <xsd:sequence>
 87 |                 <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
 88 |                 <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
 89 |               </xsd:sequence>
 90 |               <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
 91 |               <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
 92 |               <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
 93 |               <xsd:attribute ref="xml:space" />
 94 |             </xsd:complexType>
 95 |           </xsd:element>
 96 |           <xsd:element name="resheader">
 97 |             <xsd:complexType>
 98 |               <xsd:sequence>
 99 |                 <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
100 |               </xsd:sequence>
101 |               <xsd:attribute name="name" type="xsd:string" use="required" />
102 |             </xsd:complexType>
103 |           </xsd:element>
104 |         </xsd:choice>
105 |       </xsd:complexType>
106 |     </xsd:element>
107 |   </xsd:schema>
108 |   <resheader name="resmimetype">
109 |     <value>text/microsoft-resx</value>
110 |   </resheader>
111 |   <resheader name="version">
112 |     <value>2.0</value>
113 |   </resheader>
114 |   <resheader name="reader">
115 |     <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
116 |   </resheader>
117 |   <resheader name="writer">
118 |     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
119 |   </resheader>
120 |   <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
121 |   <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
122 |     <value>
123 |         AAABAAEAICAAAAEAIACoEAAAFgAAACgAAAAgAAAAQAAAAAEAIAAAAAAAABAAAAAAAAAAAAAAAAAAAAAA
124 |         AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
125 |         AAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAAgAAAAIAAAACAAAAAgAA
126 |         AAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
127 |         AAAAAAAAAAAAAgAAAAEAAAAA0NDQAIKCgkKSkpKMlpaWi5mZmYucnJyLnp6ei5ubm4uXl5eLk5OTi4+P
128 |         j4uLi4uLiIiIjHt7e0LExMQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADU2
129 |         NgD///8AlpaWTKurq5yurq6kra2top6fn4FjZGQSgoKChZaWlv+cnJz/oKCg/6SkpP+np6f/pKSk/5+f
130 |         n/+ampr/lZWV/5CQkP+MjIz/e3t7htzc3AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
131 |         AAAAAAAAgoKCAAAAAALExMSl1tbW/9jY2P/Y2Nj/y8vL8ZmamTQZGhqENjg3/zc4N/8zNDT/MDEw/ywt
132 |         Lf8pKSn/Jycn/ycnJ/8nJyf/Jycn/yQkJP8TExOGNzc3AAAAAAAAAAAAAAAAAAAAAAAYGBgA3d3dAGhp
133 |         aBRnZ2cPfH19AAAAAABcXFwAODg4BsHBwbXY2Nj/2NjY/9nZ2f/Q0ND4qaipRB8gIIJERkX/REZF/z9B
134 |         QP86Ozv/NTY2/zAwMP8sLCz/LCws/y0tLf8tLS3/Kysr/xYWFoZHR0cAAAAAAAAAAAAAAAAAOzw8APr5
135 |         +QCLjIw1sLCwwa6urqmHh4ceBgYGAo+PjyqmpqZ1ycnJ59jY2P/Y2Nj/2NjY/9bW1v/AwMCtREVFtElL
136 |         Sv9ISkn/PkA//zo8O/9XWFj/d3h4/3V2dv9QUFD/LCws/y0tLf8rKyv/FhYWhkdHRwAAAAAAAAAAABUV
137 |         FQC+vr4AhISEN7W1tdTLy8v/zMzM/7m5ucKxsbGcxsbG49LS0v7Y2Nj/2dnZ/9nZ2f/Z2dn/2dnZ/9jY
138 |         2P91dXX+X2Fh/5mamf9oaWn/QEFB/0NERP9LTEz/SEhI/zk5Of8tLS3/LS0t/ysrK/8WFhaGR0dHAAAA
139 |         AAAAAAAAh4iHAICAgB2srazIx8fH/8vLy//Ozs7/0NDQ/9LS0v/W1tb/2NjY/9nZ2f/b29v/29vb/9vb
140 |         2//c3Nz/3Nzc/4KDg/9RVFP/eHp5/8DBwf9lZmb/Nzg4/zM0NP8vLy//LS0t/y0tLf8tLS3/Kysr/xYW
141 |         FoZHR0cAAAAAAAAAAACvr68Aq6urJr+/v9XHx8f/y8vL/87Ozv/R0dH/1NTU/9fX1//X19f/1tbW/9fX
142 |         1//X19f/2NjY/9ra2v/e3t7/hoaG/25xb/+kpaT/hIaF/1BSUf8/QED/ODk5/zIzM/8uLi7/LS0t/y0t
143 |         Lf8rKyv/FhYWhkdHRwAAAAAAAAAAALOzswClpaUAq6urRb29veXLy8v/zs7O/9LS0v/V1dX/0dHR/8rK
144 |         yv/Nzc3/0NDQ/9LS0v/T09P/1NTU/9bW1v+Dg4P/YmVj/2VoZv9XWlj/VFZV/09RUP9HSUn/P0FA/zc4
145 |         OP8zMzP/MTEx/y0tLf8YGBiGSkpKAAAAAAAAAAAAAAAAAGFhYQBJSkkKr6+vusrKyv/Pz8//0tLS/9DQ
146 |         0P/Ly8v/zs7O/9HR0f/T09P/1dXV/9fX1//X19f/2NjY/4SEhP9VV1b/WVta/1dZWP9VVlb/U1RU/1FT
147 |         Uv9OUE//S0xL/0dISP9GRkb/QkJC/zAwMIZmZmYAAAAAAAAAAAAAAAAAl5iXAIeHhz+5ubnvysrK/8/P
148 |         z//Kysr/x8fH/83Nzf/Q0ND/09PT/9fX1//a2tr/29vb/9vb2//a2tr/tra2/6qqqv+xsbH/tra2/7u7
149 |         u//AwMD/xcXF/sjJyfvExMT7vr6++7m5ufuysrL+nJycgv///wAAAAAAAAAAAIyMjAAAAAAAq6urj8XF
150 |         xf/MzMz/z8/P/8bGxv/Ly8v/0NDQ/9PT0//X19fv3d3dqOLi4nji4uKJ39/fz93d3f3Pz8//xMTE/8LC
151 |         wv/ExMT/ycnJ/8fHx/+/v7/zr6+vdri4uE63t7dPtra2UbCwsFOdnZ0m29vbAAAAAACUlJRLra2tiLm5
152 |         uZnDw8Pny8vL/9DQ0P/Q0ND/y8vL/8/Pz//T09P/1tbW6NfX11by8vIF5eXlAKKiogDl5eUd3d3dqdvb
153 |         2//W1tb/0dHR/87Ozv/W1tb/09PT/8vLy/2vr6+3m5ubiIuLi3NnZ2cWaWlpAAAAAAAAAAAAf4B/B7Oz
154 |         s7S/v7//xMTE/8rKyv/Pz8//09PT/8vLy//Nzc3/0tLS/9XV1f/Pz8+F////ANjY2AAAAAAA5ubmANHR
155 |         0QDT09Mp2dnZ4NnZ2f/U1NT/z8/P/9fX1//W1tb/0tLS/8zMzP/Gxsb/t7e3+IiIiEeRkZEAAAAAAAAA
156 |         AABLTEsOqqqqw8TExP/Jycn/zc3N/9LS0v/W1tb/zs7O/8/Pz//U1NT/1NTU+L29vUfDw8MAAAAAAAAA
157 |         AAAAAAAAnZ2dAI2NjQbR0dG229vb/9bW1v/R0dH/2NjY/9nZ2f/U1NT/0NDQ/8zMzP/AwMD8kZKRVaGi
158 |         ogBiYmIAAAAAAEJDQg2srKzByMjI/8zMzP/Q0ND/1dXV/9nZ2f/U1NT/0dHR/9bW1v/W1tb5wcHBTcnJ
159 |         yQAAAAAAAAAAAAAAAACampoAkZGRCdLS0rrb29v/2NjY/9PT0//b29v/29vb/9fX1//T09P/z8/P/8PE
160 |         w/yVlpZTpaWlAGFhYQAAAAAALC0tBrW1ta7MzMz/0NDQ/9PT0//X19f/29vb/9fX1//S0tL/1tbW/9nZ
161 |         2f/S0tKUnZ2dBLm5uQAAAAAARUVFAM3NzQDAwMA22NjY6Nvb2//Y2Nj/1dXV/97e3v/d3d3/2dnZ/9bW
162 |         1v/T09P/ycnJ86GioUGpqqkAAAAAAAAAAAD///8AycnJMtTU1GHV1dVxzs7O2dnZ2f/c3Nz/2tra/9LS
163 |         0v/W1tb/2tra/9zc3PDT09NrnZ2dDP///wBPT08CwMDALNTU1Lzd3d3/29vb/9jY2P/a2tr/4eHh/97e
164 |         3v/X19f8zs7Omt3d3WLS0tJPtra2Dbm5uQAAAAAAAAAAAAAAAAAAAAAAXl5eAP///wC3t7eC2NjY/97e
165 |         3v/f39//1NTU/9fX1//c3Nz/4ODg/97e3vbU1NS9zMzMj8/Pz6Da2trf3d3d/9zc3P/a2tr/2dnZ/+Dg
166 |         4P/j4+P/4ODg/8/Pz92fn58io6OjAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAv7+/ALGx
167 |         sTPX19fm4ODg/+Pj4//h4eH/3Nzc/97e3v/g4OD/4ODg/+Dg4P/g4OD/39/f/9/f3//d3d3/3Nzc/9vb
168 |         2//g4OD/5ubm/+Tk5P/f39//x8fHjgAAAAGFhYUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
169 |         AAB8fHwAYWFhCsfHx7ni4uL/5eXl/+rq6v/q6ur/4eHh/97e3v/g4OD/4ODg/+Dg4P/f39//3t7e/93d
170 |         3f/a2tr/39/f/+jo6P/o6Oj/5ubm/93d3fizs7NNycnJAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
171 |         AAAAAAAAlZWVAC4uLgGqqqpj1dXV8ebm5v/p6en/7e3t/+/v7//r6+v/39/f/97e3v/f39//3d3d/93d
172 |         3f/e3t7/3Nzc/+Hh4f/r6+v/6+vr/+rq6v/o6Oj/5eXl/8fHx7eBgoEbmpuaAB0cHAAAAAAAAAAAAAAA
173 |         AAAAAAAAAAAAAAAAAADExMQAvb29Ldvb2+Pn5+f/6urq/+3t7f/u7u7/7+/v//Dw8P/v7+//7e3t/+rq
174 |         6v/j4+P/5ubm/+vr6//t7e3/7+/v/+7u7v/t7e3/7Ozs/+rq6v/q6ur/4uLi/7CwsIr///8AY2NjAAAA
175 |         AAAAAAAAAAAAAAAAAAAAAAAAAAAAAM7OzgDIyMgS5eXlr+vr6//t7e3/7u7u/+/v7//w8PD+8PDw//Hx
176 |         8f/x8fH/8fHx//Ly8v/y8vL/8fHx//Hx8f/x8fH/7+/v/+7u7v7u7u7/7e3t/+3t7f/h4eHtt7e3Uv//
177 |         /wBycnIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAt7e3AObm5gDe3t4h6urquu/v7//v7+/77OzspOrq
178 |         6nnw8PDP8vLy+fPz8//z9PT/8/T0//P09P/z9PT/8PHw/unp6erj4+Oj5eXld+vr69/w8PD/6Ojo783N
179 |         zWhHR0cCmZmZAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAhYWFAOXl5QDV1dUf6enpn+fn
180 |         54fW1tYP////AOTk5Bfo6OhX7+/v3ff39//39/f/9/f3//Ly8v7T09OWwsLCLqysrAfh4+MA09PTQubn
181 |         57bX19dbi4uLA7GxsQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOzs
182 |         7ADU1NQH0NDQBdra2gAAAAAAqqqqAImJiQXq6uqy+fn5//n5+f/6+vr/7e3t9rGyskO6uroAAAAAAJub
183 |         mwCurq4B1NTUCtLS0gLKysoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
184 |         AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABrbGwAAAAAAdXV1aDy8/P/9PT0//X19f/n6Ojvra2tNLGy
185 |         sgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
186 |         AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAE1OTQD///8Azs7ONNzc3HLl5eV/5+fne9rb
187 |         21u5ubkNu7y8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
188 |         AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
189 |         AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
190 |         AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
191 |         AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
192 |         AAAAAAAAAAAAAAAAAAAAAAAA///gA//8wAH/8AAB/+AAAfzgAAH4AAAB8AAAAeAAAAHgAAAB8AAAAfAA
193 |         AAHwAAAB8AAAAYADAAcAD4AHAA+ABwAPgAcAB4AHgAIAB/AAAD/wAAA/8AAAf+AAAD/gAAA/4AAAP/AA
194 |         AD/4QAh//OA4///gP///8D////////////8=
195 | </value>
196 |   </data>
197 | </root>


--------------------------------------------------------------------------------
/Form1.vb:
--------------------------------------------------------------------------------
  1 | Imports System.IO
  2 | Imports System.Threading
  3 | Imports Executable_Decryptor_UI.PS5_Payload_Sender
  4 | Imports PS4_Payload_Sender
  5 | Public Class Form1
  6 | 
  7 |     Private batScriptFileName As String = "BatScript.bat"
  8 |     Public batScriptFilePath As String
  9 |     Private Async Function Step1Execute() As Task
 10 | 
 11 |         'create command
 12 |         'command: socat -u -d -d -d TCP:ps5.ip:9023,reuseaddr OPEN:ra.tar,creat
 13 |         Dim psIP As String = CStr(IPTextBOX.Text)
 14 |         Dim psPort As String = CStr(PortTxtBOX.Text)
 15 |         Dim Mytar As String = "Executable.tar"
 16 |         Dim payload As String = "sleirs_dumper.bin"
 17 |         'Dim argument As String = $"socat -u -d -d -d TCP:{psIP}:{psPort},reuseaddr OPEN:{Mytar},creat > output.log 2>&1"
 18 | 
 19 |         Dim argument As String = $"-u -d -d -d  TCP:{psIP}:{psPort},reuseaddr OPEN:{Mytar},creat"
 20 |         CMDView.Clear()
 21 |         CMDView.AppendText("*****   Session Started   *****" & Environment.NewLine)
 22 |         Application.DoEvents()
 23 |         Statlabel.Text = "Please wait..!!"
 24 |         'RunSocat(argument)
 25 |         'SendPayload(psIP, psPort, payload)
 26 |         'Dim task1 As Task = Task.Run(Sub() RunSocat(argument))
 27 |         'Dim task2 As Task = Task.Run(Sub() SendPayload(psIP, 9020, payload))
 28 | 
 29 |         'Task.WaitAll(task1)
 30 |         'Task.WaitAll(task2)
 31 |         If Not File.Exists(payload) Then
 32 |             CMDView.AppendText("Dumper Payload Missing !!" & Environment.NewLine)
 33 | 
 34 |             CMDView.AppendText("*****   Session Ended   *****" & Environment.NewLine)
 35 |             Exit Function
 36 |         End If
 37 |         If File.Exists("OutPut.txt") Then
 38 |             File.Delete("OutPut.txt")
 39 |         End If
 40 |         'SendPayload(psIP, 9020, payload)
 41 | 
 42 |         ' Create an instance of PayloadV2
 43 |         Dim psender As New PayloadV2()
 44 |         ' Connect to PS4
 45 |         Dim portnumber As Integer
 46 | 
 47 |         If Integer.TryParse(My.Settings.PayloadPort, portnumber) Then
 48 |             writelog($"Parsed port number: {portnumber}")
 49 |         Else            ' Parsing failed, use a default value
 50 |             writelog("Parsing failed. Using default port number.")
 51 |             portnumber = 9020
 52 |         End If
 53 | 
 54 | 
 55 |         Dim isConnected As Boolean = psender.Connect2PS5(psIP, portnumber)
 56 | 
 57 |         If isConnected Then
 58 |             Try
 59 |                 Application.DoEvents()
 60 |                 ' Specify the path to your test.bin payload
 61 |                 'Dim payloadPath As String = "C:\path\to\test.bin"
 62 | 
 63 |                 ' Send the payload
 64 |                 psender.SendPayload(payload)
 65 | 
 66 |                 ' Disconnect after sending
 67 |                 psender.DisconnectPayload()
 68 | 
 69 |                 writelog("Payload sent successfully!")
 70 |                 My.Settings.PS5IP = psIP
 71 |                 My.Settings.KLOGPORT = portnumber
 72 |                 My.Settings.Save()
 73 |             Catch ex As Exception
 74 | 
 75 |                 writelog("Error while sending payload: " & ex.Message)
 76 | 
 77 |                 Exit Function
 78 |             End Try
 79 |         Else
 80 |             writelog("Error connecting to PS5. Exception: " & psender.PayloadException)
 81 |             Statlabel.Text = "Idle.."
 82 |             CMDView.AppendText("*****   Session Ended   *****" & Environment.NewLine)
 83 |             Exit Function
 84 |         End If
 85 | 
 86 | 
 87 | 
 88 |         Dim result As Boolean = Await RunSocat(argument)
 89 | 
 90 |         If result Then
 91 |             writelog("Socat Connection Success !!")
 92 |             writelog("Extracting Files !!")
 93 |             DecryptAndCheckTar()
 94 | 
 95 |         Else
 96 |             writelog("Socat connection Timed Out")
 97 | 
 98 |             'writelog("Sending Dumper Payload - Aborted !")
 99 |         End If
100 |         CMDView.AppendText("*****   Session Ended   *****" & Environment.NewLine)
101 |     End Function
102 | 
103 |     Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
104 |         ShowInstructions()
105 |         Me.Verlabel.Text = $"Ver:{My.Application.Info.Version.ToString}"
106 |         Me.IPTextBOX.Text = My.Settings.PS5IP.ToString
107 |         Me.PortTxtBOX.Text = My.Settings.KLOGPORT
108 | 
109 | 
110 |         '    CMDView.Rtf = "{\rtf " &
111 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs28\cf1 Credits:\par \cell\cell\intbl\fs28\cf1 Tools Created By:\cell\par" &
112 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs18 - Dumper by sleirsgoevy\cell\cell\intbl\fs18 - Socat by tech128\cell\row" &
113 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs18 - Make_FSELF by EchoStretch\cell\cell\intbl\fs18 - Itemzflow for wonderful app \cell\row" &
114 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs28\cf1 Scene Developers:\cell\cell\intbl\fs18 - Theflow0\cell\row" &
115 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs18 - Znullptr\cell\cell\intbl\fs18 - ChendoChap\cell\row" &
116 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs18 - Specter\cell\cell\intbl\fs18 - Sleirsgoevy\cell\row" &
117 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs18 - SiSTRo\cell\cell\intbl\fs18 - Al-Azif\cell\row" &
118 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs18 - PRB-Borg\cell\cell\intbl\fs18 - Leeful\cell\row" &
119 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs28\cf1 Contact Information:\cell\cell\intbl\fs18 Please contact me if I forgot to give any credits.\cell\row" &
120 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs18 - rajeshca911\cell\cell\intbl\fs18 Twitter: @rajeshca911\cell\row" &
121 |         '"\trowd\trgaph70\trleft-70\tcellx2000\tcellx4000\intbl\fs18 - Github: @rajeshca911\cell\cell\intbl\fs18 Discord: Rajesh#7267\cell\row" &
122 |         '"}"
123 | 
124 |     End Sub
125 | 
126 |     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
127 |         ShowInstructions()
128 |     End Sub
129 |     Private Sub ShowInstructions()
130 |         CMDView.Rtf = "{\rtf
131 | \fs25\cf1 Steps to Decrypt and Sign Executables:\par
132 | \par
133 | \fs23\1. Enter the PS5 IP:\par
134 | \fs20 - Open the application and input the PS5 IP address.\par
135 | \par
136 | \fs23\2. Click 'Inject & Run':\par
137 | \fs20 - Press the 'Inject & Run' button to initiate the process.\par
138 | \fs20 - it will send payload as well so no need to use other payload sender.\par
139 | \par
140 | \fs23\3. Retrieve Executable:\par
141 | \fs20 - The process will generate an 'executable.tar' file in socat folder  ,\par
142 |  'Decrypted Files' Folder in application location which contains all the executables of the game.\par
143 | \par
144 | \fs23\4. Replace Files in Game Dump:\par
145 | \fs20 - Replace the corresponding files in your game dump folder with the generated 'Decrypted Files'.\par
146 | \fs20 - Make sure all executables statuses were '-Decrypted'.\par
147 | \par
148 | \fs23\5. Click 'Sign Executables':\par
149 | \fs20 - Once the replacement is done, click 'Sign Executables'.\par
150 | \par
151 | \fs23\6. Browse the Game Folder:\par
152 | \fs20 - Navigate to the game folder and select it to complete the signing process.\par
153 | \par
154 | \fs23\7. Done:\par
155 | \fs20 - The executable files are now signed and ready for use.\par
156 | }
157 | "
158 |     End Sub
159 |     Private Sub ShowCredits()
160 |         CMDView.Rtf = "{\rtf " &
161 |             "\fs28\cf1 Credits:\par  " &
162 |             "\fs28\cf1 Tools Created By:\par " &
163 |             "\fs18 - Dumper by sleirsgoevy\par " &
164 |             "\fs18 - Socat by tech128\par " &
165 |             "\fs18 - Make_FSELF by EchoStretch,Flatz\par" &
166 |             "\fs18 - LightningMods for wonderful app \par \par " &
167 |     "\fs28\cf1 Scene Developers:\par " &
168 |     "\fs18 - Theflow0\par " &
169 |     "- Znullptr\par " &
170 |     "- ChendoChap\par " &
171 |     "- Specter\par " &
172 |     "- Sleirsgoevy\par " &
173 |     "- SiSTRo\par " &
174 |     "- Al-Azif\par " &
175 |     "- PRB-Borg\par " &
176 |     "- Leeful\par " &
177 |     "- And Many More...\par " &
178 |     "\par " &
179 |     "\fs28\cf1 Contact Information:\par " &
180 |     "\fs18 Please contact me if I forgot to give any credits.\par " &
181 |     "\par " &
182 |     "\fs18 - rajeshca911\par " &
183 |     "\fs18   Twitter: @rajeshca911\par " &
184 |     "\fs18   Github: @rajeshca911\par " &
185 |     "\fs18   Discord: Rajesh#7267\par " &
186 |     "}"
187 | 
188 |     End Sub
189 | 
190 |     Private Sub BtnCredits_Click(sender As Object, e As EventArgs) Handles BtnCredits.Click
191 |         ShowCredits()
192 |     End Sub
193 | 
194 | 
195 |     Private Sub DecryptAndCheckTar()
196 |         Dim socatFolderPath As String = Path.Combine(appPath, "Socat")
197 |         Dim tarfile As String = Path.Combine(socatFolderPath, "Executable.tar")
198 | 
199 |         If Not Directory.Exists(destin) Then
200 | 
201 |             Directory.CreateDirectory(destin)
202 |         End If
203 | 
204 |         If Not File.Exists(tarfile) Then
205 |             writelog("Executable Archive is not found")
206 |             Exit Sub
207 |         End If
208 |         ExtractTar(tarfile, destin)
209 |         CheckDecryptedFiles()
210 |     End Sub
211 | 
212 |     Private Async Function BtnRun_ClickAsync(sender As Object, e As EventArgs) As Task Handles BtnRun.Click
213 |         Await Step1Execute()
214 |     End Function
215 | 
216 |     Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
217 |         Me.Hide()
218 |         ExtraForm.ShowDialog()
219 |         Me.Show()
220 |     End Sub
221 | 
222 |     Private Sub Form1_Shown(sender As Object, e As EventArgs) Handles Me.Shown
223 |         CheckAppUpdate()
224 |     End Sub
225 | 
226 |     Private Sub BtnSignExecutables_Click(sender As Object, e As EventArgs) Handles BtnSignExecutables.Click
227 |         Dim pythonfile As String = My.Settings.PyScript.ToString
228 |         Dim batscript As String = "Make_FSELF_PY3.bat"
229 |         If String.IsNullOrEmpty(pythonfile) Then
230 |             pythonfile = "make_fself_python3-1.py"
231 |         End If
232 |         If Not File.Exists(pythonfile) Then
233 |             MessageBox.Show($"Python Script Missing - '{pythonfile}'")
234 |             Exit Sub
235 |         End If
236 | 
237 | 
238 |         Dim GameFolderLocation As String = BrowseFolder()
239 |         If Not String.IsNullOrEmpty(GameFolderLocation) Then
240 |             createbatinGamefolderlocation(GameFolderLocation)
241 | 
242 |             Me.CMDView.Clear()
243 |             ' Copy the bat script to the game folder location
244 |             'Dim batScriptDestinationPath As String = Path.Combine(GameFolderLocation, batscript)
245 |             'File.Copy(batscript, batScriptDestinationPath, True) ' The third parameter (True) allows overwriting if the file already exists
246 | 
247 |             ' Copy the python script to the game folder location
248 |             Dim pythonScriptDestinationPath As String = Path.Combine(GameFolderLocation, pythonfile)
249 |             File.Copy(pythonfile, pythonScriptDestinationPath, True)
250 | 
251 |             writelog($"Scripts copied to: {GameFolderLocation}")
252 |             'writelog($"Running script {batScriptDestinationPath}")
253 | 
254 |             Dim process As New Process()
255 | 
256 |             ' Set up process start information
257 |             process.StartInfo.FileName = batScriptFilePath
258 |             process.StartInfo.WorkingDirectory = GameFolderLocation
259 |             'process.StartInfo.RedirectStandardOutput = True
260 |             'process.StartInfo.RedirectStandardError = True
261 |             'process.StartInfo.RedirectStandardInput = True
262 |             'process.StartInfo.UseShellExecute = False
263 |             'process.StartInfo.CreateNoWindow = True
264 | 
265 |             ' Start the process and capture details
266 |             Try
267 |                 process.Start()
268 | 
269 |                 process.WaitForExit()
270 | 
271 |                 '' Get process details
272 |                 'Dim exitCode As Integer = process.ExitCode
273 |                 'Dim processOutput As String = process.StandardOutput.ReadToEnd()
274 |                 'Dim processError As String = process.StandardError.ReadToEnd()
275 | 
276 |                 'writelog($"Output: {processOutput}")
277 |                 writelog("Process Executed !!")
278 | 
279 | 
280 |             Catch ex As Exception
281 |                 MessageBox.Show($"Error starting process: {ex.Message}")
282 |             Finally
283 |                 process.Dispose()
284 |             End Try
285 | 
286 |         End If
287 | 
288 |     End Sub
289 | 
290 |     Private Sub createbatinGamefolderlocation(gameFolderLocation As String)
291 |         ' Specify the bat script file name
292 |         ' batScriptFileName As String = "YourBatchScript.bat"
293 | 
294 |         ' Specify the content of the bat script
295 |         Dim batScriptContent As String =
296 |             "@echo off" & vbCrLf &
297 |             "echo." & vbCrLf &
298 |             "echo PS5 Make Fake Self Script By EchoStretch" & vbCrLf &
299 |             "echo Requires LightningMods_ Updated Make Fself By Flatz" & vbCrLf &
300 |             "echo." & vbCrLf &
301 |             "set ""fself=make_fself_python3-1.py""" & vbCrLf &
302 |             "" & vbCrLf &
303 |             "cd /d ""%~dp0""" & vbCrLf &
304 |             "" & vbCrLf &
305 |             "FOR /R %%i IN (*.sprx *.prx *.elf *.self *eboot.bin) DO (" & vbCrLf &
306 |             "    echo Encrypting %%i..." & vbCrLf &
307 |             "    echo." & vbCrLf &
308 |             "    python %fself% ""%%i"" ""%%i.estemp""" & vbCrLf &
309 |             "    REN ""%%i"" ""%%~nxi.esbak""" & vbCrLf &
310 |             "    echo." & vbCrLf &
311 |             ")" & vbCrLf &
312 |             "" & vbCrLf &
313 |             "echo." & vbCrLf &
314 |             "echo Renaming Temporary Files..." & vbCrLf &
315 |             "" & vbCrLf &
316 |             "FOR /R %%i IN (*.estemp) DO (" & vbCrLf &
317 |             "    REN ""%%i"" ""%%~ni""" & vbCrLf &
318 |             ")" & vbCrLf &
319 |         "exit" & vbCrLf '&
320 |         '"REM Redirect output to a file instead of using pause" & vbCrLf &
321 |         '"echo Batch execution completed. Press any key to exit. > ""batch_complete.txt"""
322 | 
323 | 
324 |         batScriptFilePath = Path.Combine(gameFolderLocation, batScriptFileName)
325 | 
326 | 
327 |         File.WriteAllText(batScriptFilePath, batScriptContent)
328 | 
329 |         writelog($"Bat script '{batScriptFileName}' created in '{gameFolderLocation}'")
330 |     End Sub
331 | 
332 |     Private Sub Verlabel_Click(sender As Object, e As EventArgs) Handles Verlabel.Click
333 |         Process.Start("https://github.com/rajeshca911")
334 |     End Sub
335 | 
336 | 
337 | 
338 | 
339 | End Class
340 | 


--------------------------------------------------------------------------------
/FrontEndForSocat.vb:
--------------------------------------------------------------------------------
 1 | Imports System.IO
 2 | Imports System.Threading.Tasks
 3 | 
 4 | Module FrontEndForSocat
 5 |     Public Async Function RunSocat(arguments As String) As Task(Of Boolean)
 6 |         Try
 7 |             writelog("socat " & arguments)
 8 | 
 9 |             Dim appPath As String = Application.StartupPath
10 |             Dim socatFolderPath As String = Path.Combine(appPath, "Socat")
11 |             Dim exePath As String = Path.Combine(socatFolderPath, "socat.exe")
12 | 
13 |             If Not File.Exists(exePath) Then
14 |                 writelog("socat does not exist")
15 |                 Return False
16 |             End If
17 | 
18 |             writelog("Socat File Path " & exePath)
19 |             writelog("Please be patience.. communicating with playstation")
20 | 
21 |             ' Run the socat command
22 |             Dim processInfo As New ProcessStartInfo(exePath, arguments)
23 |             processInfo.WorkingDirectory = socatFolderPath
24 |             processInfo.RedirectStandardOutput = True
25 |             processInfo.RedirectStandardError = True
26 |             processInfo.UseShellExecute = False
27 |             processInfo.CreateNoWindow = True
28 | 
29 |             Dim process As New Process()
30 |             process.StartInfo = processInfo
31 |             process.Start()
32 | 
33 |             ' Asynchronously read output and error streams
34 |             Dim outputTask = ReadStreamAsync(process.StandardOutput)
35 |             Dim errorTask = ReadStreamAsync(process.StandardError)
36 | 
37 |             ' Wait for both tasks to complete
38 |             Await Task.WhenAll(outputTask, errorTask)
39 | 
40 |             ' Get the output and error results
41 |             Dim output As String = outputTask.Result
42 |             Dim errorOutput As String = errorTask.Result
43 | 
44 |             writelog("Output: " & output)
45 |             writelog("Error: " & errorOutput)
46 |             SendToLogFile("Output: " & output, "Socat.txt")
47 |             SendToLogFile("Error: " & errorOutput, "Socat.txt")
48 | 
49 |             process.WaitForExit()
50 |             process.Close()
51 |             If errorOutput.Contains("Connection timed out") Then
52 |                 Return False
53 |             Else
54 |                 Return True
55 |             End If
56 | 
57 |         Catch ex As Exception
58 |             MessageBox.Show(ex.Message, "Error While Running Socat !!")
59 |             writelog(ex.Message)
60 |             SendToLogFile(ex.Message)
61 |             Return False
62 |         Finally
63 |             Form1.Statlabel.Text = "Process finished"
64 |         End Try
65 |     End Function
66 | 
67 |     Private Async Function ReadStreamAsync(streamReader As StreamReader) As Task(Of String)
68 |         Application.DoEvents()
69 |         Return Await streamReader.ReadToEndAsync()
70 |     End Function
71 |     Public Sub writelog(logtext As String)
72 |         On Error Resume Next
73 |         Dim ct As Date = Now
74 |         Application.DoEvents()
75 |         Form1.CMDView.AppendText(Now.ToString("hh:MM:ss") & " : " & logtext & vbNewLine)
76 |     End Sub
77 | 
78 | 
79 | 
80 | 
81 | 
82 |     Private Sub AppendToRichTextBox(text As String)
83 |         Application.DoEvents()
84 |         ' This method appends the provided text to RichTextBox1 in a thread-safe manner
85 |         If Form1.CMDView.InvokeRequired Then
86 |             Form1.CMDView.Invoke(Sub() AppendToRichTextBox(text))
87 |         Else
88 |             Form1.CMDView.AppendText(text & Environment.NewLine)
89 |         End If
90 |     End Sub
91 | End Module
92 | 


--------------------------------------------------------------------------------
/GearICON.ico:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/rajeshca911/Executable-Decryptor-UI/ac7502dc4ab0348c83d39b83cc04946468cdd22c/GearICON.ico


--------------------------------------------------------------------------------
/Logger.vb:
--------------------------------------------------------------------------------
 1 | Imports System.IO
 2 | 
 3 | Module Logger
 4 |     Function SendToLogFile(ByVal StrLine As String, Optional sLogFilePath As String = "") As Boolean
 5 |         Try
 6 |             Dim strDateTime As String, sFN As String, Mytxt As String
 7 | 
 8 | 
 9 |             'dddd, dd MMMM yyyy HH:mm:ss tt
10 |             strDateTime = Format(Now, "dddd, MMM dd yyyy") & " - " & Format(Now, "hh:mm:ss tt")
11 |             'sFN = "Output.txt"
12 |             sFN = "OutPut.txt"
13 |             'fs = CreateObject("Scripting.FileSystemObject")
14 |             Mytxt = strDateTime & vbTab & "-:: " & StrLine
15 |             sLogFilePath = Application.StartupPath & "\" & sFN
16 |             'Dim sw As StreamWriter = File.AppendText(sLogFilePath)
17 | 
18 |             If Not System.IO.File.Exists(sLogFilePath) Then
19 | 
20 |                 File.Create(sLogFilePath).Dispose()
21 |             End If
22 | 
23 |             Using writer As New StreamWriter(sLogFilePath, True)
24 |                 writer.WriteLine(Mytxt)
25 |             End Using
26 | 
27 |             SendToLogFile = True
28 |         Catch ex As Exception
29 |             SendToLogFile = False
30 | 
31 |         End Try
32 |     End Function
33 | 
34 | End Module
35 | 


--------------------------------------------------------------------------------
/README.md:
--------------------------------------------------------------------------------
 1 | 
 2 | # Executables DecryptUI
 3 | 
 4 | ## Overview
 5 | Executables_DecryptUI is a tool designed to streamline the process of retrieving encrypted executables from a game dump, decrypting them, verifying the proper decryption, and signing ELF files and eboot.bin.
 6 | 
 7 | ### Grab Latest release from below
 8 | -[Executable-Decryptor-UI Releases](https://github.com/rajeshca911/Executable-Decryptor-UI/releases)
 9 | 
10 | 
11 | 
12 | ## Features
13 | 
14 | ### User-Friendly Interface: 
15 | - Enjoy a simple and intuitive graphical user interface, making the tool accessible to users of all levels.
16 | 
17 | ### Windows Compatibility: 
18 | - Specifically designed for Windows users, ensuring a seamless experience on your Windows operating system.
19 | 
20 | ### Payload Transmission:
21 | - Easily send payloads over the network to retrieve encrypted executables.
22 | ### Automatic Process: 
23 | - The tool seamlessly fetches, extracts, and verifies files for a hassle-free experience.
24 | ### Verification: 
25 | - Verify the proper decryption of executables to ensure data integrity.
26 | ### Signing executables
27 | - The tool employs a script crafted by LightningMods, an updated Make Fself tool by Flatz, and EchoStretch for signing the executables.
28 | 
29 | 
30 | ## Usage
31 |  - Open The Tool
32 |  - Enter **IP** of the playstation
33 |  - Click '***Inject & Run***'
34 |  - The tool automates the process of fetching, extracting, verifying, and opening the designated folder
35 |  - Dump the game using LightningMods '***Itemzflow***'
36 |  - Transfer/ replace the decrypted files to the  acquired dumped folder.
37 |  - Click the ***'Sign Elfs'*** button within the tool.
38 |  - Navigate to the folder where the executables were replaced, and then click "OK."
39 |  - The executables have been resigned and are now ready for use.
40 | 
41 | ## Video Tutorial
42 | [Youtube Tutorial](https://www.youtube.com/watch?v=xXYcOswg7_E)
43 | 
44 | [![Tutorial](https://i.imgur.com/AmIfAXr.png)](https://www.youtube.com/watch?v=xXYcOswg7_E)
45 | 
46 | 
47 | ## Credits
48 | ### Tools & Articles by
49 | 
50 | - PS Devs
51 | - [sleirsgoevy](https://github.com/sleirsgoevy/ps4jb-payloads/tree/bd-jb/ps5-self-dumper)
52 | - [tech128](https://github.com/tech128/socat-1.7.3.0-windows)
53 | - [LightningMods](https://github.com/LightningMods/Itemzflow)
54 | - [flatz](https://github.com/flatz)
55 | - [Tustin](https://github.com/Tustin/pkg-merge)  
56 | - [EchoStretch](https://github.com/EchoStretch)
57 | - Gurus who thought me coding
58 | 
59 | 
60 | 
61 | 
62 | 
63 | ## FAQ
64 | #### Q:What does this tool do?
65 | - A:The tool is designed to automate several key processes:
66 | ***Fetching:*** It retrieves data, likely encrypted executables, from a specified source.
67 | 
68 | ***Extraction:*** Once fetched, the tool automatically extracts the acquired data.
69 | 
70 | ***Verification:*** It verifies the integrity of the decrypted files, ensuring they are orrectly decrypted.
71 | 
72 | 
73 | In summary, this tool streamlines the process of fetching, extracting, verifying, and organizing files, particularly useful for tasks involving encrypted executables.
74 | 
75 | #### Q: Does the tool dump the game?
76 | A: No, the tool does not handle the game dumping process. Game dumping is a separate task and should be performed using the Itemzflow app created by LightningMods. The tool focuses on automating the subsequent steps, such as fetching, extracting, verifying,signing the executables
77 | 
78 | 
79 | 
80 | 
81 | 
82 | ## Screenshots
83 | 
84 | ![App Screenshot](https://i.imgur.com/069Xfqp.png)
85 | ![App Screenshot](https://i.imgur.com/dwZbCkN.png)
86 | 
87 | 


--------------------------------------------------------------------------------
/packages.config:
--------------------------------------------------------------------------------
 1 | <?xml version="1.0" encoding="utf-8"?>
 2 | <packages>
 3 |   <package id="HtmlAgilityPack" version="1.11.57" targetFramework="net461" />
 4 |   <package id="Microsoft.Bcl.AsyncInterfaces" version="5.0.0" targetFramework="net461" />
 5 |   <package id="SharpCompress" version="0.35.0" targetFramework="net461" />
 6 |   <package id="System.Buffers" version="4.5.1" targetFramework="net461" />
 7 |   <package id="System.Memory" version="4.5.5" targetFramework="net461" />
 8 |   <package id="System.Numerics.Vectors" version="4.5.0" targetFramework="net461" />
 9 |   <package id="System.Runtime.CompilerServices.Unsafe" version="6.0.0" targetFramework="net461" />
10 |   <package id="System.Text.Encoding.CodePages" version="8.0.0" targetFramework="net461" />
11 |   <package id="System.Threading.Tasks.Extensions" version="4.5.4" targetFramework="net461" />
12 |   <package id="ZstdSharp.Port" version="0.7.4" targetFramework="net461" />
13 | </packages>


--------------------------------------------------------------------------------