#!/bin/sh
# the next line restarts using wish \
exec wish "$0" "$@"

wm withdraw .

set letter [string index $argv0 [expr [string length $argv0] - 1]] 
set ifname [lindex $argv 0]
set ttydev [lindex $argv 1]
set pppspeed [lindex $argv 2]
set localip [lindex $argv 3]
set remoteip [lindex $argv 4]

set result [catch {send startppp "showppp $letter $ifname $ttydev $pppspeed $localip $remoteip"}]

if {$result == 1} {
  set title "Interface: $ifname\nTerminal_: $ttydev ($pppspeed bps)\nLocal IP_: $localip\nRemote IP: $remoteip"
  if {$letter == "p"} {
    set name "PPP up"
  } else {set name "PPP down"}
  catch {exec echo "$name\n\n$title" | xmessage -nearmouse -timeout 10 -buttons " OK " -default " OK " -file - }
}

destroy .