// Copyright © 2017 Mikael Berthe <mikael@lilotux.net>

//

// Licensed under the MIT license.

// Please see the LICENSE file is this directory.

package cmd

import (

	"errors"

	"os"

	"strings"

	"github.com/spf13/cobra"

	flag "github.com/spf13/pflag"

	"github.com/McKael/madon"

)

var accountsOpts struct {

	accountID                 int

	accountUID                string

	unset                     bool   // TODO remove eventually?

	limit, sinceID, maxID     uint   // Limit the results

	onlyMedia, excludeReplies bool   // For acccount statuses

	remoteUID                 string // For account follow

	acceptFR, rejectFR        bool   // For account follow_requests

	list                      bool   // For account follow_requests/reports

	accountIDs                string // For account relationships

	statusIDs                 string // For account reports

	comment                   string // For account reports

	show                      bool   // For account reports

	displayName, note         string // For account update

	avatar, header            string // For account update

}

var updateFlags *flag.FlagSet

func init() {

	RootCmd.AddCommand(accountsCmd)

	// Subcommands

	accountsCmd.AddCommand(accountSubcommands...)

	// Global flags

	accountsCmd.PersistentFlags().IntVarP(&accountsOpts.accountID, "account-id", "a", 0, "Account ID number")

	accountsCmd.PersistentFlags().StringVarP(&accountsOpts.accountUID, "user-id", "u", "", "Account user ID")

	accountsCmd.PersistentFlags().UintVarP(&accountsOpts.limit, "limit", "l", 0, "Limit number of results")

	accountsCmd.PersistentFlags().UintVar(&accountsOpts.sinceID, "since-id", 0, "Request IDs greater than a value")

	accountsCmd.PersistentFlags().UintVar(&accountsOpts.maxID, "max-id", 0, "Request IDs less (or equal) than a value")

	// Subcommand flags

	accountStatusesSubcommand.Flags().BoolVar(&accountsOpts.onlyMedia, "only-media", false, "Only statuses with media attachments")

	accountStatusesSubcommand.Flags().BoolVar(&accountsOpts.excludeReplies, "exclude-replies", false, "Exclude replies to other statuses")

	accountFollowRequestsSubcommand.Flags().BoolVar(&accountsOpts.list, "list", false, "List pending follow requests")

	accountFollowRequestsSubcommand.Flags().BoolVar(&accountsOpts.acceptFR, "accept", false, "Accept the follow request from the account ID")

	accountFollowRequestsSubcommand.Flags().BoolVar(&accountsOpts.rejectFR, "reject", false, "Reject the follow request from the account ID")

	accountBlockSubcommand.Flags().BoolVarP(&accountsOpts.unset, "unset", "", false, "Unblock the account")

	accountMuteSubcommand.Flags().BoolVarP(&accountsOpts.unset, "unset", "", false, "Unmute the account")

	accountFollowSubcommand.Flags().BoolVarP(&accountsOpts.unset, "unset", "", false, "Unfollow the account")

	accountFollowSubcommand.Flags().StringVarP(&accountsOpts.remoteUID, "remote", "r", "", "Follow remote account (user@domain)")

	accountRelationshipsSubcommand.Flags().StringVar(&accountsOpts.accountIDs, "account-ids", "", "Comma-separated list of account IDs")

	accountReportsSubcommand.Flags().StringVar(&accountsOpts.statusIDs, "status-ids", "", "Comma-separated list of status IDs")

	accountReportsSubcommand.Flags().StringVar(&accountsOpts.comment, "comment", "", "Report comment")

	accountReportsSubcommand.Flags().BoolVar(&accountsOpts.list, "list", false, "List current user reports")

	accountUpdateSubcommand.Flags().StringVar(&accountsOpts.displayName, "display-name", "", "User display name")

	accountUpdateSubcommand.Flags().StringVar(&accountsOpts.note, "note", "", "User note (a.k.a. bio)")

	accountUpdateSubcommand.Flags().StringVar(&accountsOpts.avatar, "avatar", "", "User avatar image")

	accountUpdateSubcommand.Flags().StringVar(&accountsOpts.header, "header", "", "User header image")

	// This one will be used to check if the options were explicitely set or not

	updateFlags = accountUpdateSubcommand.Flags()

}

// accountsCmd represents the accounts command

// This command does nothing without a subcommand

var accountsCmd = &cobra.Command{

	Use:     "accounts [--account-id ID] subcommand",

	Aliases: []string{"account"},

	Short:   "Account-related functions",

	//Long:    `TBW...`, // TODO

	//PersistentPreRunE: func(cmd *cobra.Command, args []string) error {},

}

// Note: Some account subcommands are not defined in this file.

