Category : OS/2 Files
Archive   : EMXTST8F.ZIP
Filename : EATEST.C

 
Output of file : EATEST.C contained in archive : EMXTST8F.ZIP
/* eatest.c (emx+gcc) */

#define INCL_DOSFILEMGR
#include
#include
#include
#include
#include
#include
#include

#define FALSE 0
#define TRUE 1

enum actions
{
ACTION_NONE,
ACTION_ADD,
ACTION_SHOW,
ACTION_REMOVE
};

static enum actions action = ACTION_NONE;


static void do_add (const char *path, const char *name, const char *value)
{
int i, size;
struct _ea ea;
char *buf;

size = strlen (value);
buf = malloc (size + 4);
if (buf == NULL)
{
fprintf (stderr, "Out of memory\n");
exit (2);
}
((USHORT *)buf)[0] = EAT_ASCII;
((USHORT *)buf)[1] = size;
memcpy (buf+4, value, size);
ea.flags = 0;
ea.size = size + 4;
ea.value = buf;
if (strcmp (path, "-") == 0)
i = _ea_put (&ea, NULL, fileno (stdout), name);
else
i = _ea_put (&ea, path, 0, name);
if (i < 0)
{
perror (path);
exit (2);
}
free (buf);
}


static void do_remove (const char *path, const char *name)
{
int i;

if (strcmp (path, "-") == 0)
i = _ea_remove (NULL, fileno (stdout), name);
else
i = _ea_remove (path, 0, name);
if (i < 0)
perror (path);
}


static void do_show (const char *path, const char *name)
{
struct _ea ea;
int i;

if (strcmp (path, "-") == 0)
i = _ea_get (&ea, NULL, fileno (stdin), name);
else
i = _ea_get (&ea, path, 0, name);
if (i < 0)
perror (path);
else
{
printf ("%s: %s: ", path, name);
if (ea.size >= 4)
{
switch (*(USHORT *)ea.value)
{
case EAT_ASCII:
printf ("\"");
fwrite (ea.value+4, ea.size-4, 1, stdout);
printf ("\"\n");
break;
case EAT_BINARY:
printf ("%d bytes of binary data\n", ea.size);
break;
case EAT_BITMAP:
printf ("%d bytes of bitmap data\n", ea.size);
break;
case EAT_METAFILE:
printf ("%d bytes of metafile data\n", ea.size);
break;
case EAT_ICON:
printf ("%d bytes of icon data\n", ea.size);
break;
case EAT_EA:
printf ("%d bytes of associated data\n", ea.size);
break;
case EAT_MVMT:
case EAT_MVST:
case EAT_ASN1:
printf ("%d bytes of multivalue data\n", ea.size);
break;
default:
printf ("%d bytes\n", ea.size);
break;
}
}
else
printf ("%d bytes\n", ea.size);
_ea_free (&ea);
}
}


static void usage (void)
{
fputs ("Usage: eatool -s \n", stderr);
fputs (" eatool -a \n", stderr);
fputs (" eatool -r \n", stderr);
fputs ("Options:\n", stderr);
fputs (" -s Show extended attribute\n", stderr);
fputs (" -a Add extended attribute\n", stderr);
fputs (" -r Remove extended attribute\n", stderr);
exit (1);
}


static void set_action (enum actions a)
{
if (action != ACTION_NONE)
usage ();
action = a;
}


int main (int argc, char *argv[])
{
int c;

opterr = FALSE;
while ((c = getopt (argc, argv, "ars")) != EOF)
{
switch (c)
{
case 'a':
set_action (ACTION_ADD);
break;
case 'r':
set_action (ACTION_REMOVE);
break;
case 's':
set_action (ACTION_SHOW);
break;
default:
usage ();
}
}
switch (action)
{
case ACTION_ADD:
if (argc - optind != 3)
usage ();
do_add (argv[optind+0], argv[optind+1], argv[optind+2]);
break;
case ACTION_REMOVE:
if (argc - optind != 2)
usage ();
do_remove (argv[optind+0], argv[optind+1]);
break;
case ACTION_SHOW:
if (argc - optind != 2)
usage ();
do_show (argv[optind+0], argv[optind+1]);
break;
default:
usage ();
}
return (0);
}


  3 Responses to “Category : OS/2 Files
Archive   : EMXTST8F.ZIP
Filename : EATEST.C

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/