Subversion Repositories filter_foundry

/*

    This file is part of "Filter Foundry", a filter plugin for Adobe Photoshop

    Copyright (C) 2003-2009 Toby Thain, toby@telegraphics.net

    Copyright (C) 2018-2023 Daniel Marschall, ViaThinkSoft

    This program is free software; you can redistribute it and/or modify

    it under the terms of the GNU General Public License as published by

    the Free Software Foundation; either version 2 of the License, or

    (at your option) any later version.

    This program is distributed in the hope that it will be useful,

    but WITHOUT ANY WARRANTY; without even the implied warranty of

    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License

    along with this program; if not, write to the Free Software

    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

*/

#include "ff.h"

#include "file_compat.h"

#ifdef MAC_ENV

#include <Endian.h>

#else

int EndianS32_LtoN(int num) {

        return ((num>>24)&0xff) +      // move byte 3 to byte 0

               ((num<<8)&0xff0000) +   // move byte 1 to byte 2

               ((num>>8)&0xff00) +     // move byte 2 to byte 1

               ((num<<24)&0xff000000); // byte 0 to byte 3

}

#endif

#define BUFSIZE 4L<<10

#define MAXLINE 0x200

FFLoadingResult readparams_afs_pff(Handle h, Boolean premiereOrder){

        FFLoadingResult res = MSG_LOADFILE_UNKNOWN_FORMAT_ID;

        char linebuf[MAXLINE] = { 0 };

        char curexpr[MAXEXPR] = { 0 };

        char *p, *dataend, *q;

        char c;

        int linecnt, lineptr, exprcnt;

        //if (!h) return nilHandleErr;

        p = PILOCKHANDLE(h,false);

        dataend = p + PIGETHANDLESIZE(h);

        q = curexpr;

        linecnt = exprcnt = lineptr = 0;

        while(p < dataend){

                c = *p++;

                if(c==CR || c==LF){ /* detected end of line */

                        /* look ahead to see if we need to skip a line feed (DOS CRLF EOL convention) */

                        if(p < dataend && c == CR && *p == LF)

                                ++p;

                        linebuf[lineptr] = '\0'; /* add terminating NUL to line buffer */

                        /* process complete line */

                        if(linecnt==0){

                                if(strcmp(linebuf,"%RGB-1.0") != 0){

                                        res = MSG_INVALID_FILE_SIGNATURE_ID;

                                        break;

                                }

                        }else if(linecnt<=8){

                                int v;

                                v = atoi(linebuf);

                                if (v < 0) v = 0;

                                else if (v > 255) v = 255;

                                gdata->parm.val[linecnt-1] = (uint8_t)v;

                        }else{

                                if(lineptr){

                                        /* it's not an empty line; append it to current expr string */

                                        if( (q-curexpr) + lineptr >= MAXEXPR) {

                                                res = MSG_EXPRESSION1024_FOUND_ID;

                                                break;

                                        }

                                        q = cat(q,linebuf);

                                }else{

                                        /* it's an empty line: we've completed the expr string */

                                        *q = '\0';

                                        if (premiereOrder) {

                                                // Premiere has the order BGRA , while Photoshop (and our internal order) is RGBA

                                                if (exprcnt == 0) strcpy(gdata->parm.szFormula[2], curexpr);

                                                else if (exprcnt == 2) strcpy(gdata->parm.szFormula[0], curexpr);

                                                else strcpy(gdata->parm.szFormula[exprcnt], curexpr);

                                        }

                                        else {

                                                strcpy(gdata->parm.szFormula[exprcnt], curexpr);

                                        }

                                        if(++exprcnt == 4){

                                                res = 0;

                                                break; /* got everything we want */

                                        }

                                        q = curexpr; /* empty current expr, ready for next one */

                                }

                        }

                        ++linecnt;

                        lineptr = 0;

                }else{

                        /* store character */

                        if(c=='\\'){ /* escape sequence */

                                if(p < dataend){

                                        c = *p++;

                                        switch(c){

                                        case 'r':

                                                #if WIN_ENV

                                                c = CR;

                                                if (lineptr < MAXLINE-1)

                                                        linebuf[lineptr++] = c;

                                                c = LF;

                                                #else

                                                c = CR;

                                                #endif

                                                break;

                                        case '\\': break;

                                        //default:

                                        //      if(alerts) alertuser((TCHAR*)TEXT("Warning:"),TEXT("Unknown escape sequence in input.")); // TODO (Not so important): TRANSLATE

                                        }

                                }//else if(alerts) alertuser((TCHAR*)TEXT("Warning:"),TEXT("truncated escape sequence ends input")); // TODO (Not so important): TRANSLATE

                        }

                        if(lineptr < MAXLINE-1)

                                linebuf[lineptr++] = c;

                }

        }

        PIUNLOCKHANDLE(h);

        return res;

}

