source: trunk/eas.c@ 718

Last change on this file since 718 was 620, checked in by Steven Levine, 19 years ago

Minor reformat

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 1.7 KB
RevLine 
[22]1
[52]2/***********************************************************************
[22]3
[52]4 $Id: eas.c 620 2007-04-20 19:23:14Z stevenhl $
5
6 EA viewer applet
7
8 Copyright (c) 1993-98 M. Kimes
[620]9 Copyright (c) 2002-2007 Steven H.Levine
[52]10
[620]11 16 Oct 02 SHL Reformat
12 08 Feb 03 SHL Free list with free() since we don't
13 allocate list contents
14 08 Apr 07 SHL Minor reformat
[52]15
16***********************************************************************/
17
[2]18#define INCL_DOS
19#define INCL_WIN
20
21#include <os2.h>
22#include <stdarg.h>
23#include <stdio.h>
24#include <stdlib.h>
25#include <string.h>
26#include <ctype.h>
27#include "dll\fm3dll.h"
28#include "dll\fm3dlg.h"
29
30
[52]31int main (int argc,char *argv[])
32{
[2]33
34 HAB hab;
35 HMQ hmq;
36 static CHAR fullname[CCHMAXPATH];
37 APIRET rc;
38 CHAR **list = NULL;
39 INT x,numfiles = 0,numalloc = 0;
40
41 DosError(FERR_DISABLEHARDERR);
42 *fullname = 0;
43 for(x = 1;x < argc;x++) {
[620]44 if (!strchr("/;,`\'",*argv[x]) && IsFile(argv[x]) != -1) {
45 if (DosQueryPathInfo(argv[x],FIL_QUERYFULLNAME,fullname,
46 sizeof(fullname)))
47 strcpy(fullname,argv[x]);
[2]48 AddToList(fullname,&list,&numfiles,&numalloc);
49 }
50 }
51 hab = WinInitialize(0);
[620]52 if (hab) {
[2]53 hmq = WinCreateMsgQueue(hab,384);
[620]54 if (hmq) {
55 if (InitFM3DLL(hab,argc,argv)) {
56 if (!list) {
57 strcpy(fullname,"*");
58 list = malloc(sizeof(CHAR *) * 2);
59 if (!list || !insert_filename(HWND_DESKTOP,fullname,TRUE,FALSE) ||
60 !*fullname || *fullname == '*')
61 goto Abort;
62 list[0] = fullname;
63 list[1] = NULL;
64 }
65 WinDlgBox(HWND_DESKTOP,
[22]66 HWND_DESKTOP,
67 DisplayEAsProc,
68 FM3ModHandle,
69 EA_FRAME,
70 (PVOID)list);
[2]71 }
72Abort:
73 WinDestroyMsgQueue(hmq);
74 }
75 WinTerminate(hab);
76 }
[52]77 if (list)
78 free(list);
[2]79 return 0;
80}
81
Note: See TracBrowser for help on using the repository browser.