Talk:Nintendo Zone: Difference between revisions
mNo edit summary |
No edit summary |
||
| (3 intermediate revisions by 2 users not shown) | |||
| Line 31: | Line 31: | ||
::: Paste your script then. --[[User:Yellows8|Yellows8]] 17:35, 11 December 2014 (CET) | ::: Paste your script then. --[[User:Yellows8|Yellows8]] 17:35, 11 December 2014 (CET) | ||
:::: | :::: | ||
#!/usr/bin/perl | #!/usr/bin/perl | ||
use strict; | use strict; | ||
| Line 45: | Line 44: | ||
$res[3] = decode_base64($res[3]); | $res[3] = decode_base64($res[3]); | ||
$res[3] =~ s/(.)/sprintf("%02X",ord($1))/egs; | $res[3] =~ s/(.)/sprintf("%02X",ord($1))/egs; | ||
$res[3] = ""; | |||
$res[5] = ""; | |||
printf "%s,%s,%s,%s", decode_base64(shift(@res)),decode_base64(shift(@res)),decode_base64(shift(@res)),join(',',@res); | printf "%s,%s,%s,%s", decode_base64(shift(@res)),decode_base64(shift(@res)),decode_base64(shift(@res)),join(',',@res); | ||
}else{ | }else{ | ||
print $_ | print $_; | ||
} | } | ||
} | } | ||
close INFILE; | close INFILE; | ||
Will open file specified as a parameter and print the result with base64 decoded strings and key date inf hex string format. --[[User:Duke srg|Duke srg]] 18:18, 11 December 2014 (CET) | Will open file specified as a parameter and print the result with base64 decoded strings and key date inf hex string format. --[[User:Duke srg|Duke srg]] 18:18, 11 December 2014 (CET) | ||
:"with certain data stripped out" <- I was referring to the ApNum and SecurityKey field values. --[[User:Yellows8|Yellows8]] 18:42, 11 December 2014 (CET) | |||
:: Fixed with blank values --[[User:Duke srg|Duke srg]] 18:57, 11 December 2014 (CET) | |||