// SCRAM-SHA-256 authentication
//
// Resources:
//   https://tools.ietf.org/html/rfc5802
//   https://tools.ietf.org/html/rfc8265
//   https://www.postgresql.org/docs/current/sasl-authentication.html
//
// Inspiration drawn from other implementations:
//   https://github.com/lib/pq/pull/608
//   https://github.com/lib/pq/pull/788
//   https://github.com/lib/pq/pull/833

package pgconn

import (
	
	
	
	
	
	
	
	

	
	
	
)

const clientNonceLen = 18

// Perform SCRAM authentication.
func ( *PgConn) ( []string) error {
	,  := newScramClient(, .config.Password)
	if  != nil {
		return 
	}

	// Send client-first-message in a SASLInitialResponse
	 := &pgproto3.SASLInitialResponse{
		AuthMechanism: "SCRAM-SHA-256",
		Data:          .clientFirstMessage(),
	}
	.frontend.Send()
	 = .flushWithPotentialWriteReadDeadlock()
	if  != nil {
		return 
	}

	// Receive server-first-message payload in a AuthenticationSASLContinue.
	,  := .rxSASLContinue()
	if  != nil {
		return 
	}
	 = .recvServerFirstMessage(.Data)
	if  != nil {
		return 
	}

	// Send client-final-message in a SASLResponse
	 := &pgproto3.SASLResponse{
		Data: []byte(.clientFinalMessage()),
	}
	.frontend.Send()
	 = .flushWithPotentialWriteReadDeadlock()
	if  != nil {
		return 
	}

	// Receive server-final-message payload in a AuthenticationSASLFinal.
	,  := .rxSASLFinal()
	if  != nil {
		return 
	}
	return .recvServerFinalMessage(.Data)
}

func ( *PgConn) () (*pgproto3.AuthenticationSASLContinue, error) {
	,  := .receiveMessage()
	if  != nil {
		return nil, 
	}
	switch m := .(type) {
	case *pgproto3.AuthenticationSASLContinue:
		return , nil
	case *pgproto3.ErrorResponse:
		return nil, ErrorResponseToPgError()
	}

	return nil, fmt.Errorf("expected AuthenticationSASLContinue message but received unexpected message %T", )
}

func ( *PgConn) () (*pgproto3.AuthenticationSASLFinal, error) {
	,  := .receiveMessage()
	if  != nil {
		return nil, 
	}
	switch m := .(type) {
	case *pgproto3.AuthenticationSASLFinal:
		return , nil
	case *pgproto3.ErrorResponse:
		return nil, ErrorResponseToPgError()
	}

	return nil, fmt.Errorf("expected AuthenticationSASLFinal message but received unexpected message %T", )
}

type scramClient struct {
	serverAuthMechanisms []string
	password             []byte
	clientNonce          []byte

	clientFirstMessageBare []byte

	serverFirstMessage   []byte
	clientAndServerNonce []byte
	salt                 []byte
	iterations           int

	saltedPassword []byte
	authMessage    []byte
}

func newScramClient( []string,  string) (*scramClient, error) {
	 := &scramClient{
		serverAuthMechanisms: ,
	}

	// Ensure server supports SCRAM-SHA-256
	 := false
	for ,  := range .serverAuthMechanisms {
		if  == "SCRAM-SHA-256" {
			 = true
			break
		}
	}
	if ! {
		return nil, errors.New("server does not support SCRAM-SHA-256")
	}

	// precis.OpaqueString is equivalent to SASLprep for password.
	var  error
	.password,  = precis.OpaqueString.Bytes([]byte())
	if  != nil {
		// PostgreSQL allows passwords invalid according to SCRAM / SASLprep.
		.password = []byte()
	}

	 := make([]byte, clientNonceLen)
	_,  = rand.Read()
	if  != nil {
		return nil, 
	}
	.clientNonce = make([]byte, base64.RawStdEncoding.EncodedLen(len()))
	base64.RawStdEncoding.Encode(.clientNonce, )

	return , nil
}

func ( *scramClient) () []byte {
	.clientFirstMessageBare = []byte(fmt.Sprintf("n=,r=%s", .clientNonce))
	return []byte(fmt.Sprintf("n,,%s", .clientFirstMessageBare))
}

func ( *scramClient) ( []byte) error {
	.serverFirstMessage = 
	 := 
	if !bytes.HasPrefix(, []byte("r=")) {
		return errors.New("invalid SCRAM server-first-message received from server: did not include r=")
	}
	 = [2:]

	 := bytes.IndexByte(, ',')
	if  == -1 {
		return errors.New("invalid SCRAM server-first-message received from server: did not include s=")
	}
	.clientAndServerNonce = [:]
	 = [+1:]

	if !bytes.HasPrefix(, []byte("s=")) {
		return errors.New("invalid SCRAM server-first-message received from server: did not include s=")
	}
	 = [2:]

	 = bytes.IndexByte(, ',')
	if  == -1 {
		return errors.New("invalid SCRAM server-first-message received from server: did not include i=")
	}
	 := [:]
	 = [+1:]

	if !bytes.HasPrefix(, []byte("i=")) {
		return errors.New("invalid SCRAM server-first-message received from server: did not include i=")
	}
	 = [2:]
	 := 

	var  error
	.salt,  = base64.StdEncoding.DecodeString(string())
	if  != nil {
		return fmt.Errorf("invalid SCRAM salt received from server: %w", )
	}

	.iterations,  = strconv.Atoi(string())
	if  != nil || .iterations <= 0 {
		return fmt.Errorf("invalid SCRAM iteration count received from server: %w", )
	}

	if !bytes.HasPrefix(.clientAndServerNonce, .clientNonce) {
		return errors.New("invalid SCRAM nonce: did not start with client nonce")
	}

	if len(.clientAndServerNonce) <= len(.clientNonce) {
		return errors.New("invalid SCRAM nonce: did not include server nonce")
	}

	return nil
}

func ( *scramClient) () string {
	 := []byte(fmt.Sprintf("c=biws,r=%s", .clientAndServerNonce))

	.saltedPassword = pbkdf2.Key([]byte(.password), .salt, .iterations, 32, sha256.New)
	.authMessage = bytes.Join([][]byte{.clientFirstMessageBare, .serverFirstMessage, }, []byte(","))

	 := computeClientProof(.saltedPassword, .authMessage)

	return fmt.Sprintf("%s,p=%s", , )
}

func ( *scramClient) ( []byte) error {
	if !bytes.HasPrefix(, []byte("v=")) {
		return errors.New("invalid SCRAM server-final-message received from server")
	}

	 := [2:]

	if !hmac.Equal(, computeServerSignature(.saltedPassword, .authMessage)) {
		return errors.New("invalid SCRAM ServerSignature received from server")
	}

	return nil
}

func computeHMAC(,  []byte) []byte {
	 := hmac.New(sha256.New, )
	.Write()
	return .Sum(nil)
}

func computeClientProof(,  []byte) []byte {
	 := computeHMAC(, []byte("Client Key"))
	 := sha256.Sum256()
	 := computeHMAC([:], )

	 := make([]byte, len())
	for  := 0;  < len(); ++ {
		[] = [] ^ []
	}

	 := make([]byte, base64.StdEncoding.EncodedLen(len()))
	base64.StdEncoding.Encode(, )
	return 
}

func computeServerSignature( []byte,  []byte) []byte {
	 := computeHMAC(, []byte("Server Key"))
	 := computeHMAC(, )
	 := make([]byte, base64.StdEncoding.EncodedLen(len()))
	base64.StdEncoding.Encode(, )
	return 
}