void convert_premiere_to_photoshop(PARM_T* photoshop, PARM_T_PREMIERE* premiere) {

        int i;

        photoshop->cbSize = sizeof(PARM_T);

        photoshop->standalone = premiere->standalone;

        for (i=0;i<8;++i)

                photoshop->val[i] = premiere->val[i];

        photoshop->popDialog = premiere->popDialog;

        photoshop->unknown1 = premiere->unknown1;

        photoshop->unknown2 = premiere->unknown2;

        photoshop->unknown3 = premiere->unknown3;

        for (i=0;i<4;++i)

                photoshop->map_used[i] = premiere->map_used[i];

        for (i=0;i<8;++i)

                photoshop->ctl_used[i] = premiere->ctl_used[i];

        sprintf(photoshop->szCategory, "Filter Factory"); // Premiere plugins do not have a category attribute

        photoshop->iProtected = 0; // Premiere plugins do not have a protect flag

        memcpy((void*)photoshop->szTitle, (void*)premiere->szTitle, sizeof(photoshop->szTitle));

        memcpy((void*)photoshop->szCopyright, (void*)premiere->szCopyright, sizeof(photoshop->szCopyright));

        memcpy((void*)photoshop->szAuthor, (void*)premiere->szAuthor, sizeof(photoshop->szAuthor));

        for (i=0;i<4;++i)

                memcpy((void*)photoshop->szMap[i], (void*)premiere->szMap[i], sizeof(photoshop->szMap[i]));

        for (i=0;i<8;++i)

                memcpy((void*)photoshop->szCtl[i], (void*)premiere->szCtl[i], sizeof(photoshop->szCtl[i]));

        if (premiere->singleExpression) {

                memcpy((void*)photoshop->szFormula[0], (void*)premiere->szFormula[3], sizeof(photoshop->szFormula[3]));

                memcpy((void*)photoshop->szFormula[1], (void*)premiere->szFormula[3], sizeof(photoshop->szFormula[3]));

                memcpy((void*)photoshop->szFormula[2], (void*)premiere->szFormula[3], sizeof(photoshop->szFormula[3]));

                memcpy((void*)photoshop->szFormula[3], (void*)premiere->szFormula[3], sizeof(photoshop->szFormula[3]));

        } else {

                memcpy((void*)photoshop->szFormula[0], (void*)premiere->szFormula[2], sizeof(photoshop->szFormula[2]));

                memcpy((void*)photoshop->szFormula[1], (void*)premiere->szFormula[1], sizeof(photoshop->szFormula[1]));

                memcpy((void*)photoshop->szFormula[2], (void*)premiere->szFormula[0], sizeof(photoshop->szFormula[0]));

                memcpy((void*)photoshop->szFormula[3], (void*)premiere->szFormula[3], sizeof(photoshop->szFormula[3]));

        }

}

char* _ffx_read_str(char** q) {

        uint32_t len;

        char* val;

        len = *((uint32_t*)*q);

        *q += sizeof(uint32_t);

        val = (char*)malloc((size_t)len + 1);

        if (val != NULL) {

                memcpy(val, (char*)*q, len);

                val[len] = '\0';

        }

        *q += len;

        return val;

}

