Add ser::to_dynamic.

src/any.rs

@@ -210,15 +210,20 @@ pub(crate) fn map_std_type_name(name: &str) -> &str {
         "string"
     } else if name == type_name::<&str>() {
         "string"
-    } else if name == type_name::<Map>() {
-        "map"
-    } else if name == type_name::<Array>() {
-        "array"
     } else if name == type_name::<FnPtr>() {
         "Fn"
     } else if name == type_name::<Instant>() {
         "timestamp"
     } else {
+        #[cfg(not(feature = "no_index"))]
+        if name == type_name::<Array>() {
+            return "array";
+        }
+        #[cfg(not(feature = "no_object"))]
+        if name == type_name::<Map>() {
+            return "map";
+        }
+
         name
     }
 }

src/lib.rs

@@ -129,6 +129,10 @@ pub mod module_resolvers {
     pub use crate::module::resolvers::*;
 }
 
+#[cfg(feature = "serde")]
+pub mod ser {
+    pub use crate::serde::ser::to_dynamic;
+}
 #[cfg(feature = "serde")]
 pub mod de {
     pub use crate::serde::de::from_dynamic;

src/parser.rs

@@ -1701,7 +1701,7 @@ fn make_dot_expr(lhs: Expr, rhs: Expr, op_pos: Position) -> Result<Expr, ParseEr
         // lhs.func()
         (lhs, func @ Expr::FnCall(_)) => Expr::Dot(Box::new((lhs, func, op_pos))),
         // lhs.rhs
-        _ => unreachable!(),
+        (lhs, rhs) => return Err(PERR::PropertyExpected.into_err(rhs.position())),
     })
 }
 

src/serde/de.rs

@@ -26,8 +26,8 @@ pub struct DynamicDeserializer<'a> {
     value: &'a Dynamic,
 }
 
