#!/usr/bin/env python

###
# Copyright (c) 2003, Brett Kelly
# All rights reserved.
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions are met:
#
#   * Redistributions of source code must retain the above copyright notice,
#     this list of conditions, and the following disclaimer.
#   * Redistributions in binary form must reproduce the above copyright notice,
#     this list of conditions, and the following disclaimer in the
#     documentation and/or other materials provided with the distribution.
#   * Neither the name of the author of this software nor the name of
#     contributors to this software may be used to endorse or promote products
#     derived from this software without specific prior written consent.
#
# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
# ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
###

from baseplugin import *

import time
import os.path
import string

import sqlite

import conf
import ircdb
import privmsgs
import callbacks
import ircutils
import debug
import ircmsgs

class Notes(callbacks.Privmsg):
    
    def __init__(self):
        callbacks.Privmsg.__init__(self)
        self.filename = os.path.join(conf.dataDir, 'Notes.db')
        if os.path.exists(self.filename):
            self.db = sqlite.connect(self.filename)
            self.cursor = self.db.cursor()
        else:
            self.makeDB()

    def makeDB(self):
        "create Notes database and tables"
        self.db = sqlite.connect(self.filename, converters={'bool': bool})
        self.cursor = self.db.cursor()
        self.cursor.execute("""CREATE TABLE users (
                               id INTEGER PRIMARY KEY,
                               name TEXT UNIQUE ON CONFLICT IGNORE
                               )""")
        self.cursor.execute("""CREATE TABLE notes (
                               id INTEGER PRIMARY KEY,
                               from_id INTEGER,
                               to_id INTEGER,
                               added_at TIMESTAMP,
                               read BOOLEAN,
                               public BOOLEAN,
                               note TEXT
                               )""")
        self.cursor.execute("""CREATE INDEX users_username ON users (name)""")
        self.db.commit()
   
    def _addUser(self, username):
        "not callable from channel, used to add users to database"
        self.cursor.execute('INSERT INTO users VALUES (NULL,%s)', username)
        self.db.commit()
        
    def getUserID(self, username):
        self.cursor.execute('SELECT id FROM users where name=%s', username)
        if self.cursor.rowcount != 0:
            results = self.cursor.fetchall()
            return results[0][0]
        else: # this should NEVER happen
            assert False

    def getUserName(self, userid):
        self.cursor.execute('SELECT name FROM users WHERE id=%s', userid)
        if self.cursor.rowcount != 0:
            results = self.cursor.fetchall()
            return results[0][0]
        else:
            raise KeyError

    def isNote(self, noteid):
        self.cursor.execute('SELECT * FROM notes WHERE id=%s', noteid)
        if self.cursor.rowcount == 0:
            return 0
        else:
            return 1
    
    def makePrivate(self, msg):
        args = list(msg.args)
        args[0] = msg.nick
        return ircmsgs.IrcMsg(command = msg.command, prefix = msg.prefix,
                              args = tuple(args))

    def setAsRead(self, noteid):
        self.cursor.execute('UPDATE notes SET read=1 WHERE id=%s', noteid)
        self.db.commit()
    
#    def setUnread(self, irc, msg, args):
#        "set a note as unread"
#        noteid = privmsgs.getArgs(args) 
#        self.cursor.execute('UPDATE notes SET read=0 where id=%s'% noteid)
#        self.db.commit()
#        irc.reply(msg, conf.replySuccess)    
    
    def sendnote(self, irc, msg, args):
        """<recipient> <text>
        
        Sends a new note to the user specified."""
        (name, note) = privmsgs.getArgs(args, needed=2)
        sender = ircutils.nickFromHostmask(msg.prefix)
        if ircdb.users.hasUser(name):
            recipient = name
        else:
            n = irc.state.nickToHostmask(name)
            recipient = ircdb.users.getUserName(n)
        self._addUser(sender)
        self._addUser(recipient)
        senderID = self.getUserID(sender)
        recipID = self.getUserID(recipient)
        if ircutils.isChannel(msg.args[0]): 
            public = 1
        else: 
            public = 0 
        self.cursor.execute("""INSERT INTO notes VALUES 
                               (NULL, %s, %s, %s, %s, %s, %s)""", 
                               senderID, recipID, int(time.time()),
                               0, public, note)
        self.db.commit()
        irc.reply(msg, conf.replySuccess)

    def note(self, irc, msg, args):
        """<note id>
        
        Retrieves a single note by unique note id."""
        noteid = privmsgs.getArgs(args)
        if not self.isNote(noteid):
            irc.error(msg, 'Not a valid note id')
            return
        sender = ircdb.users.getUserName(msg.prefix)
        senderID = self.getUserID(sender)
        self.cursor.execute("""SELECT note, to_id, from_id, added_at, public 
                               FROM notes WHERE id=%s LIMIT 1""", noteid)
        note, to_id, from_id, added_at, public = self.cursor.fetchone()
        author = self.getUserName(from_id)
        public = int(public)
        added_at = int(added_at)
        senttime = time.asctime(time.gmtime(added_at))
        newnote = "%s (Sent by %s on %s)" % (note, author, senttime)
        if senderID == to_id:
            if public:
                irc.reply(msg, newnote)
            else:
                msg = self.makePrivate(msg)
                irc.reply(msg, newnote)
            debug.printf("setting note to read=true")
            self.setAsRead(noteid)
        else:
            irc.error(msg, 'You are not the recipient of note %s' % noteid)

    def notes(self, irc, msg, args):
        """<takes no arguments>
        
        Retrieves all unread notes for the requesting user."""
        sender = ircdb.users.getUserName(msg.prefix)
        senderID = self.getUserID(sender)
        self.cursor.execute("""SELECT id, from_id, public, read FROM notes
                               WHERE to_id=%s
                               AND read=0""", senderID)
        notes = self.cursor.fetchall()
        self.cursor.execute("""SELECT count(*) FROM notes 
                               WHERE to_id=%s
                               AND read=0""", senderID)
        count = int(self.cursor.fetchone()[0])
        debug.printf("count: %d" % count)
        L = []
        for (id, from_id, public, read) in notes:
            if not int(read):
                sender = self.getUserName(from_id)
                if int(public):
                    L.append(r'#%d from %s' % (id, sender))
                else:
                    L.append(r'#%d (private)' % id)
        if count > 5:
            L = string.join(L[:5], ', ')
            reply = "you have %s unread notes, 5 shown: %s" % (count, L)
        else:
            L = string.join(L, ', ')
            reply = "you have %s unread notes: %s" % (count, L)
        debug.printf(L)
        irc.reply(msg, reply)

    def die(self):
        self.db.close()

Class = Notes