github publish

insteng/STUB.C

@@ -0,0 +1,53 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <process.h>
+#include <errno.h>
+#include <string.h>
+#define QUIET x
+
+/* Add environment strings to be searched here */
+char *paths_to_check[] = {
+	"DOS4GPATH",
+	"PATH"};
+
+char *dos4g_path()
+{
+    static char fullpath[80];
+    int i;
+
+    for( i = 0;
+         i < sizeof( paths_to_check ) / sizeof( paths_to_check[0] ); i++ ) {
+	_searchenv( "dos4gw.exe", paths_to_check[i], fullpath );
+	if( fullpath[0] ) return( &fullpath );
+    }
+    for( i = 0;
+         i < sizeof( paths_to_check ) / sizeof( paths_to_check[0] ); i++ ) {
+	_searchenv( "dos4g.exe", paths_to_check[i], fullpath );
+	if( fullpath[0] ) return( &fullpath );
+    }
+    return( "dos4gw.exe" );
+}
+
+main( int argc, char *argv[] )
+{
+    char	*av[4];
+    auto char 	cmdline[128];
+    int i;
+    av[0] = dos4g_path();		/* Locate the DOS/4G loader */
+    av[1] = argv[0];			/* name of executable to run */
+    av[2] = getcmd( cmdline );		/* command line */
+    av[3] = NULL;			/* end of list */
+#ifdef QUIET
+    putenv( "DOS4G=QUIET" );	/* disables DOS/4G Copyright banner */
+#endif
+    printf("Instalator Br ny Skeldalu (C)1997 Napoleon gameS    Nahr v m... \n");
+    i=spawnvp(P_WAIT, av[0], av );
+    if (i==254)
+     execl(av[0],av[0],"SKELDAL.EXE",NULL);else exit(0);
+    puts( "Chyba pri nacitani extenderu:" );
+    puts( av[0] );
+    puts( "\nZkontrolujte zda-li je k dosazeni na aktualnim adresari\n"
+          "popripade specifikujte jeho v cestu v systemove promenne:\n"
+          "SET DOS4GPATH=disk:\\cesta\n");
+    exit( 1 );			/* indicate error */
+}