// Copyright (c) 2026 Probo Inc <hello@probo.com>.
//
// Permission is hereby granted, free of charge, to any person obtaining a copy
// of this software and associated documentation files (the "Software"), to deal
// in the Software without restriction, including without limitation the rights
// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
// copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
//
// The above copyright notice and this permission notice shall be included in
// all copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
// SOFTWARE.

package console_test

import (
	"testing"

	"github.com/stretchr/testify/assert"
	"github.com/stretchr/testify/require"
	"go.probo.inc/probo/e2e/internal/factory"
	"go.probo.inc/probo/e2e/internal/testutil"
)

// TestApplicabilityStatement_NodeQuery covers a bug found while writing
// read-gap regression tests for GHSA-c74x-79w6-63jh: coredata.ApplicabilityStatementEntityType
// had no case in queryResolver.Node's dispatch switch (base_resolvers.go),
// so node(id: <applicabilityStatementId>) always failed with an empty
// authorize action, for any caller regardless of org -- ApplicabilityStatement
// implements Node in the schema but was unreachable through it.
func TestApplicabilityStatement_NodeQuery(t *testing.T) {
	t.Parallel()
	owner := testutil.NewClient(t, testutil.RoleOwner)

	soaID := factory.NewStatementOfApplicability(owner).Create()
	frameworkID := factory.CreateFramework(owner)
	controlID := factory.CreateControl(owner, frameworkID)
	asID := factory.CreateApplicabilityStatement(owner, soaID, controlID, true, nil)

	var result struct {
		Node *struct {
			ID      string `json:"id"`
			Control struct {
				ID string `json:"id"`
			} `json:"control"`
		} `json:"node"`
	}

	err := owner.Execute(`
		query($id: ID!) {
			node(id: $id) {
				... on ApplicabilityStatement {
					id
					control { id }
				}
			}
		}
	`, map[string]any{"id": asID}, &result)
	require.NoError(t, err)
	require.NotNil(t, result.Node)
	assert.Equal(t, asID, result.Node.ID)
	assert.Equal(t, controlID, result.Node.Control.ID)
}

func TestStatementOfApplicability_Create(t *testing.T) {
	t.Parallel()

	owner := testutil.NewClient(t, testutil.RoleOwner)

	t.Run(
		"create a statement of applicability",
		func(t *testing.T) {
			t.Parallel()

			const query = `
				mutation($input: CreateStatementOfApplicabilityInput!) {
					createStatementOfApplicability(input: $input) {
						statementOfApplicabilityEdge {
							node {
								id
								name
								createdAt
								updatedAt
							}
						}
					}
				}
			`

			name := factory.SafeName("SOA")

			var result struct {
				CreateStatementOfApplicability struct {
					StatementOfApplicabilityEdge struct {
						Node struct {
							ID        string `json:"id"`
							Name      string `json:"name"`
							CreatedAt string `json:"createdAt"`
							UpdatedAt string `json:"updatedAt"`
						} `json:"node"`
					} `json:"statementOfApplicabilityEdge"`
				} `json:"createStatementOfApplicability"`
			}

			err := owner.Execute(
				query,
				map[string]any{
					"input": map[string]any{
						"organizationId": owner.GetOrganizationID().String(),
						"name":           name,
					},
				},
				&result,
			)

			require.NoError(t, err)

			node := result.CreateStatementOfApplicability.StatementOfApplicabilityEdge.Node
			assert.NotEmpty(t, node.ID)
			assert.Equal(t, name, node.Name)
		},
	)
}

