Skip to content

Commit

Permalink
Experimental SPD Decode
Browse files Browse the repository at this point in the history
  • Loading branch information
@eloaders
eloaders committed Aug 25, 2014
1 parent 82bea9c commit b474471
Show file tree
Hide file tree
Showing 7 changed files with 127 additions and 242 deletions.
80 changes: 0 additions & 80 deletions I-Nex/i-nex/.src/FDIMM.class
View file

This file was deleted.

21 changes: 0 additions & 21 deletions I-Nex/i-nex/.src/FDIMM.form
View file

This file was deleted.

4 changes: 2 additions & 2 deletions I-Nex/i-nex/.src/FFlags.module
View file
Original file line number Diff line number Diff line change
Expand Up @@ -88,8 +88,8 @@ End
Public Sub ht()
Dim NUMLOG, NUMPHY As Float
'CString(Finfosys.CPU_PROCESSOR.Count)
NUMPHY = Finfosys.CPU_PROCESSOR.Count
NUMLOG = CFloat(Finfosys.CPU_CPU_CORES[CFloat(Finfosys.ComboBox1.Index)])
Try NUMPHY = Finfosys.CPU_PROCESSOR.Count
Try NUMLOG = CFloat(Finfosys.CPU_CPU_CORES[CFloat(Finfosys.ComboBox1.Index)])

If NUMLOG = Null Then
Logs("CPU Cores is Null", Logger.Info)
Expand Down
58 changes: 22 additions & 36 deletions I-Nex/i-nex/.src/Finfosys.class
View file
Original file line number Diff line number Diff line change
Expand Up @@ -562,19 +562,19 @@ Public Sub Wykrywanie_procesorow()

Close #CPUINFO_PROC

Label14.Text = Replace(CPU_MODEL_NAME[CFloat(ComboBox1.Index)], "\n", "")
Label14.Tooltip = Replace(CPU_MODEL_NAME[CFloat(ComboBox1.Index)], "\n", "")
Label71.Text = "Flags: " & FFlags.instructions
Label13.Text = UCase$(Replace(Replace(Replace(CPU_VENDOR_ID[CFloat(ComboBox1.Index)], "Authentic", ""), "Genuine", ""), "\n", ""))
Label12.Text = Replace(CPU_CPU_MHZ[CFloat(ComboBox1.Index)], "\n", "") & " MHz"
Label97.Text = "Family: " & Replace(CPU_FAMILYz[CFloat(ComboBox1.Index)], "\n", "")
Label6.Text = "Model: " & Replace(CPU_MODEL[CFloat(ComboBox1.Index)], "\n", "")
Label7.Text = "Stepping: " & Replace(CPU_STEPPING[CFloat(ComboBox1.Index)], "\n", "")
Label8.Text = "Cores: " & Replace(CPU_SIBLINGS[CFloat(ComboBox1.Index)], "\n", "")
Label19.Text = "Phy id: " & Replace(CPU_PHYSICAL_ID[CFloat(ComboBox1.Index)], "\n", "")
Label10.Text = "Bogomips: " & Replace(CPU_BOGOMIPS[CFloat(ComboBox1.Index)], "\n", "")
Label11.Text = "Address sizes: " & Replace(CPU_ADRESS_SIZES[CFloat(ComboBox1.Index)], "\n", "")
Label15.Text = "Power mangament: " & Replace(CPU_POWER_MANAGEMENT[CFloat(ComboBox1.Index)], "\n", "")
Try Label14.Text = Replace(CPU_MODEL_NAME[CFloat(ComboBox1.Index)], "\n", "")
Try Label14.Tooltip = Replace(CPU_MODEL_NAME[CFloat(ComboBox1.Index)], "\n", "")
Try Label71.Text = "Flags: " & FFlags.instructions
Try Label13.Text = UCase$(Replace(Replace(Replace(CPU_VENDOR_ID[CFloat(ComboBox1.Index)], "Authentic", ""), "Genuine", ""), "\n", ""))
Try Label12.Text = Replace(CPU_CPU_MHZ[CFloat(ComboBox1.Index)], "\n", "") & " MHz"
Try Label97.Text = "Family: " & Replace(CPU_FAMILYz[CFloat(ComboBox1.Index)], "\n", "")
Try Label6.Text = "Model: " & Replace(CPU_MODEL[CFloat(ComboBox1.Index)], "\n", "")
Try Label7.Text = "Stepping: " & Replace(CPU_STEPPING[CFloat(ComboBox1.Index)], "\n", "")
Try Label8.Text = "Cores: " & Replace(CPU_SIBLINGS[CFloat(ComboBox1.Index)], "\n", "")
Try Label19.Text = "Phy id: " & Replace(CPU_PHYSICAL_ID[CFloat(ComboBox1.Index)], "\n", "")
Try Label10.Text = "Bogomips: " & Replace(CPU_BOGOMIPS[CFloat(ComboBox1.Index)], "\n", "")
Try Label11.Text = "Address sizes: " & Replace(CPU_ADRESS_SIZES[CFloat(ComboBox1.Index)], "\n", "")
Try Label15.Text = "Power mangament: " & Replace(CPU_POWER_MANAGEMENT[CFloat(ComboBox1.Index)], "\n", "")

Try INDEX0 = Replace(File.Load("/sys/devices/system/cpu/" & Subst(ComboBox1.Current.Text) & "/cache/index0/size"), "\n", "")
Try INDEX1 = Replace(File.Load("/sys/devices/system/cpu/" & Subst(ComboBox1.Current.Text) & "/cache/index1/size"), "\n", "")
Expand All @@ -601,42 +601,42 @@ Public Sub Wykrywanie_procesorow()
Try NUMOFSETS2 = Replace(File.Load("/sys/devices/system/cpu/" & Subst(ComboBox1.Current.Text) & "/cache/index2/number_of_sets"), "\n", "")
Try NUMOFSETS3 = Replace(File.Load("/sys/devices/system/cpu/" & Subst(ComboBox1.Current.Text) & "/cache/index3/number_of_sets"), "\n", "")

Label1.Text = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
Try Label1.Text = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
L0LEVEL,
INDEX0,
L0TYPE,
L0WAYS,
COHERENCY0,
NUMOFSETS0)
Label1.Tooltip = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
Try Label1.Tooltip = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
L0LEVEL,
INDEX0,
L0TYPE,
L0WAYS,
COHERENCY0,
NUMOFSETS0)
Label2.Text = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
Try Label2.Text = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
L1LEVEL,
INDEX1,
L1TYPE,
L1WAYS,
COHERENCY1,
NUMOFSETS1)
Label2.Tooltip = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
Try Label2.Tooltip = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
L1LEVEL,
INDEX1,
L1TYPE,
L1WAYS,
COHERENCY1,
NUMOFSETS1)
Label3.Text = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
Try Label3.Text = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
L2LEVEL,
INDEX2,
L2TYPE,
L2WAYS,
COHERENCY2,
NUMOFSETS2)
Label3.Tooltip = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
Try Label3.Tooltip = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
L2LEVEL,
INDEX2,
L2TYPE,
Expand All @@ -646,14 +646,14 @@ Public Sub Wykrywanie_procesorow()

If IsNull(L3LEVEL) = False Then

Label5.Text = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
Try Label5.Text = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
L3LEVEL,
INDEX3,
L3TYPE,
L3WAYS,
COHERENCY3,
NUMOFSETS3)
Label5.Tooltip = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
Try Label5.Tooltip = Subst("Cache L&1 &2 &3 WOA: &4 CLS: &5 NOS: &6",
L3LEVEL,
INDEX3,
L3TYPE,
Expand Down Expand Up @@ -1126,12 +1126,6 @@ Public Sub Buttongroup_Click()
Desktop.Open("" & Last.Name & "")
End

Public Sub Button4_Click()

FDIMM.Show

End

Public Sub ComboBox9_Click()

Asound_Drives._INPUT_NAME()
Expand Down Expand Up @@ -1216,13 +1210,5 @@ Public Sub Button20_Click()
End

Public Sub ComboBox10_Click()

Try TextBox31.Text = Replace(MDecode_dimms.MODULE_MANUFACTURER[CFloat(ComboBox10.Index)], "\n", "")
Try TextBox32.Text = Replace(MDecode_dimms.DRAM_MANUFACTURER[CFloat(ComboBox10.Index)], "\n", "")
Try TextBox33.Text = Replace(MDecode_dimms.MODULE_TYPE[CFloat(ComboBox10.Index)], "\n", "")
Try TextBox34.Text = Replace(MDecode_dimms.PART_NUMBER[CFloat(ComboBox10.Index)], "\n", "")
Try TextBox35.Text = Replace(MDecode_dimms.RAM_SIZE[CFloat(ComboBox10.Index)], "\n", "")
Try TextBox36.Text = Replace(MDecode_dimms.tCL_tRCD_tRDP_tRAS[CFloat(ComboBox10.Index)], "\n", "")
Try TextBox37.Text = Replace(MDecode_dimms.SDRAM_DEVICE_TYPE[CFloat(ComboBox10.Index)], "\n", "")
Try TextBox38.Text = Replace(MDecode_dimms.MAX_MODULE_SPEED[CFloat(ComboBox10.Index)], "\n", "")
MDecode_dimms._inits()
End
59 changes: 28 additions & 31 deletions I-Nex/i-nex/.src/Finfosys.form
View file
Original file line number Diff line number Diff line change
Expand Up @@ -1853,37 +1853,34 @@
Alignment = Align.Center
Border = Border.Raised
}
{ TextBox31 TextBox
Move(0,154,231,28)
Text = ("TextBox31")
}
{ TextBox32 TextBox
Move(231,154,238,28)
Text = ("TextBox32")
}
{ TextBox33 TextBox
Move(0,182,231,28)
Text = ("TextBox33")
}
{ TextBox34 TextBox
Move(231,182,238,28)
Text = ("TextBox34")
}
{ TextBox35 TextBox
Move(0,210,231,28)
Text = ("TextBox35")
}
{ TextBox36 TextBox
Move(231,210,238,28)
Text = ("TextBox36")
}
{ TextBox37 TextBox
Move(0,238,231,28)
Text = ("TextBox37")
}
{ TextBox38 TextBox
Move(231,238,238,28)
Text = ("TextBox38")
{ Frame2 Frame
Move(0,154,469,322)
Font = Font["8"]
Text = ("---===Serial Presence Detect===---")
{ Label227 Label
Move(259,21,203,28)
Font = Font["8"]
Padding = 3
Border = Border.Raised
}
{ Label256 Label
Move(91,21,168,28)
Font = Font["8"]
Padding = 3
Border = Border.Raised
}
{ Label257 Label
Move(7,21,84,28)
Font = Font["8"]
Padding = 3
Border = Border.Raised
}
{ Label258 Label
Move(7,49,168,28)
Font = Font["8"]
Padding = 3
Border = Border.Raised
}
}
Index = 8
Text = "Network"
Expand Down

0 comments on commit b474471

Please sign in to comment.