FFLoadingResult readfile_ffx(StandardFileReply* sfr) {

        Handle h;

        FFLoadingResult res = MSG_LOADFILE_UNKNOWN_FORMAT_ID;

        FILEREF refnum;

        uint32_t len;

        char* val;

        int format_version = -1;

        int i;

        if (FSpOpenDF(&sfr->sfFile, fsRdPerm, &refnum) == noErr) {

                if ((h = readfileintohandle(refnum))) {

                        char* q = (char*)PILOCKHANDLE(h, false);

                        len = *((uint32_t*)q);

                        if (len == 6) {

                                val = _ffx_read_str(&q);

                                if (strcmp(val, "FFX1.0") == 0) format_version = 10;

                                else if (strcmp(val, "FFX1.1") == 0) format_version = 11;

                                else if (strcmp(val, "FFX1.2") == 0) format_version = 12;

                                free(val);

                                if (format_version > 0) {

                                        simplewarning_id(MSG_FILTERS_UNLIMITED_WARNING_ID);

                                        val = _ffx_read_str(&q);

                                        if (strlen(val) >= sizeof(gdata->parm.szTitle)) {

                                                val[sizeof(gdata->parm.szTitle) - 1] = '\0';

                                        }

                                        strcpy(gdata->parm.szTitle, val);

                                        free(val);

                                        val = _ffx_read_str(&q);

                                        if (strlen(val) >= sizeof(gdata->parm.szCategory)) {

                                                val[sizeof(gdata->parm.szCategory) - 1] = '\0';

                                        }

                                        strcpy(gdata->parm.szCategory, val);

                                        free(val);

                                        val = _ffx_read_str(&q);

                                        if (strlen(val) >= sizeof(gdata->parm.szAuthor)) {

                                                val[sizeof(gdata->parm.szAuthor) - 1] = '\0';

                                        }

                                        strcpy(gdata->parm.szAuthor, val);

                                        free(val);

                                        val = _ffx_read_str(&q);

                                        if (strlen(val) >= sizeof(gdata->parm.szCopyright)) {

                                                val[sizeof(gdata->parm.szCopyright) - 1] = '\0';

                                        }

                                        strcpy(gdata->parm.szCopyright, val);

                                        free(val);

                                        // Channels I, R, G, B, A

                                        for (i = 0; i < 4; i++) {

                                                val = _ffx_read_str(&q);

                                                if (i == 0) {

                                                        char* val2 = _ffx_read_str(&q);

                                                        if (strcmp(val, "0") != 0) {

                                                                // "Intro channel" existing

                                                                // C++ wrong warning: Using uninitialized memory "val2" (C6001)

                                                                #pragma warning(suppress : 6001)

                                                                char* combined = (char*)malloc(strlen(val) + strlen(",") + strlen(val2) + 1/*NUL byte*/);

                                                                if (combined != NULL) {

                                                                        sprintf(combined, "%s,%s", val, val2);

                                                                        free(val);

                                                                        free(val2);

                                                                        val = combined;

                                                                }

                                                        }

                                                        else {

                                                                free(val);

                                                                val = val2;

                                                        }

                                                }

                                                if (strlen(val) >= sizeof(gdata->parm.szFormula[i])) {

                                                        if (i == 0) {

                                                                simplealert_id(MSG_FORMULA_IR_1023_TRUNCATED_ID);

                                                        }

                                                        else if (i == 1) {

                                                                simplealert_id(MSG_FORMULA_G_1023_TRUNCATED_ID);

                                                        }

                                                        else if (i == 2) {

                                                                simplealert_id(MSG_FORMULA_B_1023_TRUNCATED_ID);

                                                        }

                                                        else if (i == 3) {

                                                                simplealert_id(MSG_FORMULA_A_1023_TRUNCATED_ID);

                                                        }

                                                        // C++ wrong warning: Buffer overflow (C6386)

                                                        #pragma warning(suppress : 6386)

                                                        val[sizeof(gdata->parm.szFormula[i]) - 1] = '\0';

                                                }

                                                strcpy(gdata->parm.szFormula[i], val);

                                                free(val);

                                        }

                                        // Sliders

                                        for (i = 0; i < 8; i++) {

                                                char* sliderName;

                                                int v;

                                                val = _ffx_read_str(&q);

                                                sliderName = val;

                                                if (format_version >= 12) {

                                                        // Format FFX1.2 has prefixes {S} = Slider, {C} = Checkbox, none = Slider

                                                        if ((sliderName[0] == '{') && (sliderName[1] == 'S') && (sliderName[2] == '}')) sliderName += 3;

                                                        else if ((sliderName[0] == '{') && (sliderName[1] == 'C') && (sliderName[2] == '}')) sliderName += 3;

                                                }

                                                if (strlen(val) >= sizeof(gdata->parm.szCtl[i])) {

                                                        val[sizeof(gdata->parm.szCtl[i]) - 1] = '\0';

                                                }

                                                strcpy(gdata->parm.szCtl[i], sliderName);

                                                free(val);

                                                gdata->parm.ctl_used[i] = (bool32_t)*((byte*)q);

                                                q += sizeof(byte);

                                                gdata->parm.val[i] = *((uint32_t*)q);

                                                v = *((uint32_t*)q);

                                                if (v < 0) v = 0;

                                                else if (v > 255) v = 255;

                                                gdata->parm.val[i] = (uint8_t)v;

                                                q += sizeof(uint32_t);

                                        }

                                        // Maps (are not part of the format!)

                                        strcpy(gdata->parm.szMap[0], "Map 0:");

                                        strcpy(gdata->parm.szMap[1], "Map 1:");

                                        strcpy(gdata->parm.szMap[2], "Map 2:");

                                        strcpy(gdata->parm.szMap[3], "Map 3:");

                                        res = 0;

                                }

                        }

                        PIDISPOSEHANDLE(h);

                }

                FSClose(refnum);

        }

        if (res) gdata->obfusc = false;

        return res;

}

FFLoadingResult readfile_8bf(StandardFileReply *sfr){

        unsigned char magic[2];

        FILECOUNT count;

        Handle h;

        FFLoadingResult res = MSG_LOADFILE_UNKNOWN_FORMAT_ID;

        FILEREF refnum;

        if(FSpOpenDF(&sfr->sfFile,fsRdPerm,&refnum) == noErr){

                // check DOS EXE magic number

                count = 2;

                if(FSRead(refnum,&count,magic) == noErr /*&& magic[0]=='M' && magic[1]=='Z'*/){

                        if(GetEOF(refnum,(FILEPOS*)&count) == noErr && count < 4096L<<10){ // sanity check file size < 4MiB (note that "Debug" builds can have approx 700 KiB while "Release" builds have approx 300 KiB)

                                if( (h = readfileintohandle(refnum)) ){

                                        long *q = (long*)PILOCKHANDLE(h,false);

                                        // look for signature at start of valid PARM resource

                                        // This signature is observed in Filter Factory standalones.

                                        for( count /= 4 ; count >= PARM_SIZE/4 ; --count, ++q )

                                        {

                                                res = readPARM(&gdata->parm, (Ptr)q);

                                                if (res) break;

                                        }

                                        PIDISPOSEHANDLE(h);

                                }

                        }

                } // else no point in proceeding

                FSClose(refnum);

        }else

                res = MSG_CANNOT_OPEN_FILE_ID;

        if (res) gdata->obfusc = false;

        return res;

}

FFLoadingResult readPARM(PARM_T* pparm, Ptr p){

        Boolean towin, tomac, fromwin, frommac;

        unsigned int signature = *((unsigned int*)p);

        unsigned int standalone = *((unsigned int*)p+1);

        // Find out our OS ("reader") the OS of the plugin ("source")

        #ifdef MAC_ENV

        towin = false;

        tomac = true;

        fromwin = ((EndianS32_LtoN(signature) == PARM_SIZE) ||

                (EndianS32_LtoN(signature) == PARM_SIZE_PREMIERE) ||

                (EndianS32_LtoN(signature) == PARM_SIG_MAC)) && EndianS32_LtoN(standalone) == 1;

        frommac = ((signature == PARM_SIZE) ||

                (signature == PARM_SIZE_PREMIERE) ||

                (signature == PARM_SIG_MAC)) && standalone == 1;

        #else

        towin = true;

        tomac = false;

        fromwin = ((signature == PARM_SIZE) ||

                (signature == PARM_SIZE_PREMIERE) ||

                (signature == PARM_SIG_MAC)) && standalone == 1;

        frommac = ((EndianS32_LtoN(signature) == PARM_SIZE) ||

                (EndianS32_LtoN(signature) == PARM_SIZE_PREMIERE) ||

                (EndianS32_LtoN(signature) == PARM_SIG_MAC)) && EndianS32_LtoN(standalone) == 1;

        #endif

        // Is it a valid signature?

        if (!fromwin && !frommac) {

                // No valid signature found

                return MSG_INVALID_FILE_SIGNATURE_ID;

        }

        // Does it come from Premiere or Photoshop?

        // Initialize pparm

        if ((signature == PARM_SIZE_PREMIERE) || (EndianS32_LtoN(signature) == PARM_SIZE_PREMIERE)) {

                // It comes from Premiere. Swap R and B channel and convert to a Photoshop PARM_T

                convert_premiere_to_photoshop(pparm, (PARM_T_PREMIERE*)p);

        } else {

                // It is already Photoshop. Just copy to pparm.

                memcpy(pparm, p, sizeof(PARM_T));

        }

        // Do we need to do string conversion?

        if (frommac) {

                int i;

                /* Mac PARM resource stores Pascal strings - convert to C strings, since this is what we work internally with (regardles of OS) */

                myp2cstr((unsigned char*)pparm->szCategory);

                myp2cstr((unsigned char*)pparm->szTitle);

                myp2cstr((unsigned char*)pparm->szCopyright);

                myp2cstr((unsigned char*)pparm->szAuthor);

                for (i = 0; i < 4; ++i)

                        myp2cstr((unsigned char*)pparm->szMap[i]);

                for (i = 0; i < 8; ++i)

                        myp2cstr((unsigned char*)pparm->szCtl[i]);

        }

        // Case #1: Mac is reading Windows (Win16/32/64) plugin

        if (fromwin && tomac) {

                size_t i;

                // Convert copyright CRLF to CR (actually, just removing LF)

                char copyrightCRLF[256] = { 0 };

                char* pCopyright = &copyrightCRLF[0];

                for (i = 0; i < strlen(pparm->szCopyright); i++) {

                        if (pparm->szCopyright[i] != LF) {

                                *pCopyright++ = pparm->szCopyright[i];

                        }

                }

                *pCopyright++ = '\0';

                strcpy(pparm->szCopyright, copyrightCRLF);

                // these are the only numeric fields we *have* to swap

                // all the rest are bool_t flags which (if we're careful) will work in either ordering

                for (i = 0; i < 8; ++i)

                        pparm->val[i] = EndianS32_LtoN(pparm->val[i]);

        }

        // Case #2: Mac is reading Mac (in case the normal resource extraction didn't work)

        // Nothing to do

        // Case #3: Windows is reading a Windows plugin (if Resource API failed, e.g. Win64 tries to open Win16 NE file or Win32 tries to open Win64 file)

        // Nothing to do

        // Case #4: Windows is reading an old FilterFactory Mac file

        // Note: You must read the ".rsrc" resource fork, not the standalone binary!

        if (frommac && towin) {

                size_t i;

                // Convert CR in the copyright field to CRLF.

                char copyrightCRLF[256] = { 0 };

                char* pCopyright = &copyrightCRLF[0];

                for (i = 0; i < strlen(pparm->szCopyright); i++) {

                        *pCopyright++ = pparm->szCopyright[i];

                        if (pparm->szCopyright[i] == CR) {

                                *pCopyright++ = LF;

                        }

                }

                *pCopyright++ = '\0';

                strcpy(pparm->szCopyright, copyrightCRLF);

                // these are the only numeric fields we *have* to swap

                // all the rest are bool_t flags which (if we're careful) will work in either ordering

                for (i = 0; i < 8; ++i)

                        pparm->val[i] = EndianS32_LtoN(pparm->val[i]);

        }

        return 0;

}

Handle readfileintohandle(FILEREF r){

        FILEPOS n;

        Handle h;

        Ptr p;

        if( GetEOF(r,&n) == noErr && (h = PINEWHANDLE(n)) ){

                p = PILOCKHANDLE(h,false);

                if(SetFPos(r,fsFromStart,0) == noErr && FSRead(r,(FILECOUNT*)&n,p) == noErr){

                        PIUNLOCKHANDLE(h);

                        return h;

                }

                PIDISPOSEHANDLE(h);

        }

        return NULL;

}

Boolean _picoLineContainsKey(char* line, char** content, const char* searchkey/*=NULL*/) {

        size_t i;

        for (i = 0; i < strlen(line); i++) {

                if (line[i] == '?') break; // avoid that "a?b:c" is detected as key

                if (line[i] == ':') {

                        // Note: We are ignoring whitespaces, i.e. " A :" != "A:" (TODO: should we change this?)

                        if ((searchkey == NULL) || ((i == strlen(searchkey)) && (memcmp(line, searchkey, i) == 0))) {

                                i++; // jump over ':' char

                                //while ((line[i] == ' ') || (line[i] == TAB)) i++; // Trim value left

                                *content = line + i;

                                return true;

                        }

                }

        }

        *content = line;

        return false;

}

