Context Navigation

source: trunk/dll/command.c@ 1498

Visit:

Last change on this file since 1498 was 1498, checked in by Gregg Young, 16 years ago
Changes to get FM2 to compile with the latest watcom 1.9 beta (mostly type casts of CHAR CONSTANT * to CHAR *). Changes to get the environment settings working everywhere again (broken by the change that moved commands to the INI); Added an environment size variable (set to 2048 which was the largest I found hard coded). Still need to find everywhere the environment size is set and use this variable.
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 40.0 KB

Rev	Line
[123]	1
	2	/***********************************************************************
	3
	4	$Id: command.c 1498 2010-01-18 00:57:01Z gyoung $
	5
[347]	6	Custom commands
	7
[123]	8	Copyright (c) 1993-98 M. Kimes
[1498]	9	Copyright (c) 2004, 2010 Steven H. Levine
[123]	10
[204]	11	01 Aug 04 SHL Rework lstrip/rstrip usage
	12	06 Jun 05 SHL Drop unused code
[347]	13	14 Jul 06 SHL Use Runtime_Error
[406]	14	29 Jul 06 SHL Use xfgets_bstripcr
[445]	15	15 Aug 06 SHL Better can't add message
[507]	16	18 Sep 06 GKY Add replace command and update okay to add if changed
[552]	17	17 Feb 07 GKY Move error messages etc to string file
[574]	18	22 Mar 07 GKY Use QWL_USER
	19	23 Mar 07 GKY Replace doesn't change item position
	20	23 Mar 07 GKY Okay fails silently when item not changed
[618]	21	19 Apr 07 SHL Sync with AcceptOneDrop GetOneDrop mods
[793]	22	20 Aug 07 GKY Move #pragma alloc_text to end for OpenWatcom compat
[920]	23	06 Jan 08 GKY Use NormalizeCmdLine to check program strings on entry
[985]	24	29 Feb 08 GKY Changes to enable user settable command line length
	25	29 Feb 08 GKY Use xfree where appropriate
[1078]	26	18 Jul 08 SHL Add Fortify support
[1082]	27	19 Jul 08 GKY Replace save_dir2(dir) with pFM2SaveDirectory and use BldFullPathName
[1119]	28	24 Aug 08 GKY Warn full drive on save of .DAT file; prevent loss of existing file
[1247]	29	15 Oct 08 GKY Prevent asking to add %a on NormalizeCmdLine abort
[1488]	30	21 Dec 09 GKY Fix the environment so it can be saved, deleted and used consistently.
	31	21 Dec 09 GKY Allow command menu reorder without changing the "ID" or hot key for a command.
	32	Added load_inicommand to load the IDs from the ini file.
	33	21 Dec 09 GKY Added 20 new hot keys for commands.
	34	21 Dec 09 GKY Added CheckExecutibleFlags to streamline code in command.c assoc.c & cmdline.c
[1491]	35	27 Dec 09 GKY Moved Commands to the INI file this makes commands.dat obsolete
	36	27 Dec 09 GKY Added QueryCommandSettings to streamline code
[1494]	37	27 Dec 09 GKY Made command hotkeys user selectable.
[1498]	38	17 JAN 10 GKY Changes to get working with Watcom 1.9 Beta (1/16/10). Mostly cast CHAR CONSTANT * as CHAR *.
[123]	39
	40	***********************************************************************/
	41
[2]	42	#include <stdlib.h>
	43	#include <string.h>
	44	#include <share.h>
[347]	45
[907]	46	#define INCL_DOS
	47	#define INCL_WIN
	48	#define INCL_LONGLONG // dircnrs.h
	49
[1188]	50	#include "fm3dll.h"
[1221]	51	#include "fm3dll2.h" // #define's for UM_*, control id's, etc.
[1205]	52	#include "notebook.h" // Data declaration(s)
	53	#include "init.h" // Data declaration(s)
	54	#include "mainwnd.h" // Data declaration(s)
	55	#include "newview.h" // Data declarations
[2]	56	#include "fm3dlg.h"
	57	#include "fm3str.h"
	58	#include "tools.h"
[907]	59	#include "arccnrs.h" // BldQuotedFileName
	60	#include "errutil.h" // Dos_Error...
	61	#include "strutil.h" // GetPString
[1188]	62	#include "droplist.h" // AcceptOneDrop, DropHelp, GetOneDrop
	63	#include "misc.h" // DrawTargetEmphasis
	64	#include "systemf.h" // ExecOnList
	65	#include "getnames.h" // insert_filename
	66	#include "wrappers.h" // xfgets
[920]	67	#include "pathutil.h" // NormalizeCmdLine
[989]	68	#include "command.h"
[1188]	69	#include "strips.h" // bstrip
	70	#include "dirs.h" // save_dir2
[1039]	71	#include "fortify.h"
[2]	72
[1488]	73	VOID load_inicommands(VOID);
	74
[551]	75	typedef struct
	76	{
[985]	77	PSZ pszCmdLine;
[1345]	78	CHAR title[100];
[1488]	79	CHAR env[1002];
[1486]	80	ULONG flags;
	81	ULONG ID;
	82	ULONG HotKeyID;
[551]	83	}
	84	COMMAND;
[2]	85
[1491]	86	BOOL QueryCommandSettings(HWND hwnd, COMMAND *temp);
	87	VOID save_commands(VOID);
	88
[1205]	89	// Data defintions
[2]	90	#pragma data_seg(DATA1)
[347]	91
	92	static PSZ pszSrcFile = __FILE__;
[1205]	93	static LINKCMDS *cmdtail;
[1488]	94	static BOOL UsedCommandIDs[300];
	95	static BOOL UsedHotKeyIDs[40];
[1491]	96	static PSZ pszCommandsList;
	97	static ULONG ulSizeCommandsList = 10000;
	98	static BOOL fLoadCommandsFromINI = FALSE;
[347]	99
[1205]	100	#pragma data_seg(GLOBAL2)
	101	LINKCMDS *cmdhead;
	102	BOOL cmdloaded;
	103
[551]	104	MRESULT EXPENTRY CommandTextProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[347]	105	{
[574]	106	PFNWP oldproc = (PFNWP) WinQueryWindowPtr(hwnd, QWL_USER);
[2]	107	static BOOL emphasized = FALSE;
	108
[551]	109	switch (msg) {
	110	case DM_DRAGOVER:
	111	if (!emphasized) {
	112	emphasized = TRUE;
	113	DrawTargetEmphasis(hwnd, emphasized);
	114	}
[618]	115	if (AcceptOneDrop(hwnd, mp1, mp2))
[551]	116	return MRFROM2SHORT(DOR_DROP, DO_MOVE);
	117	return MRFROM2SHORT(DOR_NEVERDROP, 0);
[2]	118
[551]	119	case DM_DRAGLEAVE:
	120	if (emphasized) {
	121	emphasized = FALSE;
	122	DrawTargetEmphasis(hwnd, emphasized);
	123	}
	124	break;
	125
	126	case DM_DROPHELP:
	127	DropHelp(mp1, mp2, hwnd, GetPString(IDS_DROPCMDHELPTEXT));
	128	return 0;
	129
	130	case DM_DROP:
	131	{
	132	char szFrom[CCHMAXPATH + 5];
	133
	134	if (emphasized) {
[445]	135	emphasized = FALSE;
[551]	136	DrawTargetEmphasis(hwnd, emphasized);
[2]	137	}
[618]	138	if (GetOneDrop(hwnd, mp1, mp2, szFrom, CCHMAXPATH)) {
[551]	139	strcat(szFrom, " %a");
	140	WinSetWindowText(hwnd, szFrom);
	141	}
	142	}
	143	return 0;
	144	}
	145	return (oldproc) ? oldproc(hwnd, msg, mp1, mp2) :
	146	WinDefWindowProc(hwnd, msg, mp1, mp2);
	147	}
	148
	149	MRESULT EXPENTRY ReOrderProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
	150	{
	151	switch (msg) {
	152	case WM_INITDLG:
	153	if (!cmdhead) {
	154	WinDismissDlg(hwnd, 0);
[2]	155	break;
[551]	156	}
	157	{
	158	LINKCMDS *info;
	159	SHORT x;
[2]	160
[551]	161	info = cmdhead;
	162	while (info) {
	163	x = (SHORT) WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX, LM_INSERTITEM,
	164	MPFROMSHORT(LIT_END),
	165	MPFROMP(info->title));
	166	if (x < 0) {
	167	Runtime_Error(pszSrcFile, __LINE__, "no cmd");
	168	WinDismissDlg(hwnd, 0);
[445]	169	}
[551]	170	else {
	171	WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX, LM_SETITEMHANDLE,
	172	MPFROMSHORT(x), MPFROMP(info));
[445]	173	}
[551]	174	info = info->next;
[2]	175	}
[551]	176	}
	177	break;
