---

smpcgi.c

#include "smpcgi.h"
#include <stdlib.h>

static FormItem far* tags[100];
static int allTags = 0;
static int cgientrance = 0; /* got a value greater than 0 if CGIEntrance was called */
static nextTagCounter = 0;

int CGIEntrance(rpCgiPtr CgiRequest)
{
    unsigned int nameLength; /* space to alloc for the name array of a tag */
    long valueLength; /* space to alloc for the value array of a tag */
    int moreTags;

    char far     * nextBuffer   = NULL;
    char far     * FormNamePtr  = NULL;
    char far     * FormValuePtr = NULL;
    FormItem far * formitem     = NULL;

    if (cgientrance) { 
    /* there was a call of CGIEntrance without a CGIExit in the past
     * So we try to avoid that more and more mem is allocated
     */
        return 0;
    }

    cgientrance = 1; /* so we mark that CGIEntrance was called */
    allTags = 0;
    moreTags = 0;
    nameLength = 40;
    valueLength = strlen(CgiRequest->fArgumentBufferPtr);

    if (valueLength) { /* we have args */
        moreTags = 1;
        FormNamePtr=(char far *)malloc(sizeof(char )*nameLength);
        FormValuePtr=(char far *)malloc(sizeof(char )*valueLength);
        formitem=(FormItem far *)malloc(sizeof(FormItem));
        
        if((FormNamePtr!=NULL) && (FormValuePtr!=NULL) && (formitem!=NULL)) {
            formitem->NamePtr  = FormNamePtr;
            formitem->ValuePtr = FormValuePtr;

            CGIGetFirstFormItem(CgiRequest->fArgumentBufferPtr, formitem);
            
            tags[allTags] = formitem; /* first tag into the tag array */
            allTags++;

            nextBuffer = CgiRequest->fArgumentBufferPtr; 
            
            while (moreTags) {
                FormNamePtr=(char far *)malloc(sizeof(char )*nameLength);
                FormValuePtr=(char far *)malloc(sizeof(char )*valueLength);
                formitem=(FormItem far *)malloc(sizeof(FormItem));

                if((FormNamePtr!=NULL) && (FormValuePtr!=NULL) && (formitem!=NULL)) {
                    formitem->NamePtr  = FormNamePtr;
                    formitem->ValuePtr = FormValuePtr;
                    
                    nextBuffer = CGIGetNextFormItem(nextBuffer, &formitem);
                    if (formitem != NULL) { /* there is a next tag */
                        tags[allTags] = formitem;
                        allTags++;
                    } else { /* there's no next tag - must freeing the last malloc's */
                        free(FormNamePtr);
                        free(FormValuePtr);
                        free(formitem);
                        moreTags = 0;
                    }
                } else {
                    return 0; /* there was an error with malloc */
                }
            }
        } else {
          return 0; /* there was an error with malloc */
        }
    }
    return 1; /* all's gone fine */
}

void CGIExit()
{
    int i;

    for(i = 0; i < allTags; i++) { /* clean the mem */
        free(tags[i]->NamePtr);
        free(tags[i]->ValuePtr );
        free(tags[i]);
    }

    cgientrance = 0;
    nextTagCounter = 0;
    allTags = 0;
}

int size() 
{
    return allTags;
}

FormItem far* getFirstTag()
{
    if ( allTags > 0 ) {
        if ( nextTagCounter == 0 ) { /* after first call of getFirstTag - getnextTag returns the second element from tag[..] */
            nextTagCounter = 1;            
        }
        return tags[0];
    } else {
        return NULL;
    }
}

FormItem far* getNextTag()
{
    FormItem far* tempFi;

    if ( allTags > 0 ) {
        if ( !(nextTagCounter < allTags) ) { /* there must be an end */
            return NULL;
        }
        if ( nextTagCounter > 0 ) { /* normal work */
            tempFi = tags[nextTagCounter];
            nextTagCounter++;
            return tempFi;
        } else { /* here you call getNextTag first and not getFirstTag */
            return getFirstTag();
        }
    } else {
        return NULL;
    }
}

FormItem far* getTagAt(int tag)
{
    if ( (tag >= 0) && (tag < allTags) ) {
        return tags[tag];
    } else {
        return NULL;
    }
}

---