1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94

// Copyright 2020-2021 Ian Jackson and contributors to Otter
// SPDX-License-Identifier: AGPL-3.0-or-later
// There is NO WARRANTY.

#![allow(clippy::many_single_char_names)]

use crate::prelude::*;

type SKD = slotmap::KeyData;

#[macro_export]
macro_rules! display_consequential_impls {
  ( $x:path ) => {
    impl From<$x> for String {
      fn from(p: $x) -> String { format!("{}",p) }
    }
    impl Debug for $x {
      fn fmt(&self, f: &mut fmt::Formatter) -> Result<(), fmt::Error> {
        <Self as Display>::fmt(self, f)
      }
    }
  }
}
pub use crate::display_consequential_impls; // this is madness!

#[throws(AE)]
pub fn slotkey_parse(s: &str, sep: u8) -> SKD {
  if s.as_bytes() == [b'0', sep, b'0', b'0'] { return default() }
  let sep: char = sep.into();
  let e = || anyhow!("could not deserialise visibile piece id");
  let mut i = s.splitn(2, sep).map(|s| s.parse().map_err(|_| e()));
  let l: u32 = i.next().ok_or_else(e)??;
  let h: u32 = i.next().ok_or_else(e)??;
  let v = ((h as u64) << 32) | (l as u64);
  SKD::from_ffi(v)
}

#[throws(fmt::Error)]
pub fn slotkey_write(k: SKD, sep: u8, f: &mut fmt::Formatter) {
  let sep: char = sep.into();
  if k == default() { write!(f, "0{}00", sep)?; return; }
  let v = k.as_ffi();
  write!(f, "{}{}{}", v & 0xffffffff, sep, v >> 32)?
}

#[macro_export]
macro_rules! visible_slotmap_key {
  ( $x:ident($sep:expr) ) => {

    #[derive(Copy,Default,Clone,Eq,PartialEq,Ord,PartialOrd,Serialize,Deserialize,Hash)]
    #[serde(into="String")]
    #[serde(try_from="String")]
    pub struct $x(pub slotmap::KeyData);

    impl_for_slotmap_key!($x($sep));
    hformat_as_display!{$x}
  }
}
#[macro_export]
macro_rules! impl_for_slotmap_key {
  ( $x:ident($sep:expr) ) => {
    impl Display for $x {
      #[throws(fmt::Error)]
      fn fmt(&self, f: &mut fmt::Formatter) { slotkey_write(self.0,$sep,f)? }
    }

    impl TryFrom<&str> for $x {
      type Error = AE;
      #[throws(AE)]
      fn try_from(s: &str) -> $x { $x(slotkey_parse(s,$sep)?) }
    }
    impl TryFrom<String> for $x {
      type Error = AE;
      #[throws(AE)]
      fn try_from(s: String) -> $x { $x(slotkey_parse(&s,$sep)?) }
    }

    impl slotmap::Key for $x {
      fn data(&self) -> slotmap::KeyData { self.0 }
    }
    impl From<slotmap::KeyData> for $x {
      fn from(d: slotmap::KeyData) -> Self { $x(d) }
    }
    impl From<$x> for slotmap::KeyData {
      fn from(p: $x) -> Self {
        p.0
      }
    }

    display_consequential_impls!{$x}
  }
}
pub use crate::visible_slotmap_key; // this is madness!
pub use crate::impl_for_slotmap_key; // this is madness!