# newail1.arch
# michael chen

# ail architecture

architecture ail:1

dim 10 10

mod ClientArch:1 "Client PC" rectangle {4.0 1.0} {6.0 2.0} -fill "burlywood"
mod ServerArch:1 "Sparc Server" rectangle {4.0 8.0} {6.0 9.0} -fill "maroon"

set smL_color "black"

path ClientArch:1 ServerArch:1 {5.0 2.0} {5.0 8.0} -twoway both -width 2

end


#client architecture


architecture ClientArch:1

dim 6 3

mod WebBrowser:1 "Netscape\nWeb Browser" rectangle {0.5 1.0} {2.5 2.0} \
	-fill "darkolivegreen"
mod JavaTools:1 "JAVA" rectangle {3.5 1.0} {5.5 2.0} -fill "cornflowerblue"

set smL_color "black"

path WebBrowser:1 ClientArch:1 {1.5 2.0} {1.5 3.0} -twoway both -width 2
path JavaTools:1 ClientArch:1 {4.5 2.0} {4.5 3.0} -twoway both -width 2

end


#server architecture


architecture ServerArch:1

dim 9 5

mod HTTPServer:1 "HTTP Server" rectangle {4.0 1.25} {6.0 2.0} -fill "plum"
mod Logfile:1 "WWW Logfile" rectangle {6.0 3.25} {8.0 3.75} -fill "dim gray"
mod Tracker:1 "WWW Tracker" rectangle {6.0 4.25} {8.0 4.75} -fill "sandybrown"
mod Coach:1 "Coach" rectangle {1.0 1.25} {3.0 2.0} -fill "indianred"
mod Postgres:1 "Postgres" rectangle {1.0 3.5} {3.0 4.5} -fill "paleturquoise"
mod ConnectionManager:1 "Connection\nManager" rectangle {6.9 1.25} {8.1 2.0} \
	-fill "gold"

set smL_color "black"

path HTTPServer:1 ServerArch:1 {5.0 1.25} {5.0 0.0} -twoway both -width 2
path HTTPServer:1 Logfile:1 {5.5 2.0} {5.5 2.625} {7.0 2.625} {7.0 3.25} \
	last -width 2
path Logfile:1 Tracker:1 {7.0 3.75} {7.0 4.25} last -width 2
path HTTPServer:1 Coach:1 {4.0 1.625} {3.0 1.625} last -width 2
path HTTPServer:1 Postgres:1 {4.5 2.0} {4.5 4.0} {3.0 4.0} \
	-twoway both -width 2
path HTTPServer:1 ConnectionManager:1 {6.0 1.625} {6.9 1.625} last -width 2
path Coach:1 ServerArch:1 {2.0 1.25} {2.0 0.0} last -width 2
path Coach:1 Postgres:1 {2.0 2.0} {2.0 3.5} -twoway both -width 2

end


proc per_event {id name params caller} {

   global smE_boxcolor

   case $name {
	
	WEBDOCUMENTREQUEST	{set smE_boxcolor "midnight blue"}
	RECEIVEHTTPADDRESS	{set smE_boxcolor "midnight blue"}
	HTMLPAGE		{set smE_boxcolor "midnight blue"}
	RECEIVEADDRESS		{set smE_boxcolor "midnight blue"}
	LINKREQUESTS		{set smE_boxcolor "midnight blue"}
	PAGELINKS		{set smE_boxcolor "midnight blue"}
	USEINFOINGRAPH		{set smE_boxcolor "grey"}
	SENDINFOTOJAVA		{set smE_boxcolor "grey"}
	GRAPHUPDATETOPOSTGRES {
	   case $id {
	      24	{set smE_boxcolor "grey"}
	      28	{set smE_boxcolor "grey"}
	      55	{set smE_boxcolor "dark sea green"}
	      61	{set smE_boxcolor "dark sea green"}
	      }
	   }
	GRAPHUPDATETOCOACH {
	   case $id {
	      31	{set smE_boxcolor "grey"}
	      38	{set smE_boxcolor "grey"}
	      56	{set smE_boxcolor "dark sea green"}
	      62	{set smE_boxcolor "dark sea green"}
	      }
	   }
	GRAPHUPDATETOCONMAN {
	   case $id {
	      32	{set smE_boxcolor "grey"}
	      39	{set smE_boxcolor "grey"}
	      57	{set smE_boxcolor "dark sea green"}
	      63	{set smE_boxcolor "dark sea green"}
	      }
	   }
	RECEIVEGRAPHINFO	{set smE_boxcolor "grey"}
	REQUESTHELP		{set smE_boxcolor "purple"}
	HELPREQUESTTOCOACH	{set smE_boxcolor "purple"}
	QUERYTODATABASE {
	   case $id {
	      46	{set smE_boxcolor "grey"}
	      52	{set smE_boxcolor "grey"}
	      47	{set smE_boxcolor "purple"}
	      53	{set smE_boxcolor "purple"}
	      67	{set smE_boxcolor "dark sea green"}
	      71	{set smE_boxcolor "dark sea green"}
	      }
	   }
	FEEDBACKTOCOACH {
	   case $id {
	      58	{set smE_boxcolor "grey"}
	      64	{set smE_boxcolor "grey"}
	      59	{set smE_boxcolor "purple"}
	      65	{set smE_boxcolor "purple"}
	      74	{set smE_boxcolor "dark sea green"}
	      77	{set smE_boxcolor "dark sea green"}
	      }
	   }
	ADVICETOCLIENT {
	   case $id {
	      68	{set smE_boxcolor "grey"}
	      72	{set smE_boxcolor "grey"}
	      75	{set smE_boxcolor "grey"}
	      78	{set smE_boxcolor "grey"}
	      69	{set smE_boxcolor "purple"}
	      73	{set smE_boxcolor "purple"}
	      76	{set smE_boxcolor "purple"}
	      79	{set smE_boxcolor "purple"}
	      80	{set smE_boxcolor "dark sea green"}
	      81	{set smE_boxcolor "dark sea green"}
	      82	{set smE_boxcolor "dark sea green"}
	      83	{set smE_boxcolor "dark sea green"}
	      }
	   }
	JAVAGRAPHCHANGE		{set smE_boxcolor "dark sea green"}
	HIGHLIGHT			{set smE_boxcolor "red"}
	HIGHLIGHTCOMMANDTOCONMAN	{set smE_boxcolor "red"}
	default				{set smE_boxcolor "orange"}
	}
}