# XML "function" nodes that transform their contents

import datetime

import re

import dates

import exc

import maps

import term

import xml_dom

##### Exceptions

class SyntaxException(Exception):

    def __init__(self, cause):

        Exception.__init__(self, 'Invalid XML function syntax: '

            +exc.str_(cause))

class FormatException(SyntaxException): pass

##### Functions

funcs = {}

def process(node, on_error=exc.raise_):

    for child in xml_dom.NodeElemIter(node): process(child, on_error)

    name = node.tagName

    if name.startswith('_') and name in funcs:

        try: value = funcs[name](xml_dom.NodeTextEntryIter(node))

        except SyntaxException, e:

            str_ = str(node)

            exc.add_msg(e, 'function:\n'+str_)

            xml_dom.replace(node, node.ownerDocument.createComment(

                '\n'+term.emph_multiline(str_)))

            on_error(e)

        else: xml_dom.replace_with_text(node, value)

def map_items(func, items):

    return [(name, func(value)) for name, value in items]

def conv_items(type_, items):

    def conv(val):

        try: return type_(val)

        except ValueError, e: raise SyntaxException(e)

    return map_items(conv, xml_dom.TextEntryOnlyIter(items))

#### XML functions

# Function names must start with _ to avoid collisions with real tags

# Functions take arguments (items)

def _ignore(items):

    '''Used to "comment out" an XML subtree'''

    return None

funcs['_ignore'] = _ignore

def _alt(items):

    items = list(items)

    items.sort()

    return items[0][1] # value of lowest-numbered item

funcs['_alt'] = _alt

def _merge(items):

    items = list(items)

    items.sort()

    return maps.merge_values(*[v for k, v in items])

funcs['_merge'] = _merge

def _label(items):

    items = dict(conv_items(str, items)) # get *once* from iter and check types

    try:

        label = items['label']

        value = items['value']

    except KeyError, e: raise SyntaxException(e)

    return label+': '+value

funcs['_label'] = _label

def _range(items):

    items = dict(conv_items(float, items))

    from_ = items.get('from', None)

    to = items.get('to', None)

    if from_ == None or to == None: return None

    return str(to - from_)

funcs['_range'] = _range

def _avg(items):

    count = 0

    sum_ = 0.

    for name, value in conv_items(float, items):

        count += 1

        sum_ += value

    return str(sum_/count)

funcs['_avg'] = _avg

class CvException(Exception):

    def __init__(self):

        Exception.__init__(self, 'CV (coefficient of variation) values are only'

            ' allowed for ratio scale data '

            '(see <http://en.wikipedia.org/wiki/Coefficient_of_variation>)')

def _noCV(items):

    try: name, value = items.next()

    except StopIteration: return None

    if re.match('^(?i)CV *\d+$', value): raise SyntaxException(CvException())

    return value

funcs['_noCV'] = _noCV

def _date(items):

    items = conv_items(str, items) # get *once* from iter and check types

    try: str_ = dict(items)['date']

    except KeyError:

        items = dict(filter(lambda (k, v): v != 0, conv_items(int, items)))

        items.setdefault('year', 1900)

        items.setdefault('month', 1)

        items.setdefault('day', 1)

        try: date = datetime.date(**items)

        except ValueError, e: raise SyntaxException(e)

    else:

        try: year = float(str_)

        except ValueError:

            try: import dateutil.parser

            except ImportError: return str_

            try: date = dateutil.parser.parse(str_)

            except ValueError, e: raise SyntaxException(e)

        else: date = (datetime.date(int(year), 1, 1) +

            datetime.timedelta(round((year % 1.)*365)))

    try: return dates.strftime('%Y-%m-%d', date)

    except ValueError, e: raise FormatException(e)

funcs['_date'] = _date

_name_parts_slices_items = [

    ('first', slice(None, 1)),

    ('middle', slice(1, -1)),

    ('last', slice(-1, None)),

]

name_parts_slices = dict(_name_parts_slices_items)

name_parts = [name for name, slice_ in _name_parts_slices_items]

def _name(items):

    items = dict(items)

    parts = []

    for part in name_parts:

        if part in items: parts.append(items[part])

    return ' '.join(parts)

funcs['_name'] = _name

def _namePart(items):

    out_items = []

    for part, value in items:

        try: slice_ = name_parts_slices[part]

        except KeyError, e: raise SyntaxException(e)

        else: out_items.append((part, ' '.join(value.split(' ')[slice_])))

    return _name(out_items)

funcs['_namePart'] = _namePart