[2]	178
[551]	179	case WM_CONTROL:
	180	return 0;
[2]	181
[551]	182	case WM_COMMAND:
	183	switch (SHORT1FROMMP(mp1)) {
	184	case DID_CANCEL:
	185	WinDismissDlg(hwnd, 0);
	186	break;
	187
	188	case DID_OK:
[2]	189	{
[551]	190	LINKCMDS temphead = NULL, info, last = NULL, temptail = NULL;
	191	SHORT sSelect, numitems;
[2]	192
[551]	193	sSelect = 0;
	194	numitems = (SHORT) WinSendDlgItemMsg(hwnd, RE_REMOVELISTBOX,
	195	LM_QUERYITEMCOUNT,
	196	MPVOID, MPVOID);
	197	while (numitems) {
	198	info = (LINKCMDS *) WinSendDlgItemMsg(hwnd, RE_REMOVELISTBOX,
	199	LM_QUERYITEMHANDLE,
	200	MPFROMSHORT(sSelect++),
	201	MPVOID);
	202	if (info) {
	203	if (!temphead) {
	204	temphead = info;
	205	info->prev = NULL;
	206	}
	207	else {
	208	last->next = info;
	209	info->prev = last;
	210	}
	211	temptail = info;
	212	last = info;
	213	info->next = NULL;
[347]	214	}
[551]	215	numitems--;
	216	}
	217	sSelect = 0;
	218	numitems = (SHORT) WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX,
	219	LM_QUERYITEMCOUNT,
	220	MPVOID, MPVOID);
	221	while (numitems) {
	222	info = (LINKCMDS *) WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX,
	223	LM_QUERYITEMHANDLE,
	224	MPFROMSHORT(sSelect++),
	225	MPVOID);
	226	if (info) {
	227	if (!temphead) {
	228	temphead = info;
	229	info->prev = NULL;
	230	}
	231	else {
	232	last->next = info;
	233	info->prev = last;
	234	}
	235	temptail = info;
	236	last = info;
	237	info->next = NULL;
[347]	238	}
[551]	239	numitems--;
[445]	240	}
[551]	241	cmdhead = temphead;
	242	cmdtail = temptail;
[2]	243	}
[551]	244	WinDismissDlg(hwnd, 1);
[2]	245	break;
	246
[551]	247	case IDM_HELP:
	248	if (hwndHelp)
	249	WinSendMsg(hwndHelp, HM_DISPLAY_HELP,
	250	MPFROM2SHORT(HELP_REORDERCOMMANDS, 0),
	251	MPFROMSHORT(HM_RESOURCEID));
	252	break;
[2]	253
[551]	254	case RE_ADD:
	255	{
	256	SHORT sSelect, x;
	257	LINKCMDS *info;
[2]	258
[551]	259	sSelect = (SHORT) WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX,
	260	LM_QUERYSELECTION,
	261	MPFROMSHORT(LIT_FIRST), MPVOID);
	262	while (sSelect >= 0) {
	263	info = (LINKCMDS *) WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX,
	264	LM_QUERYITEMHANDLE,
	265	MPFROMSHORT(sSelect), MPVOID);
	266	if (info) {
	267	x = (SHORT) WinSendDlgItemMsg(hwnd, RE_REMOVELISTBOX,
	268	LM_INSERTITEM,
	269	MPFROM2SHORT(LIT_END, 0),
	270	MPFROMP(info->title));
	271	if (x >= 0) {
	272	WinSendDlgItemMsg(hwnd, RE_REMOVELISTBOX,
	273	LM_SETITEMHANDLE,
	274	MPFROMSHORT(x), MPFROMP(info));
	275	WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX, LM_DELETEITEM,
	276	MPFROMSHORT(sSelect), MPVOID);
[445]	277	}
	278	}
[551]	279	else
	280	WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX, LM_SELECTITEM,
	281	MPFROMSHORT(sSelect), MPFROMSHORT(FALSE));
	282	sSelect = (USHORT) WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX,
[445]	283	LM_QUERYSELECTION,
	284	MPFROMSHORT(LIT_FIRST),
	285	MPVOID);
[551]	286	}
	287	}
	288	break;
	289
	290	case RE_REMOVE:
	291	{
	292	SHORT sSelect, x;
	293	LINKCMDS *info;
	294
	295	sSelect = (SHORT) WinSendDlgItemMsg(hwnd, RE_REMOVELISTBOX,
	296	LM_QUERYSELECTION,
	297	MPFROMSHORT(LIT_FIRST), MPVOID);
	298	while (sSelect >= 0) {
	299	info = (LINKCMDS *) WinSendDlgItemMsg(hwnd, RE_REMOVELISTBOX,
	300	LM_QUERYITEMHANDLE,
	301	MPFROMSHORT(sSelect), MPVOID);
	302	if (info) {
	303	x = (SHORT) WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX,
	304	LM_INSERTITEM,
	305	MPFROM2SHORT(LIT_END, 0),
	306	MPFROMP(info->title));
	307	if (x >= 0) {
	308	WinSendDlgItemMsg(hwnd, RE_ADDLISTBOX,
	309	LM_SETITEMHANDLE,
	310	MPFROMSHORT(x), MPFROMP(info));
	311	WinSendDlgItemMsg(hwnd, RE_REMOVELISTBOX, LM_DELETEITEM,
	312	MPFROMSHORT(sSelect), MPVOID);
[445]	313	}
	314	}
[551]	315	else
	316	WinSendDlgItemMsg(hwnd, RE_REMOVELISTBOX, LM_SELECTITEM,
	317	MPFROMSHORT(sSelect), MPFROMSHORT(FALSE));
	318	sSelect = (USHORT) WinSendDlgItemMsg(hwnd, RE_REMOVELISTBOX,
[445]	319	LM_QUERYSELECTION,
	320	MPFROMSHORT(LIT_FIRST),
	321	MPVOID);
[551]	322	}
[2]	323	}
[551]	324	break;
	325	}
	326	return 0;
[2]	327	}
[551]	328	return WinDefDlgProc(hwnd, msg, mp1, mp2);
[2]	329	}
	330
[551]	331	CHAR *command_title(INT cx)
[347]	332	{
[551]	333	static CHAR duh[] = "???";
	334	LINKCMDS *info;
	335	INT x = 0;
[2]	336
[551]	337	if (!cmdloaded)
[2]	338	load_commands();
	339	info = cmdhead;
[551]	340	while (info) {
	341	if (x == cx)
[2]	342	return info->title;
	343	info = info->next;
	344	}
	345	return duh;
	346	}
	347
[551]	348	VOID free_commands(VOID)
[347]	349	{
[551]	350	LINKCMDS info, next;
[2]	351
	352	info = cmdhead;
[551]	353	while (info) {
[2]	354	next = info->next;
[1009]	355	xfree(info->title, pszSrcFile, __LINE__);
	356	xfree(info->pszCmdLine, pszSrcFile, __LINE__);
[1488]	357	xfree(info->env, pszSrcFile, __LINE__);
[1039]	358	free(info);
[2]	359	info = next;
	360	}
[1491]	361	free(pszCommandsList);
[2]	362	cmdhead = cmdtail = NULL;
	363	}
	364
