Skip to content

Update ps3mfw_base.tcl #1

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Open
anonymous-ElmerFudd wants to merge 1 commit into
base: master
Choose a base branch
from
Open

Update ps3mfw_base.tcl #1

Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
25 changes: 24 additions & 1 deletion ps3mfw_base.tcl
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -452,6 +452,7 @@ proc modify_coreos_file { file callback args } {
::cosunpkg_package [file join $unpkgdir content] $cosunpkgdir

if {[file writable [file join $cosunpkgdir $file]]} {
set ::SELF $file
eval $callback [file join $cosunpkgdir $file] $args
} elseif { ![file exists [file join $cosunpkgdir $file]] } {
die "Could not find $file in CORE_OS_PACKAGE"
Expand Down Expand Up @@ -500,6 +501,26 @@ proc modify_coreos_files { files callback args } {
}
}

# proc for "unpackaging" the "CORE_OS" files, and calling
# the user-specified callback proc for doing any patching of any files, etc,
# then re-packaging up the CORE_OS files...
proc patch_coreos_files { callback args } {
log "UN-PACKAGING CORE_OS files..."
set pkg [file join ${::CUSTOM_UPDATE_DIR} CORE_OS_PACKAGE.pkg]
set unpkgdir [file join ${::CUSTOM_UPDATE_DIR} CORE_OS_PACKAGE.unpkg]
set cosunpkgdir [file join ${::CUSTOM_UPDATE_DIR} CORE_OS_PACKAGE]

::unpkg_archive $pkg $unpkgdir
::cosunpkg_package [file join $unpkgdir content] $cosunpkgdir

# now call the callback function to do any patching of files...
eval $callback $cosunpkgdir $args

log "RE-PACKAGING CORE_OS files..."
::cospkg_package $cosunpkgdir [file join $unpkgdir content]
::pkg_archive $unpkgdir $pkg
}

proc get_pup_build {} {
debug "Getting PUP build from [file tail ${::IN_FILE}]"
catch_die {pup_get_build ${::IN_FILE}} "Could not get the PUP build information"
Expand Down Expand Up @@ -564,6 +585,7 @@ proc makeself {in out} {
set authID ""
set vendID "ff000000"
set selfType ""
set compress FALSE

# Reading the pup suffix var and set up fw/self version var
if { ${::SUF} == ${::c} } {
Expand All @@ -584,6 +606,7 @@ proc makeself {in out} {
if { ${::SELF} == "lv0" } {
set authID "1ff0000001000001"
set selfType "LV0"
set compress FALSE
}
if { ${::SELF} == "appldr" } {
set authID "1ff000000c000001"
Expand Down Expand Up @@ -627,7 +650,7 @@ proc makeself {in out} {
}
}

shell ${::SCETOOL} -0 SELF -1 TRUE -2 $keyRev -3 $authID -4 $vendID -5 $selfType -A $versionVar -6 $fwversiVar -e $in $out
shell ${::SCETOOL} -0 SELF -1 $compress -2 $keyRev -3 $authID -4 $vendID -5 $selfType -A $versionVar -6 $fwversiVar -e $in $out
}

proc decrypt_self {in out} {
Expand Down