If you’d like to skip straight to the details, click here
EVE Online has many interesting properties that emerge from its “sandbox” environment, especially in the areas referred to as “nullsec” that have completely free-for-all PVP combat. Corporations (guilds, in common MMO parlance) form Alliances in nullsec, control regions of this slice of the in-game world, and perform various money-making activities there which often benefit from the Alliance’s control of the area. To keep track of enemy activity in Alliance-controlled space, Alliances usually have a common intel-sharing chat channel (think something like an IRC channel), where players post messages like
R1O-GN 3, indicating that 3 hostile players have been spotted in the system
R1O-GN. Players in the Alliance use this information to keep themselves safe by hiding or to seek out a fight by chasing down the enemies.
EVE conveniently stores chat logs in a file on disk. These logs can be found on Windows in the folder
C:\Users\yourusernamehere\Documents\EVE\logs\Chatlogs. This data is available in a convenient text format for out-of-game tools to consume. Many EVE players have built utilities that use this data to provide audio alerts and visualizations of the intel information. For my own education, and for the fun of it, I decided to create something similar in Common Lisp to suit my personal needs. What follows are some short notes on how to parse on-disk EVE logs into a usable format in Common Lisp. I hope that it can also help others, as much of the information is not Lisp-specific.
Many thanks to py-eve-chat-mon which I referenced heavily when trying to figure out the format of the log file and what regular expressions to use for parsing.
Also, please note that I am very far from a Lisp expert. If you have any tips on improving this code, give me a shout!
EVE uses UTF-16LE for chat. In Common Lisp, you can use
UIOP to read the lines from the file using the correct format:
All chat logs come with a header, which I remove with a fairly hacky method that is based on identifying the dash
- characters that delimit the header region.
(defun line-is-header-dashesp (chat-line) (not (not (substringp "-----" chat-line)))) (defun remove-header-from (chat-lines) (let* ((first-header-dashes (position-if #'line-is-header-dashesp chat-lines)) (without-first-header-dashes (subseq chat-lines (+ first-header-dashes 1))) (second-header-dashes (position-if #'line-is-header-dashesp without-first-header-dashes)) (without-second-header-dashes (subseq without-first-header-dashes (+ second-header-dashes 1)))) without-second-header-dashes))
To then extract the relevant parts of the message (timestamp, author, message contents), I use the following (requires CL-PPCRE):
While I don’t think it should be necessary, the first
.* (right after the
^) is there because experimentally it didn’t work otherwise. I think it may have something to do with py-eve-chat-mon’s “chat line delimeter” of
u"\ufeff" which it removes from messages.
The timestamp can be further parsed, if necessary, with the following:
(defparameter *timestamp-parse-regex* "([0-9][0-9][0-9][0-9])\\.([0-9][0-9])\\.([0-9][0-9]) ([0-9][0-9]):([0-9][0-9]):([0-9][0-9])") (defun parse-eve-chat-timestamp (timestamp-string) (ppcre:register-groups-bind (year month day hour minute second) (*timestamp-parse-regex* raw-timestamp) ;; Your code here ))