[551]	365	VOID load_commands(VOID)
[347]	366	{
[551]	367	FILE *fp;
[2]	368	LINKCMDS *info;
[989]	369	PSZ pszCmdLine;
[551]	370	CHAR title[100];
[1345]	371	CHAR flags[34];
[1491]	372	//CHAR *p;
[1488]	373	ULONG size;
[2]	374
[1491]	375
	376	size = sizeof(BOOL) * 300;
[1498]	377	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, "COMMANDS.UsedCommandIDs", &UsedCommandIDs,
[1488]	378	&size);
[1491]	379	size = sizeof(BOOL) * 40;
[1498]	380	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, "COMMANDS.UsedHotKeyIDs", &UsedHotKeyIDs,
[1491]	381	&size); size = sizeof(BOOL);
[1498]	382	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, "COMMANDS.LoadCommandsFromINI",
[1491]	383	&fLoadCommandsFromINI, &size);
	384	if (!fLoadCommandsFromINI) {
	385	if (cmdhead)
	386	free_commands();
	387	cmdloaded = TRUE;
	388	pszCmdLine = xmallocz(MaxComLineStrg, pszSrcFile, __LINE__);
	389	pszCommandsList = xmallocz(ulSizeCommandsList, pszSrcFile, __LINE__);
	390	if (pszCmdLine) {
	391	BldFullPathName(pszCmdLine, pFM2SaveDirectory, PCSZ_COMMANDSDAT);
	392	fp = _fsopen(pszCmdLine, "r", SH_DENYWR);
	393	if (fp) {
	394	while (!feof(fp)) {
	395	if (!xfgets_bstripcr(title, sizeof(title), fp, pszSrcFile, __LINE__))
[989]	396	break;
[1491]	397	if (!title \|\| title == ';')
	398	continue;
	399	if (!xfgets_bstripcr(pszCmdLine, MaxComLineStrg, fp, pszSrcFile, __LINE__))
	400	break; /* error! */
	401	if (!xfgets_bstripcr(flags, sizeof(flags), fp, pszSrcFile, __LINE__))
	402	break;
	403	flags[34] = 0;
	404	if (!pszCmdLine)
	405	continue;
	406	info = xmallocz(sizeof(LINKCMDS), pszSrcFile, __LINE__);
	407	if (info) {
	408	# ifdef FORTIFY
	409	Fortify_SetOwner(info, 1);
	410	Fortify_SetScope(info, 1);
	411	# endif
	412	info->pszCmdLine = xstrdup(pszCmdLine, pszSrcFile, __LINE__);
	413
	414	if (pszCommandsList) {
	415	strcpy(pszCommandsList + strlen(pszCommandsList), title);
	416	strcpy(pszCommandsList + strlen(pszCommandsList), ";");
	417	}
	418	info->title = xstrdup(title, pszSrcFile, __LINE__);
	419	info->flags = atol(flags);
	420	if (!info->pszCmdLine \|\| !info->title) {
	421	xfree(info->pszCmdLine, pszSrcFile, __LINE__);
	422	xfree(info->title, pszSrcFile, __LINE__);
	423	free(info);
	424	break;
	425	}
	426	# ifdef FORTIFY
	427	Fortify_SetOwner(info->pszCmdLine, 1);
	428	Fortify_SetScope(info->pszCmdLine, 1);
	429	Fortify_SetOwner(info->title, 1);
	430	Fortify_SetScope(info->title, 1);
	431	# endif
	432	if (!cmdhead)
	433	cmdhead = info;
	434	else {
	435	cmdtail->next = info;
	436	info->prev = cmdtail;
	437	}
	438	cmdtail = info;
[989]	439	}
	440	}
[1491]	441	free(pszCmdLine);
	442	fclose(fp);
	443	if (pszCommandsList) {
	444	ulSizeCommandsList = strlen(pszCommandsList) + 1;
	445	}
[2]	446	}
	447	}
	448	}
[1491]	449	load_inicommands();
[2]	450	}
	451
[1488]	452	/**
	453	* load_inicommand loads the data from the ini file into an info struct
	454	* after COMMANDS.DAT has been loaded; It generates new IDs where necessary
	455	* it saves the environment from the old ini key and deletes it as needed
	456	**/
	457
	458	VOID load_inicommands(VOID)
	459	{
	460	LINKCMDS *info;;
	461	INT x = 0;
	462	INT y = 0;
	463	ULONG ID = 0;
	464	ULONG HotKeyID = 0;
	465	CHAR env[1002];
[1491]	466	CHAR key[120];
	467	CHAR szTitle[100];
[1488]	468	ULONG size;
[1491]	469	CHAR p, pp;
	470	PSZ pszCmdLine;
	471	ULONG flags;
[1488]	472
[1491]	473	# ifdef FORTIFY
	474	Fortify_EnterScope();
	475	# endif
	476	pszCmdLine = xmallocz(MaxComLineStrg, pszSrcFile, __LINE__);
	477	if (pszCmdLine) {
	478	if (fLoadCommandsFromINI) {
	479	if (cmdhead)
	480	free_commands();
	481	cmdloaded = TRUE;
	482	size = sizeof(ULONG);
[1498]	483	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, "COMMANDS.SizeSortOrder",
[1491]	484	&ulSizeCommandsList, &size);
	485	pszCommandsList = xmallocz(ulSizeCommandsList, pszSrcFile, __LINE__);
[1494]	486	if (pszCommandsList) {
[1498]	487	PrfQueryProfileString(fmprof, (CHAR *) FM3Str, "COMMANDS.SortOrder",
[1491]	488	NullStr, pszCommandsList, ulSizeCommandsList);
	489	p = pszCommandsList;
	490	while (*p == ';')
	491	p++;
	492	while (*p) {
	493	*szTitle = 0;
	494	pp = szTitle;
	495	while (p && p != ';')
	496	pp++ = p++;
	497	*pp = 0;
	498	while (*p == ';')
	499	p++;
	500	if (*szTitle) {
	501	bstripcr(szTitle);
	502	sprintf(key, "COMMAND.%sID", szTitle);
	503	size = sizeof(ULONG);
[1498]	504	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, key, &ID, &size);
[1491]	505	sprintf(key, "COMMAND.%sHotKeyID", szTitle);
	506	size = sizeof(ULONG);
[1498]	507	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, key, &HotKeyID, &size);
[1491]	508	sprintf(key, "COMMAND.%sflags", szTitle);
	509	size = sizeof(ULONG);
[1498]	510	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, key, &flags, &size);
[1491]	511	sprintf(key, "COMMAND.%senv", szTitle);
[1498]	512	PrfQueryProfileString(fmprof, (CHAR *) FM3Str, key, NullStr, env, sizeof(env));
[1491]	513	sprintf(key, "COMMAND.%sCmdLine", szTitle);
[1498]	514	PrfQueryProfileString(fmprof, (CHAR *) FM3Str, key, NullStr, pszCmdLine, MaxComLineStrg);
[1491]	515	}
	516	info = xmallocz(sizeof(LINKCMDS), pszSrcFile, __LINE__);
	517	if (info) {
	518	# ifdef FORTIFY
	519	Fortify_SetOwner(info, 1);
	520	Fortify_SetScope(info, 1);
	521	# endif
	522	info->pszCmdLine = xstrdup(pszCmdLine, pszSrcFile, __LINE__);
	523	info->title = xstrdup(szTitle, pszSrcFile, __LINE__);
	524	info->flags = flags;
	525	if (env != NullStr)
	526	info->env = xstrdup(env, pszSrcFile, __LINE__);
	527	info->ID = ID;
	528	info->HotKeyID = HotKeyID;
	529	if (!info->pszCmdLine \|\| !info->title) {
	530	xfree(info->pszCmdLine, pszSrcFile, __LINE__);
	531	xfree(info->title, pszSrcFile, __LINE__);
	532	xfree(info->env, pszSrcFile, __LINE__);
	533	free(info);
	534	break;
	535	}
	536	if (!cmdhead)
	537	cmdhead = info;
	538	else {
	539	cmdtail->next = info;
	540	info->prev = cmdtail;
	541	}
	542	cmdtail = info;
	543	}
	544	}
	545	}