var accountSubcommands = []*cobra.Command{

	&cobra.Command{

		Use: "show",

		Long: `Displays the details about the requested account.

If no account ID is specified, the current user account is used.`,

		Aliases: []string{"display"},

		Short:   "Display the account",

		RunE: func(cmd *cobra.Command, args []string) error {

			return accountSubcommandsRunE(cmd.Name(), args)

		},

	},

	&cobra.Command{

		Use:   "followers",

		Short: "Display the accounts following the specified account",

		RunE: func(cmd *cobra.Command, args []string) error {

			return accountSubcommandsRunE(cmd.Name(), args)

		},

	},

	&cobra.Command{

		Use:   "following",

		Short: "Display the accounts followed by the specified account",

		RunE: func(cmd *cobra.Command, args []string) error {

			return accountSubcommandsRunE(cmd.Name(), args)

		},

	},

	&cobra.Command{

		Use:     "favourites",

		Aliases: []string{"favorites", "favourited", "favorited"},

		Short:   "Display the user's favourites",

		RunE: func(cmd *cobra.Command, args []string) error {

			return accountSubcommandsRunE(cmd.Name(), args)

		},

	},

	&cobra.Command{

		Use:     "blocks",

		Aliases: []string{"blocked"},

		Short:   "Display the user's blocked accounts",

		RunE: func(cmd *cobra.Command, args []string) error {

			return accountSubcommandsRunE(cmd.Name(), args)

		},

	},

	&cobra.Command{

		Use:     "mutes",

		Aliases: []string{"muted"},

		Short:   "Display the user's muted accounts",

		RunE: func(cmd *cobra.Command, args []string) error {

			return accountSubcommandsRunE(cmd.Name(), args)

		},

	},

	&cobra.Command{

		Use:   "search TEXT",

		Short: "Search for user accounts",

		Long: `Search for user accounts.

The server will lookup an account remotely if the search term is in the

username@domain format and not yet in the database.`,

		RunE: func(cmd *cobra.Command, args []string) error {

			return accountSubcommandsRunE(cmd.Name(), args)

		},

	},

	accountStatusesSubcommand,

	accountFollowRequestsSubcommand,

	accountFollowSubcommand,

	accountBlockSubcommand,

	accountMuteSubcommand,

	accountRelationshipsSubcommand,

	accountReportsSubcommand,

	accountUpdateSubcommand,

}

var accountStatusesSubcommand = &cobra.Command{

	Use:     "statuses",

	Aliases: []string{"st"},

	Short:   "Display the account statuses",

	RunE: func(cmd *cobra.Command, args []string) error {

		return accountSubcommandsRunE(cmd.Name(), args)

	},

}

var accountFollowRequestsSubcommand = &cobra.Command{

	Use:     "follow-requests",

	Aliases: []string{"follow-request", "fr"},

	Example: `  madonctl accounts follow-requests --list

  madonctl accounts follow-requests --account-id X --accept

  madonctl accounts follow-requests --account-id Y --reject`,

	Short: "List, accept or deny a follow request",

	RunE: func(cmd *cobra.Command, args []string) error {

		return accountSubcommandsRunE(cmd.Name(), args)

	},

}

var accountFollowSubcommand = &cobra.Command{

	Use:   "follow",

	Short: "Follow or unfollow the account",

	RunE: func(cmd *cobra.Command, args []string) error {

		return accountSubcommandsRunE(cmd.Name(), args)

	},

}

var accountBlockSubcommand = &cobra.Command{

	Use:   "block",

	Short: "Block or unblock the account",

	RunE: func(cmd *cobra.Command, args []string) error {

		return accountSubcommandsRunE(cmd.Name(), args)

	},

}

var accountMuteSubcommand = &cobra.Command{

	Use:   "mute",

	Short: "Mute or unmute the account",

	RunE: func(cmd *cobra.Command, args []string) error {

		return accountSubcommandsRunE(cmd.Name(), args)

	},

}

var accountRelationshipsSubcommand = &cobra.Command{

	Use:   "relationships --account-ids ACC1,ACC2...",

	Short: "List relationships with the accounts",

	RunE: func(cmd *cobra.Command, args []string) error {

		return accountSubcommandsRunE(cmd.Name(), args)

	},

}

var accountReportsSubcommand = &cobra.Command{

	Use:   "reports",

	Short: "List reports or report a user account",

	Example: `  madonctl accounts reports --list

  madonctl accounts reports --account-id ACCOUNT --status-ids ID... --comment TEXT`,

	RunE: func(cmd *cobra.Command, args []string) error {

		return accountSubcommandsRunE(cmd.Name(), args)

	},

}

