git-annex/Types/Availability.hs

{- git-annex remote availability
 -
 - Copyright 2014 Joey Hess <id@joeyh.name>
 -
 - Licensed under the GNU AGPL version 3 or higher.
 -}

module Types.Availability where

data Availability = GloballyAvailable | LocallyAvailable | Unavailable
	deriving (Eq, Show)
add GETAVAILABILITY to external special remote protocol And some reworking of types, and added an annex-availability git config setting. 2014-01-13 14:41:10 -04:00			`{- git-annex remote availability`
			`-`
update my email address and homepage url 2015-01-21 12:50:09 -04:00			`- Copyright 2014 Joey Hess <id@joeyh.name>`
add GETAVAILABILITY to external special remote protocol And some reworking of types, and added an annex-availability git config setting. 2014-01-13 14:41:10 -04: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 15:48:14 -04:00			`- Licensed under the GNU AGPL version 3 or higher.`
add GETAVAILABILITY to external special remote protocol And some reworking of types, and added an annex-availability git config setting. 2014-01-13 14:41:10 -04:00			`-}`

			`module Types.Availability where`

let Remote.availability return Unavilable This is groundwork for making special remotes like borg be skipped by sync when on an offline drive. Added AVAILABILITY UNAVAILABLE reponse and the UNAVAILABLERESPONSE extension to the external special remote protocol. The extension is needed because old git-annex, if it sees that response, will display a warning message. (It does continue as if the remote is globally available, which is acceptable, and the warning is only displayed at initremote due to remote.name.annex-availability caching, but still it seemed best to make this a protocol extension.) The remote.name.annex-availability git config is no longer used any more, and is documented as such. It was only used by external special remotes to cache the availability, to avoid needing to start the external process every time. Now that availability is queried as an Annex action, the external is only started by sync (and the assistant), when they actually check availability. Sponsored-by: Nicholas Golder-Manning on Patreon 2023-08-16 14:31:31 -04:00			`data Availability = GloballyAvailable \| LocallyAvailable \| Unavailable`
			`deriving (Eq, Show)`