#
#	Generate participants list from the 'participants.csv' sorted by
#	name, generate worshops main page
#
BEGIN	{
	FS=";"
#  create backup copy
	while (getline < "particip.html" != 0) print $0 > "particip.html~"
	close "particip.html"
	close "particip.html~"
#  read in the header
	while (getline < "Head.html" != 0) Head[++i] = $0
	close "Head.html"
	Nhdln = i
#  read in the footer
	while (getline < "Foot.html" != 0) Foot[++Nftln] = $0
	close "Foot.html"
# start creating page
        for (i=1; i<=Nhdln; i++) {
          line = Head[i]
          if (index(line, "__title__")) sub("__title__", "ELAG 2001 - List of Participants", line)
          print line
	}
# title, headlines
	print "<table width=\"100%\">"
	print "<th colspan=\"5\"><br><font face=\"Tahoma, Arial, Garamond\" size=\"+3\" color=\"#f0b66c\">List of Participants</font></th></tr>"
	print "<tr>\n<th align=right><font face=\"Tahoma, Arial, Garamond\">#</font></th>"
	print "<th align=right></th>"
	print "<th align=left><font face=\"Tahoma,Arial,Garamond\">Name</font></th>"
	print "<th align=left><font face=\"Tahoma, Arial, Garamond\">"
	print "<a href=\"countries.html\">Country</a></font></th>"
	print "<th align=left><font face=\"Tahoma, Arial, Garamond\">"
	print "<a href=\"workshops.html\">Workshops</a></font></th>"
	print "</tr>"
	}

	{
	NParticip++
#  generate a line of Participants list
	print "<tr>\n<td align=right width=\"4%\"><font face=\"Tahoma, Arial, Garamond\">" ++num ".</font></td>"
	print "<td align=right width=\"6%\"><font face=\"Tahoma, Arial, Garamond\">" $1 "</font></td>"
	print "<td align=left width=\"50%\"><font face=\"Tahoma, Arial, Garamond\"><a href=\"javascript:show_part('" substr($2,1,3) substr($3,1,3) substr($12,1,3) "');\">" $2 " " $3 "</a></font></td>"
	CountryAnchor = "countries.html#" $12
	gsub(" ","_",CountryAnchor)
	print "<td align=left width=\"20%\"><font face=\"Tahoma, Arial, Garamond\"><a href=\"" CountryAnchor "\"> " $12 "</a></font></td>"
	print "<td align=left width=\"20%\"><font face=\"Tahoma, Arial, Garamond\"><a href=\"ws" $16 ".html\">" $16 "</a><a href=\"ws" $17 ".html\"> (" $17 ")</a></font></td>"
	print "</tr>"
#  count workshop participation
	WS1[$16]++
	WS2[$17]++
#  prepare list of workshop participants
	print $16 ";WS1;" $3 ";" $2 ";" $1 ";" $12 > "WS_Part.tmp"
	print $17 ";WS2;" $3 ";" $2 ";" $1 ";" $12 > "WS_Part.tmp"
#  count country statistics
	CountryCtr[$12]++
	CountryName[$12] = $12
#  prepare list of Board meeting participants
#	if ($18) BoardName[bctr++] = $1 " " $2 " " $3 ", " $5 ", " $12
	}
