edv/VERAG_Homepage
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Änderungen generation hashratetest server

Browse Source
This commit is contained in:
ja
2021-12-17 13:24:47 +01:00
parent 0815ba086d
commit affd5898dd
6 changed files with 37 additions and 39 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
App_Code/TestPerformance.vb
View File

@@ -93,7 +93,7 @@ Public Class TestPerformance
Dim stringname As String = lstCapitals.Item(VERAG_VARIABLES.RandomInteger(0, lstCapitals.Count)) Dim stringname As String = lstCapitals.Item(VERAG_VARIABLES.RandomInteger(0, lstCapitals.Count))
usrname = stringname usrname = stringname
Using cmd As New SqlCommand("INSERT INTO [VERAG_HOMEPAGE].[dbo].[Users] VALUES (@UserId,@Username,@Password,@Email,@Date") Using cmd As New SqlCommand("INSERT INTO [VERAG_HOMEPAGE].[dbo].[Users] VALUES (@UserId,@Username,@Password,@Email,@Date)")
' cmd.CommandType = CommandType.StoredProcedure ' cmd.CommandType = CommandType.StoredProcedure
cmd.Parameters.AddWithValue("@UserId", UsrID) cmd.Parameters.AddWithValue("@UserId", UsrID)
cmd.Parameters.AddWithValue("@Username", usrname) cmd.Parameters.AddWithValue("@Username", usrname)
@@ -115,7 +115,7 @@ Public Class TestPerformance
End Sub End Sub
Public Shared finalzeit As Long Public Shared finalzeit As Long
Public Shared Async Function TestHashrateServer(zahlint As Integer) As Threading.Tasks.Task(Of Byte()) Public Shared Function TestHashrateServer(zahlint As Integer) As Byte()
Dim arrkeys As New List(Of Byte()) Dim arrkeys As New List(Of Byte())
Dim arrzahl As New List(Of Integer) Dim arrzahl As New List(Of Integer)
Dim arrzahl_iterats As New List(Of Integer) Dim arrzahl_iterats As New List(Of Integer)
@@ -131,7 +131,7 @@ Public Class TestPerformance
sw1.Start() sw1.Start()
arrkeys.Add(VERAG_VARIABLES.GenerateSalt(VERAG_VARIABLES.RandomInteger(0, zahlint))) arrkeys.Add(VERAG_VARIABLES.GenerateSalt(VERAG_VARIABLES.RandomInteger(0, zahlint)))
arrzahl_iterats.Add(VERAG_VARIABLES.getiterationnumber) arrzahl_iterats.Add(VERAG_VARIABLES.getiterationnumber)
arrzahl.Add(VERAG_VARIABLES.RandomInteger(Math.Pow(2, 4), VERAG_VARIABLES.RandomInteger(Math.Pow(2, 6), Math.Pow(2, 10)))) arrzahl.Add(zahlint)
sw1.Stop() sw1.Stop()
arrzeitp1.Add(sw1.ElapsedMilliseconds) arrzeitp1.Add(sw1.ElapsedMilliseconds)
sw1.Reset() sw1.Reset()

BIN
Berechnung Memorysize argon2.xlsx Normal file
View File

Binary file not shown.

6
Customers/Default2.aspx.vb
View File

@@ -34,8 +34,8 @@ Partial Class Customers_Default2
End If End If
End Sub End Sub
Protected Async Sub btn_TesthashrateServer_ClickAsync(sender As Object, e As EventArgs) Handles btn_TesthashrateServer.Click Protected Sub btn_TesthashrateServer_ClickAsync(sender As Object, e As EventArgs) Handles btn_TesthashrateServer.Click
Dim zahl As Integer = VERAG_VARIABLES.RandomInteger(5, Math.Pow(2, 5)) Dim zahl As Integer = VERAG_VARIABLES.RandomInteger(Math.Pow(2, 4), Math.Pow(2, 9))
Dim pwhashresult As Byte() = Await TestPerformance.TestHashrateServer(zahl) Dim pwhashresult As Byte() = TestPerformance.TestHashrateServer(zahl)
End Sub End Sub
End Class End Class

60
Customers/LKWs.aspx
View File

