mirror of
https://github.com/rvtr/TwlIPL.git
synced 2025-10-31 06:01:12 -04:00
79ac070182
・可変長データを埋め込めるよう、なんとか対応 ・バージョン以外のデータもいろいろ追加 ・インポートし、ランチャーでの取得まで確認（署名検証処理は未実装） git-svn-id: file:///Users/lillianskinner/Downloads/platinum/twl/TwlIPL/trunk@1692 b08762b0-b915-fc4b-9d8c-17b2551a87ff
140 lines
3.7 KiB
Perl
140 lines
3.7 KiB
Perl
#!/usr/bin/perl
|
|
|
|
######################################################################
|
|
# genVersion.pl
|
|
#
|
|
# generate SystemMenu Version Data
|
|
#
|
|
# [[ FILE FORMAT ]]
|
|
# security code (128 bytes) : RSA signature of Version Data
|
|
#
|
|
# Header ( 96 bytes)
|
|
# TimeStamp ( 4 bytes) : date %y%m%d%H
|
|
# Version ( 4 bytes) : 0.0 ~ 65535.65535
|
|
# UserAreaSize ( 4 bytes) : Size of UserArea
|
|
# Data1Offset ( 4 bytes) : File offset of Data1
|
|
# Data1Size ( 4 bytes) : Size of Data1
|
|
# padding ( 12 bytes) :
|
|
# Data1Hash ( 20 bytes) : SHA1 digest of Data1
|
|
# padding ( 44 bytes) :
|
|
#
|
|
# Data1 (flexible length) :
|
|
# padding ( 32 bytes) :
|
|
#
|
|
# note: each section image is aligned to 32 bytes.
|
|
#
|
|
######################################################################
|
|
|
|
use POSIX 'strftime';
|
|
use File::Basename;
|
|
|
|
if ($#ARGV < 3) {
|
|
printf STDOUT ("Usage: %s [genVersion] timestamp majorVersion minorVersion userAreaSize\n", $0);
|
|
exit(-1);
|
|
}
|
|
|
|
my $outFile = "SysmenuVersion.dat";
|
|
my $data1File = "data1.bin";
|
|
my $headerFile = "header.bin";
|
|
my $digestFile = "digest.bin";
|
|
my $tmpFile = "tmp.bin";
|
|
my $signFile = "sign.bin";
|
|
|
|
# 後始末
|
|
sub deleteTemp {
|
|
system ("rm -f $tmpFile");
|
|
system ("rm -f $digestFile");
|
|
system ("rm -f $data1File");
|
|
system ("rm -f $headerFile");
|
|
system ("rm -f $signFile");
|
|
}
|
|
|
|
my $signSize = 0x80;
|
|
my $headerSize = 0x80;
|
|
my $data1Len = 0x20;
|
|
|
|
# Data1情報の出力
|
|
{
|
|
open DATA1, ">$data1File" or die "File Open Error.\n";
|
|
binmode DATA1;
|
|
|
|
# ダミーデータの出力
|
|
syswrite( DATA1, pack( "x$data1Len") );
|
|
|
|
close DATA1;
|
|
}
|
|
|
|
# ヘッダ情報の出力
|
|
{
|
|
# timestampLen = 0x08;
|
|
# elementNumLen = 0x02;
|
|
my $pad1Len = 0x0c;
|
|
my $pad2Len = 0x2c;
|
|
my $data1Off = $signSize + $headerSize;
|
|
my $sha1Len = 0x14;
|
|
|
|
open HEADER, ">$headerFile" or die "File Open Error.\n";
|
|
binmode HEADER;
|
|
|
|
# my $timestamp = strftime "%y%m%d%H", localtime;
|
|
my $timestamp = $ARGV[ 0 ];
|
|
my $ver = ( ( $ARGV[ 1 ] & 0xffff ) << 16 ) | ($ARGV[ 2 ] & 0xffff);
|
|
my $userAreaSize = $ARGV[ 3 ];
|
|
|
|
# タイムスタンプの出力
|
|
printf "timestamp = %s\n", $timestamp;
|
|
syswrite( HEADER, pack( "N", unpack( "L", pack( "H8", $timestamp ) ) ) );
|
|
|
|
# バージョンの出力
|
|
printf "version = %d.%d\n", ($ver >> 16), ($ver & 0xffff);
|
|
syswrite( HEADER, pack( "L", $ver ) );
|
|
|
|
# ユーザ領域サイズの出力
|
|
printf "userAreaSize = $userAreaSize\n";
|
|
syswrite( HEADER, pack( "L", $userAreaSize ) );
|
|
# Data1オフセットの出力
|
|
printf "data1Offset = $data1Off\n";
|
|
syswrite( HEADER, pack( "L", $data1Off ) );
|
|
# Data1サイズの出力
|
|
printf "data1Size = $data1Len\n";
|
|
syswrite( HEADER, pack( "L", $data1Len ) );
|
|
|
|
# パディング1の出力
|
|
syswrite( HEADER, pack( "x$pad1Len") );
|
|
|
|
# Data1ハッシュの出力
|
|
{
|
|
my $digest;
|
|
system ("openssl dgst -sha1 -binary -out $digestFile $data1File");
|
|
open DIGEST, $digestFile or die "File Open Error.\n";
|
|
binmode DIGEST;
|
|
sysread( DIGEST, $digest, $sha1Len );
|
|
close DIGEST;
|
|
syswrite( HEADER, $digest, $sha1Len );
|
|
}
|
|
|
|
# パディング2の出力
|
|
syswrite( HEADER, pack( "x$pad2Len") );
|
|
|
|
close HEADER;
|
|
}
|
|
|
|
# 環境変数サーチ
|
|
foreach ( sort keys ( %ENV ) ){
|
|
if ($_ =~ m/TWL_IPL_RED_PRIVATE_ROOT/s) {
|
|
$KEYROOT = $ENV{$_};
|
|
}
|
|
}
|
|
if (!$KEYROOT) {
|
|
deleteTemp();
|
|
die "No TWL_IPL_RED_PRIVATE_ROOT is found.\n";
|
|
}
|
|
|
|
# 署名付加
|
|
{
|
|
system ( "openssl rsautl -sign -in $headerFile -inkey $KEYROOT/keys/rsa/private_sharedFont.der -keyform DER -out $signFile" );
|
|
system ( "cat $signFile $headerFile >$tmpFile" );
|
|
system ( "cat $tmpFile $data1File > $outFile" );
|
|
deleteTemp();
|
|
}
|