import re
import time
import sqlite3
import requests
#from flask_login import current_user, login_required
from flask_login import LoginManager, UserMixin, current_user, login_user, logout_user, login_required
from flask import Blueprint, render_template, request, redirect, flash, url_for, jsonify, g

from ..common.common import *

frontend = Blueprint('youtube', __name__,
    template_folder='templates',
    static_folder='static',
    static_url_path='/static/yt')

@frontend.route('/')
def index():
    return redirect(url_for('.feed'), code=302)

@frontend.route('/feed/subscriptions')
# disabled for guest user: @login_required
def feed():
    if current_user.is_anonymous:
        token = 'guest'
    else:
        token = current_user.token
    page = int(request.args.get('page', 0))
    with sqlite3.connect(cf['global']['database']) as conn:
        c = conn.cursor()
        c.execute("""
	   SELECT videos.id, channel_id, name, title, published, flags.display
	     FROM videos
	     JOIN channels ON videos.channel_id = channels.id
	LEFT JOIN flags ON (videos.id = flags.video_id) AND (flags.user = ?)
	    WHERE channel_id IN 
		  (SELECT channel_id FROM subscriptions WHERE user = ?)
		  AND flags.display IS NOT 'hidden'
	 ORDER BY (display = 'pinned') DESC, crawled DESC
	    LIMIT 36
	   OFFSET 36*?""", (token, token, page))
        rows = [{
            'video_id': video_id,
            'channel_id': channel_id,
            'author': author,
            'title': title,
            'published': published,
            'pinned': display == 'pinned',
        } for (video_id, channel_id, author, title, published, display) in c.fetchall()]
    return render_template('index.html.j2', rows=rows, page=page)

@frontend.route('/watch')
def watch():
    if not 'v' in request.args:
        return "missing video id", 400

    plaintextheaders = {
        'content-type': 'text/plain',
        'Link': "<data:text/css,body%7Bcolor:%23eee;background:%23333%7D>; rel=stylesheet;"
    }

    video_id = request.args.get('v')
    sts, algo = get_cipher()
    video_url, metadata, error, errdetails = get_video_info(video_id, sts, algo)

    extra = {'geolocked':'local=1', 'livestream':'raw=0'}.get(error,'')
    invidious_url = f"https://invidio.us/watch?v={video_id}&{extra}&raw=1"
    errdetails = {
        'malformed':  "Video ID is invalid.",
        'geolocked':  "This video is geolocked.",
        'livestream': "Livestreams not yet supported.",
        'exhausted':  errdetails or "Couldn't extract video URLs.",
        'player':     errdetails,
    }.get(error)

    show = request.args.get("show")
    if show == "raw":
        if error:
            msg = errdetails if error=='player' else f"{error.upper()}: {errdetails}"
            return f"{msg}\n\nRedirecting to Invidious.", 502, {
                'Refresh': f'2; URL={invidious_url}',
                **plaintextheaders}
        return redirect(video_url, code=307)
    elif show == "json":
        if error and not metadata:
            return {'error': True, error: errdetails}, 400 # TODO: better (test _CpR4o81XQc)
        return jsonify(metadata)
    else:
        if error and not metadata: # e.g. malformed, private/deleted video, ...
            return errdetails,400 # TODO: nicer
        return render_template('watch.html.j2',
            video_id=video_id, video_url=video_url,
            video_error=error, errdetails=errdetails, invidious_url=invidious_url,
            **prepare_metadata(metadata))

@frontend.route('/channel/<channel_id>')
def channel(channel_id):
    if not re.match(r"(UC[A-Za-z0-9_-]{22})", channel_id):
        return "bad channel id", 400 # todo

    xmlfeed = fetch_xml("channel_id", channel_id)
    if not xmlfeed:
        return "not found or something", 404 # XXX
    title, author, videos = parse_xml(xmlfeed)
    return render_template('xmlfeed.html.j2', title=author, rows=videos)

@frontend.route('/playlist')
def playlist():
    playlist_id = request.args.get('list')
    if not playlist_id:
        return "bad list id", 400 # todo

    xmlfeed = fetch_xml("playlist_id", playlist_id)
    if not xmlfeed:
        return "not found or something", 404 # XXX
    title, author, videos = parse_xml(xmlfeed)
    return render_template('xmlfeed.html.j2', title=f"{title} by {author}", rows=videos)

@frontend.route('/manage/subscriptions')
# disabled for guest user: @login_required
def subscription_manager():
    if current_user.is_anonymous:
        token = 'guest'
    else:
        token = current_user.token
    with sqlite3.connect(cf['global']['database']) as conn:
        #with conn.cursor() as c:
            c = conn.cursor()
            c.execute("""
		  SELECT subscriptions.channel_id, name, 
		         (subscribed_until < datetime('now')) AS obsolete
		    FROM subscriptions
		    left JOIN channels ON channels.id = subscriptions.channel_id
		    left JOIN websub ON channels.id = websub.channel_id
		   WHERE user = ?
		     AND subscriptions.type IN ('channel', 'playlist')
		ORDER BY obsolete=0, name COLLATE NOCASE ASC""", (token,))
            rows = [{
                'channel_id': channel_id,
                'author': author or channel_id,
                'subscribed_until': subscribed_until
            } for (channel_id, author, subscribed_until) in c.fetchall()]
    return render_template('subscription_manager.html.j2', rows=rows)

