## Copyright 2014 Cognitect. All Rights Reserved.
##
## Licensed under the Apache License, Version 2.0 (the "License");
## you may not use this file except in compliance with the License.
## You may obtain a copy of the License at
##
## http://www.apache.org/licenses/LICENSE-2.0
##
## Unless required by applicable law or agreed to in writing, software
## distributed under the License is distributed on an "AS-IS" BASIS,
## WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
## See the License for the specific language governing permissions and
## limitations under the License.
from collections import Mapping, Hashable
[docs]class Named(object):
def _parse(self):
p = self.str.split('/', 1)
if len(p) == 1:
self._name = self.str
self._namespace = None
else:
self._namespace = p[0] or None
self._name = p[1] or "/"
return self._name, self._namespace
@property
def name(self):
return self._name if hasattr(self, "_name") else self._parse()[0]
@property
def namespace(self):
return self._namespace if hasattr(self, "_namespace") \
else self._parse()[1]
[docs]class Keyword(Named):
def __init__(self, value):
assert isinstance(value, basestring)
self.str = value
self.hv = value.__hash__()
def __hash__(self):
return self.hv
def __eq__(self, other):
return isinstance(other, Keyword) and self.str == other.str
def __ne__(self, other):
return not self == other
def __call__(self, mp):
return mp[self]
def __repr__(self):
return "<Keyword " + self.str + ">"
def __str__(self):
return self.str
[docs]class Symbol(Named):
def __init__(self, value):
assert isinstance(value, basestring)
self.str = value
self.hv = value.__hash__()
def __hash__(self):
return self.hv
def __eq__(self, other):
return isinstance(other, Symbol) and self.str == other.str
def __ne__(self, other):
return not self == other
def __call__(self, mp):
return mp[self]
def __repr__(self):
return self.str
def __str__(self):
return self.str
kw_cache = {}
class _KWS(object):
def __getattr__(self, item):
value = self(item)
setattr(self, item, value)
return value
def __call__(self, str):
if str in kw_cache:
return kw_cache[str]
else:
kw_cache[str] = Keyword(str)
return kw_cache[str]
kws = _KWS()
[docs]class TaggedValue(object):
def __init__(self, tag, rep):
self.tag = tag
self.rep = rep
def __eq__(self, other):
if isinstance(other, TaggedValue):
return self.tag == other.tag and \
self.rep == other.rep
return False
def __ne__(self, other):
return not (self == other)
def __hash__(self):
if isinstance(self.rep, list):
return reduce(lambda a, b: hash(a) ^ hash(b), self.rep, 0)
return hash(self.rep)
def __str__(self):
return repr(self)
def __repr__(self):
return self.tag + " " + repr(self.rep)
[docs]class Set(TaggedValue):
def __init__(self, rep):
TaggedValue.__init__(self, "set", rep)
[docs]class CMap(TaggedValue):
def __init__(self, rep):
TaggedValue.__init__(self, "cmap", rep)
[docs]class Vector(TaggedValue):
def __init__(self, rep):
TaggedValue.__init__(self, "vector", rep)
[docs]class Array(TaggedValue):
def __init__(self, rep):
TaggedValue.__init__(self, "array", rep)
[docs]class List(TaggedValue):
def __init__(self, rep):
TaggedValue.__init__(self, "list", rep)
[docs]class URI(TaggedValue):
def __init__(self, rep):
TaggedValue.__init__(self, "uri", rep)
[docs]class frozendict(Mapping, Hashable):
def __init__(self, *args, **kwargs):
self._dict = dict(*args, **kwargs)
def __len__(self):
return len(self._dict)
def __iter__(self):
return iter(self._dict)
def __getitem__(self, key):
return self._dict[key]
def __hash__(self):
return hash(frozenset(self._dict.items()))
def __repr__(self):
return 'frozendict(%r)' % (self._dict,)
[docs]class Link(object):
# Class property constants for rendering types
LINK = u"link"
IMAGE = u"image"
# Class property constants for keywords/obj properties.
HREF = u"href"
REL = u"rel"
PROMPT = u"prompt"
NAME = u"name"
RENDER = u"render"
def __init__(self, href=None, rel=None, name=None, render=None,
prompt=None):
self._dict = frozendict()
assert href and rel
if render:
assert render.lower() in [Link.LINK, Link.IMAGE]
self._dict = {Link.HREF: href,
Link.REL: rel,
Link.NAME: name,
Link.RENDER: render,
Link.PROMPT: prompt}
def __eq__(self, other):
return self._dict == other._dict
def __ne__(self, other):
return self._dict != other._dict
@property
def href(self):
return self._dict[Link.HREF]
@property
def rel(self):
return self._dict[Link.REL]
@property
def prompt(self):
return self._dict[Link.PROMPT]
@property
def name(self):
return self._dict[Link.NAME]
@property
def render(self):
return self._dict[Link.RENDER]
@property
def as_map(self):
return self._dict
@property
def as_array(self):
return [self.href, self.rel, self.name, self.render, self.prompt]
[docs]class Boolean(object):
"""To allow a separate t/f that won't hash as 1/0. Don't call directly,
instead use true and false as singleton objects. Can use with type check.
Note that the Booleans are for preserving hash/set bools that duplicate 1/0
and not designed for use in Python outside logical evaluation (don't treat
as an int, they're not). You can get a Python bool using bool(x)
where x is a true or false Boolean.
"""
def __init__(self, name):
self.v = True if name == "true" else False
self.name = name
def __nonzero__(self):
return self.v
def __repr__(self):
return self.name
def __str__(self):
return self.name
# lowercase rep matches java/clojure
false = Boolean("false")
true = Boolean("true")