about summary refs log tree commit diff stats
Commit message (Expand)AuthorAgeFilesLines
...
* | | Added chat_session_on_window_openJames Booth2014-12-283-12/+13
* | | Fixed chat state for non OTRJames Booth2014-12-288-160/+41
* | | Merge branch 'master' into chat-sessionsJames Booth2014-12-271-2/+1
|\ \ \
| * | | Fixed /info command in roomsJames Booth2014-12-271-2/+1
* | | | Moved chat states out of xmpp module for message send chatJames Booth2014-12-278-87/+214
|/ / /
* | | Fixed non OTR compilationJames Booth2014-12-252-2/+2
* | | Removed old mocksJames Booth2014-12-259-1652/+0
* | | Added server_event testsJames Booth2014-12-254-29/+48
* | | Added roster_list testsJames Booth2014-12-252-2/+2
* | | Added preferences testsJames Booth2014-12-252-1/+3
* | | Added parser testsJames Booth2014-12-252-1/+2
* | | Added muc testsJames Booth2014-12-252-2/+3
* | | Added jid testsJames Booth2014-12-252-1/+2
* | | Added history testsJames Booth2014-12-252-1/+3
* | | Added form testsJames Booth2014-12-254-115/+3
* | | Added contact testsJames Booth2014-12-252-2/+1
* | | Added common testsJames Booth2014-12-252-2/+2
* | | Added cmd_win testsJames Booth2014-12-254-5/+12
* | | Added cmd_sub testsJames Booth2014-12-253-7/+6
* | | Added cmd_statuses testsJames Booth2014-12-253-15/+4
* | | Added cmd_roster testsJames Booth2014-12-245-42/+68
* | | Added cmd_rooms testsJames Booth2014-12-244-17/+19
* | | Added cmd_otr testsJames Booth2014-12-247-100/+225
* | | Added cmd_join testsJames Booth2014-12-244-35/+46
* | | Added cmd_connect testsJames Booth2014-12-248-115/+132
* | | Added cmd_bookmark testsJames Booth2014-12-245-55/+95
* | | Added cmd_alias testsJames Booth2014-12-244-15/+11
* | | Added autocomplete testsJames Booth2014-12-242-2/+3
* | | Refactored all cmd_account testsJames Booth2014-12-245-338/+257
* | | Refactoring cmd_account testsJames Booth2014-12-243-51/+11
* | | Refactoring cmd_account testsJames Booth2014-12-244-43/+35
* | | Use will_return instead of mock valuesJames Booth2014-12-2311-125/+30
* | | cmd_account_shows_account_when_connected_and_no_argsJames Booth2014-12-2310-14/+73
* | | Added stubbed implementationsJames Booth2014-12-2312-33/+769
* | | Removed function pointersJames Booth2014-12-2222-1607/+1119
* | | Removed ui_current_set_otrJames Booth2014-12-222-12/+0
* | | Removed ui_close_currentJames Booth2014-12-222-13/+0
* | | Removed functions from windows.cJames Booth2014-12-223-78/+42
* | | Removed functions from window.cJames Booth2014-12-225-46/+19
| |/ |/|
* | Moved unread to window subtypesJames Booth2014-12-215-34/+61
* | Show nick for titleJames Booth2014-12-211-1/+7
* | Added win_get_titleJames Booth2014-12-219-142/+87
* | Tidy titlebar.cJames Booth2014-12-211-26/+18
* | Use class instead of base pointerJames Booth2014-12-216-171/+187
* | Added /inpblock commandJames Booth2014-12-218-1/+55
* | Fixed /occupants hideJames Booth2014-12-201-6/+13
* | Removed TODOsJames Booth2014-12-205-34/+0
* | Fixed testsJames Booth2014-12-207-7/+43
* | Refactored all window recipients and typesJames Booth2014-12-2017-564/+597
* | Refactoring window types, removing recipient and from references - wipJames Booth2014-12-1811-605/+760
generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2025-03-06 09:06:21 +0000
: "*", subt: "*", cmd: "xdg-open '%s'" ) ] proc has(state: MailcapParser): bool {.inline.} = return not state.stream.atEnd proc consume(state: var MailcapParser): char = if state.hasbuf: state.hasbuf = false return state.buf return state.stream.readChar() proc reconsume(state: var MailcapParser, c: char) = state.buf = c state.hasbuf = true proc skipBlanks(state: var MailcapParser, c: var char): bool = while state.has(): c = state.consume() if c notin AsciiWhitespace - {'\n'}: return true proc skipBlanks(state: var MailcapParser) = var c: char if state.skipBlanks(c): state.reconsume(c) proc skipLine(state: var MailcapParser) = while state.has(): let c = state.consume() if c == '\n': break proc consumeTypeField(state: var MailcapParser): Result[string, string] = var s = "" # type while state.has(): let c = state.consume() if c == '/': s &= c break if c notin AsciiAlphaNumeric + {'-', '*'}: return err("Invalid character encountered in type field") s &= c.tolower() if not state.has(): return err("Missing subtype") # subtype while state.has(): let c = state.consume() if c == ';': state.reconsume(c) break if c notin AsciiAlphaNumeric + {'-', '.', '*', '_', '+'}: return err("Invalid character encountered in subtype field") s &= c.tolower() var c: char if not state.skipBlanks(c) or c != ';': return err("Semicolon not found") return ok(s) proc consumeCommand(state: var MailcapParser): Result[string, string] = state.skipBlanks() var quoted = false var s = "" while state.has(): let c = state.consume() if not quoted: if c == '\r': continue if c == ';' or c == '\n': state.reconsume(c) return ok(s) if c == '\\': quoted = true continue if c notin Ascii - Controls: return err("Invalid character encountered in command") else: quoted = false s &= c return ok(s) type NamedField = enum NO_NAMED_FIELD, NAMED_FIELD_TEST, NAMED_FIELD_NAMETEMPLATE, NAMED_FIELD_EDIT proc parseFieldKey(entry: var MailcapEntry, k: string): NamedField = case k of "needsterminal": entry.flags.incl(NEEDSTERMINAL) of "copiousoutput": entry.flags.incl(COPIOUSOUTPUT) of "x-htmloutput": entry.flags.incl(HTMLOUTPUT) of "test": return NAMED_FIELD_TEST of "nametemplate": return NAMED_FIELD_NAMETEMPLATE of "edit": return NAMED_FIELD_EDIT return NO_NAMED_FIELD proc consumeField(state: var MailcapParser, entry: var MailcapEntry): Result[bool, string] = state.skipBlanks() if not state.has(): return ok(false) var buf = "" while state.has(): let c = state.consume() case c of ';', '\n': if parseFieldKey(entry, buf) != NO_NAMED_FIELD: return err("Expected command") return ok(c == ';') of '\r': continue of '=': let f = parseFieldKey(entry, buf) let cmd = ?state.consumeCommand() case f of NO_NAMED_FIELD: discard of NAMED_FIELD_TEST: entry.test = cmd of NAMED_FIELD_NAMETEMPLATE: entry.nametemplate = cmd of NAMED_FIELD_EDIT: entry.edit = cmd return ok(state.consume() == ';') else: if c in Controls: return err("Invalid character encountered in field") buf &= c proc parseMailcap*(stream: Stream): Result[Mailcap, string] = var state = MailcapParser(stream: stream) var mailcap: Mailcap while not stream.atEnd(): let c = state.consume() if c == '#': state.skipLine() continue state.reconsume(c) state.skipBlanks() let c2 = state.consume() if c2 == '\n' or c2 == '\r': continue state.reconsume(c2) let t = ?state.consumeTypeField() let mt = t.until('/') #TODO this could be more efficient let subt = t[mt.len + 1 .. ^1] var entry = MailcapEntry( mt: mt, subt: subt, cmd: ?state.consumeCommand() ) if state.consume() == ';': while ?state.consumeField(entry): discard mailcap.add(entry) return ok(mailcap) # Mostly based on w3m's mailcap quote/unquote type UnquoteState = enum STATE_NORMAL, STATE_QUOTED, STATE_PERC, STATE_ATTR, STATE_ATTR_QUOTED type UnquoteResult* = object canpipe*: bool cmd*: string type QuoteState = enum QS_DQUOTED, QS_SQUOTED proc quoteFile(file: string, qs: set[QuoteState]): string = var s = "" for c in file: case c of '$', '`', '"', '\\': if QS_SQUOTED notin qs: s &= '\\' of '\'': s &= "'\\'" # then re-open the quote by appending c of '_', '.', ':', '/': discard # no need to quote else: if c notin AsciiAlpha and qs == {}: s &= '\\' s &= c return s proc unquoteCommand*(ecmd, contentType, outpath: string, url: URL, charset: Charset, canpipe: var bool): string = var cmd = "" var attrname = "" var state: UnquoteState var filename = "" var qs: set[QuoteState] for c in ecmd: case state of STATE_QUOTED: cmd &= c.tolower() state = STATE_NORMAL of STATE_ATTR_QUOTED: attrname &= c.tolower() state = STATE_ATTR of STATE_NORMAL: case c of '%': state = STATE_PERC of '\\': state = STATE_QUOTED of '\'': if QS_SQUOTED in qs: qs.excl(QS_SQUOTED) else: qs.incl(QS_SQUOTED) cmd &= c of '"': if QS_DQUOTED in qs: qs.excl(QS_DQUOTED) else: qs.incl(QS_DQUOTED) cmd &= c else: cmd &= c.tolower() of STATE_PERC: if c == '%': cmd &= c.tolower() elif c == 's': filename = quoteFile(outpath, qs) cmd &= filename canpipe = false elif c == 't': cmd &= contentType.until(';') elif c == 'u': # extension cmd &= $url elif c == '{': state = STATE_ATTR continue state = STATE_NORMAL of STATE_ATTR: if c == '}': if attrname == "charset": cmd &= $charset continue #TODO this is broken, because content-type is stripped of ; fields let kvs = contentType.after(';').toLowerAscii() var i = kvs.find(attrname) if i != -1 and kvs.len > i + attrname.len and kvs[i + attrname.len] == '=': i += attrname.len + 1 while i < kvs.len and kvs[i] in AsciiWhitespace: inc i var q = false for j in i ..< kvs.len: if q: cmd &= kvs[j] else: if kvs[j] == '\\': q = true elif kvs[j] == ';' or kvs[j] in AsciiWhitespace: break else: cmd &= kvs[j] attrname = "" return cmd proc unquoteCommand*(ecmd, contentType, outpath: string, url: URL, charset: Charset): string = var canpipe: bool return unquoteCommand(ecmd, contentType, outpath, url, charset, canpipe) proc getMailcapEntry*(mailcap: Mailcap, mimeType, outpath: string, url: URL, charset: Charset): ptr MailcapEntry = let mt = mimeType.until('/') if mt.len + 1 >= mimeType.len: return nil let st = mimeType[mt.len + 1 .. ^1] for entry in mailcap: if not (entry.mt.len == 1 and entry.mt[0] == '*') and entry.mt != mt: continue if not (entry.subt.len == 1 and entry.subt[0] == '*') and entry.subt != st: continue if entry.test != "": var canpipe = true let cmd = unquoteCommand(entry.test, mimeType, outpath, url, charset, canpipe) #TODO TODO TODO if not canpipe ... if execCmd(cmd) != 0: continue return unsafeAddr entry
generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2025-03-06 09:06:21 +0000