sim-card
/
softsim
10
0
Fork 0
Code Releases Activity

updated to ruby1.9 (I may have missed some), and fixed some bugs/typos

This commit is contained in:
Kevin Redon 2013-01-22 15:08:54 +01:00
parent 9bb57d7ac6
commit 81db0e7926
10 changed files with 77 additions and 60 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/apdu_forward.rb
View File

@ -18,7 +18,7 @@ along with sofSIM. If not, see <http://www.gnu.org/licenses/>.
Copyright (C) 2011 Kevin "tsaitgaist" Redon kevredon@mail.tsaitgaist.info
=end
# this programm will forward APDU from an IO to a SAP server
require 'sap/client'
require './sap/client.rb'
require 'socket'
SAP_HOST = "localhost"

8
src/copy_client.rb
View File

@ -17,8 +17,8 @@ along with sofSIM. If not, see <http://www.gnu.org/licenses/>.
Copyright (C) 2011 Kevin "tsaitgaist" Redon kevredon@mail.tsaitgaist.info
=end
# this class copies all files from the SIM to an xml file
require 'sap/client'
require 'lib/apdu'
require './sap/client.rb'
require './lib/apdu.rb'
require 'xml'
class Copy
@ -52,7 +52,7 @@ class Copy
# verify CHV1
while chv_enabled? do
print "enter PIN : "
print "enter PIN: "
STDOUT.flush
pin = gets.chomp
# pin is between 4 and 8 digits
@ -254,7 +254,7 @@ class Copy
@nb_files = 0 unless @nb_files
@nb_files += 1
rescue Exception => e
puts "file error : #{e.to_s}"
puts "file errors: #{e.to_s}"
select_decode(select(id))
end
end

18
src/demo_client.rb
View File

@ -18,10 +18,10 @@ along with sofSIM. If not, see <http://www.gnu.org/licenses/>.
Copyright (C) 2011 Kevin "tsaitgaist" Redon kevredon@mail.tsaitgaist.info
=end
# this programm will create a client which can be used to test servers
require 'sap/client'
require 'lib/apdu'
require 'info_client'
require 'copy_client'
require './sap/client.rb'
require './lib/apdu.rb'
require './info_client.rb'
require './copy_client.rb'
#=============
#== default ==
@ -64,8 +64,8 @@ def print_help
puts ""
puts "options :"
puts " --help,-h\t\tprint this help"
puts " --type,-t client\tclient type : demo,info,copy (default #{@type})"
puts " --socket,-s type\tsocket type : tcp,unix,bt (default #{@socket})"
puts " --type,-t client\tclient type: demo,info,copy (default #{@type})"
puts " --socket,-s type\tsocket type: tcp,unix,bt (default #{@socket})"
puts " --tcp,-p port\t\ttcp port (default #{@port})"
puts " --host,-l host\t\ttcp host (default #{@host})"
puts " --unix,-u file\t\tunix socket (default #{@unix})"
@ -130,7 +130,7 @@ when "bt"
if @bt then
io = SerialPort.new(@bt)
else
require 'lib/bluetooth_sap_serial'
require './tools/bluetooth_sap_serial.rb'
bt = BluetoothSAPSerial.new
# using SerialPort because reading the File does not work (have to find right stty options)
io = SerialPort.new(bt.connect)
@ -148,7 +148,7 @@ when "demo"
# get ATR
atr = @client.atr
puts atr ? "ATR : #{atr.to_hex_disp}" : "could not get ATR"
puts atr ? "ATR: #{atr.to_hex_disp}" : "could not get ATR"
# get IMSI
imsi = read_ef([MF,DF_GSM,EF_IMSI])
@ -166,7 +166,7 @@ when "demo"
rands << [(i<<4)+i]*16
end
# the results
puts "some KCs (RAND SRES Kc) :"
puts "some KCs (RAND SRES Kc):"
rands.each do |r|
response = a38(r)
puts " - #{r.to_hex_disp.gsub(' ','')} #{response[0,4].to_hex_disp.gsub(' ','')} #{response[4..-1].to_hex_disp.gsub(' ','')}"

8
src/demo_server.rb
View File

