ntlua.echo("")
ntlua.echo("Tecgraf Network - Windows 2000 Server")
ntlua.echo("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
ntlua.echo("")
ntlua.echo("Starting Logon Script!")
ntlua.echo("")

user_name = ntlua.username()
logonserver = string.sub(ntlua.getenv("LOGONSERVER"), 3)

ntlua.echo("-----------------------------")
ntlua.echo("  Welcome user "..user_name..".")
ntlua.echo("")
ntlua.echo("  You are using computer "..ntlua.computername()..".")
if (logonserver) then
  ntlua.echo("")
  ntlua.echo("  Logon Server: "..logonserver)
end
ntlua.echo("-----------------------------")
ntlua.echo("")

ntlua.echo("System Information:")
ntlua.echo("  "..ntlua.version())
ntlua.echo("")

---------------------
-- Network Drivers --
---------------------

ntlua.echo("Mapping UNIX Network Drivers")
ntlua.echo("  Q: -> HOME       (Braque)");       ntlua.netuse("q:", "\\\\braque\\"..user_name)
ntlua.echo("  P: -> HOMEL      (Braque)");       ntlua.netuse("p:", "\\\\braque\\homel")
ntlua.echo("  R: -> HOME N  (Portinari)");       ntlua.netuse("r:", "\\\\portinari\\homen")
ntlua.echo("  S: -> ALL HOMES (via Portinari)"); ntlua.netuse("s:", "\\\\portinari\\allhomes")
ntlua.echo("  T: -> TECGRAF (Portinari)");       ntlua.netuse("t:", "\\\\portinari\\tecgraf")
ntlua.echo("  U: -> HOME I      (Ibere)");       ntlua.netuse("u:", "\\\\ibere\\homei")

if ifmember(logonserver, user_name, 0, "PortinariUsers") then
  ntlua.echo("  V: -> HOME    (Portinari)");     ntlua.netuse("v:", "\\\\portinari\\"..user_name)
else
  ntlua.echo("  V: -> HOME        (Ibere)");     ntlua.netuse("v:", "\\\\ibere\\"..user_name)
end

ntlua.echo("")
ntlua.echo("Mapping Windows Network Drivers")
ntlua.echo("  W: -> TECGRAF    (Segall)");       ntlua.netuse("w:", "\\\\segall\\tecgraf")
ntlua.echo("  X: -> SOFTWARE    (Davis)");       ntlua.netuse("x:", "\\\\davis\\software")
ntlua.echo("  Y: -> HOME       (Segall)");       -- ntlua.netuse("y:", "\\\\segall\\"..user_name.."$") end
ntlua.echo("  Z: -> USERS      (Segall)");       ntlua.netuse("z:", "\\\\segall\\users")
ntlua.echo("")

---------------------------
-- Environment Variables --
---------------------------
                 
add_path = "t:\\bin\\win32;t:\\libpath\\dll;x:\\utl;x:\\utl\\cygwin\\bin"
                 
ntlua.echo("Updating Tecgraf Environment Variables")
ntlua.setenv("PATH", add_path) 

ntlua.setenv("HOME",  "y:\\")
ntlua.setenv("HOST", computername())

os_ver = ntlua.os()

ntlua.setenv("TEC_SYSVERSION", os_ver.major)
ntlua.setenv("TEC_SYSMINOR",   os_ver.minor)
ntlua.setenv("TEC_SYSRELEASE", os_ver.major ..".".. os_ver.minor)
ntlua.setenv("TEC_SYSARCH",  os_ver.system)
ntlua.setenv("TECMAKE_PATH", "t:\\bin\\tecmake")
ntlua.setenv("TECMAKE_HOME", "/cygdrive/t/bin/tecmake")
ntlua.setenv("TEC_UNAME",    "Win32")
ntlua.setenv("TEC_SYSNAME",  "Win32")
ntlua.setenv("MAKE_MODE",    "UNIX")
ntlua.setenv("USER",         user_name)
ntlua.setenv("RCSINIT",      "-x,v")

ntlua.setenv("LIBMAKE_PATH", "t:\\bin\\makefile")
ntlua.setenv("APPMAKE_PATH", "t:\\bin\\makefile")

ntlua.setenv("EDPATT",       "t:\\app\\pattern")
ntlua.setenv("VLEDDIR",      "t:\\app\\vled")
ntlua.setenv("INTCGMDIR",    "t:\\app\\intcgm")

ntlua.setenv("IUPDIR",       "t:\\lib\\iup\\fonts")
ntlua.setenv("CDDIR",        "t:\\lib\\cd\\dat")
ntlua.setenv("ESAMDIR",      "t:\\lib\\esam\\lua")
ntlua.setenv("MVIEWDIR",     "t:\\lib\\mview\\lua")
ntlua.setenv("MTOOLDIR",     "t:\\lib\\mtool\\lua")
ntlua.setenv("EDGDIR",       "t:\\lib\\edg")

ntlua.setenv("IUPLUA_DIR",   "t:\\lib\\iuplua\\old\\l3.0\\lua")
ntlua.setenv("GKSDIR",       "t:\\old\\prod\\gks\\txfont\\micro")

ntlua.setenv("IMLUA",     "t:\\\\lib\\\\im")
ntlua.setenv("IMLUAINC",  "t:\\\\lib\\\\im\\\\include")
ntlua.setenv("IMLUALIB",  "t:\\\\lib\\\\im\\\\lib\\\\vc6")
ntlua.setenv("IMLUALIBD", "t:\\\\lib\\\\im\\\\lib\\\\dll")

ntlua.setenv("CDLUA",     "t:\\\\lib\\\\cd")
ntlua.setenv("CDLUAINC",  "t:\\\\lib\\\\cd\\\\include")
ntlua.setenv("CDLUALIB",  "t:\\\\lib\\\\cd\\\\lib\\\\vc6")
ntlua.setenv("CDLUALIBD", "t:\\\\lib\\\\cd\\\\lib\\\\dll")

libraries = {"cd", "im", "iup", "iuplua", "iuplua4", "tolua", "tolua4", "tecver", "lua4", "lua", "g3d", "v3d", "xy", "iupcells", "edpatt", "interact" }

for i, lib in pairs(libraries) do 
  local LIB = string.upper(lib)
  ntlua.setenv(LIB,           "t:\\\\lib\\\\" .. lib)
  ntlua.setenv(LIB .. "INC",  "t:\\\\lib\\\\" .. lib .. "\\\\include")
  ntlua.setenv(LIB .. "LIB",  "t:\\\\lib\\\\" .. lib .. "\\\\lib\\\\vc6")
  ntlua.setenv(LIB .. "LIBD", "t:\\\\lib\\\\" .. lib .. "\\\\lib\\\\dll")
end

ntlua.echo("  Done.")

-----------------------
-- User Login Script --
-----------------------

if ntlua.exist("y:\\logon.bat") then
  ntlua.echo("Starting User Login Script (BAT)")
  ntlua.start("y:\\logon.bat")
  ntlua.echo("  Done.")
end

if ntlua.exist("y:\\logon.lua") then
  ntlua.echo("Starting User Login Script (Lua)")
  ntlua.dofile("y:\\logon.lua")
  ntlua.echo("  Done.")
end

ntlua.echo("")
ntlua.echo("Login Script Completed!")