[1488]	546	}
	547	else {
[1491]	548	info = cmdhead;
	549	while (info) {
	550	bstripcr(info->title);
	551	sprintf(key, "COMMAND.%sID", info->title);
	552	size = sizeof(ULONG);
[1498]	553	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, key, &ID, &size);
[1491]	554	sprintf(key, "COMMAND.%sHotKeyID", info->title);
	555	size = sizeof(ULONG);
[1498]	556	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, key, &HotKeyID, &size);
[1491]	557	sprintf(key, "COMMAND.%senv", info->title);
[1498]	558	PrfQueryProfileString(fmprof, (CHAR *) FM3Str, key, NullStr, env, sizeof(env));
[1491]	559	if (ID != 0) {
	560	if (env != NullStr)
	561	info->env = xstrdup(env, pszSrcFile, __LINE__);
	562	info->ID = ID;
	563	info->HotKeyID = HotKeyID;
	564	}
	565	//This updates the old commands.dat file to the new format
	566	//assigning the IDs based on file order or on next available ID if
	567	//COMMAND.DAT is hand edited.
	568	else {
	569	for (x = 0; x < 300; x++) {
	570	if (!UsedCommandIDs[x]) {
	571	ID = info->ID = IDM_COMMANDSTART + x;
	572	UsedCommandIDs[x] = TRUE;
	573	for (y = 0; y < 40; y++) {
	574	if (!UsedHotKeyIDs[y]) {
	575	HotKeyID = info->HotKeyID = IDM_COMMANDNUM0 + y;
	576	UsedHotKeyIDs[y] = TRUE;
	577	break;
	578	}
	579	}
[1488]	580	break;
	581	}
[1491]	582	if (x == 299)
	583	saymsg(MB_OK \| MB_ICONEXCLAMATION , HWND_DESKTOP,
	584	GetPString(IDS_COMMANDSLIMITTITLETEXT),
	585	GetPString(IDS_COMMANDSLIMITREACHEDTEXT ));
[1488]	586	}
[1498]	587	PrfQueryProfileString(fmprof, (CHAR *) FM3Str, info->pszCmdLine, NullStr, env, sizeof(env));
[1491]	588	info->env = xstrdup(env, pszSrcFile, __LINE__);
[1488]	589	}
[1491]	590	ID = 0;
	591	HotKeyID = 0;
	592	info = info->next;
[1488]	593	}
[1491]	594	fLoadCommandsFromINI = TRUE;
	595	save_commands();
[1488]	596	}
[1491]	597	free(pszCmdLine);
[1488]	598	}
	599	}
	600
[551]	601	VOID save_commands(VOID)
[347]	602	{
[2]	603	LINKCMDS *info;
[1491]	604	CHAR key[120];
	605
[551]	606	if (!cmdloaded \|\| !cmdhead)
[2]	607	return;
[1491]	608
[2]	609	info = cmdhead;
[1491]	610	pszCommandsList[0] = 0;
[551]	611	while (info) {
[1491]	612	sprintf(key, "COMMAND.%sflags", info->title);
[1498]	613	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, key, &info->flags, sizeof(ULONG));
[1491]	614	sprintf(key, "COMMAND.%sCmdLine", info->title);
[1498]	615	PrfWriteProfileString(fmprof, (CHAR *) FM3Str, key, info->pszCmdLine);
[1488]	616	bstripcr(info->title);
[1491]	617	sprintf(key, "COMMAND.%sID", info->title);
[1498]	618	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, key, &info->ID, sizeof(INT));
[1491]	619	sprintf(key, "COMMAND.%sHotKeyID", info->title);
[1498]	620	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, key, &info->HotKeyID, sizeof(INT));
[1491]	621	if (info->env != NullStr) {
	622	sprintf(key, "COMMAND.%senv", info->title);
[1498]	623	PrfWriteProfileString(fmprof, (CHAR *) FM3Str, key, info->env);
[1491]	624	}
	625	if ((strlen(pszCommandsList) + strlen(info->title) + 1) > ulSizeCommandsList)
	626	pszCommandsList = xrealloc(pszCommandsList,
	627	ulSizeCommandsList + strlen(info->title) + 1,
	628	pszSrcFile, __LINE__);
	629	strcpy(pszCommandsList + strlen(pszCommandsList), info->title);
	630	strcpy(pszCommandsList + strlen(pszCommandsList), ";");
[2]	631	info = info->next;
[1488]	632	} // while info
[1498]	633	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, "COMMANDS.UsedCommandIDs", &UsedCommandIDs,
[1486]	634	sizeof(BOOL) * 300);
[1498]	635	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, "COMMANDS.UsedHotKeyIDs", &UsedHotKeyIDs,
[1488]	636	sizeof(BOOL) * 40);
[1491]	637	ulSizeCommandsList = strlen(pszCommandsList) + 1;
[1498]	638	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, "COMMANDS.SizeSortOrder",
[1491]	639	&ulSizeCommandsList, sizeof(ULONG));
[1498]	640	PrfWriteProfileString(fmprof, (CHAR *) FM3Str, "COMMANDS.SortOrder", pszCommandsList);
	641	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, "COMMANDS.LoadCommandsFromINI",
[1491]	642	&fLoadCommandsFromINI, sizeof(BOOL));
[2]	643	}
	644
[445]	645	//== add_command() Add command to list ==
	646
