func installService(name, desc string) error {
exepath, err := exePath()
if err != nil {
return err
}
m, err := mgr.Connect()
if err != nil {
return err
}
defer m.Disconnect()
s, err := m.OpenService(name)
if err == nil {
s.Close()
return fmt.Errorf("service %s already exists", name)
}
s, err = m.CreateService(name, exepath, mgr.Config{DisplayName: desc})
if err != nil {
return err
}
defer s.Close()
err = eventlog.InstallAsEventCreate(name, eventlog.Error|eventlog.Warning|eventlog.Info)
if err != nil {
s.Delete()
return fmt.Errorf("SetupEventLogSource() failed: %s", err)
}
return nil
}
func TestLog(t *testing.T) {
const name = "mylog"
const supports = eventlog.Error | eventlog.Warning | eventlog.Info
err := eventlog.InstallAsEventCreate(name, supports)
if err != nil {
t.Fatalf("Install failed: %s", err)
}
l, err := eventlog.Open(name)
if err != nil {
t.Fatalf("Open failed: %s", err)
}
defer l.Close()
err = l.Info(1, "info")
if err != nil {
t.Fatalf("Info failed: %s", err)
}
err = l.Warning(2, "warning")
if err != nil {
t.Fatalf("Warning failed: %s", err)
}
err = l.Error(3, "error")
if err != nil {
t.Fatalf("Error failed: %s", err)
}
err = eventlog.Remove(name)
if err != nil {
t.Fatalf("Remove failed: %s", err)
}
}
func (m *myservice) Execute(args []string, r <-chan svc.ChangeRequest, changes chan<- svc.Status) (ssec bool, errno uint32) {
const cmdsAccepted = svc.AcceptStop | svc.AcceptShutdown | svc.AcceptPauseAndContinue
changes <- svc.Status{State: svc.StartPending}
fasttick := time.Tick(500 * time.Millisecond)
slowtick := time.Tick(2 * time.Second)
tick := fasttick
changes <- svc.Status{State: svc.Running, Accepts: cmdsAccepted}
QUERYHUB_SERVICE := "DIRSIG-SERVICE"
//QUERYHUB_ROOT := "C:\\play\\portal\\queryhub\\"
QUERYHUB_ROOT := "D:\\"
QUERYHUB_LOG := QUERYHUB_ROOT + QUERYHUB_SERVICE + ".LOG"
//QUERYHUB_ACTIVATOR := QUERYHUB_ROOT + "activator.bat"
QUERYHUB_SEMAPHORE_RUNNING := QUERYHUB_ROOT + QUERYHUB_SERVICE + ".IS.RUNNING"
QUERYHUB_SEMAPHORE_STOPPED := QUERYHUB_ROOT + QUERYHUB_SERVICE + ".IS.STOPPED"
//filechannel := make(chan FileDesc)
const supports = eventlog.Error | eventlog.Warning | eventlog.Info
err := eventlog.InstallAsEventCreate(QUERYHUB_SERVICE, supports)
if err != nil {
log.Printf("Event Log Install failed: %s", err)
}
winlog, err := eventlog.Open(QUERYHUB_SERVICE)
if err != nil {
log.Printf("Event Log Open failed: %s", err)
}
defer winlog.Close()
err = winlog.Info(1, "STARTING")
if err != nil {
log.Printf("Event Log Info failed: %s", err)
}
// open the out file for writing
cmdstdout, err := os.Create(QUERYHUB_LOG)
if err != nil {
err = winlog.Info(1, "FAILED outfile")
if err != nil {
log.Printf("Event Log Info failed: %s", err)
}
}
defer cmdstdout.Close()
//_,cmdcon := io.Pipe()
//cmdstdin,cmdcon := io.Pipe()
//go launcher( cmdstdin, cmdstdout, winlog, QUERYHUB_SERVICE )
//go dbwork( cmdstdout )
cmdstdout.WriteString("\r\n")
cmdstdout.WriteString(QUERYHUB_SERVICE + " is Running ")
cmdstdout.WriteString("\r\n")
//cmdcon.Write( []byte("\r\n") )
//cmdcon.Write( []byte("cd ") )
//cmdcon.Write( []byte( QUERYHUB_ROOT ) )
//cmdcon.Write( []byte("\r\n") )
//cmdcon.Write( []byte("del ") )
//cmdcon.Write( []byte( QUERYHUB_SEMAPHORE_STOPPED ) )
//cmdcon.Write( []byte("\r\n") )
semaphore, err := os.Create(QUERYHUB_SEMAPHORE_RUNNING)
semaphore.WriteString("\r\n")
semaphore.WriteString(QUERYHUB_SERVICE + " is Running ")
semaphore.WriteString("\r\n")
//go filework( cmdstdout, QUERYHUB_ROOT, filechannel )
//go dbwork( cmdstdout, filechannel )
//go procfiles(cmdstdout)
go procdirs(cmdstdout)
//cmdcon.Write( []byte( QUERYHUB_ACTIVATOR ) )
//cmdcon.Write( []byte(" \"run -Dhttp.port=80 -Dhttps.port=443\"") )
//cmdcon.Write( []byte("\r\n") )
loop:
for {
select {
case <-tick:
//outfile.flush()
beep()
case c := <-r:
switch c.Cmd {
case svc.Interrogate:
changes <- c.CurrentStatus
// testing deadlock from https://code.google.com/p/winsvc/issues/detail?id=4
time.Sleep(100 * time.Millisecond)
changes <- c.CurrentStatus
case svc.Stop, svc.Shutdown:
semaphore.Close()
os.Rename(QUERYHUB_SEMAPHORE_RUNNING, QUERYHUB_SEMAPHORE_STOPPED)
err = winlog.Info(1, "SERVICE CLOSED")
break loop
case svc.Pause:
changes <- svc.Status{State: svc.Paused, Accepts: cmdsAccepted}
tick = slowtick
case svc.Continue:
changes <- svc.Status{State: svc.Running, Accepts: cmdsAccepted}
tick = fasttick
default:
elog.Error(1, fmt.Sprintf("unexpected control request #%d", c))
}
}
}
changes <- svc.Status{State: svc.StopPending}
return
}