root/trunk/src/renetcolMsgCtl.c @ 12

Revision 2, 1.3 KB (checked in by andreu, 17 years ago)

First RENETCOL CVS Integration

  • Property svn:eol-style set to native
Line 
1/*
2 * File: renetcolMsgCtl.c
3 *
4 * Authors: ANDREU François-Xavier
5 *
6 * Copyright (C) 2005 GIP RENATER
7 */
8
9/*  This file is part of renetcol.
10 *
11 *  renetcol is free software; you can redistribute it and/or modify
12 *  it under the terms of the GNU General Public License as published by
13 *  the Free Software Foundation; either version 2 of the License, or
14 *  (at your option) any later version.
15 *
16 *  renetcol is distributed in the hope that it will be useful,
17 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
18 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19 *  GNU General Public License for more details.
20 *
21 *  You should have received a copy of the GNU General Public License
22 *  along with renetcol; if not, write to the Free Software
23 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
24 */
25
26#include <stdio.h>
27#include <string.h>
28#include <stdlib.h>
29#include <syslog.h>
30#include <errno.h>
31#include <sys/types.h>
32#include <sys/ipc.h>
33#include <sys/msg.h>
34
35int
36main(int argc, char *argv[])
37{
38  key_t key;
39  int file;
40 
41  if (argc != 2){
42    fprintf(stderr,"Syntax error: %s <key_file> \n", argv[0]);
43    exit(1);
44  }
45  if ((key = ftok(argv[1], 0)) == -1){
46    perror("ftok");
47    exit(1);
48  }
49  if ((file=msgget(key, 0)) == -1){
50    exit(0);
51  }
52  msgctl(file, IPC_RMID, NULL);
53  return (0);
54}
Note: See TracBrowser for help on using the browser.