diff --git a/lib/rdf/literal/datatype.ex b/lib/rdf/literal/datatype.ex index b02cefa..6994844 100644 --- a/lib/rdf/literal/datatype.ex +++ b/lib/rdf/literal/datatype.ex @@ -27,14 +27,15 @@ defmodule RDF.Literal.Datatype do Casts a datatype literal of one type into a datatype literal of another type. This function is called by the auto-generated `cast/1` function on the implementations, which already deals with the basic cases. - So, implementations can assume the passed argument is a valid `RDF.Literal.Datatype` struct. + So, implementations can assume the passed argument is a valid `RDF.Literal.Datatype` struct, + a `RDF.IRI` or a `RDF.BlankNode`. If the given literal can not be converted into this datatype an implementation should return `nil`. A final catch-all clause should delegate to `super`. For example `RDF.XSD.Datatype`s will handle casting from derived datatypes in the default implementation. """ - @callback do_cast(literal) :: Literal.t() | nil + @callback do_cast(literal | RDF.IRI.t | RDF.BlankNode.t) :: Literal.t() | nil @doc """ Checks if the given `RDF.Literal` has the datatype for which the `RDF.Literal.Datatype` is implemented or is derived from it. @@ -231,14 +232,15 @@ defmodule RDF.Literal.Datatype do Implementations define the casting for a given value with the `c:do_cast/1` callback. """ - @spec cast(Literal.t | Literal.Datatype.literal) :: Literal.t() | nil + @spec cast(Literal.Datatype.literal | RDF.Term.t) :: Literal.t() | nil @dialyzer {:nowarn_function, cast: 1} def cast(literal_or_value) def cast(%Literal{literal: literal}), do: cast(literal) def cast(%__MODULE__{} = datatype_literal), do: if(valid?(datatype_literal), do: literal(datatype_literal)) def cast(%struct{} = datatype_literal) do - if Literal.datatype?(struct) and Literal.Datatype.valid?(datatype_literal) do + if (Literal.datatype?(struct) and Literal.Datatype.valid?(datatype_literal)) or + struct in [RDF.IRI, RDF.BlankNode] do case do_cast(datatype_literal) do %__MODULE__{} = literal -> if valid?(literal), do: literal(literal) %Literal{literal: %__MODULE__{}} = literal -> if valid?(literal), do: literal diff --git a/lib/rdf/xsd/datatypes/any_uri.ex b/lib/rdf/xsd/datatypes/any_uri.ex index b38d7c9..7f403da 100644 --- a/lib/rdf/xsd/datatypes/any_uri.ex +++ b/lib/rdf/xsd/datatypes/any_uri.ex @@ -60,6 +60,10 @@ defmodule RDF.XSD.AnyURI do def elixir_mapping(_, _), do: @invalid_value + @impl RDF.Literal.Datatype + def do_cast(%IRI{} = iri), do: new(iri.value) + def do_cast(value), do: super(value) + @impl RDF.Literal.Datatype def do_equal_value?(literal1, literal2) diff --git a/lib/rdf/xsd/datatypes/string.ex b/lib/rdf/xsd/datatypes/string.ex index 5dbaa2d..414366d 100644 --- a/lib/rdf/xsd/datatypes/string.ex +++ b/lib/rdf/xsd/datatypes/string.ex @@ -47,6 +47,10 @@ defmodule RDF.XSD.String do def elixir_mapping(value, _), do: to_string(value) @impl RDF.Literal.Datatype + def do_cast(literal_or_iri) + + def do_cast(%RDF.IRI{value: value}), do: new(value) + def do_cast(%datatype{} = literal) do cond do XSD.Decimal.datatype?(literal) -> diff --git a/test/unit/xsd/datatypes/any_uri_test.exs b/test/unit/xsd/datatypes/any_uri_test.exs index afc60d7..a666b60 100644 --- a/test/unit/xsd/datatypes/any_uri_test.exs +++ b/test/unit/xsd/datatypes/any_uri_test.exs @@ -34,5 +34,10 @@ defmodule RDF.XSD.AnyURITest do assert XSD.anyURI("http://example.com/") |> XSD.AnyURI.cast() == XSD.anyURI("http://example.com/") end + + test "casting an RDF.IRI" do + assert RDF.iri("http://example.com/") |> XSD.AnyURI.cast() == + XSD.anyURI("http://example.com/") + end end end diff --git a/test/unit/xsd/datatypes/string_test.exs b/test/unit/xsd/datatypes/string_test.exs index a411857..db7f6c0 100644 --- a/test/unit/xsd/datatypes/string_test.exs +++ b/test/unit/xsd/datatypes/string_test.exs @@ -127,6 +127,10 @@ defmodule RDF.XSD.StringTest do assert FloatUnitInterval.new(1.0) |> XSD.String.cast() == XSD.string("1") end + test "casting an IRI" do + assert RDF.iri("http://example.com") |> XSD.String.cast() == XSD.string("http://example.com") + end + test "with invalid literals" do assert XSD.integer(3.14) |> XSD.String.cast() == nil assert XSD.decimal("NAN") |> XSD.String.cast() == nil