func TestStatementOfApplicability_CreateDocument(t *testing.T) {
	t.Parallel()

	owner := testutil.NewClient(t, testutil.RoleOwner)

	t.Run(
		"create document without approvers publishes immediately",
		func(t *testing.T) {
			t.Parallel()

			frameworkID := factory.NewFramework(owner).Create()
			controlID := factory.NewControl(owner, frameworkID).Create()

			soaID := factory.NewStatementOfApplicability(owner).Create()
			factory.CreateApplicabilityStatement(owner, soaID, controlID, true, nil)

			const query = `
				mutation($input: PublishStatementOfApplicabilityInput!) {
					publishStatementOfApplicability(input: $input) {
						documentEdge {
							node {
								id
								writeMode
								status
							}
						}
						documentVersionEdge {
							node {
								id
								title
								documentType
								orientation
								status
								major
								minor
								content
							}
						}
					}
				}
			`

			var result struct {
				PublishStatementOfApplicability struct {
					DocumentEdge struct {
						Node struct {
							ID        string `json:"id"`
							WriteMode string `json:"writeMode"`
							Status    string `json:"status"`
						} `json:"node"`
					} `json:"documentEdge"`
					DocumentVersionEdge struct {
						Node struct {
							ID           string `json:"id"`
							Title        string `json:"title"`
							DocumentType string `json:"documentType"`
							Orientation  string `json:"orientation"`
							Status       string `json:"status"`
							Major        int    `json:"major"`
							Minor        int    `json:"minor"`
							Content      string `json:"content"`
						} `json:"node"`
					} `json:"documentVersionEdge"`
				} `json:"publishStatementOfApplicability"`
			}

			err := owner.Execute(
				query,
				map[string]any{
					"input": map[string]any{
						"minor":                      false,
						"statementOfApplicabilityId": soaID,
					},
				},
				&result,
			)

			require.NoError(t, err)

			doc := result.PublishStatementOfApplicability.DocumentEdge.Node
			assert.NotEmpty(t, doc.ID)
			assert.Equal(t, "GENERATED", doc.WriteMode)
			assert.Equal(t, "ACTIVE", doc.Status)

			ver := result.PublishStatementOfApplicability.DocumentVersionEdge.Node
			assert.NotEmpty(t, ver.ID)
			assert.Equal(t, "STATEMENT_OF_APPLICABILITY", ver.DocumentType)
			assert.Equal(t, "LANDSCAPE", ver.Orientation)
			assert.Equal(t, "PUBLISHED", ver.Status)
			assert.Equal(t, 1, ver.Major)
			assert.Equal(t, 0, ver.Minor)
			assert.Contains(t, ver.Content, "Purpose")
		},
	)

	t.Run(
		"create document with approvers creates draft with quorum",
		func(t *testing.T) {
			t.Parallel()

			frameworkID := factory.NewFramework(owner).Create()
			controlID := factory.NewControl(owner, frameworkID).Create()

			soaID := factory.NewStatementOfApplicability(owner).Create()
			factory.CreateApplicabilityStatement(owner, soaID, controlID, true, nil)

			const query = `
				mutation($input: PublishStatementOfApplicabilityInput!) {
					publishStatementOfApplicability(input: $input) {
						documentEdge {
							node {
								id
								writeMode
							}
						}
						documentVersionEdge {
							node {
								id
								status
								major
							}
						}
					}
				}
			`

			var result struct {
				PublishStatementOfApplicability struct {
					DocumentEdge struct {
						Node struct {
							ID        string `json:"id"`
							WriteMode string `json:"writeMode"`
						} `json:"node"`
					} `json:"documentEdge"`
					DocumentVersionEdge struct {
						Node struct {
							ID     string `json:"id"`
							Status string `json:"status"`
							Major  int    `json:"major"`
						} `json:"node"`
					} `json:"documentVersionEdge"`
				} `json:"publishStatementOfApplicability"`
			}

			err := owner.Execute(
				query,
				map[string]any{
					"input": map[string]any{
						"minor":                      false,
						"statementOfApplicabilityId": soaID,
						"approverIds":                []string{owner.GetProfileID().String()},
					},
				},
				&result,
			)

			require.NoError(t, err)

			doc := result.PublishStatementOfApplicability.DocumentEdge.Node
			assert.NotEmpty(t, doc.ID)
			assert.Equal(t, "GENERATED", doc.WriteMode)

			ver := result.PublishStatementOfApplicability.DocumentVersionEdge.Node
			assert.NotEmpty(t, ver.ID)
			assert.Equal(t, "PENDING_APPROVAL", ver.Status)
		},
	)

	t.Run(
		"creating second document reuses existing document",
		func(t *testing.T) {
			t.Parallel()

			frameworkID := factory.NewFramework(owner).Create()
			controlID := factory.NewControl(owner, frameworkID).Create()

			soaID := factory.NewStatementOfApplicability(owner).Create()
			factory.CreateApplicabilityStatement(owner, soaID, controlID, true, nil)

			const query = `
				mutation($input: PublishStatementOfApplicabilityInput!) {
					publishStatementOfApplicability(input: $input) {
						documentEdge {
							node { id }
						}
						documentVersionEdge {
							node { id major }
						}
					}
				}
			`

			var result1, result2 struct {
				PublishStatementOfApplicability struct {
					DocumentEdge struct {
						Node struct {
							ID string `json:"id"`
						} `json:"node"`
					} `json:"documentEdge"`
					DocumentVersionEdge struct {
						Node struct {
							ID    string `json:"id"`
							Major int    `json:"major"`
						} `json:"node"`
					} `json:"documentVersionEdge"`
				} `json:"publishStatementOfApplicability"`
			}

			input := map[string]any{
				"input": map[string]any{
					"minor":                      false,
					"statementOfApplicabilityId": soaID,
				},
			}

			err := owner.Execute(query, input, &result1)
			require.NoError(t, err)

			err = owner.Execute(query, input, &result2)
			require.NoError(t, err)

			doc1 := result1.PublishStatementOfApplicability.DocumentEdge.Node.ID
			doc2 := result2.PublishStatementOfApplicability.DocumentEdge.Node.ID
			assert.Equal(t, doc1, doc2, "should reuse same document")

			ver1Major := result1.PublishStatementOfApplicability.DocumentVersionEdge.Node.Major
			ver2Major := result2.PublishStatementOfApplicability.DocumentVersionEdge.Node.Major

			assert.Equal(t, 1, ver1Major)
			assert.Equal(t, 2, ver2Major)
		},
	)

	t.Run(
		"document linked back to SOA",
		func(t *testing.T) {
			t.Parallel()

			frameworkID := factory.NewFramework(owner).Create()
			controlID := factory.NewControl(owner, frameworkID).Create()

			soaID := factory.NewStatementOfApplicability(owner).Create()
			factory.CreateApplicabilityStatement(owner, soaID, controlID, true, nil)

			const createQuery = `
				mutation($input: PublishStatementOfApplicabilityInput!) {
					publishStatementOfApplicability(input: $input) {
						documentEdge {
							node { id }
						}
						documentVersionEdge {
							node { id }
						}
					}
				}
			`

			var createResult struct {
				PublishStatementOfApplicability struct {
					DocumentEdge struct {
						Node struct {
							ID string `json:"id"`
						} `json:"node"`
					} `json:"documentEdge"`
					DocumentVersionEdge struct {
						Node struct {
							ID string `json:"id"`
						} `json:"node"`
					} `json:"documentVersionEdge"`
				} `json:"publishStatementOfApplicability"`
			}

			err := owner.Execute(
				createQuery,
				map[string]any{
					"input": map[string]any{
						"minor":                      false,
						"statementOfApplicabilityId": soaID,
					},
				},
				&createResult,
			)
			require.NoError(t, err)

			docID := createResult.PublishStatementOfApplicability.DocumentEdge.Node.ID

			const soaQuery = `
				query($id: ID!) {
					node(id: $id) {
						... on StatementOfApplicability {
							id
							document { id }
						}
					}
				}
			`

			var soaResult struct {
				Node struct {
					ID       string `json:"id"`
					Document *struct {
						ID string `json:"id"`
					} `json:"document"`
				} `json:"node"`
			}

			err = owner.Execute(soaQuery, map[string]any{"id": soaID}, &soaResult)
			require.NoError(t, err)
			require.NotNil(t, soaResult.Node.Document)
			assert.Equal(t, docID, soaResult.Node.Document.ID)
		},
	)
}

