package server /* This file contains dialog helpers for the client. */ // import "github.com/beoran/woe/monolog" import t "github.com/beoran/woe/telnet" import "github.com/beoran/woe/telnet" import "github.com/beoran/woe/world" // import "github.com/beoran/woe/monolog" import "bytes" import "strings" import "regexp" // import "fmt" import "strconv" // import "strings" // Switches to "password" mode. func (me *Client) PasswordMode() telnet.Event { // The server sends "IAC WILL ECHO", meaning "I, the server, will do any // echoing from now on." The client should acknowledge this with an IAC DO // ECHO, and then stop putting echoed text in the input buffer. // It should also do whatever is appropriate for password entry to the input // box thing - for example, it might * it out. Text entered in server-echoes // mode should also not be placed any command history. // don't use the Q state machne for echos me.telnet.TelnetSendBytes(t.TELNET_IAC, t.TELNET_WILL, t.TELNET_TELOPT_ECHO) tev, _, _ := me.TryReadEvent(100) if tev != nil && !telnet.IsEventType(tev, t.TELNET_DO_EVENT) { return tev } return nil } // Switches to "normal, or non-password mode. func (me *Client) NormalMode() telnet.Event { // When the server wants the client to start local echoing again, it s}s // "IAC WONT ECHO" - the client must respond to this with "IAC DONT ECHO". // Again don't use Q state machine. me.telnet.TelnetSendBytes(t.TELNET_IAC, t.TELNET_WONT, t.TELNET_TELOPT_ECHO) tev, _, _ := me.TryReadEvent(100) if tev != nil && !telnet.IsEventType(tev, t.TELNET_DONT_EVENT) { return tev } return nil } func (me *Client) Printf(format string, args ...interface{}) { me.telnet.TelnetPrintf(format, args...) } func (me *Client) ColorTest() { me.Printf("\033[1mBold\033[0m\r\n") me.Printf("\033[3mItalic\033[0m\r\n") me.Printf("\033[4mUnderline\033[0m\r\n") for fg := 30; fg < 38; fg++ { me.Printf("\033[%dmForeground Color %d\033[0m\r\n", fg, fg) me.Printf("\033[1;%dmBold Foreground Color %d\033[0m\r\n", fg, fg) } for bg := 40; bg < 48; bg++ { me.Printf("\033[%dmBackground Color %d\033[0m\r\n", bg, bg) me.Printf("\033[1;%dmBold Background Color %d\033[0m\r\n", bg, bg) } } // Blockingly reads a single command from the client func (me *Client) ReadCommand() (something []byte) { something = nil for something == nil { something, _, _ = me.TryRead(-1) if something != nil { something = bytes.TrimRight(something, "\r\n") return something } } return nil } func (me *Client) AskSomething(prompt string, re string, nomatch_prompt string, noecho bool) (something []byte) { something = nil if noecho { me.PasswordMode() } for something == nil || len(something) == 0 { me.Printf("%s", prompt) something, _, _ = me.TryRead(-1) if something != nil { something = bytes.TrimRight(something, "\r\n") if len(re) > 0 { ok, _ := regexp.Match(re, something) if !ok { me.Printf("\n%s\n", nomatch_prompt) something = nil } } } } if noecho { me.NormalMode() me.Printf("\n") } return something } func (me *Client) AskYesNo(prompt string) bool { res := me.AskSomething(prompt+" (y/n)", "[ynYN]", "Please answer y or n.", false) if res[0] == 'Y' || res[0] == 'y' { return true } else { return false } } // Interface for an item in a list of options. type AskOption interface { // Name of the option, also used to compare input AskName() string // Short description of the option, shown after name AskShort() string // Long description, displayed if "help name" is requested AskLong() string // Accound privilege required or the option to be selectable. AskPrivilege() world.Privilege } type AskOptionList interface { AskOptionListLen() int AskOptionListGet(index int) AskOption } type TrivialAskOption string func (me TrivialAskOption) AskName() string { return string(me) } func (me TrivialAskOption) AskLong() string { return "" } func (me TrivialAskOption) AskShort() string { return "" } func (me TrivialAskOption) AskPrivilege() world.Privilege { return world.PRIVILEGE_ZERO } type TrivialAskOptionList []TrivialAskOption func (me TrivialAskOptionList) AskOptionListLen() int { return len(me) } func (me TrivialAskOptionList) AskOptionListGet(index int) AskOption { return me[index] } type SimpleAskOption struct { Name string Short string Long string Privilege world.Privilege } func (me SimpleAskOption) AskName() string { return me.Name } func (me SimpleAskOption) AskShort() string { return me.Short } func (me SimpleAskOption) AskLong() string { return me.Long } func (me SimpleAskOption) AskPrivilege() world.Privilege { return me.Privilege } type SimpleAskOptionList []SimpleAskOption func (me SimpleAskOptionList) AskOptionListLen() int { return len(me) } func (me SimpleAskOptionList) AskOptionListGet(index int) AskOption { return me[index] } type JobListAsker []world.Job func (me JobListAsker) AskOptionListLen() int { return len(me) } func (me JobListAsker) AskOptionListGet(index int) AskOption { return me[index] } type KinListAsker []world.Kin func (me KinListAsker) AskOptionListLen() int { return len(me) } func (me KinListAsker) AskOptionListGet(index int) AskOption { return me[index] } type GenderListAsker []world.Gender func (me GenderListAsker) AskOptionListLen() int { return len(me) } func (me GenderListAsker) AskOptionListGet(index int) AskOption { return me[index] } type AskOptionSlice []AskOption type AskOptionFilterFunc func(AskOption) AskOption func (me AskOptionSlice) AskOptionListLen() int { return len(me) } func (me AskOptionSlice) AskOptionListGet(index int) AskOption { return me[index] } func AskOptionListEach(me AskOptionList, cb AskOptionFilterFunc) AskOption { for i := 0; i < me.AskOptionListLen(); i++ { res := cb(me.AskOptionListGet(i)) if res != nil { return res } } return nil } func AskOptionListFilter(me AskOptionList, cb AskOptionFilterFunc) AskOptionList { result := make(AskOptionSlice, 0) for i := 0; i < me.AskOptionListLen(); i++ { res := cb(me.AskOptionListGet(i)) if res != nil { result = append(result, res) } } return result } /* Finds the name irrespecful of the case */ func AskOptionListFindName(me AskOptionList, name string) AskOption { return AskOptionListEach(me, func(e AskOption) AskOption { if strings.ToLower(e.AskName()) == strings.ToLower(name) { return e } else { return nil } }) } /* Filters the list by privilege level (only those allowed by the level are retained) */ func AskOptionListFilterPrivilege(me AskOptionList, privilege world.Privilege) AskOptionList { return AskOptionListFilter(me, func(e AskOption) AskOption { if e.AskPrivilege() <= privilege { return e } else { return nil } }) } type MergedAskOptionList struct { head AskOptionList tail AskOptionList } func (me *MergedAskOptionList) AskOptionListLen() int { return me.head.AskOptionListLen() + me.tail.AskOptionListLen() } func (me *MergedAskOptionList) AskOptionListGet(index int) AskOption { headlen := me.head.AskOptionListLen() if index < headlen { return me.head.AskOptionListGet(index) } return me.tail.AskOptionListGet(index - headlen) } /* Merges two AskOptionLists without copying using the MergedAskOptionList rtype */ func AskOptionListMerge(me AskOptionList, you AskOptionList) AskOptionList { return &MergedAskOptionList{me, you} } func (me AskOptionSlice) Each(cb AskOptionFilterFunc) AskOption { for i := 0; i < len(me); i++ { res := cb(me[i]) if res != nil { return res } } return nil } func (me AskOptionSlice) Filter(cb AskOptionFilterFunc) AskOptionSlice { result := make(AskOptionSlice, 0) for i := 0; i < len(me); i++ { res := cb(me[i]) if res != nil { result = append(result, res) } } return result } /* Finds the name irrespecful of the case */ func (me AskOptionSlice) FindName(name string) AskOption { return me.Each(func(e AskOption) AskOption { if strings.ToLower(e.AskName()) == strings.ToLower(name) { return e } else { return nil } }) } /* Filters the list by privilege level (only those allowed by the level are retained) */ func (me AskOptionSlice) FilterPrivilege(privilege world.Privilege) AskOptionSlice { return me.Filter(func(e AskOption) AskOption { if e.AskPrivilege() <= privilege { return e } else { return nil } }) } func (me *Client) AskOptionListHelp(alist AskOptionList, input []byte) { re := regexp.MustCompile("[^ \t,]+") argv := re.FindAll(input, -1) if len(argv) < 2 { me.Printf("Help usage: help .\n") return } e := AskOptionListFindName(alist, string(argv[1])) if e == nil { me.Printf("Cannot find topic %s in list. No help available.\n", string(argv[1])) } else { al := e.AskLong() if al == "" { me.Printf("Topic %s found, but help is unavailable.\n", string(argv[1])) } else { me.Printf("Help on %s:\n%s\n", string(argv[1]), e.AskLong()) } } } func (me *Client) AskOptionListOnce(heading string, prompt string, noecho bool, alist AskOptionList) (result AskOption) { list := AskOptionListFilterPrivilege(alist, me.account.Privilege) me.Printf("\n%s\n\n", heading) for i := 0; i < list.AskOptionListLen(); i++ { v := list.AskOptionListGet(i) sh := v.AskShort() if sh == "" { me.Printf("[%d] %s\n", i+1, v.AskName()) } else { me.Printf("[%d] %s: %s\n", i+1, v.AskName(), sh) } } me.Printf("\n") aid := me.AskSomething(prompt, "", "", false) iresp, err := strconv.Atoi(string(aid)) if err != nil { /* Try by name if not a number. */ e := AskOptionListFindName(alist, string(aid)) if e != nil { return e } else if ok, _ := regexp.Match("help", bytes.ToLower(aid)); ok { me.AskOptionListHelp(list, aid) } else { me.Printf("Name not found in list. Please choose a number or name from the list above. Or type help