Sound.Sc3.Server.Graphdef

Binary 'Graph Definition' as understood by scsynth. There are both binary and text encoders and decoders.

Type

type Name = Ascii

Names are Ascii strings (ie. ByteString.Char8)

type Control = (Name, Int)

Controls are a name and a ugen-index.

type Sample = Double

Constants are floating point.

type Ugen_Index = Int

Ugen indices are Int.

type Port_Index = Int

Port indices are Int.

constant_index :: Ugen_Index

Index used to indicate constants at Ugen inputs. Ie. if the ugen-index is this value (-1) it indicates a constant.

data Input

Inputs are a ugen-index and a port-index.

Constructors

Input Ugen_Index Port_Index

Instances

Show Input

Defined in Sound.Sc3.Server.Graphdef

Methods

showsPrec :: Int -> Input -> ShowS

show :: Input -> String

showList :: [Input] -> ShowS

Eq Input

Defined in Sound.Sc3.Server.Graphdef

Methods

(==) :: Input -> Input -> Bool

(/=) :: Input -> Input -> Bool

type Rate = Int

Rates are encoded as integers (IR = 0, KR = 1, AR = 2, DR = 3).

type Output = Rate

Outputs each indicate a Rate.

type Special = Int

Secondary (special) index, used by operator Ugens to select operation.

type Ugen = (Name, Rate, [Input], [Output], Special)

Unit generator type.

ugen_name_str :: Ugen -> String

Ugen name.

ugen_name_op :: Ugen -> String

Ugen name, using operator name if appropriate.

ugen_rate :: Ugen -> Rate

Ugen Rate.

ugen_rate_enum :: Ugen -> Rate

ugen_inputs :: Ugen -> [Input]

Ugen Inputs.

ugen_outputs :: Ugen -> [Output]

Ugen Outputs.

ugen_is_control :: Ugen -> Bool

Predicate to examine Ugen name and decide if it is a control.

input_is_control :: Graphdef -> Input -> Bool

Input is a Ugen (ie. not a constant, indicated by a ugen-index of -1) and the Ugen is a control.

data Graphdef

Graph definition type.

Constructors

Graphdef

Fields

• graphdef_name :: Name
• graphdef_constants :: [Sample]
• graphdef_controls :: [(Control, Sample)]
• graphdef_ugens :: [Ugen]

Instances

Show Graphdef

Defined in Sound.Sc3.Server.Graphdef

Methods

showsPrec :: Int -> Graphdef -> ShowS

show :: Graphdef -> String

showList :: [Graphdef] -> ShowS

Eq Graphdef

Defined in Sound.Sc3.Server.Graphdef

Methods

(==) :: Graphdef -> Graphdef -> Bool

(/=) :: Graphdef -> Graphdef -> Bool

Audible Graphdef

Defined in Sound.Sc3.Server.Transport.Fd

Methods

play_id :: Transport t => Int -> t -> Graphdef -> IO ()

play :: Transport t => t -> Graphdef -> IO ()

Audible Graphdef

Defined in Sound.Sc3.Server.Transport.Monad

Methods

playAt :: Transport m => Play_Opt -> Graphdef -> m ()

play :: Transport m => Graphdef -> m ()

graphdef_ugen :: Graphdef -> Ugen_Index -> Ugen

Lookup Ugen by index.

graphdef_control :: Graphdef -> Int -> (Control, Sample)

Lookup Control and default value by index.

graphdef_constant_nid :: Graphdef -> Int -> Int

nid of constant.

graphdef_control_nid :: Graphdef -> Int -> Int

nid of control.

graphdef_ugen_nid :: Graphdef -> Int -> Int

nid of Ugen.

scgf_i32 :: Num n => n

SCgf encoded as 32-bit unsigned integer.

> map fromEnum "SCgf"

83, 67, 103, 102

>>> import Sound.Osc.Coding.Byte
>>> decode_i32 (encode_ascii (Datum.ascii "SCgf")) == scgf_i32
True

Get

type Get_Functions m = (m Name, m Int, m Int, m Int, m Double)

Get functions for Graphdef types, (str_f,i8_f,i16_f,i32_f,f32_f)

get_control :: Monad m => (Get_Functions m, m Int) -> m Control

Get a Control.

get_input :: Monad m => m Int -> m Input

Get an Input.

get_ugen :: Monad m => (Get_Functions m, m Int) -> m Ugen

Get a Ugen

get_graphdef :: Monad m => Get_Functions m -> m Graphdef

Get a Graphdef. Supports version 0|1 and version 2 files. Ignores variants.

Encode (version zero)

type Encode_Functions t = ([t] -> t, Name -> t, Int -> t, Int -> t, Int -> t, Double -> t, String -> t)

Encode functions for Graphdef types (join_f,str_f,i8_f,i16_f,i32_f,f32_f,com_f)

encode_input_f :: Encode_Functions t -> Input -> t

encode_control_f :: Encode_Functions t -> Control -> t

encode_ugen_f :: Encode_Functions t -> Ugen -> t

encode_graphdef_f :: Encode_Functions t -> Graphdef -> t

Stat

graphdef_stat :: Graphdef -> String

Simple statistics printer for Graphdef.

Dump Ugens

ugen_dump_ugen_str :: [Sample] -> [Ugen] -> Ugen_Index -> Ugen -> String

Pretty print Ugen in the manner of SynthDef>>dumpUgens.

graphdef_dump_ugens_str :: Graphdef -> [String]

Print graphdef in format equivalent to SynthDef>>dumpUgens in SuperCollider

graphdef_dump_ugens :: Graphdef -> IO ()

putStrLn of unlines of graphdef_dump_ugens_str

import Sound.Sc3.Server.Graphdef
import Sound.Sc3.Server.Graphdef.Io
dir = "/home/rohan/sw/rsc3-disassembler/scsyndef/"
pp nm = read_graphdef_file (dir ++ nm) >>= graphdef_dump_ugens
pp "simple.scsyndef"
pp "with-ctl.scsyndef"
pp "mce.scsyndef"
pp "mrg.scsyndef"