argonaut.Json.scala Maven / Gradle / Ivy
package argonaut
import JsonIdentity._
import EncodeJsonNumber._
/**
* A data type representing possible JSON values.
*
* @author Tony Morris
* @author Dylan Just
* @author Mark Hibberd
*/
sealed abstract class Json extends Product with Serializable {
import Json._
/**
* The catamorphism for the JSON value data type.
*/
def fold[X](
jsonNull: => X,
jsonBool: Boolean => X,
jsonNumber: JsonNumber => X,
jsonString: String => X,
jsonArray: JsonArray => X,
jsonObject: JsonObject => X
): X =
this match {
case JNull => jsonNull
case JBool(b) => jsonBool(b)
case JNumber(n) => jsonNumber(n)
case JString(s) => jsonString(s)
case JArray(a) => jsonArray(a)
case JObject(o) => jsonObject(o)
}
/**
* Run on an array or object or return the given default.
*/
def arrayOrObject[X](
or: => X,
jsonArray: JsonArray => X,
jsonObject: JsonObject => X
): X =
this match {
case JNull => or
case JBool(_) => or
case JNumber(_) => or
case JString(_) => or
case JArray(a) => jsonArray(a)
case JObject(o) => jsonObject(o)
}
/**
* Constructor a cursor from this JSON value (alias for `cursor`).
*/
def unary_+ : Cursor =
Cursor(this)
/**
* Constructor a cursor from this JSON value (alias for `unary_+`).
*/
def cursor: Cursor =
Cursor(this)
/**
* Constructor a cursor from this JSON value to track history.
*/
def hcursor: HCursor =
cursor.hcursor
/**
* Constructor a cursor from this JSON value to track history.
*/
def acursor: ACursor =
hcursor.acursor
/**
* Return `true` if this JSON value is `null`, otherwise, `false`.
*/
def isNull: Boolean =
this == JNull
/**
* Returns the possible boolean of this JSON value.
*/
def bool: Option[Boolean] = fold(None, Some(_), _ => None, _ => None, _ => None, _ => None)
/**
* Returns the possible number of this JSON value.
*/
def number: Option[JsonNumber] = fold(None, _ => None, Some(_), _ => None, _ => None, _ => None)
/**
* Returns the possible string of this JSON value.
*/
def string: Option[JsonString] = fold(None, _ => None, _ => None, Some(_), _ => None, _ => None)
/**
* Returns the possible array of this JSON value.
*/
def array: Option[JsonArray] = arrayOrObject(None, Some(_), _ => None)
/**
* Returns the possible object of this JSON value.
*/
def obj: Option[JsonObject] = arrayOrObject(None, _ => None, Some(_))
/**
* Returns the possible object of this JSON value as an association list.
*/
def assoc: Option[List[JsonAssoc]] =
obj.map(_.toList)
/**
* If this is a JSON boolean value, invert the `true` and `false` values, otherwise, leave unchanged.
*/
def not: Json = this match {
case JBool(b) => JBool(!b)
case _ => this
}
/**
* If this is a JSON number value, run the given function on the value, otherwise, leave unchanged.
*/
def withNumber(k: JsonNumber => JsonNumber): Json = this match {
case JNumber(n) => JNumber(k(n))
case _ => this
}
/**
* If this is a JSON string value, run the given function on the value, otherwise, leave unchanged.
*/
def withString(k: JsonString => JsonString): Json = this match {
case JString(s) => JString(k(s))
case _ => this
}
/**
* If this is a JSON array value, run the given function on the value, otherwise, leave unchanged.
*/
def withArray(k: JsonArray => JsonArray): Json = this match {
case JArray(a) => JArray(k(a))
case _ => this
}
/**
* If this is a JSON object value, run the given function on the value, otherwise, leave unchanged.
*/
def withObject(k: JsonObject => JsonObject): Json = this match {
case JObject(o) => JObject(k(o))
case _ => this
}
/**
* If this is a JSON object, then prepend the given value, otherwise, return a JSON object with only the given value.
*/
def ->:(k: JsonAssoc): Json =
withObject(o => (k._1, k._2) +: o)
/**
* If this is a JSON object, and the association is set, then prepend the given value, otherwise, return a JSON object with only the given value.
*/
def ->?:(o: Option[JsonAssoc]): Json =
o.map(->:(_)).getOrElse(this)
/**
* If this is a JSON array, then prepend the given value, otherwise, return a JSON array with only the given value.
*/
def -->>:(k: Json): Json =
withArray(k :: _)
/**
* If this is a JSON array, and the element is set, then prepend the given value, otherwise, return a JSON array with only the given value.
*/
def -->>?:(o: Option[Json]): Json =
o.map(j => withArray(j :: _)).getOrElse(this)
/**
* Alias for `field`.
*/
def -|(f: => JsonField): Option[Json] =
field(f)
/**
* Returns a possible JSON value after traversing through JSON object values using the given field names.
*/
def -||(fs: List[JsonField]): Option[Json] =
fs match {
case Nil => None
case h::t => t.foldLeft(field(h))((a, b) => a flatMap (_ -| b))
}
/**
* Return `true` if this JSON value is a boolean with a value of `true`, otherwise, `false`.
*/
def isTrue: Boolean =
bool exists (z => z)
/**
* Return `true` if this JSON value is a boolean with a value of `false`, otherwise, `false`.
*/
def isFalse: Boolean =
bool exists (z => !z)
/**
* Return `true` if this JSON value is a boolean.
*/
def isBool: Boolean =
bool.isDefined
/**
* Return `true` if this JSON value is a number.
*/
def isNumber: Boolean =
number.isDefined
/**
* Return `true` if this JSON value is a string.
*/
def isString: Boolean =
string.isDefined
/**
* Return `true` if this JSON value is a array.
*/
def isArray: Boolean =
array.isDefined
/**
* Return `true` if this JSON value is a object.
*/
def isObject: Boolean =
obj.isDefined
/**
* Returns the number of this JSON value, or the given default if this JSON value is not a number.
*
* @param d The default number if this JSON value is not a number.
*/
def numberOr(d: => JsonNumber): JsonNumber =
number getOrElse d
/**
* Returns the string of this JSON value, or the given default if this JSON value is not a string.
*
* @param d The default string if this JSON value is not a string.
*/
def stringOr(d: => JsonString): JsonString =
string getOrElse d
/**
* Returns the array of this JSON value, or the given default if this JSON value is not an array.
*
* @param d The default array if this JSON value is not an array.
*/
def arrayOr(d: => JsonArray): JsonArray =
array getOrElse d
/**
* Returns the object of this JSON value, or the given default if this JSON value is not a object.
*
* @param d The default object if this JSON value is not an object.
*/
def objectOr(d: => JsonObject): JsonObject =
obj getOrElse d
/**
* Returns this JSON number object or the value `0` if it is not a number.
*/
def numberOrZero: JsonNumber =
numberOr(JsonLong(0L))
/**
* Returns the string of this JSON value, or an empty string if this JSON value is not a string.
*/
def stringOrEmpty: JsonString =
stringOr("")
/**
* Returns the array of this JSON value, or an empty array if this JSON value is not an array.
*/
def arrayOrEmpty: JsonArray =
arrayOr(Nil)
/**
* Returns the object of this JSON value, or the empty object if this JSON value is not an object.
*/
def objectOrEmpty: JsonObject =
objectOr(JsonObject.empty)
/**
* Return the object keys if this JSON value is an object, otherwise, return the empty list.
*/
def objectFields: Option[List[JsonField]] =
obj map (_.fields)
/**
* Returns the object map keys of this JSON value, or the given default if this JSON value is not an object.
*
* @param f The default object map keys if this JSON value is not an object.
*/
def objectFieldsOr(f: => List[JsonField]): List[JsonField] =
objectFields getOrElse f
/**
* Returns the object map keys of this JSON value, or the empty list if this JSON value is not an object.
*/
def objectFieldsOrEmpty: List[JsonField] =
objectFieldsOr(Nil)
/**
* Return the object values if this JSON value is an object, otherwise, return the empty list.
*/
def objectValues: Option[List[Json]] =
obj map (_.values)
/**
* Returns the object map values of this JSON value, or the given default if this JSON value is not an object.
*
* @param k The default object map values if this JSON value is not an object.
*/
def objectValuesOr(k: => List[Json]): List[Json] =
objectValues getOrElse k
/**
* Returns the object map values of this JSON value, or the empty list if this JSON value is not an object.
*/
def objectValuesOrEmpty: List[Json] =
objectValuesOr(Nil)
/**
* Returns `true` if this is a JSON object which has the given field, `false` otherwise.
*/
def hasField(f: => JsonField): Boolean =
obj exists (_ ?? f)
/**
* Returns the possible value for the given JSON object field.
*/
def field(f: => JsonField): Option[Json] =
obj flatMap (_(f))
/**
* Returns the value for the given JSON object field if this is an object with the given field, otherwise, returns the default..
*/
def fieldOr(f: => JsonField, j: => Json): Json =
field(f) getOrElse j
/**
* Returns the value for the given JSON object field if this is an object with the given field, otherwise, returns a JSON `null`..
*/
def fieldOrNull(f: => JsonField): Json =
fieldOr(f, jNull)
/**
* Returns the value for the given JSON object field if this is an object with the given field, otherwise, returns a JSON boolean with the value `true`.
*/
def fieldOrTrue(f: => JsonField): Json =
fieldOr(f, jTrue)
/**
* Returns the value for the given JSON object field if this is an object with the given field, otherwise, returns a JSON boolean with the value `false`.
*/
def fieldOrFalse(f: => JsonField): Json =
fieldOr(f, jFalse)
/**
* Returns the value for the given JSON object field if this is an object with the given field, otherwise, returns a JSON number with the value `0`.
*/
def fieldOrZero(f: => JsonField): Json =
fieldOr(f, jZero)
/**
* Returns the value for the given JSON object field if this is an object with the given field, otherwise, returns an empty JSON.
*/
def fieldOrEmptyString(f: => JsonField): Json =
fieldOr(f, jEmptyString)
/**
* Returns the value for the given JSON object field if this is an object with the given field, otherwise, returns an empty JSON array.
*/
def fieldOrEmptyArray(f: => JsonField): Json =
fieldOr(f, jEmptyArray)
/**
* Returns the value for the given JSON object field if this is an object with the given field, otherwise, returns an empty JSON object.
*/
def fieldOrEmptyObject(f: => JsonField): Json =
fieldOr(f, jEmptyObject)
/**
* The name of the type of the JSON value.
*/
def name: String =
this match {
case JNull => "Null"
case JBool(_) => "Boolean"
case JNumber(_) => "Number"
case JString(_) => "String"
case JArray(_) => "Array"
case JObject(_) => "Object"
}
/**
* Attempts to decode this JSON value to another data type.
*/
def jdecode[A](implicit e: DecodeJson[A]): DecodeResult[A] =
e((+this).hcursor)
/**
* Attempts to decode this JSON value to another data type, alias for `jdecode`.
*/
def as[A](implicit e: DecodeJson[A]): DecodeResult[A] =
jdecode[A]
/**
* Pretty-print this JSON value to a string using the given pretty-printing parameters.
*/
def pretty(p: PrettyParams): String =
p.pretty(this)
/**
* Pretty-print this JSON value to a string with no spaces.
*/
def nospaces: String =
PrettyParams.nospace.pretty(this)
/**
* Pretty-print this JSON value to a string with no spaces, preserving order.
*/
def nospacesWithOrder: String =
PrettyParams.nospace.copy(preserveOrder = true).pretty(this)
/**
* Pretty-print this JSON value to a string indentation of two spaces.
*/
def spaces2: String =
PrettyParams.spaces2.pretty(this)
/**
* Pretty-print this JSON value to a string indentation of four spaces.
*/
def spaces4: String =
PrettyParams.spaces4.pretty(this)
/**
* Perform a deep merge of this JSON value with another JSON value.
*
* Objects are merged by key, values from the argument JSON take
* precedence over values from this JSON. Nested objects are
* recursed.
*
* Null, Array, Boolean, String and Number are treated as values,
* and values from the argument JSON completely replace values
* from this JSON.
*/
def deepmerge(y: Json): Json =
(obj, y.obj) match {
case (Some(ox), Some(oy)) =>
jObject(oy.toList.foldLeft(ox)({
case (acc, (k, v)) => acc(k) match {
case None => acc + (k, v)
case Some(l) => acc + (k, l.deepmerge(v))
}
}))
case _ => y
}
/**
* Compute a `String` representation for this JSON value.
*/
override def toString =
nospacesWithOrder
}
import Json._
private[argonaut] case object JNull extends Json
private[argonaut] case class JBool(b: Boolean) extends Json
private[argonaut] case class JNumber(n: JsonNumber) extends Json
private[argonaut] case class JString(s: String) extends Json
private[argonaut] case class JArray(a: JsonArray) extends Json
private[argonaut] case class JObject(o: JsonObject) extends Json
object Json extends Jsons {
def apply(fields: (JsonField, Json)*): Json =
jObjectAssocList(fields.toList)
def obj(fields: (JsonField, Json)*): Json =
jObjectAssocList(fields.toList)
def array(elements: Json*): Json =
jArray(elements.toList)
}
/**
* Constructors and other utilities for JSON values.
*
* @author Tony Morris
* @author Dylan Just
* @author Mark Hibberd
*/
trait Jsons {
type JsonBoolean = Boolean
type JsonArray = List[Json]
type JsonString = String
type JsonField = String
type JsonAssoc = (JsonField, Json)
type JsonAssocList = List[JsonAssoc]
/**
* Construct a JSON value that is `null`.
*/
val jNull: Json =
JNull
/**
* Construct a JSON value that is a boolean.
*/
val jBool: Boolean => Json =
JBool(_)
/**
* Construct a JSON value that is a number.
*/
def jNumber(n: JsonNumber): Json = JNumber(n)
/**
* Construct a JSON value that is a number.
*/
def jNumber(n: Int): Json = JNumber(n.asJsonNumber)
/**
* Construct a JSON value that is a number.
*/
def jNumber(n: Long): Json = JNumber(n.asJsonNumber)
/**
* Construct a JSON value that is a number.
*
* Note: NaN, +Infinity and -Infinity are not valid json.
*/
def jNumber(n: Double): Option[Json] = n.asPossibleJsonNumber.map(JNumber.apply _)
/**
* Construct a JSON value that is a number. Transforming
* NaN, +Infinity and -Infinity to jNull. This matches
* the behaviour of most browsers, but is a lossy operation
* as you can no longer distinguish between NaN and Infinity.
*/
def jNumberOrNull(n: Double): Json = jNumber(n).getOrElse(jNull)
/**
* Construct a JSON value that is a number. Transforming
* NaN, +Infinity and -Infinity to their string implementations.
*
* This is an argonaut specific transformation that allows all
* doubles to be encoded without losing information, but aware
* interoperability is unlikely without custom handling of
* these values. See also `jNumber` and `jNumberOrNull`.
*/
def jNumberOrString(n: Double): Json = n.asPossibleJsonNumber.fold(jString(n.toString))(_.asJson)
/**
* Construct a JSON value that is a number.
*/
def jNumber(n: BigDecimal): Json = JNumber(JsonBigDecimal(n))
/**
* Construct a JSON value that is a number.
*/
def jNumber(n: String): Option[Json] = JsonNumber.fromString(n).map(_.asJson)
/**
* Construct a JSON value that is a number. Transforming the Strings "NaN",
* "Infinity", "+Infinity" and "-Infinity" to jNull. This matches the
* behaviour of most browsers, but is a lossy operation as you can no longer
* distinguish between NaN and Infinity.
*/
def jNumberOrNull(n: String): Option[Json] = n match {
case "NaN" | "Infinity" | "+Infinity" | "-Infinity" => Some(jNull)
case _ => JsonNumber.fromString(n).map(_.asJson)
}
/**
* Construct a JSON value that is a number. Transforming the Strings "NaN",
* "Infinity", "+Infinity" and "-Infinity" to their string implementations.
*
* This is an argonaut specific transformation that allows all
* doubles to be encoded without losing information, but aware
* interoperability is unlikely without custom handling of
* these values. See also `jNumber` and `jNumberOrNull`.
*/
def jNumberOrString(n: String): Option[Json] = n match {
case str @ ("NaN" | "Infinity" | "+Infinity" | "-Infinity") => Some(jString(str))
case _ => JsonNumber.fromString(n).map(_.asJson)
}
/**
* Construct a JSON value that is a string.
*/
val jString: JsonString => Json =
JString(_)
/**
* Construct a JSON value that is an array.
*/
val jArray: JsonArray => Json =
JArray(_)
/**
* Construct a JSON value that is an object.
*/
val jObject: JsonObject => Json =
JObject(_)
/**
* Construct a JSON boolean value of `true`.
*/
val jTrue: Json =
JBool(true)
/**
* Construct a JSON boolean value of `false`.
*/
val jFalse: Json =
JBool(false)
/**
* A JSON value that is a zero number.
*/
val jZero: Json =
JNumber(JsonLong(0L))
/**
* A JSON value that is an empty string.
*/
val jEmptyString: Json =
JString("")
/**
* A JSON value that is an empty array.
*/
val jEmptyArray: Json =
JArray(Nil)
/**
* Returns a function that takes a single value and produces a JSON array that contains only that value.
*/
def jSingleArray(j: Json): Json =
JArray(List(j))
/**
* Construct a JSON value that is an array from a list of elements (var args).
*/
def jArrayElements(elements: Json*): Json =
jArray(elements.toList)
/**
* A JSON value that is an empty object.
*/
val jEmptyObject: Json =
JObject(JsonObject.empty)
/**
* Returns a function that takes an association value and produces a JSON object that contains only that value.
*/
def jSingleObject(k: JsonField, v: Json): Json =
JObject(JsonObject.single(k, v))
/**
* Construct a JSON value that is an object from an association list.
*/
def jObjectAssocList(x: JsonAssocList): Json =
JObject(JsonObject.fromIterable(x))
/**
* Construct a JSON value that is an object from an association list (var args).
*/
def jObjectFields(x: (JsonField, Json)*): Json =
JObject(JsonObject.fromIterable(x))
}
© 2015 - 2024 Weber Informatics LLC | Privacy Policy