Logo Search packages:      
Sourcecode: ksh version File versions  Download package

init.c

/***********************************************************************
*                                                                      *
*               This software is part of the ast package               *
*          Copyright (c) 1990-2007 AT&T Intellectual Property          *
*                      and is licensed under the                       *
*                  Common Public License, Version 1.0                  *
*                    by AT&T Intellectual Property                     *
*                                                                      *
*                A copy of the License is available at                 *
*            http://www.opensource.org/licenses/cpl1.0.txt             *
*         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
*                                                                      *
*              Information and Software Systems Research               *
*                            AT&T Research                             *
*                           Florham Park NJ                            *
*                                                                      *
*                 Glenn Fowler <gsf@research.att.com>                  *
*                                                                      *
***********************************************************************/
#pragma prototyped
/*
 * Glenn Fowler
 * AT&T Research
 *
 * remote coshell initialization script
 */

const char  corinit[] = "\
print -u3 n 0 $HOSTNAME $$\n\
set -o bgnice -o monitor\n\
rating=1\n\
vpath - /# 2>/dev/null\n\
eval $COINIT\n\
alias ignore='ignore '\n\
function ignore\n\
{\n\
      \"$@\"\n\
      return 0\n\
}\n\
alias silent='set +x X$- \"$@\";_coshell_flags_=$1;shift;silent '\n\
function silent\n\
{\n\
      case $_coshell_flags_ in\n\
      *x*)  trap '      _coshell_status_=$?\n\
            if ((_coshell_status_==0))\n\
            then  set -x\n\
            else  set -x;(set +x;exit $_coshell_status_)\n\
            fi' 0\n\
            ;;\n\
      esac\n\
      \"$@\"\n\
}\n\
typeset -xf ignore silent\n\
case $rating in\n\
1)    (\n\
      set -- $(package host rating cpu)\n\
      print -u3 r 0 rating=$1,cpu=$2\n\
      ) &\n\
      ;;\n\
esac\n\
";

Generated by  Doxygen 1.6.0   Back to index