/**
 * ============LICENSE_START====================================================
 * org.onap.aaf
 * ===========================================================================
 * Copyright (c) 2018 AT&T Intellectual Property. All rights reserved.
 * Modifications Copyright (C) 2019 IBM.
 * ===========================================================================
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *      http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 * ============LICENSE_END====================================================
 *
 */

package org.onap.aaf.auth.batch.helpers;

import java.util.ArrayList;
import java.util.Calendar;
import java.util.Date;
import java.util.GregorianCalendar;
import java.util.HashSet;
import java.util.Iterator;
import java.util.List;
import java.util.Set;
import java.util.SortedMap;
import java.util.TreeMap;

import org.onap.aaf.auth.dao.cass.CredDAO;
import org.onap.aaf.auth.dao.hl.Question;
import org.onap.aaf.cadi.util.CSV;
import org.onap.aaf.misc.env.Env;
import org.onap.aaf.misc.env.TimeTaken;
import org.onap.aaf.misc.env.Trans;
import org.onap.aaf.misc.env.util.Chrono;

import com.datastax.driver.core.ResultSet;
import com.datastax.driver.core.Row;
import com.datastax.driver.core.Session;
import com.datastax.driver.core.SimpleStatement;
import com.datastax.driver.core.Statement;

public class Cred  {
    public static final SortedMap<String,Cred> data = new TreeMap<>();
    public static final SortedMap<String,List<Cred>> byNS = new TreeMap<>();

    public final String id;
    public final List<Instance> instances;
    public final String ns;

    public Cred(String id) {
        this.id = id;
        instances = new ArrayList<>();
        ns=Question.domain2ns(id);
    }

    public static class Instance {
        public final int type;
        public final Date expires;
        public final Date written;
        public final Integer other;
        public final String tag;
        public List<Note> notes;


        public Instance(int type, Date expires, Integer other, long written, String tag) {
            this.type = type;
            this.expires = expires;
            this.other = other;
            this.written = new Date(written);
            this.tag = tag;
        }

        /**
         * Usually returns Null...
         * @return
         */
        public List<Note> notes() {
            return notes;
        }

        public void addNote(int level, String note) {
            if(notes==null) {
                notes=new ArrayList<>();
            }
            notes.add(new Note(level,note));
        }

        public String toString() {
            return expires.toString() + ": " + type + ' ' + tag;
        }
    }

    public static class Note {
        public final int level;
        public final String note;

        public Note(int level, String note) {
            this.level = level;
            this.note = note;
        }
    }
    public Date last(final int ... types) {
        Date last = null;
        for (Instance i : instances) {
            if (types.length>0) { // filter by types, if requested
                boolean quit = true;
                for (int t : types) {
                    if (t==i.type) {
                        quit=false;
                        break;
                    }
                }
                if (quit) {
                    continue;
                }
            }
            if (last==null || i.expires.after(last)) {
                last = i.expires;
            }
        }
        return last;
    }


    public Set<Integer> types() {
        Set<Integer> types = new HashSet<>();
        for (Instance i : instances) {
            types.add(i.type);
        }
        return types;
    }

    public static void load(Trans trans, Session session, int ... types ) {
        load(trans, session,"select id, type, expires, other, writetime(cred), tag from authz.cred;",types);
    }

    public static void loadOneNS(Trans trans, Session session, String ns,int ... types ) {
        load(trans, session,"select id, type, expires, other, writetime(cred), tag from authz.cred WHERE ns='" + ns + "';", types);
    }

    private static void load(Trans trans, Session session, String query, int ...types) {

        trans.info().log( "query: " + query );
        TimeTaken tt = trans.start("Read Creds", Env.REMOTE);

        ResultSet results;
        try {
            Statement stmt = new SimpleStatement( query );
            results = session.execute(stmt);
        } finally {
            tt.done();
        }
        int count = 0;
        try {
            Iterator<Row> iter = results.iterator();
            Row row;
            tt = trans.start("Load Credentials", Env.SUB);
            try {
                while (iter.hasNext()) {
                    ++count;
                    row = iter.next();
                    int type = row.getInt(1);
                    if (types.length>0) { // filter by types, if requested
                        boolean hastype = false;
                        for (int t : types) {
                            if (t==type) {
                                hastype=true;
                                break;
                            }
                        }
                        if (!hastype) {
                            continue;
                        }
                    }
                    add(row.getString(0), row.getInt(1),row.getTimestamp(2),row.getInt(3),row.getLong(4),
                            row.getString(5));
                }
            } finally {
                tt.done();
            }
        } finally {
            trans.info().log("Found",count,"creds");
        }
    }

    public static void add(
            final String id,
            final int type,
            final Date timestamp,
            final int other,
            final long written,
            final String tag
            ) {
        Cred cred = data.get(id);
        if (cred==null) {
            cred = new Cred(id);
            data.put(id, cred);
        }
        cred.instances.add(new Instance(type, timestamp, other, written/1000,tag));

        List<Cred> lscd = byNS.get(cred.ns);
        if (lscd==null) {
            lscd=new ArrayList<>();
            byNS.put(cred.ns,lscd);
        }
        boolean found = false;
        for (Cred c : lscd) {
            if (c.id.equals(cred.id)) {
                found=true;
                break;
            }
        }
        if (!found) {
            lscd.add(cred);
        }
    }


