1 /*

     2  * Copyright (c) 2016, Oracle and/or its affiliates. All rights reserved.

     3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

     4  *

     5  * This code is free software; you can redistribute it and/or modify it

     6  * under the terms of the GNU General Public License version 2 only, as

     7  * published by the Free Software Foundation.

     8  *

     9  * This code is distributed in the hope that it will be useful, but WITHOUT

    10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

    11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

    12  * version 2 for more details (a copy is included in the LICENSE file that

    13  * accompanied this code).

    14  *

    15  * You should have received a copy of the GNU General Public License version

    16  * 2 along with this work; if not, write to the Free Software Foundation,

    17  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

    18  *

    19  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

    20  * or visit www.oracle.com if you need additional information or have any

    21  * questions.

    22  */

    23 

    24 #include "precompiled.hpp"

    25 #include "memory/allocation.hpp"

    26 #include "memory/metachunk.hpp"

    27 #include "unittest.hpp"

    28 #include "utilities/align.hpp"

    29 #include "utilities/copy.hpp"

    30 #include "utilities/debug.hpp"

    31 

    32 class MetachunkTest {

    33  public:

    34   static MetaWord* initial_top(Metachunk* metachunk) {

    35     return metachunk->initial_top();

    36   }

    37   static MetaWord* top(Metachunk* metachunk) {

    38     return metachunk->top();

    39   }

    40 

    41 };

    42 

    43 TEST(Metachunk, basic) {

    44   size_t size = 2 * 1024 * 1024;

    45   void* memory = malloc(size);

    46   ASSERT_TRUE(NULL != memory) << "Failed to malloc 2MB";

    47 

    48   Metachunk* metachunk = ::new (memory) Metachunk(size / BytesPerWord, NULL);

    49 

    50   EXPECT_EQ((MetaWord*) metachunk, metachunk->bottom());

    51   EXPECT_EQ((uintptr_t*) metachunk + metachunk->size(), metachunk->end());

    52 

    53   // Check sizes

    54   EXPECT_EQ(metachunk->size(), metachunk->word_size());

    55   EXPECT_EQ(pointer_delta(metachunk->end(), metachunk->bottom(),

    56                 sizeof (MetaWord*)),

    57             metachunk->word_size());

    58 

    59   // Check usage

    60   EXPECT_EQ(metachunk->used_word_size(), metachunk->overhead());

    61   EXPECT_EQ(metachunk->word_size() - metachunk->used_word_size(),

    62             metachunk->free_word_size());

    63   EXPECT_EQ(MetachunkTest::top(metachunk), MetachunkTest::initial_top(metachunk));

    64   EXPECT_TRUE(metachunk->is_empty());

    65 

    66   // Allocate

    67   size_t alloc_size = 64; // Words

    68   EXPECT_TRUE(is_aligned(alloc_size, Metachunk::object_alignment()));

    69 

    70   MetaWord* mem = metachunk->allocate(alloc_size);

    71 

    72   // Check post alloc

    73   EXPECT_EQ(MetachunkTest::initial_top(metachunk), mem);

    74   EXPECT_EQ(MetachunkTest::top(metachunk), mem + alloc_size);

    75   EXPECT_EQ(metachunk->overhead() + alloc_size, metachunk->used_word_size());

    76   EXPECT_EQ(metachunk->word_size() - metachunk->used_word_size(),

    77             metachunk->free_word_size());

    78   EXPECT_FALSE(metachunk->is_empty());

    79 

    80   // Clear chunk

    81   metachunk->reset_empty();

    82 

    83   // Check post clear

    84   EXPECT_EQ(metachunk->used_word_size(), metachunk->overhead());

    85   EXPECT_EQ(metachunk->word_size() - metachunk->used_word_size(),

    86             metachunk->free_word_size());

    87   EXPECT_EQ(MetachunkTest::top(metachunk), MetachunkTest::initial_top(metachunk));

    88   EXPECT_TRUE(metachunk->is_empty());

    89 

    90   free(memory);

    91 }