[1491]	647	LINKCMDS add_command(COMMAND addme, BOOL fDontCheckHotKey)
[347]	648	{
[2]	649	LINKCMDS *info;
[1486]	650	INT x;
[1488]	651	INT y;
[1491]	652	APIRET ret;
[2]	653
[985]	654	if (!addme \|\| !addme->pszCmdLine \|\| !addme->title)
[551]	655	return NULL; // No data
[1491]	656	# ifdef FORTIFY
	657	Fortify_EnterScope();
	658	# endif
[445]	659	info = cmdhead;
	660	while (info) {
[551]	661	if (!stricmp(info->title, addme->title))
	662	return NULL; // Got a dup
[445]	663	info = info->next;
[2]	664	}
[1491]	665	if (!fDontCheckHotKey && UsedHotKeyIDs[addme->HotKeyID - IDM_COMMANDNUM0]) {
	666	info = cmdhead;
	667	while (info) {
	668	if (info->HotKeyID == addme->HotKeyID) { //avoid assigning hot key to multiple commands
	669	ret = saymsg(MB_YESNOCANCEL, HWND_DESKTOP, NullStr,
	670	GetPString(IDS_DUPLICATEHOTKEYTEXT));
	671	if (ret == MBID_YES) {
	672	info->HotKeyID = 0;
	673	UsedHotKeyIDs[addme->HotKeyID - IDM_COMMANDNUM0] = FALSE;
	674	break;
	675	}
	676	else if (ret == MBID_NO) {
	677	addme->HotKeyID = 0;
	678	break;
	679	}
	680	else
	681	return NULL;
	682	}
	683	info = info->next;
	684	}
	685	}
[551]	686	info = xmallocz(sizeof(LINKCMDS), pszSrcFile, __LINE__);
[445]	687	if (!info)
	688	return NULL;
[989]	689	info->pszCmdLine = xstrdup(addme->pszCmdLine, pszSrcFile, __LINE__);
[551]	690	info->title = xstrdup(addme->title, pszSrcFile, __LINE__);
[1486]	691	info->HotKeyID = addme->HotKeyID;
[1491]	692	info->ID = addme->ID;
	693	if (info->HotKeyID >= IDM_COMMANDNUM0 && info->HotKeyID <= IDM_COMMANDNUM39) {
[1488]	694	UsedHotKeyIDs[info->HotKeyID - IDM_COMMANDNUM0] = TRUE;
[1491]	695	}
[1488]	696	else
	697	info->HotKeyID = 0;
[1486]	698	if (!info->ID) {
[1488]	699	//profile updated by save_commands
[1486]	700	for (x = 0; x < 300; x++) {
	701	if (!UsedCommandIDs[x]) {
	702	info->ID = IDM_COMMANDSTART + x;
[1487]	703	UsedCommandIDs[x] = TRUE;
[1491]	704	if (!info->HotKeyID && !fDontCheckHotKey) {
	705	for (y = 0; y < 40; y++) {
	706	if (!UsedHotKeyIDs[y]) {
	707	info->HotKeyID = IDM_COMMANDNUM0 + y;
	708	UsedHotKeyIDs[y] = TRUE;
	709	break;
[1488]	710	}
	711	}
[1491]	712	}
[1486]	713	break;
	714	}
[1488]	715	if (x == 299)
	716	saymsg(MB_OK \| MB_ICONEXCLAMATION , HWND_DESKTOP,
	717	GetPString(IDS_COMMANDSLIMITTITLETEXT),
	718	GetPString(IDS_COMMANDSLIMITREACHEDTEXT ));
[1486]	719	}
	720	}
[445]	721	if (addme->flags)
	722	info->flags = addme->flags;
[1488]	723	if (addme->env)
	724	info->env = xstrdup(addme->env, pszSrcFile, __LINE__);
[1486]	725	if (!info->pszCmdLine \|\| !info->title \|\| !info->ID) {
[1009]	726	xfree(info->pszCmdLine, pszSrcFile, __LINE__);
	727	xfree(info->title, pszSrcFile, __LINE__);
[1491]	728	xfree(info->env, pszSrcFile, __LINE__);
[1039]	729	free(info);
[445]	730	return NULL;
	731	}
	732	if (!cmdhead) /* only item in list */
	733	cmdhead = cmdtail = info;
	734	else {
	735	/* place at tail */
	736	cmdtail->next = info;
	737	info->prev = cmdtail;
	738	cmdtail = info;
	739	}
[1491]	740	pszCommandsList = xrealloc(pszCommandsList, ulSizeCommandsList + strlen(info->title) + 1,
	741	pszSrcFile, __LINE__);
	742	if (pszCommandsList) {
	743	strcpy(pszCommandsList + strlen(pszCommandsList), info->title);
	744	strcpy(pszCommandsList + strlen(pszCommandsList), ";");
	745	ulSizeCommandsList = ulSizeCommandsList + strlen(info->title) + 1;
	746	}
	747	else {
	748	pszCommandsList = xmallocz(ulSizeCommandsList, pszSrcFile, __LINE__);
	749	if (pszCommandsList)
[1498]	750	PrfQueryProfileString(fmprof, (CHAR *) FM3Str, "COMMANDS.SortOrder",
[1491]	751	NullStr, pszCommandsList, ulSizeCommandsList);
	752	return 0;
	753	}
[445]	754	return info;
[2]	755	}
	756
[551]	757	BOOL kill_command(CHAR * killme)
[347]	758	{
[2]	759	LINKCMDS *info;
	760
[551]	761	if (killme && *killme) {
[2]	762	info = cmdhead;
[551]	763	while (info) {
	764	if (!stricmp(info->title, killme)) {
[1486]	765	UsedCommandIDs[info->ID - IDM_COMMANDSTART] = FALSE;
	766	if (info->HotKeyID)
	767	UsedHotKeyIDs[info->HotKeyID - IDM_COMMANDNUM0] = FALSE;
[551]	768	if (info == cmdhead) {
[445]	769	cmdhead = info->next;
[551]	770	if (info == cmdtail)
[445]	771	cmdtail = info->prev;
	772	}
	773	else {
[551]	774	if (info->next)
[445]	775	(info->next)->prev = info->prev;
[551]	776	if (info->prev)
[445]	777	(info->prev)->next = info->next;
[551]	778	if (info == cmdtail)
[445]	779	cmdtail = info->prev;
	780	}
[1009]	781	xfree(info->pszCmdLine, pszSrcFile, __LINE__);
[1488]	782	xfree(info->title, pszSrcFile, __LINE__);
	783	xfree(info->env, pszSrcFile, __LINE__);
[1039]	784	free(info);
[445]	785	return TRUE;
[2]	786	}
	787	info = info->next;
	788	}
	789	}
[1491]	790	# ifdef FORTIFY
	791	Fortify_LeaveScope();
	792	# endif
[2]	793	return FALSE;
	794	}
	795
[1491]	796	BOOL QueryCommandSettings(HWND hwnd, COMMAND *temp)
	797	{
	798	PSZ pszWorkBuf;
	799	APIRET ret;
	800	CHAR env[1002];
	801	INT x;
	802
	803	pszWorkBuf = xmalloc(MaxComLineStrg, pszSrcFile, __LINE__);
	804	if (!pszWorkBuf) {
	805	return FALSE; //already complained
	806	}
	807	WinQueryDlgItemText(hwnd, CMD_CL, MaxComLineStrg, temp->pszCmdLine);
	808	NormalizeCmdLine(pszWorkBuf, temp->pszCmdLine);
	809	memcpy(temp->pszCmdLine, pszWorkBuf, strlen(pszWorkBuf) + 1);
	810	free(pszWorkBuf);
	811	if (fCancelAction) {
	812	fCancelAction = FALSE;
	813	return FALSE;
	814	}
	815	if (!strchr(temp->pszCmdLine, '%')) {
	816	ret = saymsg(MB_YESNO,
	817	HWND_DESKTOP,
	818	NullStr,
	819	GetPString(IDS_TOACTONSELECTEDTEXT));
	820	if (ret == MBID_YES)
	821	strcat(temp->pszCmdLine, " %a");
	822	}
	823	WinQueryDlgItemText(hwnd, CMD_TITLE, sizeof(temp->title), temp->title);
	824	bstripcr(temp->title);
	825	temp->flags = CheckExecutibleFlags(hwnd, 3);
	826	*env = 0;
	827	WinQueryDlgItemText(hwnd, CMD_ENVIRON, 1000, env);
	828	bstripcr(env);
	829	if (*env)
	830	strcpy(temp->env, env);
	831	x = (SHORT) WinSendDlgItemMsg(hwnd, CMD_HOTKEY,
	832	LM_QUERYSELECTION,
	833	MPFROMSHORT(LIT_FIRST), MPVOID);
	834	if (x < 40)
	835	temp->HotKeyID = x + IDM_COMMANDNUM0;
	836	else
	837	temp->HotKeyID = 0;
	838	DbgMsg(pszSrcFile, __LINE__, "info %i", temp->HotKeyID);
	839	return TRUE;
	840	}
	841
