23 #include <sys/types.h> 26 #include <netinet/in.h> 73 if ((fd = open (
"/proc/self/maps", 0)) < 0)
79 if (
unformat (&input,
"%llx-%llx", &start, &end))
86 count_leading_zeros (bits, end);
88 if (bits >= 36 && bits <= 48)
101 pthread_mutex_lock (&rp->
mutex);
124 for (i =
nheld - 1; i >= 0; i--)
128 for (j = i; j <
MAXLOCK - 1; j++)
138 pthread_mutex_unlock (&rp->
mutex);
152 s =
format (s,
"NODATA ");
164 if (size >= (1 << 20))
166 s =
format (s,
"(%d mb)", size >> 20);
168 else if (size >= (1 << 10))
170 s =
format (s,
"(%d kb)", size >> 10);
174 s =
format (s,
"(%d bytes)", size);
183 int verbose = va_arg (*args,
int);
187 s =
format (s,
"%s: base va 0x%x size 0x%x %U\n",
190 s =
format (s,
" user_ctx 0x%x, bitmap_size %d\n",
198 " region_heap 0x%x data_base 0x%x data_heap 0x%x\n",
213 s =
format (s,
" VM in use: ");
233 s =
format (s,
" 0x%x - 0x%x (%dk)\n", lo, hi,
291 if (fstat (fd, &statb) < 0)
298 if (statb.st_mode & S_IFREG)
300 if (statb.st_size == 0)
302 if (lseek (fd, map_size, SEEK_SET) == (off_t) - 1)
308 if (write (fd, &junk, 1) != 1)
325 ASSERT (map_size <= rp->virtual_size -
328 if (mmap (rp->
data_base, map_size, PROT_READ | PROT_WRITE,
329 MAP_SHARED | MAP_FIXED, fd, 0) == MAP_FAILED)
373 if (fstat (fd, &statb) < 0)
380 if (statb.st_mode & S_IFREG)
382 if (statb.st_size == 0)
384 if (lseek (fd, map_size, SEEK_SET) == (off_t) - 1)
390 if (write (fd, &junk, 1) != 1)
407 ASSERT (map_size <= rp->virtual_size
412 if (mmap (rp->
data_base, map_size, PROT_READ | PROT_WRITE,
413 MAP_SHARED | MAP_FIXED, fd, 0) == MAP_FAILED)
431 int root_path_offset = 0;
443 path =
format (0,
"/dev/shm/%s%c", &a->
root_path[root_path_offset], 0);
444 split_point = path + 1;
449 while (*split_point && *split_point !=
'/')
457 mkdir_arg[
vec_len (mkdir_arg) - 1] =
'-';
463 if (a->
name[0] ==
'/')
467 &a->
name[name_offset], 0);
477 pthread_mutexattr_t attr;
478 pthread_condattr_t cattr;
479 int nbits, words, bit;
486 memset (rp, 0,
sizeof (*rp));
488 if (pthread_mutexattr_init (&attr))
491 if (pthread_mutexattr_setpshared (&attr, PTHREAD_PROCESS_SHARED))
494 if (pthread_mutex_init (&rp->
mutex, &attr))
497 if (pthread_mutexattr_destroy (&attr))
500 if (pthread_condattr_init (&cattr))
503 if (pthread_condattr_setpshared (&cattr, PTHREAD_PROCESS_SHARED))
506 if (pthread_cond_init (&rp->
condvar, &cattr))
509 if (pthread_condattr_destroy (&cattr))
551 while (overhead_space > 0);
587 int pid_holding_region_lock;
589 int dead_region_recovery = 0;
592 struct timespec ts, tsrem;
601 getpid (), a->
name, shm_name);
603 svm_fd = shm_open ((
char *) shm_name, O_RDWR | O_CREAT | O_EXCL, 0777);
607 if (fchmod (svm_fd, S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP) < 0)
610 if (fchown (svm_fd, a->
uid, a->
gid) < 0)
615 if (lseek (svm_fd, a->
size, SEEK_SET) == (off_t) - 1)
621 if (write (svm_fd, &junk, 1) != 1)
629 PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FIXED, svm_fd, 0);
641 return ((
void *) rp);
645 svm_fd = shm_open ((
char *) shm_name, O_RDWR, 0777);
651 perror (
"svm_region_map(mmap open)");
658 if (0 != fstat (svm_fd, &stat))
664 if (stat.st_size > 0)
670 clib_warning (
"waiting for resize of shm file timed out");
675 ts.tv_nsec = 100000000;
676 while (nanosleep (&ts, &tsrem) < 0)
682 PROT_READ | PROT_WRITE, MAP_SHARED, svm_fd, 0);
694 while (rp->
version == 0 && deadman++ < 5)
706 munmap (rp, a->
size);
715 PROT_READ | PROT_WRITE,
716 MAP_SHARED | MAP_FIXED, svm_fd, 0);
736 if (pid_holding_region_lock && kill (pid_holding_region_lock, 0) < 0)
739 (
"region %s mutex held by dead pid %d, tag %d, force unlock",
742 rp->
mutex.__data.__owner = 0;
743 rp->
mutex.__data.__lock = 0;
744 dead_region_recovery = 1;
747 if (dead_region_recovery)
754 if (dead_region_recovery)
763 if (dead_region_recovery)
770 return ((
void *) rp);
780 for (i = 0; i <
nheld; i++)
791 uword randomize_baseva;
807 a->
baseva += randomize_baseva;
843 memset (a, 0,
sizeof (*a));
860 memset (a, 0,
sizeof (*a));
877 memset (a, 0,
sizeof (*a));
952 for (i = 0; i < (need_nbits - 1); i++)
965 while (index < root_rp->bitmap_size);
970 clib_warning (
"region %s: not enough VM to allocate 0x%llx (%lld)",
981 clib_warning (
"set %d bits at index %d", need_nbits, index);
984 for (i = 0; i < need_nbits; i++)
1025 clib_warning (
"[%d] shm_unlink (%s)", getpid (), shm_name);
1026 shm_unlink ((
const char *) shm_name);
1041 int i, mypid = getpid ();
1044 uword virtual_base, virtual_size;
1087 if (nclients_left == 0)
1089 int index, nbits,
i;
1108 clib_warning (
"clear %d bits at index %d", nbits, index);
1111 for (i = 0; i < nbits; i++)
1145 munmap ((
void *) virtual_base, virtual_size);
1154 munmap ((
void *) virtual_base, virtual_size);
1176 int i, mypid = getpid ();
1177 uword virtual_base, virtual_size;
1213 if (!is_client && vec_len (root_rp->
client_pids) == 0)
1220 munmap ((
void *) virtual_base, virtual_size);
1239 int mypid = getpid ();
1275 int mypid = getpid ();
1283 pthread_mutex_lock (&root_rp->
mutex);
1309 name = vec_dup (subp->subregion_name);
1310 vec_add1(svm_names, name);
1314 pthread_mutex_unlock (&root_rp->
mutex);
1316 for (i = 0; i <
vec_len (svm_names); i++)
1320 a->
name = (
char *) svm_names[i];
1324 pthread_mutex_lock (&rp->
mutex);
1328 pthread_mutex_unlock (&rp->
mutex);
#define vec_validate(V, I)
Make sure vector is long enough for given index (no header, unspecified alignment) ...
void svm_region_init_chroot_uid_gid(const char *root_path, int uid, int gid)
svm_region_t * svm_get_root_rp(void)
#define SVM_GLOBAL_REGION_NAME
static void svm_pop_heap(void *oldheap)
#define vec_c_string_is_terminated(V)
Test whether a vector is a NULL terminated c-string.
#define SVM_FLAGS_NEED_DATA_INIT
void * svm_map_region(svm_map_region_args_t *a)
Fixed length block allocator.
#define vec_add1(V, E)
Add 1 element to end of vector (unspecified alignment).
static u64 clib_cpu_time_now(void)
void svm_client_scan(const char *root_path)
#define SVM_PVT_MHEAP_SIZE
void svm_region_unmap_client(void *rp_arg)
#define hash_set_mem(h, key, value)
void svm_region_exit_client(void)
#define pool_get(P, E)
Allocate an object E from a pool P (unspecified alignment).
static u8 * format_svm_size(u8 *s, va_list *args)
static uword clib_bitmap_get_no_check(uword *ai, uword i)
Gets the ith bit value from a bitmap Does not sanity-check the bit position.
u8 * format_mheap(u8 *s, va_list *va)
#define clib_unix_error(format, args...)
static uword clib_bitmap_set_no_check(uword *a, uword i, uword new_value)
Sets the ith bit of a bitmap to new_value.
void svm_region_exit(void)
void svm_region_init(void)
#define pool_foreach(VAR, POOL, BODY)
Iterate through pool.
#define MHEAP_FLAG_DISABLE_VM
void * svm_region_find_or_create(svm_map_region_args_t *a)
static u64 rnd_pagesize(u64 size)
u8 * format_svm_region(u8 *s, va_list *args)
#define hash_create_string(elts, value_bytes)
static int svm_region_init_internal(svm_map_region_args_t *a)
#define hash_unset_mem(h, key)
#define pool_put(P, E)
Free an object E in pool P.
#define vec_dup(V)
Return copy of vector (no header, no alignment)
svm_subregion_t * subregions
void svm_region_init_args(svm_map_region_args_t *a)
#define SVM_GLOBAL_REGION_SIZE
void svm_region_init_mapped_region(svm_map_region_args_t *a, svm_region_t *rp)
#define uword_to_pointer(u, type)
static void * svm_push_pvt_heap(svm_region_t *rp)
static int root_rp_refcount
#define vec_free(V)
Free vector's memory (no header).
#define clib_warning(format, args...)
static pthread_mutex_t * mutexes_held[MAXLOCK]
u8 * shm_name_from_svm_map_region_args(svm_map_region_args_t *a)
static int svm_data_region_map(svm_map_region_args_t *a, svm_region_t *rp)
void * mheap_alloc_with_flags(void *memory, uword memory_size, uword flags)
#define vec_delete(V, N, M)
Delete N elements starting at element M.
static void region_lock(svm_region_t *rp, int tag)
u64 svm_get_global_region_base_va()
Bitmaps built as vectors of machine words.
static void region_unlock(svm_region_t *rp)
void svm_region_unmap_internal(void *rp_arg, u8 is_client)
void svm_region_unlink(svm_region_t *rp)
#define vec_len(v)
Number of elements in vector (rvalue-only, NULL tolerant)
#define clib_unix_warning(format, args...)
void svm_region_unmap(void *rp_arg)
void svm_client_scan_this_region_nolock(svm_region_t *rp)
#define hash_get_mem(h, key)
#define CLIB_MEMORY_BARRIER()
static int svm_data_region_create(svm_map_region_args_t *a, svm_region_t *rp)
static u8 * format_svm_flags(u8 *s, va_list *args)
static void svm_mutex_cleanup(void)
CLIB vectors are ubiquitous dynamically resized arrays with by user defined "headers".
static svm_region_t * root_rp
int svm_region_init_chroot(const char *root_path)
static void svm_region_exit_internal(u8 is_client)