@@ -150,7 +150,7 @@
natplaceholder.textContent = Nat natplaceholder.textContent = Nat
addHeader() addHeader()
addNewRow() addNewRow("7544514114")
} }
function TableRow_Click_M(Nat,Kennzeichen) { function TableRow_Click_M(Nat,Kennzeichen) {
let Speditionslabel = document.getElementById("<%=lbl_sped_Placeholder_M.ClientID%>") let Speditionslabel = document.getElementById("<%=lbl_sped_Placeholder_M.ClientID%>")
@@ -164,27 +164,28 @@
} }
function addheader() { function addheader() {
let table = document.getElementById("<%=tbl_mainpage.ClientID%>"); let table = document.getElementById("<%=tbl_mainpage.ClientID%>");
var tr = table.insertRow(-1); let tr = table.insertRow(-1);
var td = tr.insertCell(); let td = tr.insertCell();
td.innerHTML.textContent = "SDL-Nr"; td.innerHTML.textContent = "SDL-Nr";
td = tr.insertCell(); td = tr.insertCell();
td.innerHTML.textContent = "Bezeichnung"; td.innerHTML.textContent = "Bezeichnung";
td = tr.insertCell(); td = tr.insertCell();
td.innerHTML = "Gültig Bis"; td.innerHTML = "Gültig Bis";
td = tr.insertCell(); td = tr.insertCell();
td.innerHTML = "Karten-Nummer"; td.innerHTML = "Karten-Nummer";
} }
function addheader_m() { function addheader_m() {
let table = document.getElementById("<%=tbl_mainpage_M.ClientID%>"); let table = document.getElementById("<%=tbl_mainpage_M.ClientID%>");
let tr = table.insertRow(-1); let tr = table.insertRow(-1);
let td = tr.insertCell(); let td = tr.insertCell();
td.innerHTML.textContent = "SDL-Nr"; td.innerHTML = "SDL-Nr";
td = tr.insertCell(); td = tr.insertCell();
td.innerHTML.textContent = "Bezeichnung"; td.innerHTML = "Bezeichnung";
td = tr.insertCell(); td = tr.insertCell();
td.innerHTML = "Gültig Bis"; td.innerHTML = "Gültig Bis";
@@ -192,36 +193,37 @@
td = tr.insertCell(); td = tr.insertCell();
td.innerHTML = "Karten-Nummer"; td.innerHTML = "Karten-Nummer";
} }
function addNewRow() { function addNewRow(SDLNr) {
let table = document.getElementById("<%=tbl_mainpage.ClientID%>"); let table = document.getElementById("<%=tbl_mainpage.ClientID%>");
let tr = table.insertRow();
let td = tr.insertCell();
td.innerHTML = SDLNr;
td = tr.insertCell(); let tr = table.insertRow();
td.innerHTML = bez; let td = tr.insertCell();
td.innerHTML = SDLNr;
td = tr.insertCell(); td = tr.insertCell();
td.innerHTML = GueltigBis; td.innerHTML = "Diesel";
td = tr.insertCell(); td = tr.insertCell();
td.innerHTML = Kartnr; td.innerHTML = "2025";
td = tr.insertCell();
td.innerHTML = "56855541454654";
} }
function addNewRow_M() { function addNewRow_M() {
let table = document.getElementById("<%=tbl_mainpage_M.ClientID%>"); let table = document.getElementById("<%=tbl_mainpage_M.ClientID%>");
let tr = table.insertRow(-1);
let td = tr.insertCell();
td.innerHTML = "a";
td = tr.insertCell(); let tr = table.insertRow(-1);
td.innerHTML = "b"; let td = tr.insertCell();
td.innerHTML = "a";
td = tr.insertCell(); td = tr.insertCell();
td.innerHTML = "c"; td.innerHTML = "b";
td = tr.insertCell(); td = tr.insertCell();
td.innerHTML = "d"; td.innerHTML = "c";
td = tr.insertCell();
td.innerHTML = "d";
} }
</script> </script>
</asp:Content> </asp:Content>

2
Customers/LKWs.aspx.vb
View File

@@ -196,8 +196,6 @@ Partial Class LKWS
tbl_sidemenue.Height = Unit.Pixel(150) tbl_sidemenue.Height = Unit.Pixel(150)
For Each l2 In list For Each l2 In list
Dim tr2 As TableRow = New TableRow() Dim tr2 As TableRow = New TableRow()
Dim tc_KfzKennz As TableCell = New TableCell() Dim tc_KfzKennz As TableCell = New TableCell()

2
login/login_FLEX.aspx.vb
View File

@@ -94,7 +94,6 @@ Partial Class login_FLEX
regexusername_M.ErrorMessage = VERAG_VARIABLES.geterrornumb + "Username does not have any special characters in it." regexusername_M.ErrorMessage = VERAG_VARIABLES.geterrornumb + "Username does not have any special characters in it."
End If End If
Else Else
reqfieldvaluserName.ErrorMessage = String.Empty reqfieldvaluserName.ErrorMessage = String.Empty
End If End If
End If End If
@@ -201,7 +200,6 @@ Partial Class login_FLEX
'Dim str = gensaltToken(UserNaMe, passw, Customer_ID, Session.IsNewSession) 'Dim str = gensaltToken(UserNaMe, passw, Customer_ID, Session.IsNewSession)
'MsgBox(str) 'MsgBox(str)
'End If 'End If
FormsAuthentication.RedirectFromLoginPage(UserNaMe, True) FormsAuthentication.RedirectFromLoginPage(UserNaMe, True)
End Sub End Sub