1251876Speter/* Licensed to the Apache Software Foundation (ASF) under one or more 2251876Speter * contributor license agreements. See the NOTICE file distributed with 3251876Speter * this work for additional information regarding copyright ownership. 4251876Speter * The ASF licenses this file to You under the Apache License, Version 2.0 5251876Speter * (the "License"); you may not use this file except in compliance with 6251876Speter * the License. You may obtain a copy of the License at 7251876Speter * 8251876Speter * http://www.apache.org/licenses/LICENSE-2.0 9251876Speter * 10251876Speter * Unless required by applicable law or agreed to in writing, software 11251876Speter * distributed under the License is distributed on an "AS IS" BASIS, 12251876Speter * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 13251876Speter * See the License for the specific language governing permissions and 14251876Speter * limitations under the License. 15251876Speter */ 16251876Speter 17251876Speter#include "apr_shm.h" 18251876Speter#include "apr_rmm.h" 19251876Speter#include "apr_errno.h" 20251876Speter#include "apr_general.h" 21251876Speter#include "apr_lib.h" 22251876Speter#include "apr_strings.h" 23251876Speter#include "apr_time.h" 24251876Speter#include "abts.h" 25251876Speter#include "testutil.h" 26251876Speter 27251876Speter#if APR_HAS_SHARED_MEMORY 28251876Speter 29251876Speter#define FRAG_SIZE 80 30251876Speter#define FRAG_COUNT 10 31251876Speter#define SHARED_SIZE (apr_size_t)(FRAG_SIZE * FRAG_COUNT * sizeof(char*)) 32251876Speter 33251876Speterstatic void test_rmm(abts_case *tc, void *data) 34251876Speter{ 35251876Speter apr_status_t rv; 36251876Speter apr_pool_t *pool; 37251876Speter apr_shm_t *shm; 38251876Speter apr_rmm_t *rmm; 39251876Speter apr_size_t size, fragsize; 40251876Speter apr_rmm_off_t *off, off2; 41251876Speter int i; 42251876Speter void *entity; 43251876Speter 44251876Speter rv = apr_pool_create(&pool, p); 45251876Speter ABTS_INT_EQUAL(tc, APR_SUCCESS, rv); 46251876Speter 47251876Speter /* We're going to want 10 blocks of data from our target rmm. */ 48251876Speter size = SHARED_SIZE + apr_rmm_overhead_get(FRAG_COUNT + 1); 49251876Speter rv = apr_shm_create(&shm, size, NULL, pool); 50251876Speter ABTS_INT_EQUAL(tc, APR_SUCCESS, rv); 51251876Speter 52251876Speter if (rv != APR_SUCCESS) 53251876Speter return; 54251876Speter 55251876Speter rv = apr_rmm_init(&rmm, NULL, apr_shm_baseaddr_get(shm), size, pool); 56251876Speter ABTS_INT_EQUAL(tc, APR_SUCCESS, rv); 57251876Speter 58251876Speter if (rv != APR_SUCCESS) 59251876Speter return; 60251876Speter 61251876Speter /* Creating each fragment of size fragsize */ 62251876Speter fragsize = SHARED_SIZE / FRAG_COUNT; 63251876Speter off = apr_palloc(pool, FRAG_COUNT * sizeof(apr_rmm_off_t)); 64251876Speter for (i = 0; i < FRAG_COUNT; i++) { 65251876Speter off[i] = apr_rmm_malloc(rmm, fragsize); 66251876Speter } 67251876Speter 68251876Speter /* Checking for out of memory allocation */ 69251876Speter off2 = apr_rmm_malloc(rmm, FRAG_SIZE * FRAG_COUNT); 70251876Speter ABTS_TRUE(tc, !off2); 71251876Speter 72251876Speter /* Checking each fragment for address alignment */ 73251876Speter for (i = 0; i < FRAG_COUNT; i++) { 74251876Speter char *c = apr_rmm_addr_get(rmm, off[i]); 75251876Speter apr_size_t sc = (apr_size_t)c; 76251876Speter 77251876Speter ABTS_TRUE(tc, !!off[i]); 78251876Speter ABTS_TRUE(tc, !(sc & 7)); 79251876Speter } 80251876Speter 81251876Speter /* Setting each fragment to a unique value */ 82251876Speter for (i = 0; i < FRAG_COUNT; i++) { 83251876Speter int j; 84251876Speter char **c = apr_rmm_addr_get(rmm, off[i]); 85251876Speter for (j = 0; j < FRAG_SIZE; j++, c++) { 86251876Speter *c = apr_itoa(pool, i + j); 87251876Speter } 88251876Speter } 89251876Speter 90251876Speter /* Checking each fragment for its unique value */ 91251876Speter for (i = 0; i < FRAG_COUNT; i++) { 92251876Speter int j; 93251876Speter char **c = apr_rmm_addr_get(rmm, off[i]); 94251876Speter for (j = 0; j < FRAG_SIZE; j++, c++) { 95251876Speter char *d = apr_itoa(pool, i + j); 96251876Speter ABTS_STR_EQUAL(tc, d, *c); 97251876Speter } 98251876Speter } 99251876Speter 100251876Speter /* Freeing each fragment */ 101251876Speter for (i = 0; i < FRAG_COUNT; i++) { 102251876Speter rv = apr_rmm_free(rmm, off[i]); 103251876Speter ABTS_INT_EQUAL(tc, APR_SUCCESS, rv); 104251876Speter } 105251876Speter 106251876Speter /* Creating one large segment */ 107251876Speter off[0] = apr_rmm_calloc(rmm, SHARED_SIZE); 108251876Speter 109251876Speter /* Setting large segment */ 110251876Speter for (i = 0; i < FRAG_COUNT * FRAG_SIZE; i++) { 111251876Speter char **c = apr_rmm_addr_get(rmm, off[0]); 112251876Speter c[i] = apr_itoa(pool, i); 113251876Speter } 114251876Speter 115251876Speter /* Freeing large segment */ 116251876Speter rv = apr_rmm_free(rmm, off[0]); 117251876Speter ABTS_INT_EQUAL(tc, APR_SUCCESS, rv); 118251876Speter 119251876Speter /* Creating each fragment of size fragsize */ 120251876Speter for (i = 0; i < FRAG_COUNT; i++) { 121251876Speter off[i] = apr_rmm_malloc(rmm, fragsize); 122251876Speter } 123251876Speter 124251876Speter /* Freeing each fragment backwards */ 125251876Speter for (i = FRAG_COUNT - 1; i >= 0; i--) { 126251876Speter rv = apr_rmm_free(rmm, off[i]); 127251876Speter ABTS_INT_EQUAL(tc, APR_SUCCESS, rv); 128251876Speter } 129251876Speter 130251876Speter /* Creating one large segment (again) */ 131251876Speter off[0] = apr_rmm_calloc(rmm, SHARED_SIZE); 132251876Speter 133251876Speter /* Freeing large segment */ 134251876Speter rv = apr_rmm_free(rmm, off[0]); 135251876Speter ABTS_INT_EQUAL(tc, APR_SUCCESS, rv); 136251876Speter 137251876Speter /* Checking realloc */ 138251876Speter off[0] = apr_rmm_calloc(rmm, SHARED_SIZE - 100); 139251876Speter off[1] = apr_rmm_calloc(rmm, 100); 140251876Speter ABTS_TRUE(tc, !!off[0]); 141251876Speter ABTS_TRUE(tc, !!off[1]); 142251876Speter 143251876Speter entity = apr_rmm_addr_get(rmm, off[1]); 144251876Speter rv = apr_rmm_free(rmm, off[0]); 145251876Speter ABTS_INT_EQUAL(tc, APR_SUCCESS, rv); 146251876Speter 147251876Speter { 148251876Speter unsigned char *c = entity; 149251876Speter 150251876Speter /* Fill in the region; the first half with zereos, which will 151251876Speter * likely catch the apr_rmm_realloc offset calculation bug by 152251876Speter * making it think the old region was zero length. */ 153251876Speter for (i = 0; i < 100; i++) { 154251876Speter c[i] = (i < 50) ? 0 : i; 155251876Speter } 156251876Speter } 157251876Speter 158251876Speter /* now we can realloc off[1] and get many more bytes */ 159251876Speter off[0] = apr_rmm_realloc(rmm, entity, SHARED_SIZE - 100); 160251876Speter ABTS_TRUE(tc, !!off[0]); 161251876Speter 162251876Speter { 163251876Speter unsigned char *c = apr_rmm_addr_get(rmm, off[0]); 164251876Speter 165251876Speter /* fill in the region */ 166251876Speter for (i = 0; i < 100; i++) { 167251876Speter ABTS_TRUE(tc, c[i] == (i < 50 ? 0 : i)); 168251876Speter } 169251876Speter } 170251876Speter 171251876Speter rv = apr_rmm_destroy(rmm); 172251876Speter ABTS_INT_EQUAL(tc, APR_SUCCESS, rv); 173251876Speter 174251876Speter rv = apr_shm_destroy(shm); 175251876Speter ABTS_INT_EQUAL(tc, APR_SUCCESS, rv); 176251876Speter 177251876Speter apr_pool_destroy(pool); 178251876Speter} 179251876Speter 180251876Speter#endif /* APR_HAS_SHARED_MEMORY */ 181251876Speter 182251876Speterabts_suite *testrmm(abts_suite *suite) 183251876Speter{ 184251876Speter suite = ADD_SUITE(suite); 185251876Speter 186251876Speter#if APR_HAS_SHARED_MEMORY 187251876Speter abts_run_test(suite, test_rmm, NULL); 188251876Speter#endif 189251876Speter 190251876Speter return suite; 191251876Speter} 192