var accountUpdateSubcommand = &cobra.Command{

	Use:   "update",

	Short: "Update connected user account",

	Long: `Update connected user account

All flags are optional (set to an empty string if you want to delete a field).

The flags --avatar and --header can be paths to image files or base64-encoded

images (see Mastodon API specifications for the details).

Please note the avatar and header images cannot be removed, they can only be

replaced.`,

	Example: `  madonctl accounts update --display-name "Mr President"

  madonctl accounts update --note "I like madonctl"

  madonctl accounts update --avatar happyface.png`,

	RunE: func(cmd *cobra.Command, args []string) error {

		return accountSubcommandsRunE(cmd.Name(), args)

	},

}

// accountSubcommandsRunE is a generic function for status subcommands

func accountSubcommandsRunE(subcmd string, args []string) error {

	opt := accountsOpts

	if opt.accountUID != "" {

		if opt.accountID > 0 {

			return errors.New("cannot use both account ID and UID")

		}

		// Remove leading '@'

		opt.accountUID = strings.TrimLeft(opt.accountUID, "@")

		// Sign in early to look the user id up

		if err := madonInit(true); err != nil {

			return err

		}

		accList, err := gClient.SearchAccounts(opt.accountUID, &madon.LimitParams{Limit: 2})

		if err != nil || len(accList) < 1 {

			errPrint("Cannot find user '%s': %v", opt.accountUID, err)

			os.Exit(1)

		}

		for _, u := range accList {

			if u.Acct == opt.accountUID {

				opt.accountID = u.ID

				break

			}

		}

		if opt.accountID < 1 {

			errPrint("Cannot find user '%s'", opt.accountUID)

			os.Exit(1)

		}

		if verbose {

			errPrint("User '%s' is account ID %d", opt.accountUID, opt.accountID)

		}

	}

	switch subcmd {

	case "show", "search", "update":

		// These subcommands do not require an account ID

	case "favourites", "blocks", "mutes":

		// Those subcommands can not use an account ID

		if opt.accountID > 0 {

			return errors.New("useless account ID")

		}

	case "follow":

		if opt.accountID < 1 && opt.remoteUID == "" {

			return errors.New("missing account ID or URI")

		}

		if opt.accountID > 0 && opt.remoteUID != "" {

			return errors.New("cannot use both account ID and URI")

		}

		if opt.unset && opt.accountID < 1 {

			return errors.New("unfollowing requires an account ID")

		}

	case "follow-requests":

		if opt.list {

			if opt.acceptFR || opt.rejectFR {

				return errors.New("incompatible options")

			}

		} else {

			if !opt.acceptFR && !opt.rejectFR { // No flag

				return errors.New("missing parameter (--list, --accept or --reject)")

			}

			// This is a FR reply

			if opt.acceptFR && opt.rejectFR {

				return errors.New("incompatible options")

			}

			if opt.accountID < 1 {

				return errors.New("missing account ID")

			}

		}

	case "relationships":

		if opt.accountID < 1 && len(opt.accountIDs) == 0 {

			return errors.New("missing account IDs")

		}

		if opt.accountID > 0 && len(opt.accountIDs) > 0 {

			return errors.New("incompatible options")

		}

	case "reports":

		if opt.list {

			break // No argument needed

		}

		if opt.accountID < 1 || len(opt.statusIDs) == 0 || opt.comment == "" {

			return errors.New("missing parameter")

		}

	case "followers", "following", "statuses":

		// If the user's account ID is missing, get it

		if opt.accountID < 1 {

			// Sign in now to look the user id up

			if err := madonInit(true); err != nil {

				return err

			}

			account, err := gClient.GetCurrentAccount()

			if err != nil {

				return err

			}

			opt.accountID = account.ID

			if verbose {

				errPrint("User account ID: %d", opt.accountID)

			}

		}

	default:

		// The other subcommands here require an account ID

		if opt.accountID < 1 {

			return errors.New("missing account ID")

		}

	}

	var limOpts *madon.LimitParams

		limOpts = new(madon.LimitParams)

	}

	if opt.limit > 0 {

		limOpts.Limit = int(opt.limit)

	}

	if opt.maxID > 0 {

		limOpts.MaxID = int(opt.maxID)

	}

	if opt.sinceID > 0 {

		limOpts.SinceID = int(opt.sinceID)

	}

	// All account subcommands need to have signed in

	if err := madonInit(true); err != nil {

		return err

	}

	var obj interface{}

	var err error

	switch subcmd {

	case "show":

		var account *madon.Account

		if opt.accountID > 0 {

			account, err = gClient.GetAccount(opt.accountID)

		} else {

			account, err = gClient.GetCurrentAccount()

		}

		obj = account

	case "search":

		var accountList []madon.Account

		accountList, err = gClient.SearchAccounts(strings.Join(args, " "), limOpts)