From 6b1e592cbc7b1412da5f6d0badeaf1083117c762 Mon Sep 17 00:00:00 2001
From: xuri <xuri.me@gmail.com>
Date: Sun, 26 Dec 2021 14:55:53 +0800
Subject: This closes #1095, support to set and get document application
 properties

---
 docProps_test.go | 45 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 45 insertions(+)

(limited to 'docProps_test.go')

diff --git a/docProps_test.go b/docProps_test.go
index df1b6c6..a5c35f7 100644
--- a/docProps_test.go
+++ b/docProps_test.go
@@ -20,6 +20,51 @@ import (
 
 var MacintoshCyrillicCharset = []byte{0x8F, 0xF0, 0xE8, 0xE2, 0xE5, 0xF2, 0x20, 0xEC, 0xE8, 0xF0}
 
+func TestSetAppProps(t *testing.T) {
+	f, err := OpenFile(filepath.Join("test", "Book1.xlsx"))
+	if !assert.NoError(t, err) {
+		t.FailNow()
+	}
+	assert.NoError(t, f.SetAppProps(&AppProperties{
+		Application:       "Microsoft Excel",
+		ScaleCrop:         true,
+		DocSecurity:       3,
+		Company:           "Company Name",
+		LinksUpToDate:     true,
+		HyperlinksChanged: true,
+		AppVersion:        "16.0000",
+	}))
+	assert.NoError(t, f.SaveAs(filepath.Join("test", "TestSetAppProps.xlsx")))
+	f.Pkg.Store("docProps/app.xml", nil)
+	assert.NoError(t, f.SetAppProps(&AppProperties{}))
+	assert.NoError(t, f.Close())
+
+	// Test unsupported charset
+	f = NewFile()
+	f.Pkg.Store("docProps/app.xml", MacintoshCyrillicCharset)
+	assert.EqualError(t, f.SetAppProps(&AppProperties{}), "xml decode error: XML syntax error on line 1: invalid UTF-8")
+}
+
+func TestGetAppProps(t *testing.T) {
+	f, err := OpenFile(filepath.Join("test", "Book1.xlsx"))
+	if !assert.NoError(t, err) {
+		t.FailNow()
+	}
+	props, err := f.GetAppProps()
+	assert.NoError(t, err)
+	assert.Equal(t, props.Application, "Microsoft Macintosh Excel")
+	f.Pkg.Store("docProps/app.xml", nil)
+	_, err = f.GetAppProps()
+	assert.NoError(t, err)
+	assert.NoError(t, f.Close())
+
+	// Test unsupported charset
+	f = NewFile()
+	f.Pkg.Store("docProps/app.xml", MacintoshCyrillicCharset)
+	_, err = f.GetAppProps()
+	assert.EqualError(t, err, "xml decode error: XML syntax error on line 1: invalid UTF-8")
+}
+
 func TestSetDocProps(t *testing.T) {
 	f, err := OpenFile(filepath.Join("test", "Book1.xlsx"))
 	if !assert.NoError(t, err) {
-- 
cgit v1.2.1