rom/dos/cli.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #include <proto/exec.h>
   9 #include "dos_intern.h"
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14 #include <proto/dos.h>
  15
  16         AROS_LH0(struct CommandLineInterface *, Cli,
  17
  18 /*  SYNOPSIS */
  19
  20 /*  LOCATION */
  21         struct DosLibrary *, DOSBase, 82, Dos)
  22
  23 /*  FUNCTION
  24         Returns a pointer to the CLI structure of the current process.
  25
  26     INPUTS
  27
  28     RESULT
  29         Pointer to CLI structure.
  30
  31     NOTES
  32         Do not use this function to test if the process was started from
  33         the shell. Check pr_CLI instead.
  34
  35     EXAMPLE
  36
  37     BUGS
  38
  39     SEE ALSO
  40
  41     INTERNALS
  42
  43 *****************************************************************************/
  44 {
  45     AROS_LIBFUNC_INIT
  46     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  47
  48     /* Get pointer to process structure */
  49     struct Process *me = (struct Process *) FindTask(NULL);
  50
  51     /* Make sure this is a process */
  52     if (me->pr_Task.tc_Node.ln_Type == NT_PROCESS)
  53     {
  54         /* Nothing spectacular */
  55         return (struct CommandLineInterface *) BADDR(me->pr_CLI);
  56     }
  57     else
  58     {
  59         return NULL;
  60     }
  61
  62     AROS_LIBFUNC_EXIT
  63 } /* Cli */