90 lines
2.6 KiB
C
90 lines
2.6 KiB
C
|
/*************************************************************************/
|
||
|
|
/* */
|
||
|
|
/* Copyright (c) 1994 Stanford University */
|
||
|
|
/* */
|
||
|
|
/* All rights reserved. */
|
||
|
|
/* */
|
||
|
|
/* Permission is given to use, copy, and modify this software for any */
|
||
|
|
/* non-commercial purpose as long as this copyright notice is not */
|
||
|
|
/* removed. All other uses, including redistribution in whole or in */
|
||
|
|
/* part, are forbidden without prior written permission. */
|
||
|
|
/* */
|
||
|
|
/* This software is provided with absolutely no warranty and no */
|
||
|
|
/* support. */
|
||
|
|
/* */
|
||
|
|
/*************************************************************************/
|
||
|
|
|
||
|
|
#include <malloc.h>
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <sys/ipc.h>
|
||
|
|
#include <sys/shm.h>
|
||
|
|
#include <sys/sysmp.h>
|
||
|
|
#include <sys/time.h>
|
||
|
|
#include <sys/types.h>
|
||
|
|
#include <ulocks.h>
|
||
|
|
|
||
|
|
static char *shmfile = 0;
|
||
|
|
static int shmid;
|
||
|
|
static void *shmvaddr;
|
||
|
|
static void *ap;
|
||
|
|
|
||
|
|
void
|
||
|
|
anl_shmem_init(size_t shmsize)
|
||
|
|
{
|
||
|
|
key_t shmkey;
|
||
|
|
usptr_t *usptr;
|
||
|
|
|
||
|
|
shmkey = (key_t)getpid();
|
||
|
|
shmkey = (shmkey<<16)|shmkey;
|
||
|
|
|
||
|
|
if ((shmid=shmget(shmkey, shmsize, IPC_CREAT|SHM_R|SHM_W|044)) == -1){
|
||
|
|
perror("shmget");
|
||
|
|
exit(1);
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* The segment needs to be attached only once; all
|
||
|
|
* attached shared memory segments are inherited by
|
||
|
|
* forked off processes.
|
||
|
|
*/
|
||
|
|
|
||
|
|
if ((shmvaddr=shmat(shmid, (void *)0, 0)) == (void *)(-1)){
|
||
|
|
perror("shmat");
|
||
|
|
exit(1);
|
||
|
|
}
|
||
|
|
|
||
|
|
shmfile = mktemp("/tmp/shmXXXXXX");
|
||
|
|
if ((usptr=usinit(shmfile)) == NULL){
|
||
|
|
perror("usinit");
|
||
|
|
exit(1);
|
||
|
|
}
|
||
|
|
|
||
|
|
if ((ap=acreate(shmvaddr, shmsize, MEM_SHARED, usptr, NULL)) == NULL){
|
||
|
|
perror("acreate");
|
||
|
|
exit(1);
|
||
|
|
}
|
||
|
|
|
||
|
|
printf("shmid 0x%x shmvaddr 0x%x\n", shmid, shmvaddr);
|
||
|
|
}
|
||
|
|
|
||
|
|
void *
|
||
|
|
anl_malloc(size_t size)
|
||
|
|
{
|
||
|
|
return( amalloc(size, ap) );
|
||
|
|
}
|
||
|
|
|
||
|
|
void
|
||
|
|
anl_free(void *ptr)
|
||
|
|
{
|
||
|
|
afree(ptr, ap);
|
||
|
|
}
|
||
|
|
|
||
|
|
void
|
||
|
|
anl_shmem_end()
|
||
|
|
{
|
||
|
|
adelete(ap);
|
||
|
|
shmctl(shmid, IPC_RMID);
|
||
|
|
unlink(shmfile);
|
||
|
|
}
|
||
|
|
|