func TestStatementOfApplicability_CreateDocument_RBAC(t *testing.T) {
	t.Parallel()

	owner := testutil.NewClient(t, testutil.RoleOwner)
	viewer := testutil.NewClientInOrg(t, testutil.RoleViewer, owner)

	frameworkID := factory.NewFramework(owner).Create()
	controlID := factory.NewControl(owner, frameworkID).Create()

	soaID := factory.NewStatementOfApplicability(owner).Create()
	factory.CreateApplicabilityStatement(owner, soaID, controlID, true, nil)

	const query = `
		mutation($input: PublishStatementOfApplicabilityInput!) {
			publishStatementOfApplicability(input: $input) {
				documentEdge {
					node { id }
				}
				documentVersionEdge {
					node { id }
				}
			}
		}
	`

	t.Run(
		"viewer cannot create document",
		func(t *testing.T) {
			t.Parallel()

			err := viewer.ExecuteShouldFail(
				query,
				map[string]any{
					"input": map[string]any{
						"minor":                      false,
						"statementOfApplicabilityId": soaID,
					},
				},
			)
			testutil.RequireForbiddenError(t, err)
		},
	)
}

func TestStatementOfApplicability_UpdateDocumentMetadata(t *testing.T) {
	t.Parallel()

	owner := testutil.NewClient(t, testutil.RoleOwner)

	publishSOADocument := func(t *testing.T) (documentID, documentVersionID string) {
		t.Helper()

		frameworkID := factory.NewFramework(owner).Create()
		controlID := factory.NewControl(owner, frameworkID).Create()

		soaID := factory.NewStatementOfApplicability(owner).Create()
		factory.CreateApplicabilityStatement(owner, soaID, controlID, true, nil)

		const publishQuery = `
			mutation($input: PublishStatementOfApplicabilityInput!) {
				publishStatementOfApplicability(input: $input) {
					documentEdge { node { id } }
					documentVersionEdge { node { id } }
				}
			}
		`

		var publishResult struct {
			PublishStatementOfApplicability struct {
				DocumentEdge struct {
					Node struct {
						ID string `json:"id"`
					} `json:"node"`
				} `json:"documentEdge"`
				DocumentVersionEdge struct {
					Node struct {
						ID string `json:"id"`
					} `json:"node"`
				} `json:"documentVersionEdge"`
			} `json:"publishStatementOfApplicability"`
		}

		err := owner.Execute(
			publishQuery,
			map[string]any{
				"input": map[string]any{
					"minor":                      false,
					"statementOfApplicabilityId": soaID,
				},
			},
			&publishResult,
		)
		require.NoError(t, err)

		return publishResult.PublishStatementOfApplicability.DocumentEdge.Node.ID,
			publishResult.PublishStatementOfApplicability.DocumentVersionEdge.Node.ID
	}

	const updateQuery = `
		mutation($input: UpdateDocumentInput!) {
			updateDocument(input: $input) {
				document { id writeMode }
				documentVersion {
					id
					title
					documentType
					classification
					status
				}
			}
		}
	`

	type updateResult struct {
		UpdateDocument struct {
			Document struct {
				ID        string `json:"id"`
				WriteMode string `json:"writeMode"`
			} `json:"document"`
			DocumentVersion *struct {
				ID             string `json:"id"`
				Title          string `json:"title"`
				DocumentType   string `json:"documentType"`
				Classification string `json:"classification"`
				Status         string `json:"status"`
			} `json:"documentVersion"`
		} `json:"updateDocument"`
	}

	t.Run(
		"editing title, type, and classification on generated document creates a draft",
		func(t *testing.T) {
			t.Parallel()

			documentID, publishedVersionID := publishSOADocument(t)

			var result updateResult

			err := owner.Execute(
				updateQuery,
				map[string]any{
					"input": map[string]any{
						"id":             documentID,
						"title":          "Renamed SOA",
						"documentType":   "POLICY",
						"classification": "INTERNAL",
					},
				},
				&result,
			)
			require.NoError(t, err)

			assert.Equal(t, "GENERATED", result.UpdateDocument.Document.WriteMode)
			require.NotNil(t, result.UpdateDocument.DocumentVersion)
			assert.NotEqual(t, publishedVersionID, result.UpdateDocument.DocumentVersion.ID,
				"should create a new draft, not update the published version")
			assert.Equal(t, "DRAFT", result.UpdateDocument.DocumentVersion.Status)
			assert.Equal(t, "Renamed SOA", result.UpdateDocument.DocumentVersion.Title)
			assert.Equal(t, "POLICY", result.UpdateDocument.DocumentVersion.DocumentType)
			assert.Equal(t, "INTERNAL", result.UpdateDocument.DocumentVersion.Classification)
		},
	)

	t.Run(
		"cannot edit content of a generated document",
		func(t *testing.T) {
			t.Parallel()

			documentID, _ := publishSOADocument(t)

			err := owner.ExecuteShouldFail(
				updateQuery,
				map[string]any{
					"input": map[string]any{
						"id":      documentID,
						"content": `{"type":"doc","content":[{"type":"paragraph","content":[{"type":"text","text":"hand-edited"}]}]}`,
					},
				},
			)
			require.Error(t, err)
			assert.Contains(t, err.Error(), "generated")
		},
	)

	t.Run(
		"re-publish preserves edited title, type, and classification",
		func(t *testing.T) {
			t.Parallel()

			frameworkID := factory.NewFramework(owner).Create()
			controlID := factory.NewControl(owner, frameworkID).Create()

			soaID := factory.NewStatementOfApplicability(owner).Create()
			factory.CreateApplicabilityStatement(owner, soaID, controlID, true, nil)

			const publishSOAQuery = `
				mutation($input: PublishStatementOfApplicabilityInput!) {
					publishStatementOfApplicability(input: $input) {
						documentEdge { node { id } }
						documentVersionEdge { node { id title documentType classification major minor } }
					}
				}
			`

			type publishSOAResult struct {
				PublishStatementOfApplicability struct {
					DocumentEdge struct {
						Node struct {
							ID string `json:"id"`
						} `json:"node"`
					} `json:"documentEdge"`
					DocumentVersionEdge struct {
						Node struct {
							ID             string `json:"id"`
							Title          string `json:"title"`
							DocumentType   string `json:"documentType"`
							Classification string `json:"classification"`
							Major          int    `json:"major"`
							Minor          int    `json:"minor"`
						} `json:"node"`
					} `json:"documentVersionEdge"`
				} `json:"publishStatementOfApplicability"`
			}

			var firstPublish publishSOAResult

			err := owner.Execute(
				publishSOAQuery,
				map[string]any{
					"input": map[string]any{
						"minor":                      false,
						"statementOfApplicabilityId": soaID,
					},
				},
				&firstPublish,
			)
			require.NoError(t, err)

			documentID := firstPublish.PublishStatementOfApplicability.DocumentEdge.Node.ID
			require.Equal(t, "STATEMENT_OF_APPLICABILITY", firstPublish.PublishStatementOfApplicability.DocumentVersionEdge.Node.DocumentType)
			require.Equal(t, "CONFIDENTIAL", firstPublish.PublishStatementOfApplicability.DocumentVersionEdge.Node.Classification)

			var editResult updateResult

			err = owner.Execute(
				updateQuery,
				map[string]any{
					"input": map[string]any{
						"id":             documentID,
						"title":          "Custom SOA Name",
						"documentType":   "POLICY",
						"classification": "INTERNAL",
					},
				},
				&editResult,
			)
			require.NoError(t, err)
			require.NotNil(t, editResult.UpdateDocument.DocumentVersion)
			require.Equal(t, "DRAFT", editResult.UpdateDocument.DocumentVersion.Status)

			const publishDraftQuery = `
				mutation($input: PublishDocumentInput!) {
					publishDocument(input: $input) {
						documentVersion { id title documentType classification major minor status }
					}
				}
			`

			var publishDraft struct {
				PublishDocument struct {
					DocumentVersion struct {
						ID             string `json:"id"`
						Title          string `json:"title"`
						DocumentType   string `json:"documentType"`
						Classification string `json:"classification"`
						Major          int    `json:"major"`
						Minor          int    `json:"minor"`
						Status         string `json:"status"`
					} `json:"documentVersion"`
				} `json:"publishDocument"`
			}

			err = owner.Execute(
				publishDraftQuery,
				map[string]any{
					"input": map[string]any{
						"documentId": documentID,
						"minor":      true,
						"changelog":  "rename",
					},
				},
				&publishDraft,
			)
			require.NoError(t, err)
			require.Equal(t, "PUBLISHED", publishDraft.PublishDocument.DocumentVersion.Status)
			require.Equal(t, "Custom SOA Name", publishDraft.PublishDocument.DocumentVersion.Title)
			require.Equal(t, "POLICY", publishDraft.PublishDocument.DocumentVersion.DocumentType)
			require.Equal(t, "INTERNAL", publishDraft.PublishDocument.DocumentVersion.Classification)

			var rePublish publishSOAResult

			err = owner.Execute(
				publishSOAQuery,
				map[string]any{
					"input": map[string]any{
						"minor":                      true,
						"statementOfApplicabilityId": soaID,
					},
				},
				&rePublish,
			)
			require.NoError(t, err)

			node := rePublish.PublishStatementOfApplicability.DocumentVersionEdge.Node
			assert.Equal(t, "Custom SOA Name", node.Title, "re-publish should preserve edited title")
			assert.Equal(t, "POLICY", node.DocumentType, "re-publish should preserve edited type")
			assert.Equal(t, "INTERNAL", node.Classification, "re-publish should preserve edited classification")
		},
	)
}

