git-annex/Upgrade/V4.hs

{- git-annex v4 -> v5 uppgrade support
 -
 - Copyright 2013 Joey Hess <id@joeyh.name>
 -
 - Licensed under the GNU AGPL version 3 or higher.
 -}

module Upgrade.V4 where

import Annex.Common
import Types.Upgrade

{- Was only used for direct mode upgrade. v4 to v5 indirect update is a no-op,
 - and direct mode is no longer supported, so nothing needs to be done. -}
upgrade :: Bool -> Annex UpgradeResult
upgrade _automatic = return UpgradeSuccess
v5 for direct mode, with automatic upgrade This includes storing the current state of the HEAD ref, which git annex sync is going to need, but does not make sync use it. 2013-11-05 20:42:59 +00:00			`{- git-annex v4 -> v5 uppgrade support`
			`-`
update my email address and homepage url 2015-01-21 16:50:09 +00:00			`- Copyright 2013 Joey Hess <id@joeyh.name>`
v5 for direct mode, with automatic upgrade This includes storing the current state of the HEAD ref, which git annex sync is going to need, but does not make sync use it. 2013-11-05 20:42:59 +00:00			`-`
update licenses from GPL to AGPL This does not change the overall license of the git-annex program, which was already AGPL due to a number of sources files being AGPL already. Legally speaking, I'm adding a new license under which these files are now available; I already released their current contents under the GPL license. Now they're dual licensed GPL and AGPL. However, I intend for all my future changes to these files to only be released under the AGPL license, and I won't be tracking the dual licensing status, so I'm simply changing the license statement to say it's AGPL. (In some cases, others wrote parts of the code of a file and released it under the GPL; but in all cases I have contributed a significant portion of the code in each file and it's that code that is getting the AGPL license; the GPL license of other contributors allows combining with AGPL code.) 2019-03-13 19:48:14 +00:00			`- Licensed under the GNU AGPL version 3 or higher.`
v5 for direct mode, with automatic upgrade This includes storing the current state of the HEAD ref, which git annex sync is going to need, but does not make sync use it. 2013-11-05 20:42:59 +00:00			`-}`

			`module Upgrade.V4 where`

remove 163 lines of code without changing anything except imports 2016-01-20 20:36:33 +00:00			`import Annex.Common`
split upgrade into v9 and v10 v10 will run 1 year after the upgrade to v9, to give time for any v8 processes to die. Until that point, the v10 upgrade will be tried by every process but deferred, so added support for deferring upgrades. The upgrade prevention lock file that will be used by v10 is not yet implemented, so it does not yet defer. Sponsored-by: Dartmouth College's Datalad project 2022-01-19 17:06:31 +00:00			`import Types.Upgrade`
v5 for direct mode, with automatic upgrade This includes storing the current state of the HEAD ref, which git annex sync is going to need, but does not make sync use it. 2013-11-05 20:42:59 +00:00
remove most remnants of direct mode A few remain, as needed for upgrades, and for accessing objects from remotes that are direct mode repos that have not been converted yet. 2019-08-26 19:52:19 +00:00			`{- Was only used for direct mode upgrade. v4 to v5 indirect update is a no-op,`
			`- and direct mode is no longer supported, so nothing needs to be done. -}`
split upgrade into v9 and v10 v10 will run 1 year after the upgrade to v9, to give time for any v8 processes to die. Until that point, the v10 upgrade will be tried by every process but deferred, so added support for deferring upgrades. The upgrade prevention lock file that will be used by v10 is not yet implemented, so it does not yet defer. Sponsored-by: Dartmouth College's Datalad project 2022-01-19 17:06:31 +00:00			`upgrade :: Bool -> Annex UpgradeResult`
			`upgrade _automatic = return UpgradeSuccess`