[551]	842	MRESULT EXPENTRY CommandDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[347]	843	{
[574]	844	SHORT x, y;
[2]	845	LINKCMDS *info;
	846
[1491]	847	# ifdef FORTIFY
	848	Fortify_EnterScope();
	849	# endif
[551]	850	switch (msg) {
	851	case WM_INITDLG:
	852	WinSendDlgItemMsg(hwnd, CMD_LISTBOX, LM_DELETEALL, MPVOID, MPVOID);
	853	WinSendDlgItemMsg(hwnd, CMD_CL, EM_SETTEXTLIMIT,
[1345]	854	MPFROM2SHORT(MaxComLineStrg - 1, 0), MPVOID);
[551]	855	WinSendDlgItemMsg(hwnd, CMD_TITLE, EM_SETTEXTLIMIT,
[1345]	856	MPFROM2SHORT(99, 0), MPVOID);
[551]	857	WinSetDlgItemText(hwnd, CMD_CL, NullStr);
	858	WinSetDlgItemText(hwnd, CMD_TITLE, NullStr);
	859	WinCheckButton(hwnd, CMD_DEFAULT, TRUE);
	860	WinCheckButton(hwnd, CMD_PROMPT, FALSE);
	861	WinCheckButton(hwnd, CMD_ONCE, FALSE);
	862	info = cmdhead;
	863	while (info) {
	864	x = (SHORT) WinSendDlgItemMsg(hwnd, CMD_LISTBOX, LM_INSERTITEM,
	865	MPFROM2SHORT(LIT_END, 0),
	866	MPFROMP(info->title));
	867	if (x >= 0)
	868	WinSendDlgItemMsg(hwnd, CMD_LISTBOX, LM_SETITEMHANDLE,
	869	MPFROMSHORT(x), MPFROMP(info));
	870	info = info->next;
	871	}
	872	WinSendDlgItemMsg(hwnd, CMD_LISTBOX, LM_SELECTITEM,
	873	MPFROMSHORT(0), MPFROMSHORT(TRUE));
	874	{
	875	PFNWP oldproc;
	876
	877	oldproc = WinSubclassWindow(WinWindowFromID(hwnd, CMD_CL),
	878	(PFNWP) CommandTextProc);
	879	if (oldproc)
[574]	880	WinSetWindowPtr(WinWindowFromID(hwnd, CMD_CL), QWL_USER, (PVOID) oldproc);
[551]	881	}
	882	break;
	883
	884	case WM_CONTROL:
	885	if (SHORT1FROMMP(mp1) == CMD_LISTBOX) {
	886	switch (SHORT2FROMMP(mp1)) {
	887	case LN_ENTER:
	888	case LN_SELECT:
	889	x = (SHORT) WinSendDlgItemMsg(hwnd, CMD_LISTBOX,
	890	LM_QUERYSELECTION,
	891	MPFROMSHORT(LIT_FIRST), MPVOID);
	892	if (x >= 0) {
	893	info = (LINKCMDS *) WinSendDlgItemMsg(hwnd, CMD_LISTBOX,
	894	LM_QUERYITEMHANDLE,
	895	MPFROMSHORT(x), MPVOID);
	896	if (!info) {
	897	Runtime_Error(pszSrcFile, __LINE__, "LM_QUERYITEMHANDLE");
	898	break;
	899	}
[989]	900	WinSetDlgItemText(hwnd, CMD_CL, info->pszCmdLine);
[551]	901	if (!(info->flags & 1023))
	902	WinCheckButton(hwnd, CMD_DEFAULT, TRUE);
	903	else {
	904	if (info->flags & FULLSCREEN)
	905	WinCheckButton(hwnd, CMD_FULLSCREEN, TRUE);
	906	else if (info->flags & MINIMIZED)
	907	WinCheckButton(hwnd, CMD_MINIMIZED, TRUE);
	908	else if (info->flags & MAXIMIZED)
	909	WinCheckButton(hwnd, CMD_MAXIMIZED, TRUE);
	910	else if (info->flags & INVISIBLE)
	911	WinCheckButton(hwnd, CMD_INVISIBLE, TRUE);
	912	}
	913	WinCheckButton(hwnd, CMD_PROMPT, ((info->flags & PROMPT) != 0));
	914	WinCheckButton(hwnd, CMD_KEEP, ((info->flags & KEEP) != 0));
	915	WinCheckButton(hwnd, CMD_ONCE, ((info->flags & ONCE) != 0));
[1488]	916	WinSetDlgItemText(hwnd, CMD_TITLE, info->title);
	917	if (info->env)
	918	WinSetDlgItemText(hwnd, CMD_ENVIRON, info->env);
	919	else
[1491]	920	WinSetDlgItemText(hwnd, CMD_ENVIRON, NullStr);
	921	for (x = 0; x < 40; x++) {
	922	CHAR s[CCHMAXPATH + 24];
	923
	924	sprintf(s, "%s%s%s",
	925	x < IDM_COMMANDNUM20 - IDM_COMMANDNUM0 ? "Ctrl+" : NullStr,
	926	x > IDM_COMMANDNUM19 - IDM_COMMANDNUM0 ? "Alt+" : NullStr,
	927	(x > IDM_COMMANDNUM9 - IDM_COMMANDNUM0 &&
	928	x < IDM_COMMANDNUM20 - IDM_COMMANDNUM0) \|\|
	929	x > IDM_COMMANDNUM29 - IDM_COMMANDNUM0 ? "Shift+" : NullStr);
	930	sprintf(&s[strlen(s)], "%d", (x % 10) + 1 == 10 ? 0 : (x % 10) + 1);
	931	sprintf(&s[strlen(s)], " %s", UsedHotKeyIDs[x] ? "(in use)" : NullStr);
	932	WinSendMsg(WinWindowFromID(hwnd, CMD_HOTKEY), LM_INSERTITEM,
	933	MPFROM2SHORT(LIT_END, 0), MPFROMP(s));
	934	if (x == 39)
	935	WinSendMsg(WinWindowFromID(hwnd, CMD_HOTKEY), LM_INSERTITEM,
	936	MPFROM2SHORT(LIT_END, 0), MPFROMP("none"));
	937	if (info->HotKeyID == x + IDM_COMMANDNUM0)
	938	WinSendMsg(WinWindowFromID(hwnd, CMD_HOTKEY), LM_SELECTITEM,
	939	MPFROM2SHORT(x, 0), MPFROMLONG(TRUE));
	940	if (x == 39 && info->HotKeyID == 0)
	941	WinSendMsg(WinWindowFromID(hwnd, CMD_HOTKEY), LM_SELECTITEM,
	942	MPFROM2SHORT(x + 1, 0), MPFROMLONG(TRUE));
	943	} // for
	944	}
[551]	945	break;
[2]	946	}
[551]	947	}
	948	return 0;
	949
	950	case WM_COMMAND:
	951	switch (SHORT1FROMMP(mp1)) {
	952	case CMD_FIND:
[2]	953	{
[888]	954	CHAR filename[CCHMAXPATH + 9], szfilename[CCHMAXPATH + 9];
[2]	955
[551]	956	*filename = 0;
[888]	957	if (insert_filename(hwnd, filename, 2, FALSE) && *filename) {
	958	BldQuotedFileName(szfilename, filename);
	959	WinSetDlgItemText(hwnd, CMD_CL, szfilename);
[551]	960	}
[2]	961	}
	962	break;
	963
[551]	964	case CMD_REORDER:
	965	if (!cmdhead \|\| !cmdhead->next) {
	966	Runtime_Error(pszSrcFile, __LINE__, "no cmd");
	967	break;
	968	}
	969	if (WinDlgBox(HWND_DESKTOP, hwnd, ReOrderProc, FM3ModHandle,
	970	RE_FRAME, MPVOID)) {
	971	WinSendDlgItemMsg(hwnd, CMD_LISTBOX, LM_DELETEALL, MPVOID, MPVOID);
	972	WinSetDlgItemText(hwnd, CMD_CL, NullStr);
	973	WinSetDlgItemText(hwnd, CMD_TITLE, NullStr);
	974	info = cmdhead;
	975	while (info) {
	976	x = (SHORT) WinSendDlgItemMsg(hwnd,
	977	CMD_LISTBOX,
	978	LM_INSERTITEM,
	979	MPFROM2SHORT(LIT_END, 0),
	980	MPFROMP(info->title));
	981	if (x >= 0)
	982	WinSendDlgItemMsg(hwnd,
	983	CMD_LISTBOX,
	984	LM_SETITEMHANDLE,
	985	MPFROMSHORT(x), MPFROMP(info));
	986	info = info->next;
[445]	987	}
[551]	988	WinSendDlgItemMsg(hwnd,
	989	CMD_LISTBOX,
	990	LM_SELECTITEM, MPFROMSHORT(0), MPFROMSHORT(TRUE));
	991	WinCheckButton(hwnd, CMD_DEFAULT, TRUE);
	992	WinCheckButton(hwnd, CMD_PROMPT, FALSE);
	993	WinCheckButton(hwnd, CMD_ONCE, FALSE);
	994	save_commands();
[2]	995	}
[551]	996	break;
[2]	997
[551]	998	case DID_OK:
	999	{
[1491]	1000	COMMAND *temp;
	1001	BOOL fDontCheckHotKey = FALSE;
[2]	1002
[1491]	1003	temp = xmallocz(sizeof(COMMAND), pszSrcFile, __LINE__);
	1004	if (!temp)
	1005	break; //already complained
	1006	temp->pszCmdLine = xmallocz(MaxComLineStrg, pszSrcFile, __LINE__);
	1007	if (!temp->pszCmdLine) {
	1008	free (temp);
[959]	1009	break; //already complained
[985]	1010	}
[1491]	1011	if (QueryCommandSettings(hwnd, temp)){
	1012	if (temp->HotKeyID == 0)
	1013	fDontCheckHotKey = TRUE;
	1014	info = add_command(temp, fDontCheckHotKey);
[909]	1015	}
[1491]	1016	else {
	1017	free(temp->pszCmdLine);
	1018	free(temp);
[909]	1019	break;
	1020	}
[1491]	1021	free(temp->pszCmdLine);
	1022	free(temp);
[1488]	1023	save_commands();
[1491]	1024	WinDismissDlg(hwnd, 0);
	1025	break;
[551]	1026	}
[2]	1027
[551]	1028	case DID_CANCEL:
	1029	WinDismissDlg(hwnd, 0);
	1030	break;
[507]	1031
[551]	1032	case IDM_HELP:
	1033	if (hwndHelp)
	1034	WinSendMsg(hwndHelp,
	1035	HM_DISPLAY_HELP,
	1036	MPFROM2SHORT(HELP_COMMAND, 0), MPFROMSHORT(HM_RESOURCEID));
	1037	break;
[507]	1038
[551]	1039	case CMD_ADD:
	1040	{
[1491]	1041	COMMAND *temp;
	1042	BOOL fDontCheckHotKey = FALSE;
[2]	1043
[1491]	1044	temp = xmallocz(sizeof(COMMAND), pszSrcFile, __LINE__);
	1045	if (!temp)
	1046	break; //already complained
	1047	temp->pszCmdLine = xmallocz(MaxComLineStrg, pszSrcFile, __LINE__);
	1048	if (!temp->pszCmdLine) {
	1049	free (temp);
[959]	1050	break; //already complained
[985]	1051	}
[1491]	1052	if (!QueryCommandSettings(hwnd, temp)) {
	1053	free(temp->pszCmdLine);
	1054	free(temp);
[909]	1055	break;
	1056	}
[1491]	1057	else {
	1058	if (temp->HotKeyID == 0)
	1059	fDontCheckHotKey = TRUE;
	1060	info = add_command(temp, fDontCheckHotKey);
	1061	if (!info) {
	1062	saymsg(MB_ENTER, hwnd, GetPString(IDS_ERRORTEXT),
	1063	GetPString(IDS_CANTADDCOMMANDTEXTDUP), temp->title);
	1064	free(temp->pszCmdLine);
	1065	free(temp);
	1066	break;
	1067	}
	1068	x = (SHORT) WinSendDlgItemMsg(hwnd,
	1069	CMD_LISTBOX,
	1070	LM_INSERTITEM,
	1071	MPFROM2SHORT(LIT_END, 0),
	1072	MPFROMP(temp->title));
	1073	if (x >= 0) {
	1074	WinSendDlgItemMsg(hwnd,
	1075	CMD_LISTBOX,
	1076	LM_SETITEMHANDLE,
	1077	MPFROMSHORT(x), MPFROMP(info));
	1078	WinSendDlgItemMsg(hwnd,
	1079	CMD_LISTBOX,
	1080	LM_SELECTITEM,
	1081	MPFROMSHORT(x), MPFROMSHORT(TRUE));
	1082	}
	1083	save_commands();
[985]	1084	}
[1491]	1085	free(temp->pszCmdLine);
	1086	free(temp);
	1087	break;
[551]	1088	}
[2]	1089
[551]	1090	case CMD_DELETE:
	1091	{
[1488]	1092	CHAR temp[100];
	1093	CHAR keyID[120];
	1094	CHAR keyHotKeyID[120];
	1095	CHAR keyenv[120];
[2]	1096
[1345]	1097	WinQueryDlgItemText(hwnd, CMD_TITLE, 100, temp);
[1488]	1098	bstripcr(temp);
[551]	1099	if (!kill_command(temp))
	1100	Runtime_Error(pszSrcFile, __LINE__, "kill_command");
[1491]	1101	else {
	1102	sprintf(keyID, "COMMAND.%sID", temp);
	1103	sprintf(keyHotKeyID, "COMMAND.%sHotKeyID", temp);
	1104	sprintf(keyenv, "COMMAND.%senv", temp);
[1498]	1105	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, keyID, NULL, 0);
	1106	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, keyHotKeyID, NULL, 0);
	1107	PrfWriteProfileString(fmprof, (CHAR *) FM3Str, keyenv, NULL);
[551]	1108	x = (SHORT) WinSendDlgItemMsg(hwnd,
	1109	CMD_LISTBOX,
	1110	LM_QUERYSELECTION,
	1111	MPFROMSHORT(LIT_FIRST), MPVOID);
	1112	if (x >= 0) {
	1113	WinSendDlgItemMsg(hwnd,
	1114	CMD_LISTBOX,
	1115	LM_DELETEITEM, MPFROMSHORT(x), MPVOID);
	1116	WinSendDlgItemMsg(hwnd,
	1117	CMD_LISTBOX,
	1118	LM_SELECTITEM,
[1491]	1119	MPFROMSHORT(0), MPFROMSHORT(TRUE));
[445]	1120	}
[1488]	1121	save_commands();
[551]	1122	}
	1123	}
	1124	break;
[985]	1125
[551]	1126	case CMD_REPLACE:
[1491]	1127	{
	1128	COMMAND *temp;
[1488]	1129	CHAR keyID[120];
	1130	CHAR keyHotKeyID[120];
	1131	CHAR keyenv[120];
	1132	INT ID = 0;
	1133	INT HotKeyID = 0;
	1134	ULONG size;
[1491]	1135	BOOL fDontCheckHotKey = FALSE;
[909]	1136
[1491]	1137	// Query the dialog
	1138	temp = xmallocz(sizeof(COMMAND), pszSrcFile, __LINE__);
	1139	if (!temp)
	1140	break; //already complained
	1141	temp->pszCmdLine = xmallocz(MaxComLineStrg, pszSrcFile, __LINE__);
	1142	if (!temp->pszCmdLine) {
	1143	free (temp);
[959]	1144	break; //already complained
[985]	1145	}
[1491]	1146	if (!QueryCommandSettings(hwnd, temp)) {
	1147	free(temp->pszCmdLine);
	1148	free(temp);
[909]	1149	break;
	1150	}
	1151	//remember item location in the list
[574]	1152	y = (SHORT) WinSendDlgItemMsg(hwnd,
[909]	1153	CMD_LISTBOX,
	1154	LM_QUERYSELECTION,
	1155	MPFROMSHORT(LIT_CURSOR), MPVOID);
[1491]	1156	//Delete
	1157	sprintf(keyID, "COMMAND.%sID", temp->title);
	1158	sprintf(keyHotKeyID, "COMMAND.%sHotKeyID", temp->title);
	1159	sprintf(keyenv, "COMMAND.%senv", temp->title);
[1498]	1160	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, keyID, &ID, &size);
	1161	PrfQueryProfileData(fmprof, (CHAR *) FM3Str, keyHotKeyID, &HotKeyID, &size);
[1491]	1162	temp->ID = ID;
	1163	if (temp->HotKeyID == HotKeyID \|\| temp->HotKeyID == 0)
	1164	fDontCheckHotKey = TRUE;
	1165	if (kill_command(temp->title)) {
[1498]	1166	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, keyID, NULL, 0);
	1167	PrfWriteProfileData(fmprof, (CHAR *) FM3Str, keyHotKeyID, NULL, 0);
	1168	PrfWriteProfileString(fmprof, (CHAR *) FM3Str, keyenv, NULL);
[551]	1169	x = (SHORT) WinSendDlgItemMsg(hwnd,
	1170	CMD_LISTBOX,
	1171	LM_QUERYSELECTION,
	1172	MPFROMSHORT(LIT_FIRST), MPVOID);
	1173	if (x >= 0) {
	1174	WinSendDlgItemMsg(hwnd,
	1175	CMD_LISTBOX,
	1176	LM_DELETEITEM, MPFROMSHORT(x), MPVOID);
	1177	WinSendDlgItemMsg(hwnd,
	1178	CMD_LISTBOX,
	1179	LM_SELECTITEM,
	1180	MPFROMSHORT(LIT_NONE), MPFROMSHORT(FALSE));
[507]	1181	}
[909]	1182	} // then do an add
[1491]	1183	info = add_command(temp, fDontCheckHotKey);
[909]	1184	if (!info) {
	1185	saymsg(MB_ENTER, hwnd, GetPString(IDS_ERRORTEXT),
	1186	GetPString(IDS_CANTADDCOMMANDTEXT),
[1491]	1187	temp->title);
	1188	}
