#
# Zinc.py -- Python interface to the tkzinc widget.
#
# Authors         : Frederic Lepied, Patrick Lecoanet
# Created Date    : Thu Jul 22 09:36:04 1999
#
# $Id$
#
#
# Copyright (c) 1999 CENA --
#
# This code is free software; you can redistribute it and/or
# modify it under the terms of the GNU Library General Public
# License as published by the Free Software Foundation; either
# version 2 of the License, or (at your option) any later version.
#
# This code is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
# Library General Public License for more details.
#
# You should have received a copy of the GNU Library General Public
# License along with this code; if not, write to the Free
# Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
#
#

__version__ = "$Revision$"

import types
from Tkinter import *
from Tkinter import _cnfmerge, _flatten

ZINC_NO_PART=-1
ZINC_CURRENT_POSITION=-2
ZINC_SPEED_VECTOR=-3
ZINC_LEADER=-4
ZINC_CONNECTION=-5

def havetkzinc(window):
    try:
        window.tk.call('load', 'tkzinc3.1.so')
        # Call a function from the package to autoload it
        # and verify that all is OK.
        window.tk.call('zinc')
    except TclError:
        return 0
    return 1

class Zinc(Widget):
    def __init__(self, master=None, cnf={}, **kw):
        Widget.__init__(self, master, 'zinc', cnf, kw)
        self.items = {}

    def add(self, itemType, *args, **kw):
        args = _flatten(args)
        if len(args) != 0:
            cnf = args[-1]
        else:
            cnf={}
        if type(cnf) in (DictionaryType, TupleType):
            args = args[:-1]
        else:
            cnf = {}
        return self.tk.getint(apply(
            self.tk.call,
            (self._w, 'add', itemType) 
            + args + self._options(cnf, kw)))
    
    def addtag(self, *args):
        self._do('addtag', args)

    def addtag_above(self, newtag, tagOrId):
        self.addtag(newtag, 'above', tagOrId)

    def addtag_all(self, newtag):
    	self.addtag(newtag, 'all')

    def addtag_atpoint(self, newtag, x, y, halo=None, start=None):
    	self.addtag(newtag, 'atpoint', x, y, halo, start)

    def addtag_atpriority(self, newtag, pri):
    	self.addtag(newtag, 'atpriority', pri)

    def addtag_below(self, newtag, tagOrId):
    	self.addtag(newtag, 'below', tagOrId)

    def addtag_enclosed(self, newtag, x1, y1, x2, y2):
    	self.addtag(newtag, 'enclosed', x1, y1, x2, y2)

    def addtag_overlapping(self, newtag, x1, y1, x2, y2):
    	self.addtag(newtag, 'overlapping', x1, y1, x2, y2)

    def addtag_withtag(self, newtag, tagOrId):
	self.addtag(newtag, 'withtag', tagOrId)

    def addtag_withtype(self, newtag, type):
	self.addtag(newtag, 'withtype', type)

    def anchorxy(self, *args):
        self._do('anchorxy', args)

    def bbox(self, *args):
        self._do('bbox', args)

    def becomes(self, *args):
        self._do('becomes', args)

#     def bind(self):
#         pass

    def bind_tag(self, tagOrId, sequence=None, func=None, add=None):
        return self._bind((self._w, 'bind', tagOrId),
                          sequence, func, add)

#     def cget(self):
#         pass

    def chggroup(self, *args):
        self._do('chggroup', args)

    def clone(self, *args):
        self._do('clone', args)

#     def configure(self):
#         pass

    def coords(self, *args):
        self._do('coords', args)

    def currentpart(self):
        return self.tk.getint(self._do('currentpart'))
                   
    def dtag(self, *args):
    	self._do('dtag', args)

    def find(self, *args):
    	return self._getints(self._do('find', args)) or ()

    def find_above(self, tagOrId):
    	return self.find('above', tagOrId)

    def find_all(self):
    	return self.find('all')

    def find_atpoint(self, x, y, halo=None, start=None):
    	return self.find('atpoint', x, y, halo, start)

    def find_atpriority(self, pri):
    	return self.find('atpriority', pri)

    def find_below(self, tagOrId):
    	return self.find('below', tagOrId)

    def find_enclosed(self, x1, y1, x2, y2):
    	return self.find('enclosed', x1, y1, x2, y2)

    def find_overlapping(self, x1, y1, x2, y2):
    	return self.find('overlapping', x1, y1, x2, y2)

    def find_withtag(self, tagOrId):
    	return self.find('withtag', tagOrId)

    def find_withtype(self, type):
    	return self.find('withtag', type)

    def gettags(self, *args):
    	return self.tk.splitlist(self._do('gettags', args))

    def group(self, *args):
        self._do('group', args)

    def hasanchors(self, *args):
        self._do('hasanchors', args)

    def hasfields(self, *args):
        self._do('hasanchors', args)

    def hasparts(self, *args):
        self._do('hasanchors', args)

