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

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [or1ksim/] [or1ksim-0.3.0/] [peripheral/] [channels/] [channel.c] - Diff between revs 19 and 21

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 19 Rev 21
/* channel.c -- Definition of types and structures for
/* channel.c -- Definition of types and structures for
   peripherals to communicate with host.  Adapted from UML.
   peripherals to communicate with host.  Adapted from UML.
 
 
   Copyright (C) 2002 Richard Prescott <rip@step.polymtl.ca>
   Copyright (C) 2002 Richard Prescott <rip@step.polymtl.ca>
   Copyright (C) 2008 Embecosm Limited
   Copyright (C) 2008 Embecosm Limited
 
 
   Contributor Jeremy Bennett <jeremy.bennett@embecosm.com>
   Contributor Jeremy Bennett <jeremy.bennett@embecosm.com>
 
 
   This file is part of Or1ksim, the OpenRISC 1000 Architectural Simulator.
   This file is part of Or1ksim, the OpenRISC 1000 Architectural Simulator.
 
 
   This program is free software; you can redistribute it and/or modify it
   This program is free software; you can redistribute it and/or modify it
   under the terms of the GNU General Public License as published by the Free
   under the terms of the GNU General Public License as published by the Free
   Software Foundation; either version 3 of the License, or (at your option)
   Software Foundation; either version 3 of the License, or (at your option)
   any later version.
   any later version.
 
 
   This program is distributed in the hope that it will be useful, but WITHOUT
   This program is distributed in the hope that it will be useful, but WITHOUT
   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
   FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
   FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
   more details.
   more details.
 
 
   You should have received a copy of the GNU General Public License along
   You should have received a copy of the GNU General Public License along
   with this program.  If not, see <http://www.gnu.org/licenses/>.  */
   with this program.  If not, see <http://www.gnu.org/licenses/>.  */
 
 
/* This program is commented throughout in a fashion suitable for processing
/* This program is commented throughout in a fashion suitable for processing
   with Doxygen. */
   with Doxygen. */
 
 
 
 