[551]	1189	else {
[1488]	1190	//put item back in original place
[551]	1191	x = (SHORT) WinSendDlgItemMsg(hwnd,
	1192	CMD_LISTBOX,
	1193	LM_INSERTITEM,
[574]	1194	MPFROM2SHORT(y, 0),
[1491]	1195	MPFROMP(temp->title));
[909]	1196	if (x >= 0) {
	1197	LINKCMDS temphead = NULL,last = NULL, *temptail = NULL;
	1198	SHORT numitems, sSelect = 0;
	1199
[551]	1200	WinSendDlgItemMsg(hwnd,
	1201	CMD_LISTBOX,
	1202	LM_SETITEMHANDLE,
	1203	MPFROMSHORT(x), MPFROMP(info));
	1204	WinSendDlgItemMsg(hwnd,
	1205	CMD_LISTBOX,
	1206	LM_SELECTITEM,
[574]	1207	MPFROMSHORT(x), MPFROMSHORT(TRUE));
[909]	1208	//then reorder
	1209	numitems = (SHORT) WinSendDlgItemMsg(hwnd, CMD_LISTBOX,
	1210	LM_QUERYITEMCOUNT,
	1211	MPVOID, MPVOID);
[574]	1212
[909]	1213	while (numitems) {
	1214
	1215
	1216	info = (LINKCMDS *) WinSendDlgItemMsg(hwnd, CMD_LISTBOX,
	1217	LM_QUERYITEMHANDLE,
	1218	MPFROMSHORT(sSelect++),
	1219	MPVOID);
	1220	if (info) {
	1221	if (!temphead) {
	1222	temphead = info;
	1223	info->prev = NULL;
	1224	}
	1225	else {
	1226	last->next = info;
	1227	info->prev = last;
	1228	}
	1229	temptail = info;
	1230	last = info;
	1231	info->next = NULL;
	1232	}
	1233	numitems--;
	1234	}
	1235	cmdhead = temphead;
[1491]	1236	cmdtail = temptail;
[909]	1237	save_commands();
	1238	}
[574]	1239	}
[1491]	1240	xfree(temp->pszCmdLine, pszSrcFile, __LINE__);
	1241	xfree(temp, pszSrcFile, __LINE__);