END	{
	print "<!--        Footer       -->"
#  close the main table
	print "</table></td></tr>"
	print "<tr><td width=\"2%\"></td><td colspan=\"3\"><hr></td></tr>"

#  create country statistics table
	print "<tr><td width=\"2%\"></td><td colspan=\"3\">\n<table width=\"100%\">"
	print "<tr><th colspan=\"8\"><font face=\"Tahoma, Arial, Garamond\" size=\"+2\" color=\"#f0b66c\">Country statistics</font></th></tr>"
	for (ctr in CountryCtr) print CountryName[ctr] " ; " CountryCtr[ctr] > "ctry.tmp"
	while ("sort ctry.tmp" | getline != 0) {
	  if (ictry++%4 ==  0) print "</tr><tr>"
	  print "<td width=\"19%\"><font face=\"Tahoma, Arial, Garamond\">" $1 "</font></td><td width=\"5%\"><font face=\"Tahoma, Arial, Garamond\">" $2 "</font></td>"
	  }
	print "</tr>\n</table>"
	print "<tr><td width=\"2%\"></td><td colspan=\"3\"><hr></td></tr>"

#  Create backup copy of workshops.html
	while (getline < "workshops.html" != 0)
	  print $0 > "workshops.html~"
	close "workshops.html"
	close "workshops.html~"
# start creating main workshops page
        for (i=1; i<=Nhdln; i++) {
          line = Head[i]
          if (index(line, "__title__")) sub("__title__", "ELAG 2001 - Workshops", line)
          print line > "workshops.html"
	}
# title, headlines
	print "<table width=\"100%\">" > "workshops.html"
	print "<th colspan=\"5\"><font face=\"Tahoma, Arial, Garamond\" size=\"+2\" color=\"#f0b66c\">Workshops</font></th></tr>" > "workshops.html"
	print "<tr>\n<th align=left><font face=\"Tahoma, Arial, Garamond\">WS<br>#</font></th>" > "workshops.html"
	print "<th align=left><font face=\"Tahoma,Arial,Garamond\">Workshop title</font></th>" > "workshops.html"
	print "<th align=left><font face=\"Tahoma, Arial, Garamond\">Registered<br>participants</font></th>" > "workshops.html"
	print "</tr>" > "workshops.html"

	while (getline < "workshops.csv" != 0) {
#  create headers to be used in WS table
	  ++NWshops
	  wstitle[$1] = $2
	  print "<tr><td><font face=\"Tahoma, Arial, Garamond\"><a href=\"ws" $1 ".html\">" $1 ".</a></font></td>" > "workshops.html"
	  print "<td><font face=\"Tahoma, Arial, Garamond\">" $2  > "workshops.html"
	  if ($5) print "&nbsp;&nbsp;<a href=\"Workshop/ws" $1 ".html\"><img src=\"GifJpg/html.gif\" border=0></a>" > "workshops.html"
	  if ($6) print "&nbsp;&nbsp;<a href=\"Workshop/ws" $1 ".doc\"><img src=\"GifJpg/Word.gif\" border=0> (" $6 ")</a>" > "workshops.html"
	  print "<br><i>" $3 " (" $4 ")</i>" > "workshops.html"
	  if ($7) print "<br><b>Location:</b> " $7 > "workshops.html"
	  print "</font></td>" > "workshops.html"
	  print "<td><font face=\"Tahoma, Arial, Garamond\">" WS1[$1] " (" WS2[$1] ")</font></td></tr>" > "workshops.html"
	}
	close "workshops.csv"
#  footer of the workshops page
	print "</table>\n</td></tr>" > "workshops.html"
#  insert the footer
	for (i=1; i<=Nftln; i++) print Foot[i] > "workshops.html"

	print "<tr><td width=\"2%\"></td><td colspan=\"3\"><hr></td></tr></table>" > "workshops.html"

	"date +'%a %d %b %Y %H:%M:%S'" | getline timestamp
	print "<font face=\"Tahoma, Arial, Garamond\" size=\"-2\">&nbsp;&nbsp;&nbsp;Last updated: " timestamp " CET</font>\n</body>\n</html>"  > "workshops.html"
# end of workshops main page creation

#create workshop statistics table
	print "<tr><td width=\"2%\"></td><td colspan=\"3\">\n<table width=\"100%\">"
	print "<tr><th colspan=\"4\"><font face=\"Tahoma, Arial, Garamond\" size=\"+2\" color=\"#f0b66c\">Workshop statistics</font></th>"
	for (i=1; i<NWshops+1; i++) {
	  if ((i-1)%2 == 0) print "</tr><tr>"
	  print "<td width=\"35%\"><font face=\"Tahoma, Arial, Garamond\">" i ". " wstitle[i] "</font></td><td width=\"11%\"><font face=\"Tahoma, Arial, Garamond\">" WS1[i] " (" WS2[i] ")</font></td>"
	  }
	print "</tr>\n</table>"

#	print "<tr><td width=\"2%\"></td><td colspan=\"3\"><hr></td></tr>"

# create Board Meeting table
#	print "<tr><td width=\"2%\"></td><td colspan=\"3\">\n<table width=\"100%\">"
#	print "<tr><th colspan=\"2\"><font face=\"Tahoma, Arial, Garamond\" size=\"+2\" color=\"#f0b66c\">Board meeting</font></th>"
#	for (i=0; i<=bctr; i++) {
#	  if (i%2 == 0) print "</tr><tr>"
#	  print "<td width=\"48%\"><font face=\"Tahoma, Arial, Garamond\">" BoardName[i] "</font></td>"
#	  }
#	print "</table>\n</td></tr>"

#  insert the footer
	for (i=1; i<=Nftln; i++) print Foot[i]

	print "<tr><td width=\"2%\"></td><td colspan=\"3\"><hr></td></tr></table>"

	"date +'%a %d %b %Y %H:%M:%S'" | getline timestamp
	print "<font face=\"Tahoma, Arial, Garamond\" size=\"-2\">&nbsp;&nbsp;&nbsp;Last updated: " timestamp " CET</font>\n</body>\n</html>" 

	print NParticip " # " timestamp > "/www/cgi-bin/wwwcounter_2.3/data/ELAG2001.cnt"

	}