Discogs

This main module contains the building blocks to operate the library. It exports functionality for running built DiscogsT actions, as well as re-exporting a few helpful types from around the library. Not every type is exported, however, due to clashing record fields. It's recommended to import modules from Discogs.Types.* qualified so that you can use all the record fields without having to deal with ambiguous functions.

Documentation

runDiscogs :: MonadIO m => Text -> Text -> DiscogsT m a -> m (Either (APIError DiscogsError) a)

Run a Discogs action (or a DiscogsT transformer action). This uses the default logged-in settings for DiscogsOptions: rate limiting enabled, default manager, login via username and password, and the default user-agent. You should change the user agent if you're making anything more complex than a basic script, since Discogs's API policy says that you should have a uniquely identifiable user agent.

runDiscogsAnon :: MonadIO m => DiscogsT m a -> m (Either (APIError DiscogsError) a)

Run a Discogs action (or a DiscogsT transformer action). This uses the default logged-out settings, so you won't be able to do anything that requires authentication (like searching or marketplace related functions).

runDiscogsWith :: MonadIO m => DiscogsOptions -> DiscogsT m a -> m (Either (APIError DiscogsError) a)

runResumeDiscogsWith :: MonadIO m => DiscogsOptions -> DiscogsT m a -> m (Either (APIError DiscogsError, Maybe (DiscogsT m a)) a)

Run a Discogs or DiscogsT action with custom settings. You probably won't need this function for most things, but it's handy if you want to persist a connection over multiple Discogs sessions or use a custom user agent string.

interpretIO :: MonadIO m => DiscogsState -> DiscogsT m a -> m (Either (APIError DiscogsError, Maybe (DiscogsT m a)) a)

data DiscogsOptions

Constructors

DiscogsOptions

Fields

rateLimitingEnabled :: Bool

connectionManager :: Maybe Manager

loginMethod :: LoginMethod

customUserAgent :: Maybe ByteString

Instances

Default DiscogsOptions

defaultDiscogsOptions :: DiscogsOptions

The default set of options (ie: Anonymous login)

data LoginMethod

Are we logging in to Discogs? If yes, should we use a stored set of credentials or get a new fresh set?

Constructors

Anonymous

Don't login, instead use an anonymous account

Credentials Text Text

Login using the specified username and password

StoredDetails LoginDetails

Login using a stored set of credentials. Usually the best way to get these is to do runDiscogsAnon $ login user pass.

Instances

Show LoginMethod

Default LoginMethod

data APIError a :: * -> *

Error type for the API, where a is the type that should be returned when something goes wrong on the other end - i.e. any error that isn't directly related to this library.

Constructors

APIError a

A type that represents any error that happens on the API end. Define your own custom type with a FromJSON instance if you want to handle them, or you can use () if you just want to ignore them all.

HTTPError HttpException

Something went wrong when we tried to do a HTTP operation.

InvalidURLError

You're trying to create an invalid URL somewhere - check your Builder's base URL and your Routes.

ParseError String

Failed when parsing the response, and it wasn't an error on their end.

EmptyError

Empty error to serve as a zero element for Monoid.

Instances

Eq a => Eq (APIError a)

Show a => Show (APIError a)

Monoid (APIError a)

data DiscogsError

Constructors

DiscogsError Object

NoRelease

NoArtist

RateLimitError Integer Text

NoMasterRelease

NoLabel

Instances

Eq DiscogsError

Show DiscogsError

FromJSON DiscogsError

ErrorReceivable DiscogsError

type Discogs a = DiscogsT IO a

newtype DiscogsT m a

Constructors

DiscogsT (FreeT (DiscogsF m) m a)

Instances

MonadTrans DiscogsT

Monad m => Monad (DiscogsT m)

Monad m => Functor (DiscogsT m)

Monad m => Applicative (DiscogsT m)

MonadIO m => MonadIO (DiscogsT m)

data DiscogsF m a where

Constructors

FailWith :: APIError DiscogsError -> DiscogsF m a

Nest :: DiscogsT m b -> (Either (APIError DiscogsError) b -> a) -> DiscogsF m a

NestResuming :: DiscogsT m b -> (Either (APIError DiscogsError, Maybe (DiscogsT m b)) b -> a) -> DiscogsF m a

ReceiveRoute :: Receivable b => Route -> (b -> a) -> DiscogsF m a

RunRoute :: FromJSON b => Route -> (b -> a) -> DiscogsF m a

WithBaseURL :: Text -> DiscogsT m b -> (b -> a) -> DiscogsF m a

Instances

Functor (DiscogsF m)

runRoute :: (FromJSON a, Monad m) => Route -> DiscogsT m a

receiveRoute :: (Receivable a, Monad m) => Route -> DiscogsT m a

nest :: Monad m => DiscogsT m a -> DiscogsT m (Either (APIError DiscogsError) a)

failWith :: Monad m => APIError DiscogsError -> DiscogsT m a

newtype Modhash

Constructors

Modhash Text

Instances

Eq Modhash

Read Modhash

Show Modhash

FromJSON Modhash

data LoginDetails

Constructors

LoginDetails Modhash CookieJar

Instances

Eq LoginDetails

Show LoginDetails

Receivable LoginDetails

withBaseURL :: Monad m => Text -> DiscogsT m a -> DiscogsT m a

builder :: Builder

mainBaseURL :: Text

loginBaseURL :: Text

addHeader :: Maybe ByteString -> Request -> Request

addAPIType :: Route -> Route