Web.Radio.EightTracks

Module for interfacing http://8tracks.com

API documentation: http://8tracks.com/developers/api_v3

Documentation

data EightTracks

Constructors

EightTracks

Fields

id :: Int

track_file_stream_url :: String

name :: String

performer :: String

release_name :: Maybe String

url :: String

Instances

Show EightTracks

Generic EightTracks

ToJSON ETParam

FromJSON EightTracks

FromJSON ETParam

NeedLogin EightTracks

Radio EightTracks

Show (Param EightTracks)

Generic (Config EightTracks)

Generic (Param EightTracks)

ToJSON (Config EightTracks)

FromJSON (Config EightTracks)

type Rep EightTracks

data Config EightTracks = Config {

• eight :: ETParam

}

data Param EightTracks = Token {

• userToken :: String
• userName :: String
• playToken :: Int
• mixId :: Int

}

type Rep (Config EightTracks)

type Rep (Param EightTracks)

data PlaySession

Response from http:/8tracks.comsets/new.json play_token is the value of interest

Constructors

PlaySession

Fields

play_token :: String

status :: String

errors :: Maybe String

notices :: Maybe String

api_version :: Int

Instances

Show PlaySession

Generic PlaySession

FromJSON PlaySession

type Rep PlaySession

data PlayResponse

Response from play.json next.json track is the value of interest

Constructors

PlayResponse

Fields

play_set :: MixSet

play_status :: String

Instances

Show PlayResponse

Generic PlayResponse

FromJSON PlayResponse

type Rep PlayResponse

data MixSet

Constructors

MixSet

Fields

at_beginning :: Bool

at_last_track :: Bool

at_end :: Bool

skip_allowed :: Bool

track :: EightTracks

Instances

Show MixSet

Generic MixSet

FromJSON MixSet

type Rep MixSet

data MixInfo

Response from http:/8tracks.commixes/14.json or http:/8tracks.comdp/electrominimalicious.json info_mix is the value of interest

Constructors

MixInfo

Fields

info_mix :: Mix

info_status :: String

Instances

Show MixInfo

Generic MixInfo

FromJSON MixInfo

type Rep MixInfo

getMixId :: String -> IO Int

featured :: IO [Mix]

newest :: IO [Mix]

trending :: IO [Mix]

search :: String -> IO [Mix]

pprMixes :: [Mix] -> IO ()

type ETParam = Param EightTracks

eight :: Config EightTracks -> ETParam

userName :: Param EightTracks -> String