summaryrefslogtreecommitdiff
path: root/docs/examples/vl_isa.py
blob: 89c70fa38172f37a029fccd77169c006aa39f9ba (plain)
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
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
#!/usr/bin/env python
""" very light isa hmi mockup
prog de test infrastructure ivy + mini ihm type isa """

import traceback, time, os, sys, string, getopt
from Tkinter import *
from ivycpy import *

APPNAME = "vl_isa"

def lprint(fmt,*arg):
	print APPNAME + ": " + fmt % arg

def usage(scmd):
	lpathitem = string.split(scmd,'/')
	fmt = '''Usage: %s [-h] [-b IVYBUS | --ivybus=IVYBUS] [-n APPNAME | --name=APPNAME] 
where
\t-h provides the usage message;
\t-n APPNAME | --name=APPNAME  
\t-b IVYBUS | --ivybus=IVYBUS allow to provide the IVYBUS string in the form
\t adresse:port eg. 127.255.255.255:2010
'''
	print fmt   %  lpathitem[-1]

def oncxproc(connected):
	if connected == IvyApplicationDisconnected :
		lprint("an IvyApplication was Disconnected")
	else:
		lprint("an IvyApplication was Connected")

def ondieproc(id):
	lprint("we ask me to die with id [%d]", id )

class TopLevel(Tk) :
	__single = 0
	def __init__(self,appname = "TopLevel"):
		if TopLevel.__single != 0 :
			lprint("TopLevel is singleton")
			sys.exit(1)
		__single = 1
		# the object is tk_root
		Tk.__init__(self) 
		self.appname = appname
		self.title(self.appname)
		# Frame contenant heure et bouton quit 
		self.tkFheadpanel = Frame(self)
		# Label hour
		self.tkLhour =  Label(self.tkFheadpanel,text="hh:mm:ss")
		self.tkLhour.pack(padx=4 , pady=4 , side = LEFT)
		# dummy button
## 		self.tkBdummy = Button(self.tkFheadpanel, 
## 							  text="dummy",  bg='pink')
## 		self.tkBdummy.pack(padx=4 , pady=4, side = RIGHT)
		
		# button quit
		self.tkBquit = Button(self.tkFheadpanel, 
							  text="QUIT",  bg='pink', command=self.quit)
		self.tkBquit.pack(padx=4 , pady=4, side = RIGHT)
		self.tkFheadpanel.pack(side=TOP)
	
		# Frame contenant un Label, un Text et un Scroller
		self.tkFreceive_msg = Frame(self)
		# label
		self.tkLreceive_msg = Label(self.tkFreceive_msg, text="flyingonthebus")
		self.tkLreceive_msg.pack(padx=4 , pady=4,
								 side=TOP, fill = BOTH, expand = YES)
		# Text
		self.tkTreceive_msg = Text(self.tkFreceive_msg, height=26, width=50)
		# Scrollbar
		self.tkSBreceive_scroller = Scrollbar(
			self.tkFreceive_msg,
			command = self.tkTreceive_msg.yview)
		self.tkTreceive_msg.configure(
			yscrollcommand = self.tkSBreceive_scroller.set)

		self.tkTreceive_msg.pack(padx=4 , pady=4,
								 side=LEFT, fill = BOTH, expand = YES)
		self.tkSBreceive_scroller.pack(side=RIGHT, fill = Y)
		self.tkFreceive_msg.pack(side=BOTTOM, fill = BOTH, expand = YES)

	def add_one_msg(self, smsg) :
		self.tkTreceive_msg.insert(END, "%s\n" % smsg )

	def onmsgproc(self,*arg) :
		self.add_one_msg(string.join(arg,""))

	def quit(self):
		# cleanup action before detroying tk_root
		lprint("doing IvyStop")
		IvyStop()
		lprint("doing destroy" )
		self.destroy()
		lprint("after destroy")
		lprint("done.")

## 	def ontick(self):
## 		lprint("on tick method")
## 		IvySendMsg("testtk_tick")
## 		self.after(1000,self.ontick)

# main prog
if __name__ == '__main__':
	# setting some main variable
	sivybus = ""	

	# getting option
	try:
		optlist, left_args = getopt.getopt(sys.argv[1:],'hb:n:', ['ivybus=','name'])
	except getopt.GetoptError:
		# print help information and exit:
		usage(sys.argv[0])
		sys.exit(2)
	for o, a in optlist:
		if o in ("-h", "--help"):
			usage(sys.argv[0])
			sys.exit()
		elif o in ("-b", "--ivybus"):
			sivybus = a
		elif o in ("-n","--name"):
			APPNAME = a 
	if sivybus != "" :
		sechoivybus = sivybus
	elif os.environ.has_key("IVYBUS"):
		sechoivybus = os.environ["IVYBUS"]
	else:
		sechoivybus = "ivydefault"
	lprint("Ivy will broadcast on %s " , sechoivybus)

	# initializing ivy : isreadymsg
	sisreadymsg = "[%s is ready]" % APPNAME
	IvyInit(APPNAME, sisreadymsg, 1 ,  oncxproc,  ondieproc )
	IvyStart(sivybus)

	# initializing top hmi part
	mytoplevel = TopLevel("%s top window" % APPNAME)

	# doing suited binding
	IvyBindMsg(mytoplevel.onmsgproc , "(.*)")
		
	mytoplevel.mainloop()