23 #include <sys/types.h> 26 #include <netinet/in.h> 64 pthread_mutex_lock (&rp->
mutex);
87 for (i =
nheld - 1; i >= 0; i--)
91 for (j = i; j <
MAXLOCK - 1; j++)
101 pthread_mutex_unlock (&rp->
mutex);
115 s =
format (s,
"NODATA ");
127 if (size >= (1 << 20))
129 s =
format (s,
"(%d mb)", size >> 20);
131 else if (size >= (1 << 10))
133 s =
format (s,
"(%d kb)", size >> 10);
137 s =
format (s,
"(%d bytes)", size);
146 int verbose = va_arg (*args,
int);
150 s =
format (s,
"%s: base va 0x%x size 0x%x %U\n",
153 s =
format (s,
" user_ctx 0x%x, bitmap_size %d\n",
161 " region_heap 0x%x data_base 0x%x data_heap 0x%x\n",
176 s =
format (s,
" VM in use: ");
196 s =
format (s,
" 0x%x - 0x%x (%dk)\n", lo, hi,
254 if (fstat (fd, &statb) < 0)
261 if (statb.st_mode & S_IFREG)
263 if (statb.st_size == 0)
265 if (lseek (fd, map_size, SEEK_SET) == (off_t) - 1)
271 if (write (fd, &junk, 1) != 1)
288 ASSERT (map_size <= rp->virtual_size -
291 if (mmap (rp->
data_base, map_size, PROT_READ | PROT_WRITE,
292 MAP_SHARED | MAP_FIXED, fd, 0) == MAP_FAILED)
336 if (fstat (fd, &statb) < 0)
343 if (statb.st_mode & S_IFREG)
345 if (statb.st_size == 0)
347 if (lseek (fd, map_size, SEEK_SET) == (off_t) - 1)
353 if (write (fd, &junk, 1) != 1)
370 ASSERT (map_size <= rp->virtual_size
375 if (mmap (rp->
data_base, map_size, PROT_READ | PROT_WRITE,
376 MAP_SHARED | MAP_FIXED, fd, 0) == MAP_FAILED)
394 int root_path_offset = 0;
406 path =
format (0,
"/dev/shm/%s%c", &a->
root_path[root_path_offset], 0);
407 split_point = path + 1;
412 while (*split_point && *split_point !=
'/')
420 mkdir_arg[
vec_len (mkdir_arg) - 1] =
'-';
426 if (a->
name[0] ==
'/')
430 &a->
name[name_offset], 0);
440 pthread_mutexattr_t attr;
441 pthread_condattr_t cattr;
442 int nbits, words, bit;
449 memset (rp, 0,
sizeof (*rp));
451 if (pthread_mutexattr_init (&attr))
454 if (pthread_mutexattr_setpshared (&attr, PTHREAD_PROCESS_SHARED))
457 if (pthread_mutex_init (&rp->
mutex, &attr))
460 if (pthread_mutexattr_destroy (&attr))
463 if (pthread_condattr_init (&cattr))
466 if (pthread_condattr_setpshared (&cattr, PTHREAD_PROCESS_SHARED))
469 if (pthread_cond_init (&rp->
condvar, &cattr))
472 if (pthread_condattr_destroy (&cattr))
514 while (overhead_space > 0);
550 int pid_holding_region_lock;
552 int dead_region_recovery = 0;
555 struct timespec ts, tsrem;
564 getpid (), a->
name, shm_name);
566 svm_fd = shm_open ((
char *) shm_name, O_RDWR | O_CREAT | O_EXCL, 0777);
570 if (fchmod (svm_fd, S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP) < 0)
573 if (fchown (svm_fd, a->
uid, a->
gid) < 0)
578 if (lseek (svm_fd, a->
size, SEEK_SET) == (off_t) - 1)
584 if (write (svm_fd, &junk, 1) != 1)
592 PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FIXED, svm_fd, 0);
604 return ((
void *) rp);
608 svm_fd = shm_open ((
char *) shm_name, O_RDWR, 0777);
614 perror (
"svm_region_map(mmap open)");
621 if (0 != fstat (svm_fd, &stat))
627 if (stat.st_size > 0)
633 clib_warning (
"waiting for resize of shm file timed out");
638 ts.tv_nsec = 100000000;
639 while (nanosleep (&ts, &tsrem) < 0)
645 PROT_READ | PROT_WRITE, MAP_SHARED, svm_fd, 0);
657 while (rp->
version == 0 && deadman++ < 5)
669 munmap (rp, a->
size);
678 PROT_READ | PROT_WRITE,
679 MAP_SHARED | MAP_FIXED, svm_fd, 0);
697 if (pid_holding_region_lock && kill (pid_holding_region_lock, 0) < 0)
700 (
"region %s mutex held by dead pid %d, tag %d, force unlock",
703 rp->
mutex.__data.__owner = 0;
704 rp->
mutex.__data.__lock = 0;
705 dead_region_recovery = 1;
708 if (dead_region_recovery)
715 if (dead_region_recovery)
724 if (dead_region_recovery)
731 return ((
void *) rp);
741 for (i = 0; i <
nheld; i++)
752 uword randomize_baseva;
768 a->
baseva += randomize_baseva;
804 memset (a, 0,
sizeof (*a));
821 memset (a, 0,
sizeof (*a));
838 memset (a, 0,
sizeof (*a));
913 for (i = 0; i < (need_nbits - 1); i++)
926 while (index < root_rp->bitmap_size);
931 clib_warning (
"region %s: not enough VM to allocate 0x%llx (%lld)",
942 clib_warning (
"set %d bits at index %d", need_nbits, index);
945 for (i = 0; i < need_nbits; i++)
986 clib_warning (
"[%d] shm_unlink (%s)", getpid (), shm_name);
987 shm_unlink ((
const char *) shm_name);
1002 int i, mypid = getpid ();
1005 uword virtual_base, virtual_size;
1048 if (nclients_left == 0)
1050 int index, nbits,
i;
1069 clib_warning (
"clear %d bits at index %d", nbits, index);
1072 for (i = 0; i < nbits; i++)
1101 munmap ((
void *) virtual_base, virtual_size);
1110 munmap ((
void *) virtual_base, virtual_size);
1120 int i, mypid = getpid ();
1121 uword virtual_base, virtual_size;
1164 munmap ((
void *) virtual_base, virtual_size);
1171 int mypid = getpid ();
1207 int mypid = getpid ();
1215 pthread_mutex_lock (&root_rp->
mutex);
1241 name = vec_dup (subp->subregion_name);
1242 vec_add1(svm_names, name);
1246 pthread_mutex_unlock (&root_rp->
mutex);
1248 for (i = 0; i <
vec_len (svm_names); i++)
1252 a->
name = (
char *) svm_names[i];
1256 pthread_mutex_lock (&rp->
mutex);
1260 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
sll srl srl sll sra u16x4 i
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
#define hash_set_mem(h, key, value)
#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)
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_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)
#define SVM_GLOBAL_REGION_BASEVA
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)
Bitmaps built as vectors of machine words.
static void region_unlock(svm_region_t *rp)
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)