Źródło

   #include <stdio.h>
   #include <sys/types.h>
   #include <sys/ipc.h>
   #include <sys/shm.h>
   
   #define SEGSIZE 100
   
   main(int argc, char *argv[])
   {
           key_t key;
           int   shmid, cntr;
           char  *segptr;
   
           if(argc == 1)
                   usage();
   
           /* utwórz unikalny klucz poprzez wywołanie ftok() */
           key = ftok(".", 'S');
   
           /* otwórz segment pamięci dzielonej - utwórz jeżeli trzeba */
           if((shmid = shmget(key, SEGSIZE, IPC_CREAT|IPC_EXCL|0666)) == -1) 
           {
                   printf("Segment pamięci dzielonej istnieje - otwieram jako klient");
   
                   /* Segment prawdopodobnie istnieje - próbuję otworzyć jako klient */
                   if((shmid = shmget(key, SEGSIZE, 0)) == -1) 
                   {
                           perror("shmget");
                           exit(1);
                   }
           }
           else
           {
                   printf("Tworzenie nowego segmentu pamięci dzielonej\n");
           }
   
           /* Podłącz ( mapuj ) segment pamięci dzielonej do tego procesu */
           if((segptr = shmat(shmid, 0, 0)) == -1)
           {
                   perror("shmat");
                   exit(1);
           }
           
           switch(tolower(argv[1][0]))
           {
                   case 'z': writeshm(shmid, segptr, argv[2]);
                             break;
                   case 'o': readshm(shmid, segptr);
                             break;
                   case 'u': removeshm(shmid);
                             break;
                   case 't': changemode(shmid, argv[2]);
                             break;
                    default: usage();
   
           }
   }
   
   writeshm(int shmid, char *segptr, char *text)
   {
           strcpy(segptr, text);
           printf("Zrobiono...\n");
   }
   
   readshm(int shmid, char *segptr)
   {
           printf("segptr: %s\n", segptr);
   }
   
   removeshm(int shmid)
   {
           shmctl(shmid, IPC_RMID, 0);
           printf("Segment pamięci dzielonej ustawiony do usunięcia\n");
   }
   
   changemode(int shmid, char *mode) 
   {
           struct shmid_ds myshmds;
   
           /* pobierz aktualne wartości wewnętrznej struktury danych */
           shmctl(shmid, IPC_STAT, &myshmds);
   
           /* wyświetl stare prawa dostępu */
           printf("Stare prawa dostępu: %o\n", myshmds.shm_perm.mode);
   
           /* konwertuj i załaduj prawa dostępu */ 
           sscanf(mode, "%o", &myshmds.shm_perm.mode);
   
           /* aktualizuj tryb */
           shmctl(shmid, IPC_SET, &myshmds);
   
           printf("Nowe prawa dostępu : %o\n", myshmds.shm_perm.mode);
   }
   
   usage()
   {
           fprintf(stderr, "shmtool - narzędzie do majstrowania segmentem pamięci dzielonej\n");
           fprintf(stderr, "\nUŻYCIE:  shmtool (z)apisz <text>\n");
           fprintf(stderr, "                 (o)dczytaj\n");
           fprintf(stderr, "                 (u)suń\n");
           fprintf(stderr, "                 (t)ryb <tryb ósemkowo>\n");
           exit(1);
   }