Class {
	#name : 'MFTUtils',
	#superclass : 'Object',
	#classInstVars : [
		'version'
	],
	#category : 'MyFitnessTracker-Utils',
	#package : 'MyFitnessTracker-Utils'
}

{ #category : 'utilities' }
MFTUtils class >> createDeploymentImage [

	| stdout |
	version := (IceRepository repositoryNamed: 'my-fitness-tracker')
		           headCommit id copyFrom: 1 to: 6.

	stdout := NonInteractiveTranscript stdout.
	stdout crShow: 'Creating MFT deployment image...'.
	stdout crShow: 'Setting the image in server mode...'.
	WorldState serverMode: true.

	stdout crShow:
		'The following handlers are registered with the default dispatcher:'.
	stdout crShow: WAAdmin defaultDispatcher handlers keys asString.
	stdout crShow: 'Clearing default dispatcher, caches, and sessions...'.
	WAAdmin clearAll.
	stdout crShow: 'Disabling development tools...'.
	WAAdmin disableDevelopmentTools.
	stdout crShow: 'Initializing MFTRootComponent...'.
	MFTRootComponent initialize.
	stdout crShow: 'Setting default dispatcher to ''mft''...'.
	WAAdmin defaultDispatcher defaultName: 'mft'.

	stdout crShow: 'Cleaning up image for release...'.
	ImageCleaner cleanUpForRelease.
	stdout crShow: 'MFT deployment image created successfully.'.
	stdout crShow:
		'The following handlers are registered with the default dispatcher:'.
	stdout crShow: WAAdmin defaultDispatcher handlers keys asString.
	stdout crShow: 'Saving and exiting from image.'.
	stdout cr.
	stdout close.
	Smalltalk cleanUp.
	SmalltalkImage current snapshot: true andQuit: true
]

{ #category : 'as yet unclassified' }
MFTUtils class >> isDevelopmentImage [
	"If the current MFT image has no version, it is a development version."

	version ifNil: [ ^ true ] ifNotNil: [ ^ false ]
]

{ #category : 'versions' }
MFTUtils class >> version [

	^ version
]