ePages 7.3.0 - DE_EPAGES/FlexProvider/API/Patch.pm

Package DE_EPAGES::FlexProvider::API::Patch

Provides functions to patch virtual machine using a configuration server

@EXPORT_OK
PatchOrdered
NewPatchAvailable
NewPatchInstalled
DeliverOrderedPatch
InstallHotfixes
SiteVersion

Functions

DeliverOrderedPatch
InstallHotfixes
NewPatchAvailable
NewPatchInstalled
PatchOrdered
SiteVersion

DeliverOrderedPatch

Monitor patching the $Store

Syntax
$Status = DeliverOrderedPatch($Store, $hParams)
Input
$Store (object)
Store object (references the remote database)
$hParams (ref.hash)
parameters
  • max-patch-duration - timeout if patch takes longer than X minutes
  • monitor-interval - check each X seconds the progress of the patch
  • site - name of site (default: Site)

Return
$Status (integer)
0 - success ; else - failue

InstallHotfixes

Monitor hotfixing the $Store

Syntax
$Status = InstallHotfixes($Store, $hParams)
Input
$Store (object)
Store object (references the remote database)
$hParams (ref.hash)
parameters
  • timeout - timeout if hotfix takes longer than X minutes
  • monitor-interval - check each X seconds the progress of the patch
  • site - name of site (default: Site)

Return
$Status (integer)
0 - success ; else - failue

NewPatchAvailable

Updates PatchVersion of $Site and NewPatch on $Store if new version available.

Syntax
($OldVersion, $NewVersion) = NewPatchAvailable($Store, $hParams);
Input
$Store (object)
Store object (references the remote database)
$hParams (ref.hash)
parameters
  • site - name of site (default: Site)
  • test - do not update PatchVersion, just check

Return
$OldVersion (string)
old PatchVersion of $Site on $Store
$NewVersion (string)
new PatchVersion of $Site on $Store

NewPatchInstalled

Updates PatchInstalledOn, NewPatch, InstallNewVersion on $Store.

Syntax
NewPatchInstalled($Store);
Input
$Store (object)
Store object (references the remote database)

PatchOrdered

Check if $Store wants to install new epages patch.

Syntax
$OK = PatchOrdered($Store);
Input
$Store (object)
Store object (references the remote database)
Return
(1 - $Store wants to install new patch ; 0 - not)
$OK

SiteVersion

Return the version of Site.

Syntax
$Version = SiteVersion($Site);
Input
$Site (string (default: Site))
name of site
Return
$Version (version string)
Site version