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 
  25 #include "precompiled.hpp"
  26 #include "runtime/arguments.hpp"
  27 #include "runtime/commandLineFlagConstraintsRuntime.hpp"
  28 #include "runtime/globals.hpp"
  29 #include "utilities/defaultStream.hpp"
  30 
  31 Flag::Error ObjectAlignmentInBytesConstraintFunc(bool verbose, intx* value) {
  32   if (!is_power_of_2(*value)) {
  33     if (verbose == true) {
  34       jio_fprintf(defaultStream::error_stream(),
  35                 "ObjectAlignmentInBytes=" INTX_FORMAT " must be power of 2\n",
  36                 *value);
  37     }








  38     return Flag::VIOLATES_CONSTRAINT;
  39   }
  40   // In case page size is very small.
  41   if (*value >= (intx)os::vm_page_size()) {
  42     if (verbose == true) {
  43       jio_fprintf(defaultStream::error_stream(),
  44                 "ObjectAlignmentInBytes=" INTX_FORMAT " must be less than page size " INTX_FORMAT "\n",
  45                 *value, (intx)os::vm_page_size());
  46     }
  47     return Flag::VIOLATES_CONSTRAINT;
  48   }
  49   return Flag::SUCCESS;
  50 }
  51 
  52 // Need to enforce the padding not to break the existing field alignments.
  53 // It is sufficient to check against the largest type size.
  54 Flag::Error ContendedPaddingWidthConstraintFunc(bool verbose, intx* value) {
  55   if ((*value != 0) && ((*value % BytesPerLong) != 0)) {
  56     if (verbose == true) {
  57       jio_fprintf(defaultStream::error_stream(),
  58                 "ContendedPaddingWidth=" INTX_FORMAT " must be a multiple of %d\n",
  59                 *value, BytesPerLong);
  60     }
  61     return Flag::VIOLATES_CONSTRAINT;
  62   } else {
  63     return Flag::SUCCESS;
  64   }
  65 }

  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 
  25 #include "precompiled.hpp"
  26 #include "runtime/arguments.hpp"
  27 #include "runtime/commandLineFlagConstraintsRuntime.hpp"
  28 #include "runtime/globals.hpp"
  29 #include "utilities/defaultStream.hpp"
  30 
  31 static void print_error_if_needed(bool verbose, const char* msg, ...) {
  32   if (verbose) {
  33     va_list listPointer;
  34     va_start(listPointer, msg);
  35     jio_vfprintf(defaultStream::error_stream(), msg, listPointer);
  36     va_end(listPointer);
  37   }
  38 }
  39 
  40 Flag::Error ObjectAlignmentInBytesConstraintFunc(bool verbose, intx value) {
  41   if (!is_power_of_2(value)) {
  42     print_error_if_needed(verbose,
  43                           "ObjectAlignmentInBytes=" INTX_FORMAT " must be "
  44                           "power of 2\n",
  45                           value);
  46     return Flag::VIOLATES_CONSTRAINT;
  47   }
  48   // In case page size is very small.
  49   if (value >= (intx)os::vm_page_size()) {
  50     print_error_if_needed(verbose,
  51                           "ObjectAlignmentInBytes=" INTX_FORMAT " must be "
  52                           "less than page size " INTX_FORMAT "\n",
  53                           value, (intx)os::vm_page_size());

  54     return Flag::VIOLATES_CONSTRAINT;
  55   }
  56   return Flag::SUCCESS;
  57 }
  58 
  59 // Need to enforce the padding not to break the existing field alignments.
  60 // It is sufficient to check against the largest type size.
  61 Flag::Error ContendedPaddingWidthConstraintFunc(bool verbose, intx value) {
  62   if ((value != 0) && ((value % BytesPerLong) != 0)) {
  63     print_error_if_needed(verbose,
  64                           "ContendedPaddingWidth=" INTX_FORMAT " must be "
  65                           "a multiple of %d\n",
  66                           value, BytesPerLong);

  67     return Flag::VIOLATES_CONSTRAINT;
  68   } else {
  69     return Flag::SUCCESS;
  70   }
  71 }