@ -48,8 +48,8 @@ def print_help
puts ""
puts "options :"
puts " --help,-h\t\tprint this help"
puts " --type,-t type\tserver type : pcsc,sim (default #{@type})"
puts " --socket,-s type\tsocket type : tcp,unix,bt (default #{@socket})"
puts " --type,-t type\tserver type: pcsc,sim (default #{@type})"
puts " --socket,-s type\tsocket type: tcp,unix (default #{@socket})"
puts " --port,-p port\t\ttcp listeing port (default #{@port})"
puts " --unix,-u file\t\tunix socket (default #{@unix})"
puts " --file,-f file\t\tfile for sim type (default #{@file})"
@ -107,10 +107,10 @@ io = socket.accept
case @type
when "pcsc"
require 'pcsc_server'
require './pcsc_server.rb'
server = PCSCServer.new(io)
when "sim"
require 'simos_server'
require './simos_server.rb'
server = SIMServer.new(io)
else
raise "unkown server type"

42
src/info_client.rb
View File

@ -18,8 +18,8 @@ along with sofSIM. If not, see <http://www.gnu.org/licenses/>.
Copyright (C) 2011 Kevin "tsaitgaist" Redon kevredon@mail.tsaitgaist.info
=end
# this programm will display information stored in the SIM
require 'sap/client'
require 'lib/apdu'
require './sap/client.rb'
require './lib/apdu.rb'
#=============
#== methods ==
@ -104,11 +104,11 @@ class Info
# display the information stored on the SIM
def display
# get the ATR
puts "ATR : #{@client.atr.to_hex_disp}"
puts "ATR: #{@client.atr.to_hex_disp}"
# verify CHV1
while chv_enabled? do
print "enter PIN : "
print "enter PIN: "
$stdout.flush
pin = gets.chomp
# pin is between 4 and 8 digits
@ -138,7 +138,7 @@ class Info
iccid = read_ef([MF,EF_ICCID])
# get rid of the padding
iccid = iccid.nibble_str(true)
puts "ICCID : "+iccid
puts "ICCID: "+iccid
# get IMSI
imsi = read_ef([MF,DF_GSM,EF_IMSI])
@ -147,7 +147,7 @@ class Info
imsi = imsi[1,imsi_length]
# first nibble is for parity check (not done)
imsi = imsi.nibble_str[1..-1]
puts "IMSI : "+imsi
puts "IMSI: "+imsi
# service provider name
begin
@ -195,7 +195,7 @@ class Info
"reserved"
end
msisdn_str += ", "
msisdn_str += "numbering plan identifier : #{npi}"
msisdn_str += "numbering plan identifier: #{npi}"
ton = case (msisdn[-13]>>4)&0x7
when 0
"unknown"
@ -211,7 +211,7 @@ class Info
"reserved"
end
msisdn_str += ", "
msisdn_str += "type of number : #{ton}"
msisdn_str += "type of number: #{ton}"
number = msisdn[-12,msisdn[-14]-1].nibble_str(true)
number.gsub!(/[Aa]/,"*")
number.gsub!(/[Bb]/,"#")
@ -219,13 +219,13 @@ class Info
number.gsub!(/[Dd]/,"§")
number.gsub!(/[Ee]/,"1")
msisdn_str += ", "
msisdn_str += "number : #{number}"
msisdn_str += "number: #{number}"
msisdn_str += ", capability in EF_CCP #{msisdn[-2]}" unless msisdn[-2]==0xff
msisdn_str += ", entension in EF_EXT #{msisdn[-1]}" unless msisdn[-1]==0xff
msisdn_str += "\n"
end
if msisdn_str.length>0 then
puts "MSISIDN :"
puts "MSISIDN:"
puts msisdn_str
else
puts "MSISDN empty"
@ -237,7 +237,7 @@ class Info
# get PLMsel
plmn = read_ef([DF_GSM,EF_PLMNSEL])
# transform to MCC MNC
print "PLMN selector : "
print "PLMN selector: "
plmns = ""
(plmn.length/3).times do |i|
mcc = plmn[3*i,2].nibble_str(true)
@ -256,7 +256,7 @@ class Info
if plmn[0,3]==[0xff]*3 then
puts "no forbidden PLMN"
else
print "forbidden PLMN : "
print "forbidden PLMN: "
plmns = ""
(plmn.length/3).times do |i|
mcc = plmn[3*i,2].nibble_str(true)
@ -270,7 +270,7 @@ class Info
begin
plmn = read_ef([MF,DF_GSM,EF_PLMNWACT])
# transform to MCC MNC
print "user controlled PLMN : "
print "user controlled PLMN: "
plmns = ""
(plmn.length/5).times do |i|
mcc = plmn[3*i,2].nibble_str(true)
@ -286,7 +286,7 @@ class Info
begin
plmn = read_ef([MF,DF_GSM,EF_OPLMNWACT])
# transform to MCC MNC
print "operator controlled PLMN : "
print "operator controlled PLMN: "
plmns = ""
(plmn.length/5).times do |i|
mcc = plmn[3*i,2].nibble_str(true)
@ -319,7 +319,7 @@ class Info
rands << [(i<<4)+i]*16
end
# the results
puts "some KCs (RAND SRES Kc) :"
puts "some KCs (RAND SRES Kc):"
rands.each do |r|
response = a38(r)
puts " - #{r.to_hex_disp.gsub(' ','')} #{response[0,4].to_hex_disp.gsub(' ','')} #{response[4..-1].to_hex_disp.gsub(' ','')}"
@ -339,7 +339,7 @@ class Info
end
# get EFsst
puts "SIM service table :"
puts "SIM service table:"
sst = read_ef([MF,DF_GSM,EF_SST])
sst.each_index do |i|
(0..4).each do |j|
@ -362,8 +362,8 @@ class Info
# get the phase
ad = read_ef([MF,DF_GSM,EF_AD])
puts "administration data :"
ms = " - MS operation mode : "
puts "administration data:"
ms = " - MS operation mode: "
ms += case ad[0]
when 0x00
"normal operation"
@ -379,16 +379,16 @@ class Info
"cell test operation"
end
puts ms
ofm = " - OFM (Operational Feature Monitor) : "
ofm = " - OFM (Operational Feature Monitor): "
ofm += ad[2]&0x01==0x00 ? "disabled" : "enabled"
puts ofm
if ad.length>3 then
puts " - length of MNC in the IMSI : #{ad[3]}"
puts " - length of MNC in the IMSI: #{ad[3]}"
end
# location information
loci = read_ef([MF,DF_GSM,EF_LOCI])
puts "location informtion :"
puts "location informtion:"
puts " - TMSI : #{loci[0,4].to_hex_disp.gsub(' ','')}"
puts " - LAI : #{loci[4,5].to_hex_disp.gsub(' ','')}"
puts " - TMSI TIME : #{loci[9]==0 ? 'infinite' : (loci[9]*6).to_s+' min'}"

8
src/pcsc_server.rb
View File

@ -17,7 +17,7 @@ along with sofSIM. If not, see <http://www.gnu.org/licenses/>.
Copyright (C) 2011 Kevin "tsaitgaist" Redon kevredon@mail.tsaitgaist.info
=end
require 'sap/server'
require './sap/server.rb'
require 'rubygems'
require 'smartcard'
=begin
@ -67,18 +67,18 @@ class PCSCServer < Server
# reader already selected
else
# select reader
puts "readers :"
puts "readers:"
readers.each_index do |i|
puts "#{i}) #{readers[i]}"
end
reader = nil
until reader do
print "select reader [0] : "
print "select reader [0]: "
@reader_id = gets.chomp.to_i
reader = readers[@reader_id]
end
end
puts "using reader : #{reader}"
puts "using reader: #{reader}"
# connect to the card
verb = true

2
src/sap/client.rb
View File

@ -18,7 +18,7 @@ Copyright (C) 2011 Kevin "tsaitgaist" Redon kevredon@mail.tsaitgaist.info
=end
# this is the client part of the SAP
# it implements the state machine for the client
require 'sap/common'
require './sap/common.rb'
# this is an abstract class
# TODO :

2
src/sap/server.rb
View File

@ -19,7 +19,7 @@ Copyright (C) 2011 Kevin "tsaitgaist" Redon kevredon@mail.tsaitgaist.info
# this is the server part of the SAP
# it implements the state machine for the server
# this is an abstract class
require 'sap/common'
require './sap/common.rb'
# this is an bastract class
# TODO (not implemented) :

4
src/simos_server.rb
View File