    /**
     * Count entries in Cred data.
     * Note, as opposed to other methods, need to load the whole cred table for the Types.
     * @param numbuckets
     * @return
     */
    public static CredCount count(int numbuckets) {
        CredCount cc = new CredCount(numbuckets);
        for (Cred c : data.values()) {
            for (Instance ci : c.instances) {
                cc.inc(ci.type,ci.written, ci.expires);
            }
        }
        return cc;
    }

    public static class CredCount {
        public int [] raw;
        public int [] basicAuth;
        public int [] basicAuth256;
        public int [] cert;
        public int [] x509Added;
        public int [] x509Expired;
        public Date [] dates;

        public CredCount(int numbuckets) {
            raw = new int[numbuckets];
            basicAuth = new int[numbuckets];
            basicAuth256 = new int[numbuckets];
            cert = new int[numbuckets];
            x509Added = new int[numbuckets];
            x509Expired = new int[numbuckets];
            dates = new Date[numbuckets];
            GregorianCalendar gc = new GregorianCalendar();
            dates[0]=gc.getTime(); // now
            gc.set(Calendar.DAY_OF_MONTH, 1);
            gc.set(Calendar.HOUR, 0);
            gc.set(Calendar.MINUTE, 0);
            gc.set(Calendar.SECOND,0);
            gc.set(Calendar.MILLISECOND,0);
            gc.add(Calendar.MILLISECOND, -1); // last milli of month
            for (int i = 1; i < numbuckets; ++i) {
                dates[i] = gc.getTime();
                gc.add(Calendar.MONTH, -1);
            }

        }

        public void inc(int type, Date start, Date expires) {
            for (int i = 0; i < dates.length - 1; ++i) {
                if (start.before(dates[i])) {
                    if ((type == CredDAO.CERT_SHA256_RSA)&&(start.after(dates[i + 1]))) {
                            ++x509Added[i];
                         }
                    if (expires.after(dates[i])) {
                        switch(type) {
                            case CredDAO.RAW:
                                ++raw[i];
                                break;
                            case CredDAO.BASIC_AUTH:
                                ++basicAuth[i];
                                break;
                            case CredDAO.BASIC_AUTH_SHA256:
                                ++basicAuth256[i];
                                break;
                            case CredDAO.CERT_SHA256_RSA:
                                ++cert[i];
                                break;
                        }
                    }
                }
            }
        }

        public long authCount(int idx) {
            return (long)basicAuth[idx] + basicAuth256[idx];
        }

        public long x509Count(int idx) {
            return cert[idx];
        }



    }

    public void row(final CSV.Writer csvw, final Instance inst) {
        csvw.row("cred",id,ns,Integer.toString(inst.type),Chrono.dateOnlyStamp(inst.expires),
                inst.expires.getTime(),inst.tag);
    }

    public void row(final CSV.Writer csvw, final Instance inst, final String reason) {
        csvw.row("cred",id,ns,Integer.toString(inst.type),Chrono.dateOnlyStamp(inst.expires),
                inst.expires.getTime(),inst.tag,reason);
    }

    public static void batchDelete(StringBuilder sb, List<String> row) {
        long l = Long.parseLong(row.get(5));
        String date = Chrono.batchFmt.format(new Date(l));
        sb.append("DELETE from authz.cred WHERE id='");
        sb.append(row.get(1));
        sb.append("' AND type=");
        sb.append(Integer.parseInt(row.get(3)));
        // Note: We have to work with long, because Expires is part of Key... can't easily do date.
        sb.append(" AND expires='");
        sb.append(date);
        sb.append("';\n");

    }

    public String toString() {
        StringBuilder sb = new StringBuilder(id);
        sb.append('[');
        for (Instance i : instances) {
            sb.append('{');
            sb.append(i.type);
            sb.append(",\"");
            sb.append(i.expires);
            sb.append("\"}");
        }
        sb.append(']');
        return sb.toString();
    }

    /* (non-Javadoc)
     * @see java.lang.Object#hashCode()
     */
    @Override
    public int hashCode() {
        return id.hashCode();
    }

    /* (non-Javadoc)
     * @see java.lang.Object#equals(java.lang.Object)
     */
    @Override
    public boolean equals(Object obj) {
        return id.equals(obj);
    }


    public static String histSubject(List<String> row) {
        return row.get(1);
    }


    public static String histMemo(String fmt, String orgName, List<String> row) {
        String reason;
        if(row.size()>5) { // Reason included
            reason = row.get(5);
        } else {
            reason = String.format(fmt, row.get(1),orgName,row.get(4));
        }
        return reason;
    }


    public static void clear() {
        data.clear();
        byNS.clear();
    }



}