reactos/subsys/system/cmd/prompt.c

   1 /*
   2  *  PROMPT.C - prompt handling.
   3  *
   4  *
   5  *  History:
   6  *
   7  *    14/01/95 (Tim Normal)
   8  *        started.
   9  *
  10  *    08/08/95 (Matt Rains)
  11  *        i have cleaned up the source code. changes now bring this source
  12  *        into guidelines for recommended programming practice.
  13  *
  14  *    01/06/96 (Tim Norman)
  15  *        added day of the week printing (oops, forgot about that!)
  16  *
  17  *    08/07/96 (Steffan Kaiser)
  18  *        small changes for speed
  19  *
  20  *    20-Jul-1998 (John P Price <linux-guru@gcfl.net>)
  21  *        removed redundant day strings. Use ones defined in date.c.
  22  *
  23  *    27-Jul-1998 (John P Price <linux-guru@gcfl.net>)
  24  *        added config.h include
  25  *
  26  *    28-Jul-1998 (John P Price <linux-guru@gcfl.net>)
  27  *        moved cmd_prompt from internal.c to here
  28  *
  29  *    09-Dec-1998 (Eric Kohl <ekohl@abo.rhein-zeitung.de>)
  30  *        Added help text ("/?").
  31  *
  32  *    14-Dec-1998 (Eric Kohl <ekohl@abo.rhein-zeitung.de>)
  33  *        Added "$+" option.
  34  *
  35  *    09-Jan-1999 (Eric Kohl <ekohl@abo.rhein-zeitung.de>)
  36  *        Added "$A", "$C" and "$F" option.
  37  *        Added locale support.
  38  *        Fixed "$V" option.
  39  *
  40  *    20-Jan-1999 (Eric Kohl <ekohl@abo.rhein-zeitung.de>)
  41  *        Unicode and redirection safe!
  42  *
  43  *    24-Jan-1999 (Eric Kohl <ekohl@abo.rhein-zeitung.de>)
  44  *        Fixed Win32 environment handling.
  45  *
  46  *    30-Apr-2005 (Magnus Olsen) <magnus@greatlord.com>)
  47  *        Remove all hardcode string to En.rc
  48  */
  49 #include <precomp.h>
  50 #include "resource.h"
  51
  52 /*
  53  * print the command-line prompt
  54  */
  55 VOID PrintPrompt(VOID)
  56 {
  57         static TCHAR default_pr[] = _T("$P$G");
  58         TCHAR  szPrompt[256];
  59         LPTSTR pr;
  60
  61         if (GetEnvironmentVariable (_T("PROMPT"), szPrompt, 256))
  62                 pr = szPrompt;
  63         else
  64                 pr = default_pr;
  65
  66         while (*pr)
  67         {
  68                 if (*pr != _T('$'))
  69                 {
  70                         ConOutChar (*pr);
  71                 }
  72                 else
  73                 {
  74                         pr++;
  75
  76                         switch (_totupper (*pr))
  77                         {
  78                                 case _T('A'):
  79                                         ConOutChar (_T('&'));
  80                                         break;
  81
  82                                 case _T('B'):
  83                                         ConOutChar (_T('|'));
  84                                         break;
  85
  86                                 case _T('C'):
  87                                         ConOutChar (_T('('));
  88                                         break;
  89
  90                                 case _T('D'):
  91                                         PrintDate ();
  92                                         break;
  93
  94                                 case _T('E'):
  95                                         ConOutChar (_T('\x1B'));
  96                                         break;
  97
  98                                 case _T('F'):
  99                                         ConOutChar (_T(')'));
 100                                         break;
 101
 102                                 case _T('G'):
 103                                         ConOutChar (_T('>'));
 104                                         break;
 105
 106                                 case _T('H'):
 107                                         ConOutChar (_T('\x08'));
 108           ConOutChar (_T(' '));
 109           ConOutChar (_T('\x08'));
 110                                         break;
 111
 112                                 case _T('L'):
 113                                         ConOutChar (_T('<'));
 114                                         break;
 115
 116                                 case _T('N'):
 117                                         {
 118                                                 TCHAR szPath[MAX_PATH];
 119                                                 GetCurrentDirectory (MAX_PATH, szPath);
 120                                                 ConOutChar (szPath[0]);
 121                                         }
 122                                         break;
 123
 124                                 case _T('P'):
 125                                         {
 126                                                 TCHAR szPath[MAX_PATH];
 127                                                 GetCurrentDirectory (MAX_PATH, szPath);
 128                                                 ConOutPrintf (_T("%s"), szPath);
 129                                         }
 130                                         break;
 131
 132                                 case _T('Q'):
 133                                         ConOutChar (_T('='));
 134                                         break;
 135
 136         case _T('S'):
 137                                         ConOutChar (_T(' '));
 138                                         break;
 139
 140                                 case _T('T'):
 141           {
 142           SYSTEMTIME t;
 143           GetSystemTime(&t);
 144           ConOutPrintf(_T("%02d%c%02d%c%02d%c%02d\n"),t.wHour, cTimeSeparator,t.wMinute , cTimeSeparator,
 145                       t.wSecond , cDecimalSeparator, t.wMilliseconds );
 146           }
 147                                         break;
 148
 149                                 case _T('V'):
 150                                         switch (osvi.dwPlatformId)
 151                                         {
 152                                                 case VER_PLATFORM_WIN32_WINDOWS:
 153                                                         if (osvi.dwMajorVersion == 4 &&
 154                                                                 osvi.dwMinorVersion == 1)
 155                                                                 ConOutPrintf (_T("Windows 98"));
 156                                                         else
 157                                                                 ConOutPrintf (_T("Windows 95"));
 158                                                         break;
 159
 160
 161                                                 case VER_PLATFORM_WIN32_NT:
 162                                                         ConOutPrintf (_T("Windows NT Version %lu.%lu"),
 163                                                                                   osvi.dwMajorVersion, osvi.dwMinorVersion);
 164                                                         break;
 165                                         }
 166                                         break;
 167
 168                                 case _T('_'):
 169                                         ConOutChar (_T('\n'));
 170                                         break;
 171
 172                                 case '$':
 173                                         ConOutChar (_T('$'));
 174                                         break;
 175
 176 #ifdef FEATURE_DIRECTORY_STACK
 177                                 case '+':
 178                                         {
 179                                                 INT i;
 180                                                 for (i = 0; i < GetDirectoryStackDepth (); i++)
 181                                                         ConOutChar (_T('+'));
 182                                         }
 183                                         break;
 184 #endif
 185                         }
 186                 }
 187                 pr++;
 188         }
 189 }
 190
 191
 192 #ifdef INCLUDE_CMD_PROMPT
 193
 194 INT cmd_prompt (LPTSTR cmd, LPTSTR param)
 195 {
 196         if (!_tcsncmp (param, _T("/?"), 2))
 197         {
 198                 ConOutResPaging(TRUE,STRING_PROMPT_HELP1);
 199
 200 #ifdef FEATURE_DIRECTORY_STACK
 201                 ConOutResPaging(FALSE,STRING_PROMPT_HELP2);
 202 #endif
 203                 ConOutResPaging(FALSE,STRING_PROMPT_HELP3);
 204                 return 0;
 205         }
 206
 207         /* if it is null, then it needs to set to default,
 208            because that means the user entered "prompt" only.
 209                 so even if param is null you _must_ still set prompt
 210                 to the default.  There seems to be some kinda difference
 211                 between winxp and 2k in this matter and this way will
 212                 cover both. Do not use fixed size of szParam for param the buffer are 8192bytes
 213                 and will later change to dymatic buffer */
 214
 215         /* set PROMPT environment variable */
 216         if (param[0] != _T('\0'))
 217         {
 218                 if (!SetEnvironmentVariable (_T("PROMPT"), param))
 219                 return 1;
 220         }
 221         else
 222         {
 223                 TCHAR szParam[5];
 224                 _tcscpy(szParam,_T("$P$G"));
 225                 if (!SetEnvironmentVariable (_T("PROMPT"),szParam))
 226                 return 1;
 227         }
 228
 229
 230
 231         return 0;
 232 }
 233 #endif
 234
 235 /* EOF */