1999-03-20 20:28:42 +00:00
|
|
|
/*
|
|
|
|
* LABEL.C - label internal command.
|
|
|
|
*
|
|
|
|
*
|
|
|
|
* History:
|
|
|
|
*
|
|
|
|
* 10-Dec-1998 (Eric Kohl <ekohl@abo.rhein-zeitung.de>)
|
|
|
|
* Started.
|
|
|
|
*
|
|
|
|
* 11-Dec-1998 (Eric Kohl <ekohl@abo.rhein-zeitung.de>)
|
|
|
|
* Finished.
|
|
|
|
*
|
|
|
|
* 19-Jan-1998 (Eric Kohl <ekohl@abo.rhein-zeitung.de>)
|
|
|
|
* Unicode ready!
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "config.h"
|
|
|
|
|
|
|
|
#ifdef INCLUDE_CMD_LABEL
|
|
|
|
|
|
|
|
#include <windows.h>
|
|
|
|
#include <tchar.h>
|
|
|
|
#include <string.h>
|
1999-03-21 21:32:45 +00:00
|
|
|
#include <ctype.h>
|
1999-03-20 20:28:42 +00:00
|
|
|
|
|
|
|
#include "cmd.h"
|
|
|
|
|
|
|
|
|
|
|
|
INT cmd_label (LPTSTR cmd, LPTSTR param)
|
|
|
|
{
|
|
|
|
TCHAR szRootPath[] = _T("A:\\");
|
|
|
|
TCHAR szLabel[80];
|
|
|
|
TCHAR szOldLabel[80];
|
|
|
|
DWORD dwSerialNr;
|
|
|
|
LPTSTR *arg;
|
|
|
|
INT args;
|
|
|
|
|
|
|
|
/* set empty label string */
|
|
|
|
szLabel[0] = _T('\0');
|
|
|
|
|
|
|
|
/* print help */
|
|
|
|
if (!_tcsncmp (param, _T("/?"), 2))
|
|
|
|
{
|
|
|
|
ConOutPuts (_T("Displays or changes drive label.\n\n"
|
|
|
|
"LABEL [drive:][label]"));
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* get parameters */
|
|
|
|
arg = split (param, &args);
|
|
|
|
|
|
|
|
if (args > 2)
|
|
|
|
{
|
|
|
|
/* too many parameters */
|
|
|
|
error_too_many_parameters (arg[args - 1]);
|
|
|
|
freep (arg);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (args == 0)
|
|
|
|
{
|
|
|
|
/* get label of current drive */
|
|
|
|
TCHAR szCurPath[MAX_PATH];
|
|
|
|
GetCurrentDirectory (MAX_PATH, szCurPath);
|
|
|
|
szRootPath[0] = szCurPath[0];
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
if ((_tcslen (arg[0]) >= 2) && (arg[0][1] == _T(':')))
|
|
|
|
{
|
|
|
|
szRootPath[0] = toupper (*arg[0]);
|
|
|
|
if (args == 2)
|
|
|
|
_tcsncpy (szLabel, arg[1], 12);
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
TCHAR szCurPath[MAX_PATH];
|
|
|
|
GetCurrentDirectory (MAX_PATH, szCurPath);
|
|
|
|
szRootPath[0] = szCurPath[0];
|
|
|
|
_tcsncpy (szLabel, arg[0], 12);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* check root path */
|
|
|
|
if (!IsValidPathName (szRootPath))
|
|
|
|
{
|
|
|
|
error_invalid_drive ();
|
|
|
|
freep (arg);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
GetVolumeInformation (szRootPath, szOldLabel, 80, &dwSerialNr,
|
|
|
|
NULL, NULL, NULL, 0);
|
|
|
|
|
|
|
|
/* print drive info */
|
|
|
|
ConOutPrintf (_T("Volume in drive %c:"), _totupper (szRootPath[0]));
|
|
|
|
|
|
|
|
if (szOldLabel[0] != _T('\0'))
|
|
|
|
ConOutPrintf (_T(" is %s\n"), szOldLabel);
|
|
|
|
else
|
|
|
|
ConOutPrintf (_T(" has no label\n"));
|
|
|
|
|
|
|
|
/* print the volume serial number */
|
|
|
|
ConOutPrintf (_T("Volume Serial Number is %04X-%04X\n"),
|
|
|
|
HIWORD(dwSerialNr), LOWORD(dwSerialNr));
|
|
|
|
|
|
|
|
if (szLabel[0] == _T('\0'))
|
|
|
|
{
|
|
|
|
ConOutPrintf (_T("Drive label (11 Characters, ENTER if none)? "));
|
|
|
|
ConInString (szLabel, 80);
|
|
|
|
}
|
|
|
|
|
|
|
|
SetVolumeLabel (szRootPath, szLabel);
|
|
|
|
|
|
|
|
freep (arg);
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
1999-03-21 21:32:45 +00:00
|
|
|
#endif /* INCLUDE_CMD_LABEL */
|