oox/qa/unit/vba_encryption.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  */
   9
  10 #include <cppunit/plugin/TestPlugIn.h>
  11 #include <cppunit/extensions/HelperMacros.h>
  12 #include <cppunit/TestFixture.h>
  13
  14 #include <oox/ole/vbaexport.hxx>
  15 #include <algorithm>
  16
  17 class TestVbaEncryption : public CppUnit::TestFixture
  18 {
  19 public:
  20
  21 #if 0
  22     // an initial test for the encryption taken from the spec
  23     void testSimple1();
  24
  25     void testSimple2();
  26 #endif
  27
  28     void testProjKey1();
  29
  30     CPPUNIT_TEST_SUITE(TestVbaEncryption);
  31     // CPPUNIT_TEST(testSimple1);
  32     // CPPUNIT_TEST(testSimple2);
  33     CPPUNIT_TEST(testProjKey1);
  34     CPPUNIT_TEST_SUITE_END();
  35 };
  36
  37 #if 0
  38 void TestVbaEncryption::testSimple1()
  39 {
  40     sal_uInt8 nSeed = 0x07;
  41     sal_uInt8 nProjKey = 0xDF;
  42     sal_uInt16 nLength = 0x04;
  43     sal_uInt8 pData[] = { 0x00, 0x00, 0x00, 0x00 };
  44
  45     SvMemoryStream aEncryptedStream(4096, 4096);
  46     VBAEncryption aEncryption(pData, nLength, aEncryptedStream,
  47             &nSeed, nProjKey);
  48     aEncryption.write();
  49 }
  50
  51 void TestVbaEncryption::testSimple2()
  52 {
  53     sal_uInt8 nSeed = 0x15;
  54     sal_uInt8 nProjKey = 0xDF;
  55     sal_uInt16 nLength = 0x01;
  56     sal_uInt8 pData[] = { 0xFF };
  57
  58     SvMemoryStream aEncryptedStream(4096, 4096);
  59     VBAEncryption aEncryption(pData, nLength, aEncryptedStream,
  60             &nSeed, nProjKey);
  61     aEncryption.write();
  62     sal_uInt8 pExpectedData[] = "1517CAF1D6F9D7F9D706";
  63     size_t length = sizeof(pExpectedData);
  64     aEncryptedStream.Seek(0);
  65     for (size_t i = 0; i < length; ++i)
  66     {
  67         unsigned char val = 0;
  68         aEncryptedStream.ReadUChar(val);
  69         CPPUNIT_ASSERT_EQUAL((int)pExpectedData[i], (int)sal_uInt8(val));
  70     }
  71 }
  72 #endif
  73
  74 void TestVbaEncryption::testProjKey1()
  75 {
  76     OUString const aProjectID("{917DED54-440B-4FD1-A5C1-74ACF261E600}");
  77     sal_uInt8 nProjKey = VBAEncryption::calculateProjKey(aProjectID);
  78     CPPUNIT_ASSERT_EQUAL(int(0xdf), static_cast<int>(nProjKey));
  79 }
  80
  81 CPPUNIT_TEST_SUITE_REGISTRATION(TestVbaEncryption);
  82
  83 CPPUNIT_PLUGIN_IMPLEMENT();
  84
  85 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */