Forums - A tiny but useful contraption

Code:
#include <stdlib.h>

#include <stdio.h>

#include <string.h>

char toupper(char symbol)

{

        if (symbol>='a' && symbol<='z')

                symbol-=('a'-'A');

        return symbol;

}

char* GetMountPath(char Mletter)

{

        Mletter=toupper(Mletter);

        FILE *data;

        data=fopen("mounts.txt", "rb");

        if (data!=NULL)

        {

                int j=0;

                char *result;

                char line[256];

                do

                {

                        result=fgets(line, 255,data);

                        if (result!=0 && strlen(line)>38)

                        {

                                if (toupper(line[6])==toupper(Mletter))

                                {

                                        j=38;

                                        while (line[j]==' ')

                                                j++;

                                        sscanf(line+j,"%s\\",line);

                                        fclose(data);

                                        line[strlen(line)-1]=0;

                                        return line;

                                }

                        }

                }

                while (result!=0);

                fclose(data);

        }

        return 0;

}

char* concat(char* a, char* b)

{

         char *temparray, *baseptr;

        baseptr=temparray=new char[strlen(a)+strlen(b)+1];

         while((*a)!=0)

        {

                *baseptr=*a;

                baseptr++;

                a++;

        }

        while((*b)!=0)

        {

                *baseptr=*b;

                baseptr++;

                b++;

        }

        *baseptr=0;

        return temparray;

}

char* GetDosBoxPath(char* path)

{

        char *line,*end;

        line=new char[strlen(path)+2];

        sscanf(path+2,"%s\\",line);

        end=strrchr(line,'\\');

        *end=0;

        return line;

}

int main(int argc, char** argv)

{

        FILE* data;

        FILE* batch;

        char *MountPath;

        char *DosBoxPath;

        char *AbsolutePath;

        char DosBoxDrive=argv[0][0];

        DosBoxPath=GetDosBoxPath(argv[0]);

        MountPath=GetMountPath(DosBoxDrive);

        AbsolutePath=concat(MountPath,DosBoxPath);



/*

        printf("%c\n", DosBoxDrive);

        printf("%s\n", DosBoxPath);

        printf("%s\n", MountPath);

        printf("%s\n", AbsolutePath);

/*/

        data=fopen("batch.txt", "rb");

        if (data!=0)

        {

                batch=fopen("start.bat","wb");

                if (batch!=0)

                {

                        fprintf(batch, "SET absolutepath=%s\n", AbsolutePath);

                        fprintf(batch, "SET mountpath=%s\n", MountPath);

                        fprintf(batch, "SET dosboxpath=%s\n", DosBoxPath);

                        fprintf(batch, "SET dosboxdrive=%c\n", DosBoxDrive);

                        fseek(data, 0, SEEK_END);

                        long int length=ftell(data);

                        char *pattern;

                        pattern=new char[length];

                        rewind(data);

                        fread(pattern, length, 1, data);

                        fwrite(pattern, length, 1, batch);

                        fclose(batch);

                }

                fclose(data);

        }

//*/

        return 0;

}