func TestStatementOfApplicability_TenantIsolation(t *testing.T) {
	t.Parallel()

	org1Owner := testutil.NewClient(t, testutil.RoleOwner)
	org2Owner := testutil.NewClient(t, testutil.RoleOwner)

	soaID := factory.NewStatementOfApplicability(org1Owner).Create()

	t.Run(
		"cannot create document for another org SOA",
		func(t *testing.T) {
			t.Parallel()

			const query = `
				mutation($input: PublishStatementOfApplicabilityInput!) {
					publishStatementOfApplicability(input: $input) {
						documentEdge {
							node { id }
						}
						documentVersionEdge {
							node { id }
						}
					}
				}
			`

			err := org2Owner.ExecuteShouldFail(
				query,
				map[string]any{
					"input": map[string]any{
						"minor":                      false,
						"statementOfApplicabilityId": soaID,
					},
				},
			)
			require.Error(t, err)
		},
	)

	t.Run(
		"cannot create applicability statement referencing a control from another organization",
		func(t *testing.T) {
			t.Parallel()

			org2FrameworkID := factory.CreateFramework(org2Owner)
			org2ControlID := factory.CreateControl(org2Owner, org2FrameworkID)

			_, err := org1Owner.Do(`
				mutation($input: CreateApplicabilityStatementInput!) {
					createApplicabilityStatement(input: $input) {
						applicabilityStatementEdge { node { id } }
					}
				}
			`, map[string]any{
				"input": map[string]any{
					"statementOfApplicabilityId": soaID,
					"controlId":                  org2ControlID,
					"applicability":              true,
				},
			})
			require.Error(t, err, "must not accept a controlId belonging to another organization")
		},
	)
}