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

Subversion Repositories or1k

[/] [or1k/] [tags/] [start/] [gdb-5.0/] [readline/] [shell.c] - Diff between revs 579 and 1765

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

Rev 579 Rev 1765
/* shell.c -- readline utility functions that are normally provided by
/* shell.c -- readline utility functions that are normally provided by
              bash when readline is linked as part of the shell. */
              bash when readline is linked as part of the shell. */
 
 
/* Copyright (C) 1997 Free Software Foundation, Inc.
/* Copyright (C) 1997 Free Software Foundation, Inc.
 
 
   This file is part of the GNU Readline Library, a library for
   This file is part of the GNU Readline Library, a library for
   reading lines of text with interactive input and history editing.
   reading lines of text with interactive input and history editing.
 
 
   The GNU Readline Library is free software; you can redistribute it
   The GNU Readline Library is free software; you can redistribute it
   and/or modify it under the terms of the GNU General Public License
   and/or modify it under the terms of the GNU General Public License
   as published by the Free Software Foundation; either version 1, or
   as published by the Free Software Foundation; either version 1, or
   (at your option) any later version.
   (at your option) any later version.
 
 
   The GNU Readline Library is distributed in the hope that it will be
   The GNU Readline Library is distributed in the hope that it will be
   useful, but WITHOUT ANY WARRANTY; without even the implied warranty
   useful, but WITHOUT ANY WARRANTY; without even the implied warranty
   of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
   GNU General Public License for more details.
 
 
   The GNU General Public License is often shipped with GNU software, and
   The GNU General Public License is often shipped with GNU software, and
   is generally kept in a file called COPYING or LICENSE.  If you do not
   is generally kept in a file called COPYING or LICENSE.  If you do not
   have a copy of the license, write to the Free Software Foundation,
   have a copy of the license, write to the Free Software Foundation,
   675 Mass Ave, Cambridge, MA 02139, USA. */
   675 Mass Ave, Cambridge, MA 02139, USA. */
#define READLINE_LIBRARY
#define READLINE_LIBRARY
 
 
#if defined (HAVE_CONFIG_H)
#if defined (HAVE_CONFIG_H)
#  include <config.h>
#  include <config.h>
#endif
#endif
 
 
#include <sys/types.h>
#include <sys/types.h>
#include <stdio.h>
#include <stdio.h>
 
 
#if defined (HAVE_UNISTD_H)
#if defined (HAVE_UNISTD_H)
#  include <unistd.h>
#  include <unistd.h>
#endif /* HAVE_UNISTD_H */
#endif /* HAVE_UNISTD_H */
 
 
#if defined (HAVE_STDLIB_H)
#if defined (HAVE_STDLIB_H)
#  include <stdlib.h>
#  include <stdlib.h>
#else
#else
#  include "ansi_stdlib.h"
#  include "ansi_stdlib.h"
#endif /* HAVE_STDLIB_H */
#endif /* HAVE_STDLIB_H */
 
 
#if defined (HAVE_STRING_H)
#if defined (HAVE_STRING_H)
#  include <string.h>
#  include <string.h>
#else
#else
#  include <strings.h>
#  include <strings.h>
#endif /* !HAVE_STRING_H */
#endif /* !HAVE_STRING_H */
 
 
#include <pwd.h>
#include <pwd.h>
 
 
#if !defined (HAVE_GETPW_DECLS)
#if !defined (HAVE_GETPW_DECLS)
extern struct passwd *getpwuid ();
extern struct passwd *getpwuid ();
#endif /* !HAVE_GETPW_DECLS */
#endif /* !HAVE_GETPW_DECLS */
 
 
extern char *xmalloc ();
extern char *xmalloc ();
 
 
/* All of these functions are resolved from bash if we are linking readline
/* All of these functions are resolved from bash if we are linking readline
   as part of bash. */
   as part of bash. */
 
 
/* Does shell-like quoting using single quotes. */
/* Does shell-like quoting using single quotes. */
char *
char *
single_quote (string)
single_quote (string)
     char *string;
     char *string;
{
{
  register int c;
  register int c;
  char *result, *r, *s;
  char *result, *r, *s;
 
 
  result = (char *)xmalloc (3 + (3 * strlen (string)));
  result = (char *)xmalloc (3 + (3 * strlen (string)));
  r = result;
  r = result;
  *r++ = '\'';
  *r++ = '\'';
 
 
  for (s = string; s && (c = *s); s++)
  for (s = string; s && (c = *s); s++)
    {
    {
      *r++ = c;
      *r++ = c;
 
 
      if (c == '\'')
      if (c == '\'')
        {
        {
          *r++ = '\\';  /* insert escaped single quote */
          *r++ = '\\';  /* insert escaped single quote */
          *r++ = '\'';
          *r++ = '\'';
          *r++ = '\'';  /* start new quoted string */
          *r++ = '\'';  /* start new quoted string */
        }
        }
    }
    }
 
 
  *r++ = '\'';
  *r++ = '\'';
  *r = '\0';
  *r = '\0';
 
 
  return (result);
  return (result);
}
}
 
 
/* Set the environment variables LINES and COLUMNS to lines and cols,
/* Set the environment variables LINES and COLUMNS to lines and cols,
   respectively. */
   respectively. */
void
void
set_lines_and_columns (lines, cols)
set_lines_and_columns (lines, cols)
     int lines, cols;
     int lines, cols;
{
{
  char *b;
  char *b;
 
 
#if defined (HAVE_PUTENV)
#if defined (HAVE_PUTENV)
  b = xmalloc (24);
  b = xmalloc (24);
  sprintf (b, "LINES=%d", lines);
  sprintf (b, "LINES=%d", lines);
  putenv (b);
  putenv (b);
  b = xmalloc (24);
  b = xmalloc (24);
  sprintf (b, "COLUMNS=%d", cols);
  sprintf (b, "COLUMNS=%d", cols);
  putenv (b);
  putenv (b);
#else /* !HAVE_PUTENV */
#else /* !HAVE_PUTENV */
#  if defined (HAVE_SETENV)
#  if defined (HAVE_SETENV)
  b = xmalloc (8);
  b = xmalloc (8);
  sprintf (b, "%d", lines);
  sprintf (b, "%d", lines);
  setenv ("LINES", b, 1);
  setenv ("LINES", b, 1);
  b = xmalloc (8);
  b = xmalloc (8);
  sprintf (b, "%d", cols);
  sprintf (b, "%d", cols);
  setenv ("COLUMNS", b, 1);
  setenv ("COLUMNS", b, 1);
#  endif /* HAVE_SETENV */
#  endif /* HAVE_SETENV */
#endif /* !HAVE_PUTENV */
#endif /* !HAVE_PUTENV */
}
}
 
 
char *
char *
get_env_value (varname)
get_env_value (varname)
     char *varname;
     char *varname;
{
{
  return ((char *)getenv (varname));
  return ((char *)getenv (varname));
}
}
 
 
char *
char *
get_home_dir ()
get_home_dir ()
{
{
  char *home_dir;
  char *home_dir;
  struct passwd *entry;
  struct passwd *entry;
 
 
  home_dir = (char *)NULL;
  home_dir = (char *)NULL;
  entry = getpwuid (getuid ());
  entry = getpwuid (getuid ());
  if (entry)
  if (entry)
    home_dir = entry->pw_dir;
    home_dir = entry->pw_dir;
  return (home_dir);
  return (home_dir);
}
}
 
 

powered by: WebSVN 2.1.0

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