// Copyright 2017 Vector Creations Ltd
//
// 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.

package accounts

import (
	"context"
	"database/sql"

	"github.com/matrix-org/dendrite/clientapi/userutil"

	"github.com/matrix-org/gomatrixserverlib"

	searchtypes "github.com/matrix-org/dendrite/userdirectoryapi/types"

	"github.com/matrix-org/dendrite/clientapi/auth/authtypes"
)

const profilesSchema = `
-- Stores data about accounts profiles.
CREATE TABLE IF NOT EXISTS account_profiles (
    -- The Matrix user ID localpart for this account
    localpart TEXT NOT NULL PRIMARY KEY,
    -- The display name for this account
    display_name TEXT,
    -- The URL of the avatar for this account
    avatar_url TEXT
);
`

const insertProfileSQL = "" +
	"INSERT INTO account_profiles(localpart, display_name, avatar_url) VALUES ($1, $2, $3)"

const selectProfileByLocalpartSQL = "" +
	"SELECT localpart, display_name, avatar_url FROM account_profiles WHERE localpart = $1"

const selectSearchTermLikeLocalpartOrDisplayName = "" +
	"SELECT localpart, display_name, avatar_url FROM account_profiles WHERE localpart LIKE $1 OR display_name LIKE $1 LIMIT $2"

const setAvatarURLSQL = "" +
	"UPDATE account_profiles SET avatar_url = $1 WHERE localpart = $2"

const setDisplayNameSQL = "" +
	"UPDATE account_profiles SET display_name = $1 WHERE localpart = $2"

type profilesStatements struct {
	insertProfileStmt                              *sql.Stmt
	selectProfileByLocalpartStmt                   *sql.Stmt
	selectSearchTermLikeLocalpartOrDisplayNameStmt *sql.Stmt
	setAvatarURLStmt                               *sql.Stmt
	setDisplayNameStmt                             *sql.Stmt
}

func (s *profilesStatements) prepare(db *sql.DB) (err error) {
	_, err = db.Exec(profilesSchema)
	if err != nil {
		return
	}
	if s.insertProfileStmt, err = db.Prepare(insertProfileSQL); err != nil {
		return
	}
	if s.selectProfileByLocalpartStmt, err = db.Prepare(selectProfileByLocalpartSQL); err != nil {
		return
	}
	if s.setAvatarURLStmt, err = db.Prepare(setAvatarURLSQL); err != nil {
		return
	}
	if s.setDisplayNameStmt, err = db.Prepare(setDisplayNameSQL); err != nil {
		return
	}
	if s.selectSearchTermLikeLocalpartOrDisplayNameStmt, err = db.Prepare(selectSearchTermLikeLocalpartOrDisplayName); err != nil {
		return
	}
	return
}

func (s *profilesStatements) insertProfile(
	ctx context.Context, localpart string,
) (err error) {
	_, err = s.insertProfileStmt.ExecContext(ctx, localpart, "", "")
	return
}

func (s *profilesStatements) selectProfileByLocalpart(
	ctx context.Context, localpart string,
) (*authtypes.Profile, error) {
	var profile authtypes.Profile
	err := s.selectProfileByLocalpartStmt.QueryRowContext(ctx, localpart).Scan(
		&profile.Localpart, &profile.DisplayName, &profile.AvatarURL,
	)
	if err != nil {
		return nil, err
	}
	return &profile, nil
}

func (s *profilesStatements) selectSearchTermLikeLocalpartOrDisplayName(
	ctx context.Context, searchTerm string, limit int8, serverName gomatrixserverlib.ServerName,
) (*[]searchtypes.SearchResult, bool, error) {
	//increase limit by one to find out if the query was limited
	rows, err := s.selectSearchTermLikeLocalpartOrDisplayNameStmt.QueryContext(ctx, searchTerm, limit+1)
	if err != nil {
		return nil, false, err
	}
	searchResults := []searchtypes.SearchResult{}
	counter := int8(1)
	limited := false
	for rows.Next() {
		if counter > limit {
			limited = true
			break
		}
		var r searchtypes.SearchResult
		err = rows.Scan(
			&r.UserId, &r.DisplayName, &r.AvatarUrl,
		)
		r.UserId = userutil.MakeUserID(r.UserId, serverName)
		if err != nil {
			return &searchResults, false, err
		}
		searchResults = append(searchResults, r)
		counter++
	}

	return &searchResults, limited, nil
}

func (s *profilesStatements) setAvatarURL(
	ctx context.Context, localpart string, avatarURL string,
) (err error) {
	_, err = s.setAvatarURLStmt.ExecContext(ctx, avatarURL, localpart)
	return
}

func (s *profilesStatements) setDisplayName(
	ctx context.Context, localpart string, displayName string,
) (err error) {
	_, err = s.setDisplayNameStmt.ExecContext(ctx, displayName, localpart)
	return
}