@frontend.route('/feed/subscriptions', methods=['POST'])
@login_required
def feed_post():
    token = current_user.token
    action = next(request.form.keys(), None)
    if action in ['pin', 'unpin', 'hide']:
        video_id = request.form.get(action)
        display = {
            'pin': 'pinned',
            'unpin': None,
            'hide': 'hidden',
        }[action]
        with sqlite3.connect(cf['global']['database']) as conn:
            #with conn.cursor() as c:
                c = conn.cursor()
                c.execute("""
			INSERT OR REPLACE INTO flags (user, video_id, display)
			VALUES (?, ?, ?)
                """, (token, video_id, display))
    else:
        flash("unsupported action", "error")
    return redirect(request.url, code=303)

@frontend.route('/manage/subscriptions', methods=['POST'])
@login_required
def manage_subscriptions():
    token = current_user.token
    if 'subscribe' in request.form:
        channel_id = request.form.get("subscribe")
        match = re.search(r"(UC[A-Za-z0-9_-]{22})", channel_id)
        if match:
            channel_id = match.group(1)
        else:
            match = re.search(r"((?:PL|LL|EC|UU|FL|UL|OL)[A-Za-z0-9_-]{10,})", channel_id)
            if match:  # NOTE: PL-playlists are 32chars, others differ in length.
                flash("playlists not (yet?) supported.", "error")
                return redirect(request.url, code=303) # TODO: dedup redirection
            else:
                flash("not a valid/subscribable URI", "error")
                return redirect(request.url, code=303) # TODO: dedup redirection
        with sqlite3.connect(cf['global']['database']) as conn:
            #with conn.cursor() as c:
                c = conn.cursor()
                c.execute("""
			INSERT OR IGNORE INTO subscriptions (user, channel_id)
			VALUES (?, ?)
                """, (token, channel_id))
                # TODO: sql-error-handling, asynchronically calling update-subs.pl

    elif 'unsubscribe' in request.form:
        channel_id = request.form.get("unsubscribe")
        with sqlite3.connect(cf['global']['database']) as conn:
            #with conn.cursor() as c:
                c = conn.cursor()
                c.execute("""
			DELETE FROM subscriptions
			WHERE user = ? AND channel_id = ?
                """, (token, channel_id))
                # TODO: sql-error-handling, report success

    else:
        flash("unsupported action", "error")

    return redirect(request.url, code=303)

@frontend.route('/r/')
def reddit_index():
    return ""
@frontend.route('/r/<subreddit>')
def reddit(subreddit="videos"):
    count = int(request.args.get('count', 0))
    before = request.args.get('before')
    after = request.args.get('after')
    query = '&'.join([f"{k}={v}" for k,v in [('count',count), ('before',before), ('after',after)] if v])
    r = requests.get(f"https://old.reddit.com/r/{subreddit}.json?{query}", headers={'User-Agent':'Mozilla/5.0'})
    if not r.ok or not 'data' in r.json():
        return r.text+"error retrieving reddit data", 502

    good = [e for e in r.json()['data']['children'] if e['data']['score'] > 1]
    bad  = [e for e in r.json()['data']['children'] if e['data']['score'] <=1]
    videos = []
    for entry in (good+bad):
        e = entry['data']
        if e['domain'] not in ['youtube.com', 'youtu.be', 'invidio.us']:
            continue
        video_id = re.match(r'^https?://(?:www.|m.)?(?:youtube.com/watch\?(?:.*&amp;)?v=|youtu.be/|youtube.com/embed/)([-_0-9A-Za-z]+)', e['url']).group(1)
        if not video_id: continue
        videos.append({
            'video_id': video_id,
            'title': e['title'],
            'url': e['permalink'],
            'n_comments': e['num_comments'],
            'n_karma': e['score'],
        })
    before = r.json()['data']['before']
    after = r.json()['data']['after']
    return render_template('reddit.html.j2', subreddit=subreddit, rows=videos, before=before, after=after, count=count)

def get_cipher():
    # reload cipher from database every 1 hour
    if 'cipher' not in g or time.time() - g.get('cipher_updated', 0) > 1 * 60 * 60:
        with sqlite3.connect(cf['global']['database']) as conn:
            c = conn.cursor()
            c.execute("SELECT sts, algorithm FROM cipher")
            g.cipher = c.fetchone()
            g.cipher_updated = time.time()

    return g.cipher

#@frontend.teardown_appcontext
#def teardown_db():
#    db = g.pop('db', None)
#
#    if db is not None:
#        db.close()


@frontend.app_template_filter('format_date')
def format_date(s):
    (y,m,d) = (int(n) for n in s.split('T')[0].split(' ')[0].split('-'))  # iso-dates can seperate date from time with space or 'T'
    M = '_ Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec'.split()
    return f"{d} {M[m]}"