commodore.gen.tr

STPTR fileName;
BPTR lock;
BOOL exists = FALSE;

lock = Lock( fileName, ACCESS_READ );

if (lock)
{
  UnLock (lock);
  exists = TRUE;
}

if (exists)
  exit (RETURN_OK);
else
  exit (RETURN_WARN);

int main(int argc, char* argv[])
{
  int returnCode = RETURN_OK;
  struct Library *DOSBase = NULL;
  if (DOSBase = OpenLibrary(DOSNAME, 33))
  {
    
    // Program Kodları Burada
    
    CloseLibrary(DOSBase);
  }
  else
  {
    printf("Unable to open dos.library\n");
    returnCode = RETURN_ERROR;
  }
  exit(returnCode);
}

void getEnvVar(char *envVar, char* fileName)
{
  char buffer[BUFSIZE] = {0};
  BPTR envFile = Open(fileName, MODE_READWRITE);
  if (envFile)
  {
    Read(envFile, buffer, BUFSIZE);
    Close(envFile);
    removeSpecial(envVar, buffer);
  }
}

FILE *dosya;
dosya = fopen("dosyaismi","r");

MultiBoot Echo "** Preparing" KS13OSLabel ""

spatch -o sc:libs/sc1.library -p sc1.library.pch

EXE    = MultiBoot

CC = sc:c/sc
LD = sc:c/sc

all : $(EXE)

main.o : main.c
	$(CC) nolink main.c

OBJS = main.o

$(EXE) : $(OBJS)
	$(LD) link $(OBJS)

clean:
	-delete $(EXE)
	-delete $(EXE).lnk
	-delete $(EXE).info
	-delete $(OBJS)

char* assignCommand = "Echo Assign"; 

Execute("Echo Assign SYS: DH0:Workbench1.3");

SetEnv KS13OSDrawer DH0:Workbench1.3
MultiBoot Assign SYS: KS13OSDrawer

EXE = MultiBoot

CC = SC
LD = SC

all : $(EXE)

MultiBoot.o : MultiBoot.c
   $(CC) nolink MultiBoot.c

OBJS = MultiBoot.o

$(EXE) : $(OBJS)
   $(LD) link $(OBJS)

clean:
   -delete $(EXE)
   -delete $(EXE).info
   -delete $(EXE).lnk
   -delete $(OBJS)

#include <exec/memory.h>
#include <proto/exec.h>
#include <proto/dos.h>
#include <string.h>

#define BUFSIZE 108  // AmigaDOS Maximum Path Length + 1

const char __ver[40] = "$VER: MultiBoot 1.0 (27.11.2016)";

extern void exit(int);

void removeSpecial(char* outStr, char* inStr)
{
  int count = 0;
  while (inStr[count] != 0)
  {
    if ((inStr[count] >= 32) && (inStr[count] <= 127)) outStr[count] = inStr[count];
    count++;
  }
  outStr[count] = 0;
}

void getEnvVar(char *envVar, char* fileName)
{
  char buffer[BUFSIZE] = {0};
  BPTR envFile = Open(fileName, MODE_OLDFILE);
  if (envFile)
  {
    Read(envFile, buffer, BUFSIZE);
    Close(envFile);
    removeSpecial(envVar, buffer);
  }
}

void myEcho(char* echoText1, char* echoText2, char* echoText3)
{
  char* echoCommand = "Echo";
  char* commandLine = (char*) AllocMem(strlen(echoCommand) + strlen(echoText1) + strlen(echoText2) + strlen(echoText3) + 6, MEMF_PUBLIC | MEMF_CLEAR);
  strcat(commandLine, echoCommand);
  strcat(commandLine, " \"");
  strcat(commandLine, echoText1);
  strcat(commandLine, " ");
  strcat(commandLine, echoText2);
  strcat(commandLine, " ");
  strcat(commandLine, echoText3);
  strcat(commandLine, "\"");
  Execute(commandLine, NULL, NULL);
  FreeMem(commandLine, strlen(commandLine));
}

void myAssign(char* assignName, char* assignDrawer)
{
  char* assignCommand = "Assign";
  char* commandLine = (char*) AllocMem(strlen(assignCommand) + strlen(assignName) + strlen(assignDrawer) + 5, MEMF_PUBLIC | MEMF_CLEAR);
  strcat(commandLine, assignCommand);
  strcat(commandLine, " ");
  strcat(commandLine, assignName);
  strcat(commandLine, " \"");
  strcat(commandLine, assignDrawer);
  strcat(commandLine, "\"");
  Execute(commandLine, NULL, NULL);
  FreeMem(commandLine, strlen(commandLine));
}

int myExists(char* existsDrawer)
{
  BPTR lock = Lock(existsDrawer, ACCESS_READ);
  if (lock)
  {
    UnLock (lock);
    return(RETURN_OK);
  }
  return(RETURN_WARN);
}

int main(int argc, char* argv[])
{
  int returnCode = RETURN_OK;
  struct Library *DOSBase = NULL;
  if (DOSBase = OpenLibrary(DOSNAME, 33))
  {
    if (argc > 1)
    {
      if (stricmp(argv[1], "Assign") == 0)
      {
        if (argc > 3)
        {
          char assignDrawer[BUFSIZE];
          char* envPrefix = "ENV:";
          char* envFile = (char*) AllocMem(strlen(envPrefix) + strlen(argv[3]) + 1, MEMF_PUBLIC | MEMF_CLEAR);
          strcat(envFile, envPrefix);
          strcat(envFile, argv[3]);
          getEnvVar(assignDrawer, envFile);
          FreeMem(envFile, strlen(envFile));
          if (strlen(assignDrawer) > 0) myAssign(argv[2], assignDrawer);
        }
        else
        {
          myEcho("Usage:", argv[0], "Assign Name Drawer");
        }
      }
      else if (stricmp(argv[1], "Echo") == 0)
      {
        if (argc > 4)
        {
          char echoText[BUFSIZE];
          char* envPrefix = "ENV:";
          char* envFile = (char*) AllocMem(strlen(envPrefix) + strlen(argv[3]) + 1, MEMF_PUBLIC | MEMF_CLEAR);
          strcat(envFile, envPrefix);
          strcat(envFile, argv[3]);
          getEnvVar(echoText, envFile);
          FreeMem(envFile, strlen(envFile));
          if (strlen(echoText) > 0) myEcho(argv[2], echoText, argv[4]);
        }
        else
        {
          myEcho("Usage:", argv[0], "Echo Text1 Text2 Text3");
        }
      }
      else if (stricmp(argv[1], "Exists") == 0)
      {
        if (argc > 2)
        {
          char existsDrawer[BUFSIZE];
          char* envPrefix = "ENV:";
          char* envFile = (char*) AllocMem(strlen(envPrefix) + strlen(argv[2]) + 1, MEMF_PUBLIC | MEMF_CLEAR);
          strcat(envFile, envPrefix);
          strcat(envFile, argv[2]);
          getEnvVar(existsDrawer, envFile);
          FreeMem(envFile, strlen(envFile));
          if (strlen(existsDrawer) > 0) returnCode = myExists(existsDrawer);
        }
        else
        {
          myEcho("Usage:", argv[0], "Exists DrawerName");
        }
      }
      else
      {
        myEcho("Usage:", argv[0], "[Assign/Echo/Exists] Parameters");
      }
    }
    else
    {
      myEcho("Usage:", argv[0], "[Assign/Echo/Exists] Parameters");
    }
    CloseLibrary(DOSBase);
  }
  else
  {
    // myEcho("Unable to open dos.library", "", "");
    returnCode = RETURN_ERROR;
  }
  exit(returnCode);
}