Hej Emil.
Her kommer så min kode og jeg var lidt hurtig til at kritisere dig for manglende kommentarer da jeg efter at ha kigget i gemmerne fandt dette eksempel der heller ikke er vildt godt kommenteret.
Jeg bruger en hægtet liste til at holde styr på name-value pairs. Databasedelen af programmet er ikke interessant for dig, så det kan du skippe.
Det der sker kan du følge i de første par linier i main.
Der bliver lavet en liste og en parser, parseren returnerer den færdige liste ind i liste pointeren.
Den liste har så metoder til at returnere value af et givent name.
I tilfældet med babeprogrammet her taster brugeren et navn ind som bliver sendt som querystring og opl. om navnet findes i en DB og der skrives så lidt til skærmen.
#include<iostream.h>
#include<stdlib.h>
#include<string.h>
#include<stdio.h>
//Deklaration af globale variable, konstanter og andre strukturer til brug
//i begge moduler: CGI, Oracle & SQL
const int MAXARRAY = 80; //Bruges i CGI delen.
EXEC SQL BEGIN DECLARE SECTION;
VARCHAR aName[20];
struct TBabe
{
VARCHAR Id[7];
VARCHAR Navn[80];
int Alder;
int Points;
} Babes;
EXEC SQL END DECLARE SECTION;
EXEC SQL INCLUDE SQLCA.H;
//
//END
//
class TPair
{
private:
public:
char Name[MAXARRAY];
char Value[MAXARRAY];
TPair* Next;
TPair(char*, char*);
};
//TPair methods
TPair::TPair(char* aName, char* aValue)
{
strcpy(Name, aName);
strcpy(Value, aValue);
Next = NULL;
}
class TPairList
{
private:
public:
TPair* First;
TPairList();
void NewPair(char*, char*); //startes fra TParser og modtager
char* GetValue(char*); //Name og Value fra TParser, til
//initaialisering af nyt TPair.
};
//TPairlist methods
TPairList::TPairList()
{
First = NULL; //kommer til at pege på par 1.
}
char* TPairList::GetValue(char* aName)
{
int Flag = 1; //sat til sandt
TPair* hjelpepeger = First;
while(Flag)
{
if(First == NULL)
{
return NULL;
}
else
{
if(strcmp(First -> Name, aName) == 0)
{
return First -> Value;
}
else
{
if(hjelpepeger -> Next != NULL)
{
if(strcmp(hjelpepeger -> Next -> Name, aName) == 0)
{return hjelpepeger -> Next -> Value;}
else
{
hjelpepeger = hjelpepeger -> Next; //ryk en frem
}
}
else
{
char* error=\"Navnet kunne ikke findes ... \";
cout<<\"\\nSøgt navneværdi: \"<<aName<<endl;
return error;
}
}
}//slut yderste else
} //slut while - løkke
}
void TPairList::NewPair(char* aName, char* aValue)
{
int True = 1;
int False = 0;
if(First == NULL)
First = new TPair(aName, aValue);
else
{
TPair* hjelpepeger = First;
while(True)
{
if(hjelpepeger -> Next == NULL)
{
hjelpepeger -> Next = new TPair(aName, aValue);
True = False; //stop løkke
}
else
hjelpepeger = hjelpepeger -> Next; //ryk én frem
}
}
}
class TParser
{
private:
char* Query; //Peger på starten af QUERYSTRING
char* Method;
int Length; //længden af Query
char* Source; //Source rykker frem gennem Query
char* Name; //Name og Value sendes til Liste
char* Value;
public:
TPairList* PairList;
TParser(); //Konstruktøren indlæser \"QUERY_STRING\"
char* GetValue(char*); //sender forespørgsel til Pairlist
void InsertSpaces();
TPairList* Parse(); //Parser og returnerer liste
};
//TParser methods
TParser::TParser()
{
PairList = new TPairList();
Query = getenv(\"QUERY_STRING\");
Method = getenv(\"REQUEST_METHOD\");
Length = strlen(Query); //bruges i for - løkke
Name = NULL;
Value = NULL;
}
void TParser::InsertSpaces()
{
char* IndexPeger = Query;
for(int a=0;a < Length;a++)
{
if(IndexPeger[a] == \'+\')
Query[a] = \' \';
}
}
char* TParser::GetValue(char* aName)
{
return PairList -> GetValue(aName);
}
TPairList* TParser::Parse()
{
InsertSpaces();
char aName[MAXARRAY];
char aValue[MAXARRAY];
int Kontakt = 1; //0 for \'=\', 1 for \'&\'
int Count_Name = 0;
int Count_Value = 0;
for(int a=0;a <= Length;a++)
{
if(Query == NULL)
{cout<<\"Stoppet! Query er NULL\"<<endl;break;}
else
{
switch(Query[a])
{
case \'\\0\':
//opret sidste par her !
aValue[Count_Value] = \'\\0\'; //case: kun et par ialt !
Name = aName; //adressen på array
Value = aValue;
PairList -> NewPair(Name, Value);
a = a + Length; //kør over MAX i for - løkke
break; //ikke flere par
case \'=\':
aName[Count_Name] = \'\\0\';
Count_Name = 0; //initialiser igen
Count_Value = 0;
Kontakt = 0;
break;
case \'&\':;
Kontakt = 1;
aValue[Count_Value] = \'\\0\';
Name = aName;
Value = aValue;
PairList -> NewPair(Name, Value);
Count_Name = 0; //initialiser igen
Count_Value = 0;
break;
default :
if(Kontakt == 1)
{aName[Count_Name] = Query[a];
Count_Name++;
}
else
{aValue[Count_Value] = Query[a];
Count_Value++;
}
}
} //end else
} //end For
return PairList; //send listen med pair´s til main
} //end Funktion
//
//end deklaration af klasser til cgi-delen: TPair, TPairList & TParser. END
//
//
//START på deklaration af klasser til Databaseconnecting & SQL - processing.
//
class Exceptions {
private:
char theMessage[80];
public:
Exceptions();
Exceptions(char *);
friend ostream &operator << (ostream &, Exceptions &);
};
void err() {
throw Exceptions(sqlca.sqlerrm.sqlerrmc);
}
class Databases {
private:
EXEC SQL BEGIN DECLARE SECTION;
VARCHAR db_userid[40];
VARCHAR db_password[40];
EXEC SQL END DECLARE SECTION;
public:
Databases(char *, char *);
~Databases();
};
// Methods for Databases
Databases::Databases(char *uid, char *pwd)
{
db_userid.len = strlen(strcpy((char *)db_userid.arr, uid));
db_password.len = strlen(strcpy((char *)db_password.arr, pwd));
EXEC SQL WHENEVER SQLERROR DO err();
EXEC SQL CONNECT :db_userid IDENTIFIED BY :db_password;
}
Databases::~Databases()
{
EXEC SQL WHENEVER SQLERROR CONTINUE;
EXEC SQL COMMIT WORK RELEASE;
}
//Methods for Exceptions
Exceptions::Exceptions()
{
strcpy(theMessage, \"Undefined exception\");
}
Exceptions::Exceptions(char *m)
{
strcpy(theMessage, m);
}
ostream &operator << (ostream &o, Exceptions &E)
{
o << E.theMessage;
return o;
}
//END
void main()
{
TPairList* List; //oprettelse af instanser
TParser* Parser = new TParser();
List = Parser -> Parse(); //parse og returnér liste
//START DB & SQL
Databases* db;
try
{
db = new Databases(\"d97529\", \"d97529\");
strcpy((char*)aName.arr, List -> GetValue(\"navn\")); //initialiser til navnet fra cgi
aName.len = strlen(List -> GetValue(\"navn\")); //altså navnet fra hjemmesiden
EXEC SQL WHENEVER SQLERROR DO err();
EXEC SQL
SELECT ID, NAVN, ALDER, POINTS
INTO :Babes
FROM BABES
WHERE NAVN = :aName;
Babes.Id.arr[Babes.Id.len] = \'\\0\';
Babes.Navn.arr[Babes.Navn.len] = \'\\0\';
delete db;
}
catch (Exceptions E)
{
EXEC SQL WHENEVER SQLERROR CONTINUE;
cout << E;
EXEC SQL ROLLBACK RELEASE;
}
//END SQL & DB
//START output til Browseren
cout<<\"content-type: text/html\"<<endl<<endl; //header med 2 newlines
cout<<\"<html><head></head><body bgcolor=\\\"blue\\\">\";
cout << \"Babe´n med navnet: \" <<(char *)Babes.Navn.arr<<\" er \";
cout << (char *)Babes.Alder << \" år og har \";
cout << (char *)Babes.Points << \" point\";
cout<<\"</body></html>\";
//END output
}
Med venlig hilsen Thue
