space Baylys
Just practicing to pass the Turing test.
space
space
space
space
Developer for Hire!
space
addedValues Plugin
space

Home

What's new

Bayly.Root

Cornershop Plugin

Career

edutools Root

Enhancements

Interests

linguist Plugin

Manila

Patches

space

mainresponder

manilaData

manilamacros

manilaSuite

space
space

admin

backups

space
space

backupAllSites

backupOneSite

space

discuss

gems

getCanonicalSiteName

hierarchyPage

hosting

html

mail

member

members

news

plugins

prefs

referer

renderNewsPage

rpcHandlers

rpcUtils

search

sendMail

siteStructure

staticRendering

storyList

space

system

Patches by Group

Papers

Sales

Sign My Guestbook

User(land) Relations.

Contact Address

Search Baylys

urlchains

space
Join Now
Login
space space space

manilaSuite.backups.backupOneSite

Fix numerous bugs in this routine.

  • Fix fundemental design bug where only the first backup actually does an incremental backup of
    all tables in the website.
  • Ensure errors are logged.
  • Close a root and re-open it before traversing it to decide what has changed, as an attempt to reduce memory checkerboarding.

on backupOneSite (adrsite, adrdata, basefolder="")
  «Changes
 unaltered lines omitted
 
  adrdata^.ctfiles = 0
  adrdata^.cterrors = 0
  adrdata^.ctfilesbackedup = 0
  adrdata^.ctbytesbackedup = 0
 
  local (pc = file.getpathchar ())
  on writeObject (folder, adr)
 unaltered lines omitted
  on writeSubfolder (folder, adrtable)
 unaltered lines omitted
  on writeMembers (adrmembers)
 unaltered lines omitted
  if basefolder == ""
 unaltered lines omitted
  file.surefilepath (basefolder + "x")
  basefolder = basefolder + nameof (adrsite^) + pc
  file.surefolder (basefolder)
 
  local (adr)
  for adr in adrsite
 unaltered lines omitted
 
  bundle //see if it's an old-style site for membership
  bundle //see if it's an old-style site for discussion group
«bundle //test code
  «backupOneWebsite (@createASiteManilaWebsite, @scratchpad.backupData)

Relative to Frontier version 9.7b10