aboutsummaryrefslogtreecommitdiff
path: root/misc/snapshot.pl
diff options
context:
space:
mode:
authorDimitri Sokolyuk <demon@dim13.org>2015-07-15 19:25:43 +0200
committerDimitri Sokolyuk <demon@dim13.org>2015-07-15 19:25:43 +0200
commite2e488e5afad6e584eea894b0de5c68b78bea5db (patch)
tree8bf462e75ae0b10e7a4a27bf9bcc9fb4aa27fa25 /misc/snapshot.pl
parenta01332f426950efb5998dc8f0041890bbd44ee3f (diff)
Indent
Diffstat (limited to 'misc/snapshot.pl')
-rw-r--r--misc/snapshot.pl42
1 files changed, 21 insertions, 21 deletions
diff --git a/misc/snapshot.pl b/misc/snapshot.pl
index 227cb16..bd4953b 100644
--- a/misc/snapshot.pl
+++ b/misc/snapshot.pl
@@ -136,27 +136,27 @@ sub GetSystemData{
#EXT=5
#CO =2
my $pdu = $CSTAapdu->encode({svcRequest=>{
- invokeID=>4,
- serviceID=>51,
- serviceArgs=>{
- privateData=>{
- private=>{
- kmeSystemData=>{
- getSystemData=>{
- request=>{
- deviceList=>{
- category=>{
- standardDevice=>$DeviceCategory
- }
- }
- }
- }
- }
- }
- }
+ invokeID=>4,
+ serviceID=>51,
+ serviceArgs=>{
+ privateData=>{
+ private=>{
+ kmeSystemData=>{
+ getSystemData=>{
+ request=>{
+ deviceList=>{
+ category=>{
+ standardDevice=>$DeviceCategory
}
- }
- });
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ });
#my $pdu = "A11602020602020133300DA40BA009A407A105A0030A010".$DeviceCategory;
#$pdu = pack('H*', $pdu);
send_pdu($pdu);
@@ -459,4 +459,4 @@ while (1) {
print "callID: deviceID: CallState:\n";
printf ("%-8s%-10s%-10s\n",$_->[0],$_->[1],$_->[2]) for sort {$a -> [0] cmp $b -> [0]} @calls;
sleep 1;
-} \ No newline at end of file
+}