rom/dos/shell_helper.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8
   9 #include <aros/debug.h>
  10 #include <utility/tagitem.h>
  11 #include <dos/dostags.h>
  12 #include <proto/utility.h>
  13 #include <dos/dosextens.h>
  14 #include <aros/asmcall.h>
  15 #include <exec/ports.h>
  16
  17 #include "dos_intern.h"
  18
  19 #include <proto/dos.h>
  20
  21 static BPTR findseg_any(CONST_STRPTR res, CONST_STRPTR file, struct DosLibrary *DOSBase)
  22 {
  23     BPTR found = BNULL;
  24     struct Segment *seg;
  25
  26     D(bug("[%s] Looking for shell %s (aka %s)\n", __func__, res, file));
  27
  28     Forbid();
  29     seg = FindSegment(res, NULL, TRUE);
  30     if (seg != NULL && seg->seg_UC <= 0) {
  31         found = seg->seg_Seg;
  32         D(bug("[%s] Found %s in DOS Resident list\n", __func__, res));
  33     }
  34     Permit();
  35
  36     /* Ok, *really* digging for it now.
  37      */
  38     if (!found) {
  39         found = LoadSeg(file);
  40         if (found) {
  41             /* We're going to keep this around for a long while. */
  42             D(bug("[%s] Found %s on disk\n", __func__, file));
  43             AddSegment(res, found, CMD_SYSTEM);
  44         } else {
  45             D(bug("[%s] No such segment available\n", __func__));
  46         }
  47     }
  48
  49     return found;
  50 }
  51
  52 BPTR findseg_cli(BOOL isBoot, struct DosLibrary *DOSBase)
  53 {
  54     BPTR seg = BNULL;
  55
  56     if (isBoot)
  57         seg = DOSBase->dl_Root->rn_ConsoleSegment;
  58
  59     if (!seg) {
  60         seg = findseg_any("CLI", "L:Shell-Seg", DOSBase);
  61         if (seg)
  62             DOSBase->dl_Root->rn_ConsoleSegment = seg;
  63     }
  64
  65     return seg;
  66 }
  67
  68 BPTR findseg_shell(BOOL isBoot, struct DosLibrary *DOSBase)
  69 {
  70     BPTR seg = BNULL;
  71
  72     if (isBoot)
  73         seg = DOSBase->dl_Root->rn_ShellSegment;
  74
  75     if (!seg) {
  76         seg = findseg_any("shell", "L:UserShell-Seg", DOSBase);
  77         if (seg)
  78             DOSBase->dl_Root->rn_ShellSegment = seg;
  79     }
  80
  81     return seg;
  82 }