void _ffdcomp_removebrackets(char* x, char* maxptr) {

        char* closingBracketPos = NULL;

        Boolean openingBracketFound = false;

        if (x[0] == '[') {

                openingBracketFound = true;

        }

        x[0] = ':';

        x++;

        while (x < maxptr) {

                if ((!openingBracketFound) && (x[0] == '[')) {

                        openingBracketFound = true;

                        x[0] = ' ';

                }

                else if (openingBracketFound) {

                        if (x[0] == ']') {

                                closingBracketPos = x;

                        }

                        else if ((x[0] == CR) || (x[0] == LF)) {

                                if (closingBracketPos) closingBracketPos[0] = ' '; // last closing pos before CR/LF

                                break;

                        }

                }

                x++;

        }

}

// isFormula=false => outputFile is C string. TXT linebreaks become spaces.

// isFormula=true  => outputFile is C string. TXT line breaks become CRLF line breaks

Boolean _picoReadProperty(char* inputFile, size_t maxInput, const char* property, char* outputFile, size_t maxOutput, Boolean isFormula) {

        size_t i;

        char* outputwork;

        char* sline;

        char* svalue;

        char* inputwork;

        char* inputworkinitial;

        outputwork = outputFile;

        sline = NULL;

        svalue = NULL;

        // Check parameters

        if (maxOutput == 0) return false;

        if (inputFile == NULL) return false;

        // Let input memory be read-only, +1 for terminal zero

        //char* inputwork = inputFile;

        inputwork = (char*)malloc((size_t)maxInput + 1/*NUL byte*/);

        inputworkinitial = inputwork;

        if (inputwork == NULL) return false;

        memcpy(inputwork, inputFile, maxInput);

        inputwork[maxInput] = '\0'; // otherwise strstr() will crash

        // Transform "FFDecomp" TXT file into the similar "PluginCommander" TXT file

        if (strstr(inputwork, "Filter Factory Plugin Information:")) {

                char* x;

                char* k1;

                char* k2;

                // Metadata:

                x = strstr(inputwork, "CATEGORY:");

                if (x) memcpy(x, "Category:", strlen("Category:"));

                x = strstr(inputwork, "TITLE:");

                if (x) memcpy(x, "Title:", strlen("Title:"));

                x = strstr(inputwork, "COPYRIGHT:");

                if (x) memcpy(x, "Copyright:", strlen("Copyright:"));

                x = strstr(inputwork, "AUTHOR:");

                if (x) memcpy(x, "Author:", strlen("Author:"));

                // Controls:

                for (i = 0; i < 8; i++) {

                        k1 = (char*)malloc(strlen("Control X:") + 1/*NUL byte*/);

                        sprintf(k1, "Control %d:", (int)i);

                        x = strstr(inputwork, k1);

                        if (x) {

                                k2 = (char*)malloc(strlen("ctl[X]:   ") + 1/*NUL byte*/);

                                sprintf(k2, "ctl[%d]:   ", (int)i);

                                memcpy(x, k2, strlen(k2));

                                x += strlen("ctl[X]");

                                _ffdcomp_removebrackets(x, inputwork + maxInput - 1);

                                free(k2);

                        }

                        free(k1);

                }

                // Maps:

                for (i = 0; i < 4; i++) {

                        k1 = (char*)malloc(strlen("Map X:") + 1/*NUL byte*/);

                        sprintf(k1, "Map %d:", (int)i);

                        x = strstr(inputwork, k1);

                        if (x) {

                                k2 = (char*)malloc(strlen("map[X]:") + 1/*NUL byte*/);

                                sprintf(k2, "map[%d]:", (int)i);

                                memcpy(x, k2, strlen(k2));

                                x += strlen("map[X]");

                                _ffdcomp_removebrackets(x, inputwork + maxInput - 1);

                                free(k2);

                        }

                        free(k1);

                }

                // Convert all '\r' to '\n' for the next step to be easier

                for (i = 0; i < maxInput; i++) {

                        if (inputworkinitial[i] == CR) inputworkinitial[i] = LF;

                }

                x = strstr(inputwork, "\nR=\n");

                if (x) memcpy(x, "\nR:\n", strlen("\nR:\n"));

                x = strstr(inputwork, "\nG=\n");

                if (x) memcpy(x, "\nG:\n", strlen("\nG:\n"));

                x = strstr(inputwork, "\nB=\n");

                if (x) memcpy(x, "\nB:\n", strlen("\nB:\n"));

                x = strstr(inputwork, "\nA=\n");

                if (x) memcpy(x, "\nA:\n", strlen("\nA:\n"));

        }

        // Replace all \r and \n with \0, so that we can parse easier