/* Autoconf and/or portability configuration */
/* Autoconf and/or portability configuration */
#include "config.h"
#include "config.h"
#include "port.h"
#include "port.h"
 
 
/* System includes */
/* System includes */
#include <stdlib.h>
#include <stdlib.h>
#include <stdio.h>
#include <stdio.h>
#include <errno.h>
#include <errno.h>
 
 
/* Package includes */
/* Package includes */
#include "channel.h"
#include "channel.h"
#include "fd.h"
#include "fd.h"
#include "file.h"
#include "file.h"
#include "tcp.h"
#include "tcp.h"
#include "tty.h"
#include "tty.h"
#include "xterm.h"
#include "xterm.h"
 
 
struct channel_factory
struct channel_factory
{
{
  const char *name;
  const char *name;
  const struct channel_ops *ops;
  const struct channel_ops *ops;
  struct channel_factory *next;
  struct channel_factory *next;
};
};
 
 
static struct channel_factory preloaded[] = {
static struct channel_factory preloaded[] = {
  {"fd",    &fd_channel_ops,    &preloaded[1]},
  {"fd",    &fd_channel_ops,    &preloaded[1]},
  {"file",  &file_channel_ops,  &preloaded[2]},
  {"file",  &file_channel_ops,  &preloaded[2]},
  {"xterm", &xterm_channel_ops, &preloaded[3]},
  {"xterm", &xterm_channel_ops, &preloaded[3]},
  {"tcp",   &tcp_channel_ops,   &preloaded[4]},
  {"tcp",   &tcp_channel_ops,   &preloaded[4]},
  {"tty",   &tty_channel_ops,   NULL}
  {"tty",   &tty_channel_ops,   NULL}
};
};
 
 
static struct channel_factory *head = &preloaded[0];
static struct channel_factory *head = &preloaded[0];
 
 
/* Forward declaration of static functions */
/* Forward declaration of static functions */
static struct channel_factory *find_channel_factory (const char *name);
static struct channel_factory *find_channel_factory (const char *name);
 
 
struct channel *
struct channel *
channel_init (const char *descriptor)
channel_init (const char *descriptor)
{
{
  struct channel *retval;
  struct channel *retval;
  struct channel_factory *current;
  struct channel_factory *current;
  char *args, *name;
  char *args, *name;
  int count;
  int count;
 
 
  if (!descriptor)
  if (!descriptor)
    {
    {
      return NULL;
      return NULL;
    }
    }
 
 
  retval = (struct channel *) calloc (1, sizeof (struct channel));
  retval = (struct channel *) calloc (1, sizeof (struct channel));
 
 
  if (!retval)
  if (!retval)
    {
    {
      perror (descriptor);
      perror (descriptor);
      exit (1);
      exit (1);
    }
    }
 
 
  args = strchr (descriptor, ':');
  args = strchr (descriptor, ':');
 
 
  if (args)
  if (args)
    {
    {
      count = args - descriptor;
      count = args - descriptor;
      args++;
      args++;
    }
    }
  else
  else
    {
    {
      count = strlen (descriptor);
      count = strlen (descriptor);
    }
    }
 
 
  name = (char *) strndup (descriptor, count);
  name = (char *) strndup (descriptor, count);
 
 
  if (!name)
  if (!name)
    {
    {
      perror (name);
      perror (name);
      exit (1);
      exit (1);
    }
    }
 
 
  current = find_channel_factory (name);
  current = find_channel_factory (name);
 
 
  if (!current)
  if (!current)
    {
    {
      errno = ENODEV;
      errno = ENODEV;
      perror (descriptor);
      perror (descriptor);
      exit (1);
      exit (1);
    }
    }
 
 
  retval->ops = current->ops;
  retval->ops = current->ops;
 
 
  free (name);
  free (name);
 
 
  if (!retval->ops)
  if (!retval->ops)
    {
    {
      errno = ENODEV;
      errno = ENODEV;
      perror (descriptor);
      perror (descriptor);
      exit (1);
      exit (1);
    }
    }
 
 
  if (retval->ops->init)
  if (retval->ops->init)
    {
    {
      retval->data = (retval->ops->init) (args);
      retval->data = (retval->ops->init) (args);
 
 
      if (!retval->data)
      if (!retval->data)
        {
        {
          perror (descriptor);
          perror (descriptor);
          exit (1);
          exit (1);
        }
        }
    }
    }
 
 
  return retval;
  return retval;
}
}
 
 
int
int
channel_open (struct channel *channel)
channel_open (struct channel *channel)
{
{
  if (channel && channel->ops && channel->ops->open)
  if (channel && channel->ops && channel->ops->open)
    {
    {
      return (channel->ops->open) (channel->data);
      return (channel->ops->open) (channel->data);
    }
    }
  errno = ENOSYS;
  errno = ENOSYS;
  return -1;
  return -1;
}
}
 
 
int
int
channel_read (struct channel *channel, char *buffer, int size)
channel_read (struct channel *channel, char *buffer, int size)
{
{
  if (channel && channel->ops && channel->ops->read)
  if (channel && channel->ops && channel->ops->read)
    {
    {
      return (channel->ops->read) (channel->data, buffer, size);
      return (channel->ops->read) (channel->data, buffer, size);
    }
    }
  errno = ENOSYS;
  errno = ENOSYS;
  return -1;
  return -1;
}
}
 
 
int
int
channel_write (struct channel *channel, const char *buffer, int size)
channel_write (struct channel *channel, const char *buffer, int size)
{
{
  if (channel && channel->ops && channel->ops->write)
  if (channel && channel->ops && channel->ops->write)
    {
    {
      return (channel->ops->write) (channel->data, buffer, size);
      return (channel->ops->write) (channel->data, buffer, size);
    }
    }
  errno = ENOSYS;
  errno = ENOSYS;
  return -1;
  return -1;
}
}
 
 
void
void
channel_close (struct channel *channel)
channel_close (struct channel *channel)
{
{
  if (channel && channel->ops && channel->ops->close)
  if (channel && channel->ops && channel->ops->close)
    {
    {
      (channel->ops->close) (channel->data);
      (channel->ops->close) (channel->data);
    }
    }
}
}
 
 
static struct channel_factory *
static struct channel_factory *
find_channel_factory (const char *name)
find_channel_factory (const char *name)
{
{
  struct channel_factory *current = head;
  struct channel_factory *current = head;
 
 
  current = head;
  current = head;
  while (current && strcmp (current->name, name))
  while (current && strcmp (current->name, name))
    {
    {
      current = current->next;
      current = current->next;
    }
    }
 
 
  return current;
  return current;
}
}
 
 

powered by: WebSVN 2.1.0

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