[2]	1242	}
[551]	1243	break;
	1244	}
	1245	return 0;
[2]	1246	}
[1491]	1247	# ifdef FORTIFY
	1248	Fortify_LeaveScope();
	1249	# endif
[551]	1250	return WinDefDlgProc(hwnd, msg, mp1, mp2);
[2]	1251	}
	1252
[551]	1253	VOID RunCommand(HWND hwnd, INT cx)
[347]	1254	{
[551]	1255	INT x;
	1256	CHAR **list;
	1257	LINKCMDS *info;
[2]	1258
	1259	list = BuildList(hwnd);
	1260	x = 0;
	1261	info = cmdhead;
[551]	1262	while (info) {
[1486]	1263	if (cx < 4300) {
	1264	if (info->ID == cx)
	1265	break;
	1266	}
	1267	else {
	1268	if (info->HotKeyID == cx)
	1269	break;
	1270	}
[2]	1271	info = info->next;
	1272	}
[551]	1273	if (info) {
[2]	1274
[551]	1275	INT flags;
[2]	1276
	1277	x--;
	1278	flags = info->flags;
[551]	1279	if (!(flags & FULLSCREEN))
[2]	1280	flags \|= WINDOWED;
[551]	1281	if (flags & KEEP)
[2]	1282	flags \|= SEPARATEKEEP;
	1283	else
	1284	flags \|= SEPARATE;
[204]	1285	flags &= ~(KEEP \| DIEAFTER);
[1337]	1286	if (!strchr(info->pszCmdLine, '%')) {
	1287	CHAR *fakelist[2];
[2]	1288
[1337]	1289	*fakelist = "C";
	1290	fakelist[1] = NULL;
	1291	ExecOnList(hwnd,
	1292	info->pszCmdLine,
[1497]	1293	flags, NULL, info->env != NullStr ? info->env : NULL,
[1488]	1294	fakelist, GetPString(IDS_EXECCMDTITLETEXT),
[1337]	1295	pszSrcFile, __LINE__);
	1296	}
	1297	else if ((flags & ONCE) && list && list[0]) {
	1298
[551]	1299	CHAR *fakelist[2];
	1300	INT cntr;
[2]	1301
	1302	flags &= (~ONCE);
[551]	1303	for (cntr = 0; list[cntr]; cntr++) {
[445]	1304	*fakelist = list[cntr];
	1305	fakelist[1] = NULL;
	1306	ExecOnList(hwnd,
[989]	1307	info->pszCmdLine,
[1497]	1308	flags, NULL, info->env != NullStr ? info->env : NULL,
[1488]	1309	fakelist, GetPString(IDS_EXECCMDTITLETEXT),
[888]	1310	pszSrcFile, __LINE__);
[2]	1311	}
	1312	}
[1337]	1313	else if (list && list[0])
[2]	1314	ExecOnList(hwnd,
[989]	1315	info->pszCmdLine,
[1497]	1316	flags, NULL, info->env != NullStr ? info->env : NULL,
[1488]	1317	list, GetPString(IDS_EXECCMDTITLETEXT),
[888]	1318	pszSrcFile, __LINE__);
[1337]	1319	else
	1320	return;
[2]	1321	}
	1322	FreeList(list);
	1323	DosPostEventSem(CompactSem);
	1324	}
	1325
[551]	1326	VOID EditCommands(HWND hwnd)
[347]	1327	{
[2]	1328	static CHAR stop = 0;
	1329
[551]	1330	if (stop)
[2]	1331	return;
	1332	stop++;
[551]	1333	if (!cmdloaded)
[2]	1334	load_commands();
	1335	WinDlgBox(HWND_DESKTOP,
[551]	1336	hwnd, CommandDlgProc, FM3ModHandle, CMD_FRAME, MPFROMP(&hwnd));
[2]	1337	stop = 0;
	1338	}
[793]	1339
	1340	#pragma alloc_text(COMMAND,command_title,free_commands,add_command,kill_command)
	1341	#pragma alloc_text(COMMAND,CommandDlgProc,EditCommands,ReOrderProc,CommandTextProc)

Note: See TracBrowser for help on using the repository browser.

Download in other formats: