Retrieve ICC-ID (printed on SIM card) using SIM APIs
device to Prompt One Tier or lower using the Device Security Manager, or sign your code with a privileged certificate.
complex marshaling. Here they are in all their glory:
Shared Function SimInitialize( _
ByVal dwFlags As Integer, _
ByVal lpfnCallback As IntPtr, _
ByVal dwParam As Integer, _
ByRef lphSim As IntPtr) As Integer
End Function
<DllImport(
“cellcore.dll”)> _Shared Function SimDeinitialize( _
ByVal hSim As IntPtr) As Integer
End Function
<DllImport(
“cellcore.dll”)> _Shared Function SimReadRecord( _
ByVal hSim As IntPtr, _
ByVal dwAddress As Integer, _
ByVal dwRecordType As Integer, _
ByVal dwIndex As Integer, _
ByVal lpData() As Byte, _
ByVal dwBufferSize As Integer, _
ByRef dwSize As Integer) As Integer
End Function
the ICCID is the call to SimReadRecord.
This will allow us to retrieve a elementary file from the SIM’s EEPROM.
SimReadRecord takes an address of the record we want to read. This address is
defined as EF_ICCID below:
Dim EF_ICCID As Integer = &H2FE2
retrieve the ICCID.
Dim iccid(9)As Byte
SimInitialize(0, IntPtr.Zero, 0, hSim)
SimReadRecord(hSim, EF_ICCID, SIM_RECORDTYPE_TRANSPARENT, 0, iccid,
iccid.Length, 0)
SimDeinitialize(hSim) Dim SimSerialNumber AsString = FormatAsSimString(iccid)
FormatAsSimString is a method that I wrote to convert the ICCID byte array into the same format as printed on the SIM card. SimSerialNumber will be formatted string that looks something like this:
If you compare the bytes in the ICCID array to the digits printed on the SIM card, you’ll note they don’t quite match up. This is because the ICCID array is an array of 4-bit unsigned integers in little endian order. For example, if the first 6 digits of your ICCID is 894412, they will appear as 0x98, 0x44, 0x21 in the byte array. The helper method below will convert a pair of 4-bit integers (i.e, a byte) into