#     def hastag(self):
#         pass

    def itemcget(self, tagOrId, option):
        return self._do('itemcget', (tagOrId, '-'+option))

    def itemfieldcget(self, tagOrId, field, option):
        return self._do('itemcget', (tagOrId, field, '-'+option))

    def itemconfigure(self, tagOrId, field=None, **kw):
        if not kw:
            cnf = {}
            for x in self.tk.split(
                field != None and self._do('itemconfigure', (tagOrId, field)) or
                self._do('itemconfigure', (tagOrId,))):
                #print x
                cnf[x[0][1:]] = (x[0][1:],) + x[1:]
            return cnf
        #print self._options({}, kw)
        if field != None:
            self._do('itemconfigure', (tagOrId, str(field),)
                     + self._options({}, kw))
        else:
            self._do('itemconfigure', (tagOrId,)
                     + self._options({}, kw))
    itemconfig = itemconfigure

    def loweritem(self, *args):
        self._do('lower', args)

    def monitor(self, *args):
        self._do('monitor', args)
    
    def raiseitem(self, *args):
        self._do('raise', args)

    def remove(self, *args):
        self._do('remove', args)
    
    def rotate(self, *args):
        self._do('rotate', args)
    
    def scale(self, xFactor=None, yFactor=None, tagOrId=None):
        if yFactor == None:
            return self.tk.getdouble(self._do('scale'))
        else:
            if tagOrId == None:
                self._do('scale', (xFactor, yFactor))
            else:
                self._do('scale', (tagOrId, xFactor, yFactor))

    def tdelete(self, *args):
        self._do('tdelete', args)
    
    def transform(self, *args):
        self._getints(self._do('transform', args))
    
    def translate(self, dx=None, dy=None, tagOrId=None):
        if dx == None:
            return self._getints(self._do('translate'))
        else:
            if tagOrId == None:
                self._do('translate', (dx, dy))
            else:
                self._do('translate', (tagOrId, dx, dy))

    def treset(self, *args):
        self._do('treset', args)
    
    def trestore(self, *args):
        self._do('trestore', args)
    
    def tsave(self, *args):
        self._do('tsave', args)
    
    def type(self, tagOrId):
        return self._do('type', (tagOrId,))


class ZincItem:
    def __init__(self, zinc, itemType, *args, **kw):
        self.zinc = zinc
        self.id = apply(zinc.add, (itemType,) + args, kw)
        zinc.items[self.id] = self
        
    def __str__(self):
        return str(self.id)

    def __repr__(self):
        return str(self.id)

    def delete(self):
        del self.zinc.items[self.id]
        self.zinc.delete(self.id)

    def __getitem__(self, key):
        return self.zinc.itemcget(self.id, key)

    def __setitem__(self, key, value):
        self.zinc.itemconfig(self.id, {key: value})

    def keys(self):
        if not hasattr(self, '_keys'):
            self._keys = {}
            config=self.zinc.itemconfig(self.id)
            for x in config.keys():
                self._keys[x] = config[x][1]
        return self._keys

    def has_key(self, key):
        return key in self.keys()

    def bind(self, sequence=None, command=None, add=None):
        self.zinc.bind_tag(self.id, sequence, command, add)
        
    def cget(self, attr):
        return self.zinc.itemcget(self.id, attr)
           
    def fieldcget(self, field, attr):
        return self.zinc.itemfieldcget(self.id, field, attr)

class Arc(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'arc') + args, kw)    

class Group(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'group') + args, kw)    

class Icon(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'icon') + args, kw)    

class Map(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'map') + args, kw)
    
class Curve(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'curve') + args, kw)    

class Rectangle(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'rectangle') + args, kw)    

class Reticle(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'reticle') + args, kw)    

class Tabular(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'tabular') + args, kw)    

class Text(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'text') + args, kw)    

class Track(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'track') + args, kw)
    
class WayPoint(ZincItem):
    def __init__(self, zinc, *args, **kw):
        apply(ZincItem.__init__, (self, zinc, 'waypoint') + args, kw)
    

# Class to hold mapinfos used by the Map Item class 
class Mapinfo:
    def __init__(self, interp, *args):
        self.interp=interp.tk
        apply(self.interp.call, ('mapinfo', self, 'create'))
        
    def __repr__(self):
        return `id(self)`

    def add_text(self, text_style, line_style, x, y, text):
        self.interp.call('mapinfo', self, 'add', 'text', text_style, line_style, x, y, text)

    def add_line(self, line_style, width, x1, y1, x2, y2):
        self.interp.call('mapinfo', self, 'add', 'line', line_style, width, x1, y1, x2, y2)

    def add_arc(self, line_style, width, cx, cy, radius, start, extent):
        self.interp.call('mapinfo', self, 'add', 'arc', line_style, width, cx, cy, radius, start, extent)

    def scale(self, factor):
        self.interp.call('mapinfo', self, 'scale', factor)
        
    def translate(self, xAmount, yAmount):
        self.interp.call('mapinfo', self, 'translate', xAmount, yAmount)
        
class Videomap (Mapinfo):
    def __init__(self, tk, *args):
        self.tk=tk.tk
        print args
        apply(self.tk.call, ('videomap', 'load') + args + (self,))

# Zinc.py ends here