irc-books/ircclient.py

#!/usr/bin/env python3

import logging
import os
import queue
import socket
import subprocess
import time

from unzipper import unar
from threading import Thread

logging.basicConfig(level=logging.DEBUG)
log = logging.getLogger(__name__)
log.setLevel(logging.DEBUG)

MODE_SEARCH = 'search'
MODE_BOOK = 'book'

class IRCClient(Thread):
    TIME_TO_FIRST_COMMAND = 30
    HOST = "irc.irchighway.net"
    PORT = 6667
    IGNORE = [
        "NOTICE",
        "PART",
        "QUIT",
        "332",
        "333",
        "372",
        "353",
        "366",
        "251",
        "252",
        "254",
        "255",
        "265",
        "266",
        "396"]
    CHANNEL = "#ebooks"
    PATH = "/tmp/"
    joined_channel = False
    connected = False
    name = "bookbot" + utils.random_hash()
    readbuffer = b''
    time_joined = None

    def __init__(self, q):
        super(IRCClient, self).__init__(daemon=True)
        self.command_queue = q
        self.send_queue = queue.Queue()

        nickstr = "NICK %s" % self.name
        userstr = "USER %s %s bla :%s" % (self.name, self.HOST, self.name)

        self.send_queue.put(nickstr)
        self.send_queue.put(userstr)

    def run(self):
        self.handle_connect()
        while True:
            if self.connected and self.joined_channel:
                self.handle_commands()
            self.process_send_queue()
            try:
                self.handle_read()
            except socket.timeout:
                continue
            except socket.error as e:
                log.error('socket error')
                log.exception(e)
                self.handle_connect()
            except Exception as e:
                log.exception(e)
                break
        self.handle_close()
        log.info('Exiting RUN')

    def handle_commands(self):
        if self.command_queue.empty():
            time.sleep(0.2)
            return

        elapsed = time.time() - self.time_joined
        if elapsed < self.TIME_TO_FIRST_COMMAND:
            log.info("commands to process, but we have to wait %d", self.TIME_TO_FIRST_COMMAND - elapsed)
            time.sleep(1)
            return
        command = self.command_queue.get()
        log.info("command %s", command)
        if command['mode'] == MODE_SEARCH:
            self.send_queue.put("PRIVMSG %s :@searchook %s " % (self.CHANNEL, command['query']))
            self.EXTENSION = command['grep'] # FIXME 
            return
        self.send_queue.put("PRIVMSG %s :%s " % (self.CHANNEL, command['query']))

    def handle_connect(self):
        self.socket = socket.socket(socket.AF_INET, socket.SOCK_STREAM)
        self.socket.connect((self.HOST, self.PORT))
        self.socket.settimeout(2)
        log.info("connected")
        self.set_status("CONNECTED")
        self.connected = True

    def handle_close(self):
        log.info("closed")
        self.set_status("DISCONNECTED")
        self.connected = False
        self.socket.close()

    def handle_read(self):
        try:
            data = self.socket.recv(4096)
        except socket.error as e:
            raise
        except Exception as e:
            raise

        if len(data) < 2:
            return
        # newline at the end?
        if not (data[-1] == 10 and data[-2] == 13):
            self.readbuffer += data
            return

        data = self.readbuffer + data
        self.readbuffer = b''

        # purge crap
        data = (data.replace(b'\x95', b'').replace(b'0xc2', b'').decode('utf-8', 'ignore'))

        lines = data.splitlines()

        for line in lines:
            words = line.split(' ')
            if len(words) < 2:
                continue
            msg_from = words[0]
            comm = words[1]

            if self.joined_channel:
                # log.debug(line)
                pass
            if comm in self.IGNORE:
                continue

            if comm == "JOIN":
                if self.name not in msg_from:  # msg "NICK joined the channel" not about me
                    continue
                self.set_status("JOINED")
                log.info("Joined channel %s" % self.CHANNEL)
                self.time_joined = time.time()
                self.joined_channel = True
                continue

            if comm == "PRIVMSG":
                # private message not addressed to me
                if words[2] != self.name:
                    continue
                self.parse_msg(line)

            if comm == "PING" or msg_from == "PING":  # respond ping to avoid getting kicked
                self.pong(line)
                continue
            if comm == "376":  # END MOTD
                # MOTD complete, lets join the channel
                self.join_channel(self.CHANNEL)
                continue

    def handle_dcc(self, msg):
        msg = msg.split(':')[2]
        msg = msg.replace("\x01", "")
        log.info('msg %s', msg)
        if not msg.startswith("DCC"):
            return

        args = msg.replace("DCC SEND ", "").split(" ")
        size = int(args.pop())
        port = int(args.pop())
        ip = utils.ip_from_decimal(int(args.pop()))
        filename = "_".join(args).replace('"', '')
        self.set_status("RECEIVING")
        return self.netcat(ip, port, size, filename)

    # FIXME rename
    def parse_msg(self, msg):
        log.info('complete msg %s', msg)
        downloaded_filename = self.handle_dcc(msg)
        files = unar(downloaded_filename, self.PATH)
        log.info("Unarchived files %s", files)

        list_of_books = False
        out = []
        for f in files:
            if "searchbot" in f.lower() or "searchook" in f.lower():
                list_of_books = True
                out.extend(self.list_books(f))

        if list_of_books:
            log.info("Final output %s", out)
            return

        log.info("Files: %s", files)
        ret = []
        for f in files:
            if f.lower().endswith(".epub"):
                log.info("EPUB %s" % f)
                new_fname = f.replace("epub", "mobi")
                p = subprocess.Popen(["ebook-convert", f, new_fname])
                p.wait()
                ret.append(new_fname)
            ret.append(f)
        # make paths absolute?
        ret = [i.replace(self.PATH, "") for i in ret]
        for filename in ret:
            log.info(filename)

    def list_books(self, f):
        f = open(f, "r")
        lines = f.readlines()
        ret = []
        for l in lines:
            if self.EXTENSION in l.lower() and l.startswith('!') and "htm" not in l.lower():
                ret.append(l.strip())
                log.info("Book matches: %s", l.strip())
        ret = list(set(ret)) # dedup
        return ret

    def netcat(self, ip, port, size, filename):
        filename = os.path.basename(filename).replace(" ", "_")
        log.info('netcat: %s %d %d %s', ip, port, size, filename)
        s = socket.socket(socket.AF_INET, socket.SOCK_STREAM)
        log.info("Receiving file")
        s.connect((ip, port))

        fname = os.path.join(self.PATH, filename)
        f = open(fname, 'wb')
        count = 0
        while True:
            data = s.recv(16384)
            if len(data) == 0:
                log.info("No data received - finished")
                break
            count += len(data)
            f.write(data)
            perc = int(100 * count / size)
            self.PROGRESS = perc
            self.set_status("DOWNLOADING")  # % perc #progress

            log.info("Download percentage: %d", perc)
            if count >= size:
                break
        s.close()
        f.close()
        return fname

    def pong(self, data):
        msg = data.replace("PING ", "")
        self.send_queue.put("PONG %s" % msg)

    def join_channel(self, channel):
        self.send_queue.put("JOIN %s" % channel)

    def process_send_queue(self):
        if self.send_queue.empty():
            return
        data = self.send_queue.get()
        log.info("Sending %s", data)
        add = bytes(str(data), "utf-8") + bytes([13, 10])
        self.socket.send(add)

    def set_status(self, value):
        self.STATUS = value