tupelo.tagstr — tupelo 22.08.03

Date-encode clj

(Date-encode date)

Inputs: [date :- java.util.Date] Returns: s/Str

Encodes a java.util.Date object into a tagstr like <#java.util.Date 1999-12-31T01:02:03.456Z>

Date-parse clj

(Date-parse s)

Inputs: [s :- s/Str] Returns: java.util.Date

Decodes a tagstr like <#java.util.Date 1999-12-31T01:02:03.456Z> into a java.util.Date object

extract-data-str clj

(extract-data-str s)

Inputs: [s :- s/Str] Returns: s/Str

Given a tagstr like <#java.util.Date 1999-12-31T01:02:03.456Z>, returns the data str 1999-12-31T01:02:03.456Z

extract-tag-str clj

(extract-tag-str s)

Inputs: [s :- s/Str] Returns: s/Str

Given a tagstr like <#java.util.Date 1999-12-31T01:02:03.456Z>, returns the tag str #java.util.Date>

Instant-encode clj

(Instant-encode inst)

Inputs: [inst :- Instant] Returns: s/Str

Encodes an Instant object into a tagstr like <#inst 1999-12-31T01:02:03.456Z>

Instant-parse clj

(Instant-parse s)

Inputs: [s :- s/Str] Returns: Instant

Decodes a tagstr like <#inst 1999-12-31T01:02:03.456Z> into an Instant object

sql-Date-encode clj

(sql-Date-encode date)

Inputs: [date :- java.sql.Date] Returns: s/Str

Encodes a java.sql.Date object into a tagstr like <#java.sql.Date 1999-11-22>

sql-Date-parse clj

(sql-Date-parse s)

Inputs: [s :- s/Str] Returns: java.sql.Date

Decodes a tagstr like <#java.sql.Date 1999-11-22> into a java.sql.Date object

sql-Timestamp-encode clj

(sql-Timestamp-encode ts)

Inputs: [ts :- Timestamp] Returns: s/Str

Encodes a java.sql.Timestamp object into a tagstr like <#java.sql.Timestamp 1999-12-31 01:02:03.456>

sql-Timestamp-parse clj

(sql-Timestamp-parse s)

Inputs: [s :- s/Str] Returns: Timestamp

Decodes a tagstr like <#java.sql.Timestamp 1999-12-31 01:02:03.456> into a java.sql.Timestamp object

tag->parse-fn clj

A map from tag to object parse fn

tagstr? clj

(tagstr? item)

Inputs: [item :- s/Any] Returns: s/Bool

Returns true iff arg is a Tagged String

type->encode-fn clj

A map from object type to tagstr encode fn

UUID-encode clj

(UUID-encode uuid)

Inputs: [uuid :- UUID] Returns: s/Str

Encodes a UUID object into a tagstr like <#uuid 605ca9b3-219b-44b3-9c91-238dba64a3f8>

UUID-parse clj

(UUID-parse s)

Inputs: [s :- s/Str] Returns: UUID

Decodes a tagstr like <#uuid 605ca9b3-219b-44b3-9c91-238dba64a3f8> into a UUID object

walk-encode clj

(walk-encode data)

(walk-encode encode-map data)

Inputs: ([data :- s/Any] [encode-map :- tsk/Map data :- s/Any]) Returns: s/Any

Walk a data structure and convert objects to tagged strings like:

{:date          "<#java.util.Date 1999-12-31T01:02:03.456Z>"
 :five          5
 :hello         "Hello!"
 :instant       "<#inst 1999-12-31T01:02:03.456Z>"
 :millis        946602123456
 :nil           nil
 :sql-date      "<#java.sql.Date 1999-11-22>"
 :sql-timestamp "<#java.sql.Timestamp 1999-12-31 01:02:03.456>"
 :uuid          "<#uuid 605ca9b3-219b-44b3-9c91-238dba64a3f8>"
 :zdt           "<#ZonedDateTime 1999-11-22T11:33:44.555-08:00>"}

walk-parse clj

(walk-parse data)

(walk-parse parse-map data)

Inputs: ([data :- s/Any] [parse-map :- tsk/Map data :- s/Any]) Returns: s/Any

Walk a data structure like the following and parse tagged strings into objects:

{:date          "<#java.util.Date 1999-12-31T01:02:03.456Z>"
 :five          5
 :hello         "Hello!"
 :instant       "<#inst 1999-12-31T01:02:03.456Z>"
 :millis        946602123456
 :nil           nil
 :sql-date      "<#java.sql.Date 1999-11-22>"
 :sql-timestamp "<#java.sql.Timestamp 1999-12-31 01:02:03.456>"
 :uuid          "<#uuid 605ca9b3-219b-44b3-9c91-238dba64a3f8>"
 :zdt           "<#ZonedDateTime 1999-11-22T11:33:44.555-08:00>"}

ZonedDateTime-encode clj

(ZonedDateTime-encode inst)

Inputs: [inst :- ZonedDateTime] Returns: s/Str

Encodes a ZonedDateTime object into a tagstr like <#ZonedDateTime 1999-11-22T11:33:44.555-08:00>

ZonedDateTime-parse clj

(ZonedDateTime-parse s)

Inputs: [s :- s/Str] Returns: ZonedDateTime

Decodes a tagstr like <#ZonedDateTime 1999-11-22T11:33:44.555-08:00> into a ZonedDateTime object