OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [newlib-1.18.0/] [newlib-1.18.0-or32-1.0rc2/] [newlib/] [libc/] [sys/] [linux/] [mq_close.c] - Rev 520

Compare with Previous | Blame | View Log

/* Copyright 2002, Red Hat Inc. */
 
#include <mqueue.h>
#include <errno.h>
#include <sys/sem.h>
#define _LIBC 1
#include <sys/lock.h>
#undef _LIBC
 
#include "mqlocal.h"
 
int
mq_close (mqd_t msgid)
{
  struct libc_mq *info;
  struct sembuf sb0 = {0, -1, 0};
  int rc;
  int semid;
 
  info = __find_mq (msgid);
 
  if (info == NULL)
    {
      errno = EBADF;
      return -1;
    }
 
  /* lock message queue */
  semid = info->semid;
  rc = semop (semid, &sb0, 1);
 
  if (rc == 0)
    {
      __cleanup_mq (msgid);
 
      /* unlock message queue */
      sb0.sem_op = 1;
      semop (semid, &sb0, 1);
    }
 
  return rc;
}
 
 
 
 
 
 
 

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.