-impl<'a> DynamicDeserializer<'a> {
-    pub fn from_dynamic(value: &'a Dynamic) -> Self {
+impl<'de> DynamicDeserializer<'de> {
+    pub fn from_dynamic(value: &'de Dynamic) -> Self {
         Self { value }
     }
     pub fn type_error<R, T>(&self) -> Result<T, Box<EvalAltResult>> {

src/serde/mod.rs

@@ -1,2 +1,3 @@
 pub mod de;
+pub mod ser;
 mod str;

src/serde/ser.rs

@@ -0,0 +1,517 @@
+use crate::any::Dynamic;
+use crate::result::EvalAltResult;
+use crate::token::Position;
+
+#[cfg(not(feature = "no_index"))]
+use crate::engine::Array;
+#[cfg(not(feature = "no_object"))]
+use crate::engine::Map;
+
+use serde::ser::{
+    Error, SerializeMap, SerializeSeq, SerializeStruct, SerializeStructVariant, SerializeTuple,
+    SerializeTupleStruct, SerializeTupleVariant, Serializer,
+};
+use serde::Serialize;
+
+use crate::stdlib::{any::type_name, fmt, mem};
+
+pub struct DynamicSerializer {
+    key: Dynamic,
+    value: Dynamic,
+}
+
+impl DynamicSerializer {
+    pub fn new(value: Dynamic) -> Self {
+        Self {
+            key: Default::default(),
+            value,
+        }
+    }
+    pub fn type_error<R, T>(&self) -> Result<T, Box<EvalAltResult>> {
+        self.type_error_str(type_name::<R>())
+    }
+    pub fn type_error_str<T>(&self, name: &str) -> Result<T, Box<EvalAltResult>> {
+        Err(Box::new(EvalAltResult::ErrorMismatchOutputType(
+            name.into(),
+            self.value.type_name().into(),
+            Position::none(),
+        )))
+    }
+}
+
+pub fn to_dynamic<T: Serialize>(value: T) -> Result<Dynamic, Box<EvalAltResult>> {
+    let mut s = DynamicSerializer::new(Default::default());
+    value.serialize(&mut s)
+}
+
+impl Error for Box<EvalAltResult> {
+    fn custom<T: fmt::Display>(err: T) -> Self {
+        Box::new(EvalAltResult::ErrorRuntime(
+            err.to_string(),
+            Position::none(),
+        ))
+    }
+}
+
+impl Serializer for &mut DynamicSerializer {
+    type Ok = Dynamic;
+    type Error = Box<EvalAltResult>;
+    type SerializeSeq = DynamicSerializer;
+    type SerializeTuple = DynamicSerializer;
+    type SerializeTupleStruct = DynamicSerializer;
+    type SerializeTupleVariant = DynamicSerializer;
+    type SerializeMap = DynamicSerializer;
+    type SerializeStruct = DynamicSerializer;
+    type SerializeStructVariant = DynamicSerializer;
+
+    fn serialize_bool(self, v: bool) -> Result<Self::Ok, Box<EvalAltResult>> {
+        Ok(v.into())
+    }
+
+    fn serialize_i8(self, v: i8) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "only_i32"))]
+        return self.serialize_i64(i64::from(v));
+        #[cfg(feature = "only_i32")]
+        return self.serialize_i32(i32::from(v));
+    }
+
+    fn serialize_i16(self, v: i16) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "only_i32"))]
+        return self.serialize_i64(i64::from(v));
+        #[cfg(feature = "only_i32")]
+        return self.serialize_i32(i32::from(v));
+    }
+
+    fn serialize_i32(self, v: i32) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "only_i32"))]
+        return self.serialize_i64(i64::from(v));
+        #[cfg(feature = "only_i32")]
+        return Ok(v.into());
+    }
+
+    fn serialize_i64(self, v: i64) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "only_i32"))]
+        return Ok(v.into());
+        #[cfg(feature = "only_i32")]
+        if v > i32::MAX as i64 {
+            return Ok(Dynamic::from(v));
+        } else {
+            return self.serialize_i32(v as i32);
+        }
+    }
+
+    fn serialize_u8(self, v: u8) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "only_i32"))]
+        return self.serialize_i64(i64::from(v));
+        #[cfg(feature = "only_i32")]
+        return self.serialize_i32(i32::from(v));
+    }
+
+    fn serialize_u16(self, v: u16) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "only_i32"))]
+        return self.serialize_i64(i64::from(v));
+        #[cfg(feature = "only_i32")]
+        return self.serialize_i32(i32::from(v));
+    }
+
+    fn serialize_u32(self, v: u32) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "only_i32"))]
+        return self.serialize_i64(i64::from(v));
+        #[cfg(feature = "only_i32")]
+        if v > i32::MAX as u64 {
+            return Ok(Dynamic::from(v));
+        } else {
+            return self.serialize_i32(v as i32);
+        }
+    }
+
+    fn serialize_u64(self, v: u64) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "only_i32"))]
+        if v > i64::MAX as u64 {
+            return Ok(Dynamic::from(v));
+        } else {
+            return self.serialize_i64(v as i64);
+        }
+        #[cfg(feature = "only_i32")]
+        if v > i32::MAX as u64 {
+            return Ok(Dynamic::from(v));
+        } else {
+            return self.serialize_i32(v as i32);
+        }
+    }
+
+    fn serialize_f32(self, v: f32) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_float"))]
+        return Ok(Dynamic::from(v));
+        #[cfg(feature = "no_float")]
+        return self.type_error_str("f32");
+    }
+
+    fn serialize_f64(self, v: f64) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_float"))]
+        return Ok(v.into());
+        #[cfg(feature = "no_float")]
+        return self.type_error_str("f64");
+    }
+
+    fn serialize_char(self, v: char) -> Result<Self::Ok, Box<EvalAltResult>> {
+        Ok(v.into())
+    }
+
+    fn serialize_str(self, v: &str) -> Result<Self::Ok, Box<EvalAltResult>> {
+        Ok(v.to_string().into())
+    }
+
+    fn serialize_bytes(self, _: &[u8]) -> Result<Self::Ok, Box<EvalAltResult>> {
+        self.type_error_str("bytes array")
+    }
+
+    fn serialize_none(self) -> Result<Self::Ok, Box<EvalAltResult>> {
+        Ok(().into())
+    }
+
+    fn serialize_some<T: ?Sized + Serialize>(
+        self,
+        value: &T,
+    ) -> Result<Self::Ok, Box<EvalAltResult>> {
+        value.serialize(&mut *self)
+    }
+
+    fn serialize_unit(self) -> Result<Self::Ok, Box<EvalAltResult>> {
+        Ok(().into())
+    }
+
+    fn serialize_unit_struct(self, _name: &'static str) -> Result<Self::Ok, Box<EvalAltResult>> {
+        self.serialize_unit()
+    }
+
+    fn serialize_unit_variant(
+        self,
+        _name: &'static str,
+        _variant_index: u32,
+        variant: &'static str,
+    ) -> Result<Self::Ok, Box<EvalAltResult>> {
+        self.serialize_str(variant)
+    }
+
+    fn serialize_newtype_struct<T: ?Sized + Serialize>(
+        self,
+        _name: &'static str,
+        value: &T,
+    ) -> Result<Self::Ok, Box<EvalAltResult>> {
+        value.serialize(&mut *self)
+    }
+
+    fn serialize_newtype_variant<T: ?Sized + Serialize>(
+        self,
+        _name: &'static str,
+        _variant_index: u32,
+        _variant: &'static str,
+        value: &T,
+    ) -> Result<Self::Ok, Box<EvalAltResult>> {
+        value.serialize(&mut *self)
+    }
+
+    fn serialize_seq(self, _len: Option<usize>) -> Result<Self::SerializeSeq, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_index"))]
+        return Ok(DynamicSerializer::new(Array::new().into()));
+        #[cfg(feature = "no_index")]
+        return self.type_error_str("array");
+    }
+
+    fn serialize_tuple(self, len: usize) -> Result<Self::SerializeTuple, Box<EvalAltResult>> {
+        self.serialize_seq(Some(len))
+    }
+
+    fn serialize_tuple_struct(
+        self,
+        _name: &'static str,
+        len: usize,
+    ) -> Result<Self::SerializeTupleStruct, Box<EvalAltResult>> {
+        self.serialize_seq(Some(len))
+    }
+
+    fn serialize_tuple_variant(
+        self,
+        _name: &'static str,
+        _variant_index: u32,
+        _variant: &'static str,
+        len: usize,
+    ) -> Result<Self::SerializeTupleVariant, Box<EvalAltResult>> {
+        self.serialize_seq(Some(len))
+    }
+
+    fn serialize_map(self, _len: Option<usize>) -> Result<Self::SerializeMap, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_object"))]
+        return Ok(DynamicSerializer::new(Map::new().into()));
+        #[cfg(feature = "no_object")]
+        return self.type_error_str("map");
+    }
+
+    fn serialize_struct(
+        self,
+        _name: &'static str,
+        len: usize,
+    ) -> Result<Self::SerializeStruct, Box<EvalAltResult>> {
+        self.serialize_map(Some(len))
+    }
+
+    fn serialize_struct_variant(
+        self,
+        _name: &'static str,
+        _variant_index: u32,
+        _variant: &'static str,
+        len: usize,
+    ) -> Result<Self::SerializeStructVariant, Box<EvalAltResult>> {
+        self.serialize_map(Some(len))
+    }
+}
+
+impl SerializeSeq for DynamicSerializer {
+    type Ok = Dynamic;
+    type Error = Box<EvalAltResult>;
+
+    fn serialize_element<T: ?Sized + Serialize>(
+        &mut self,
+        value: &T,
+    ) -> Result<(), Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_index"))]
+        {
+            let value = value.serialize(&mut *self)?;
+            if let Some(arr) = self.value.downcast_mut::<Array>() {
+                arr.push(value);
+                Ok(())
+            } else {
+                self.type_error::<Array, _>()
+            }
+        }
+        #[cfg(feature = "no_index")]
+        self.type_error_str("array")
+    }
+
+    // Close the sequence.
+    fn end(self) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_index"))]
+        return Ok(self.value);
+        #[cfg(feature = "no_index")]
+        return self.type_error_str("array");
+    }
+}
+
+impl SerializeTuple for DynamicSerializer {
+    type Ok = Dynamic;
+    type Error = Box<EvalAltResult>;
+
+    fn serialize_element<T: ?Sized + Serialize>(
+        &mut self,
+        value: &T,
+    ) -> Result<(), Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_index"))]
+        {
+            let value = value.serialize(&mut *self)?;
+            if let Some(arr) = self.value.downcast_mut::<Array>() {
+                arr.push(value);
+                Ok(())
+            } else {
+                self.type_error::<Array, _>()
+            }
+        }
+        #[cfg(feature = "no_index")]
+        self.type_error_str("array")
+    }
+
+    fn end(self) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_index"))]
+        return Ok(self.value);
+        #[cfg(feature = "no_index")]
+        return self.type_error_str("array");
+    }
+}
+
+impl SerializeTupleStruct for DynamicSerializer {
+    type Ok = Dynamic;
+    type Error = Box<EvalAltResult>;
+
+    fn serialize_field<T: ?Sized + Serialize>(
+        &mut self,
+        value: &T,
+    ) -> Result<(), Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_index"))]
+        {
+            let value = value.serialize(&mut *self)?;
+            if let Some(arr) = self.value.downcast_mut::<Array>() {
+                arr.push(value);
+                Ok(())
+            } else {
+                self.type_error::<Array, _>()
+            }
+        }
+        #[cfg(feature = "no_index")]
+        self.type_error_str("array")
+    }
+
+    fn end(self) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_index"))]
+        return Ok(self.value);
+        #[cfg(feature = "no_index")]
+        return self.type_error_str("array");
+    }
+}
+
+impl SerializeTupleVariant for DynamicSerializer {
+    type Ok = Dynamic;
+    type Error = Box<EvalAltResult>;
+
+    fn serialize_field<T: ?Sized + Serialize>(
+        &mut self,
+        value: &T,
+    ) -> Result<(), Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_index"))]
+        {
+            let value = value.serialize(&mut *self)?;
+            if let Some(arr) = self.value.downcast_mut::<Array>() {
+                arr.push(value);
+                Ok(())
+            } else {
+                self.type_error::<Array, _>()
+            }
+        }
+        #[cfg(feature = "no_index")]
+        self.type_error_str("array")
+    }
+
+    fn end(self) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_index"))]
+        return Ok(self.value);
+        #[cfg(feature = "no_index")]
+        return self.type_error_str("array");
+    }
+}
+
+impl SerializeMap for DynamicSerializer {
+    type Ok = Dynamic;
+    type Error = Box<EvalAltResult>;
+
+    fn serialize_key<T: ?Sized + Serialize>(&mut self, key: &T) -> Result<(), Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_object"))]
+        {
+            self.key = key.serialize(&mut *self)?;
+            Ok(())
+        }
+        #[cfg(feature = "no_object")]
+        self.type_error_str("map")
+    }
+
+    fn serialize_value<T: ?Sized + Serialize>(
+        &mut self,
+        value: &T,
+    ) -> Result<(), Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_object"))]
+        {
+            let key = mem::take(&mut self.key)
+                .take_immutable_string()
+                .or_else(|_| self.type_error::<String, _>())?;
+            let value = value.serialize(&mut *self)?;
+            if let Some(map) = self.value.downcast_mut::<Map>() {
+                map.insert(key, value);
+                Ok(())
+            } else {
+                self.type_error::<Map, _>()
+            }
+        }
+        #[cfg(feature = "no_object")]
+        self.type_error_str("map")
+    }
+
+    fn serialize_entry<K: ?Sized + Serialize, T: ?Sized + Serialize>(
+        &mut self,
+        key: &K,
+        value: &T,
+    ) -> Result<(), Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_object"))]
+        {
+            let key: Dynamic = key.serialize(&mut *self)?;
+            let key = key
+                .take_immutable_string()
+                .or_else(|_| self.type_error::<String, _>())?;
+            let value = value.serialize(&mut *self)?;
+            if let Some(map) = self.value.downcast_mut::<Map>() {
+                map.insert(key, value);
+                Ok(())
+            } else {
+                self.type_error::<Map, _>()
+            }
+        }
+        #[cfg(feature = "no_object")]
+        self.type_error_str("map")
+    }
+
+    fn end(self) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_object"))]
+        return Ok(self.value);
+        #[cfg(feature = "no_object")]
+        return self.type_error_str("map");
+    }
+}
+
+impl SerializeStruct for DynamicSerializer {
+    type Ok = Dynamic;
+    type Error = Box<EvalAltResult>;
+
+    fn serialize_field<T: ?Sized + Serialize>(
+        &mut self,
+        key: &'static str,
+        value: &T,
+    ) -> Result<(), Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_object"))]
+        {
+            let value = value.serialize(&mut *self)?;
+            if let Some(map) = self.value.downcast_mut::<Map>() {
+                map.insert(key.into(), value);
+                Ok(())
+            } else {
+                self.type_error::<Map, _>()
+            }
+        }
+        #[cfg(feature = "no_object")]
+        self.type_error_str("map")
+    }
+
+    fn end(self) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_object"))]
+        return Ok(self.value);
+        #[cfg(feature = "no_object")]
+        return self.type_error_str("map");
+    }
+}
+
+impl SerializeStructVariant for DynamicSerializer {
+    type Ok = Dynamic;
+    type Error = Box<EvalAltResult>;
+
+    fn serialize_field<T: ?Sized + Serialize>(
+        &mut self,
+        key: &'static str,
+        value: &T,
+    ) -> Result<(), Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_object"))]
+        {
+            let value = value.serialize(&mut *self)?;
+            if let Some(map) = self.value.downcast_mut::<Map>() {
+                map.insert(key.into(), value);
+                Ok(())
+            } else {
+                self.type_error::<Map, _>()
+            }
+        }
+        #[cfg(feature = "no_object")]
+        self.type_error_str("map")
+    }
+
+    fn end(self) -> Result<Self::Ok, Box<EvalAltResult>> {
+        #[cfg(not(feature = "no_object"))]
+        return Ok(self.value);
+        #[cfg(feature = "no_object")]
+        return self.type_error_str("map");
+    }
+}