smalltalk
backupFileName := 'backup.dbf'.
backupStream := FileDirectory default newFileNamed: backupFileName.
GemStone currentSession backupToFile: backupStream.
backupStream close.
smalltalk
backupUrl := 'nfs://backup-server/backup-dir/backup.dbf'.
backupStream := FileStream new: backupUrl.
GemStone currentSession backupToFile: backupStream.
backupStream close.
smalltalk
restoreFileName := 'backup.dbf'.
restoreStream := FileStream oldFileNamed: restoreFileName.
GemStone currentSession restoreFromFile: restoreStream.
restoreStream close.
smalltalk
restoreUrl := 'nfs://backup-server/backup-dir/backup.dbf'.
restoreStream := FileStream old: restoreUrl.
GemStone currentSession restoreFromFile: restoreStream.
restoreStream close.
backupPath: '/backup-dir/'.
extent.catalogDirectory: '/backup-dir/'.