@ -17,8 +17,8 @@ along with sofSIM. If not, see <http://www.gnu.org/licenses/>.
Copyright (C) 2011 Kevin "tsaitgaist" Redon kevredon@mail.tsaitgaist.info
=end
require 'sap/server'
require 'lib/apdu'
require './sap/server.rb'
require './lib/apdu.rb'
require 'socket'
require 'xml'

43
src/tools/bluetooth_sap_serial.rb
View File

@ -84,7 +84,6 @@ class BluetoothSAPSerial
bt_adapter = bt_service.object(adapter)
bt_adapter.introspect
bt_adapter.default_iface = "org.bluez.Adapter"
#$stdout.puts bt_abapter_object["org.bluez.Adapter"].Address
bt_adapter = bt_adapter.GetProperties()[0]
bt_adapters << {
:object => adapter,
@ -101,12 +100,12 @@ class BluetoothSAPSerial
elsif bt_adapters.size==1 then
bt_adapter = bt_adapters[0]
else
$stdout.puts "multiple bluetooth adapter "
$stdout.puts "multiple bluetooth adapter:"
bt_adapters.each_index do |i|
bt_adapter = bt_adapters[i]
$stdout.puts "#{i}) #{bt_adapter[:adapter]} (#{bt_adapter[:address]} - #{bt_adapter[:name]})#{bt_adapter[:default] ? ' [default]' : ''}"
end
$stdout.print "select adapter : "
$stdout.print "select adapter: "
adapter = $stdin.gets.chomp
if adapter.length==0 then
bt_adapters.each_index do |i|
@ -153,13 +152,13 @@ class BluetoothSAPSerial
puts "no devices found"
exit 0
end
$stdout.puts "#{devices.size} device(s) found :"
$stdout.puts "#{devices.size} device(s) found:"
devices.each do |address,properties|
$stdout.puts "- #{properties["Name"]} (#{properties["Address"]})"
end
# check for SAP
$stdout.puts "SAP capable devices :"
$stdout.puts "SAP capable devices:"
sap_devices = []
devices.each do |address,properties|
@ -171,7 +170,25 @@ class BluetoothSAPSerial
end
# get the device (create it if it does not exist)
if !device_exists then
device_object = bt_adapter.CreateDevice(properties["Address"])[0]
tries = 3
wait_time = 1
begin
device_object = bt_adapter.CreateDevice(properties["Address"])[0]
rescue DBus::Error => e
if e.to_s.include? "Host is down" then
if tries>0 then
puts "host is down, retrying #{tries} in #{wait_time}s"
tries -= 1;
sleep wait_time;
retry
else
puts "host is down, exiting"
exit 1
end
else
raise
end
end
else
device_object = bt_adapter.path+"/"+device_object
end
@ -203,12 +220,12 @@ class BluetoothSAPSerial
elsif sap_devices.size == 1 then
sap_device = sap_devices[0]
else
$stdout.puts "multiple devices possible"
$stdout.puts "multiple devices possible:"
sap_devices.each_index do |i|
$stdout.puts "- #{sap_devices[0][:name]} (#{sap_devices[0][:addr]}"
$stdout.puts "#{i}) #{sap_devices[i][:name]} (#{sap_devices[i][:addr]})"
end
$stdout.print "select device : "
sap_device = $stdin.gets.chomp
$stdout.print "select device: "
sap_device = $stdin.gets.chomp.to_i
sap_device = sap_devices[sap_device]
end
$stdout.puts "using device #{sap_device[:name]} (#{sap_device[:addr]})"
@ -243,16 +260,16 @@ class BluetoothSAPSerial
unless @paired then
$stdout.puts "enter PIN (16 digits) on the device, then confirm it on the computer"
end
# connect to device
@bt_sap.default_iface = "org.bluez.Serial"
begin
@rfcomm = @bt_sap.Connect(SAP_UUID)[0]
rescue DBus::Error => e
if e.to_s == "org.bluez.Error.Failed: Connection refused (111)" then
if e.to_s.include? "Connection refused (111)" then
$stderr.puts "Connection to device failed. Restarting the device might help"
exit 1
elsif e.to_s == "org.bluez.Error.Failed: Connection timed out" then
elsif e.to_s.include? "Connection timed out" then
$stderr.puts "Device does not respond to connection request"
exit 1
else