main.c
#include <stdio.h>
#include <stdlib.h>
#define C_ARRAY_LEN 20
char **store_in_arry(char **storage, long length, char *newitem);
char **delete_from_array(char **storage, long length, long delete_index);
void sort(char **storage, long length, long sort_type);
long ascending(char *string1, char* string2);
long descending(char *string1, char* string2);
long *alloc_number(long size);
void free_number(long *mem);
void print(long *mem, long size);
long *change_size(long *mem, long old_size, long new_size);
long add(long *a, long size1, long *b, long size2, long *c, long size3);
int main()
{
char **test=0;
char in[C_ARRAY_LEN];
char arr1[C_ARRAY_LEN]="Hallo ", arr2[C_ARRAY_LEN]="Welt";
char arr3[C_ARRAY_LEN]="1234 ", arr4[C_ARRAY_LEN]="Test";
long len=0, length=0, i=0, choice=0, len1=10, len2=10, len3=10, added;
//long *arr_num=0, *arr1=0, *arr2=0, *arr3=0;
/*
do{
printf("\nWas wollen Sie tun?\n");
printf("0... Exit\n");
printf("1... Speicher reservieren\n");
printf("2... Speicher freigeben\n");
printf("3... Speicher ausgeben\n");
printf("4... Initialisieren\n");
printf("5... Speicher verdoppeln\n");
scanf("%ld", &choice);
getchar();
switch(choice){
case 1:
len=10;
arr_num=alloc_number(len);
break;
case 2:
free_number(arr_num);
arr_num=0;
break;
case 3:
print(arr_num, len);
break;
case 4:
for(i=0;i<len;i++)
arr_num[i]=i;
break;
case 5:
arr_num=change_size(arr_num, len, 2*len);
len=2*len;
break;
}
}while(choice<10&&choice!=0);
arr1=alloc_number(len1);
arr2=alloc_number(len2);
for(i=0;i<10;i++)
arr1[i]=arr2[i]=i;
arr3=alloc_number(len3);
added=add(arr1, len1, arr2, len2, arr3, len3);
if(added)
print(arr3, len3);
else
printf("\nFehler beim addieren der Felder!\n");
free_number(arr1);
free_number(arr2);
free_number(arr3);
*/
printf("Geben Sie einen String ein: ");
scanf("%s", in);
getchar();
length++;
test=store_in_arry(test, length, in);
length++;
test=store_in_arry(test, length, arr2);
length++;
test=store_in_arry(test, length, arr3);
length++;
test=store_in_arry(test, length, arr4);
for(i=0; i<length; i++)
{
printf("%s \n", test[i]);
}
sort(test, length, 1);
printf("\nSorted:\n");
for(i=0; i<length; i++)
{
printf("%s \n", test[i]);
}
length--;
test=delete_from_array(test, length, 0);
printf("\nDeleted:\n");
for(i=0; i<length; i++)
{
printf("%s \n", test[i]);
}
if(test)
{
free(test);
test=0;
}
//printf("Hello world!\n");
return 0;
}
long add(long *a, long size1, long *b, long size2, long *c, long size3)
{
long i, len;
if(size3>=size1&&size3>=size2)
{
if(size1<=size2)
len=size1;
else
len=size2;
for(i=0;i<len;i++)
c[i]=a[i]+b[i];
return 1;
}else{
return 0;
}
}
long *alloc_number(long size)
{
long *num;
if(num=malloc(size*sizeof(long)))
{
return num;
}else{
fprintf(stderr, "Speicher konnte nicht angelegt werden!");
exit(-1);
}
}
void free_number(long *mem)
{
if(mem)
{
free(mem);
mem=0;
}else{
fprintf(stderr, "Speicher konnte nicht freigegeben werden!");
exit(-1);
}
}
void print(long *mem, long size)
{
long i;
for(i=0;i<size;i++)
{
printf("\n%ld", mem[i]);
}
}
long *change_size(long *mem, long old_size, long new_size)
{
long *temp_num;
long i;
if(temp_num=realloc(mem, new_size*sizeof(long)))
{
if(new_size>old_size)
{
for(i=old_size;i<new_size;i++)
{
mem[i]=0;
}
}
return temp_num;
}else{
fprintf(stderr, "Speicher konnte nicht geaendert werden!");
exit(-1);
}
}
char **store_in_arry(char **storage, long length, char *newitem)
{
char **dummy=0;
if((dummy=realloc(storage, length*sizeof(char*))))
{
dummy[length-1]=newitem;
return dummy;
}else{
fprintf(stderr, "Speicher konnte nicht angelegt werden");
exit(-1);
}
}
char **delete_from_array(char **storage, long length, long delete_index)
{
char **dummy=0, *dummy2=0;
long i;
if(delete_index>(length-1))
{
printf("Index nicht im Feldbereich!");
return storage;
}else{
for(i=delete_index;i<length;i++)
{
storage[i]=storage[i+1];
}
if(storage[i])
{
free(storage[i]);
storage[i]=0;
}
if((dummy=realloc(storage, length*sizeof(char*))))
{
return dummy;
}else{
fprintf(stderr, "Speicher konnte nicht angelegt werden");
exit(-1);
}
}
}
void sort(char **storage, long length, long sort_type)
{
//Bubble Sort
long i, j;
char* h;
long (*sort_dir)(char*, char*);
if(sort_type==1)
sort_dir=&ascending;
else
sort_dir=&descending;
for(j=length-1; j>0; j=j-1)
{
for(i=0; i<j; i=i+1)
{
if(sort_dir(storage[i], storage[i+1])) //feld[i]>feld[i+1])
{
h=storage[i];
storage[i]=storage[i+1];
storage[i+1]=h;
}
}
}
}
long ascending(char *string1, char* string2)
{
if(strcmp(string1, string2)>0)
return 1;
else
return 0;
}
long descending(char *string1, char* string2)
{
if(strcmp(string1, string2)<0)
return 1;
else
return 0;
}
