#include <cstdlib>
#include <cstdio>
#include <iostream>
using namespace std;


int lp1Write(char * cad){

    char c; int tam =0;

    while (1){
        if (cad[tam]=='\0') break;
        printf("%c",cad[tam]);
        tam++;

    }
    putchar('\n');
    return tam;


}


int lp1Read(char *&cad){

    char c; int tam=0;
    cad = new char[30];

    while (1){
        c= getchar();
        if (c == ' ' || c=='\n');
        else if (c == 26) return -1;
        else break;
    }

    while (1){

        if (c=='\n' || c==26) break;
        cad[tam++]= c;
        c = getchar();

    }
    cad[tam] = '\0';
    return tam;


}

char * lp1Strtok(char *str, char*comp){

    static int i;
    static char *s;
    int comienzo = i;

    if (str != NULL)
        s = str;

    while (s[i] != '\0'){

        int j = 0;
        while (comp[j] != '\0'){
            if (s[i] == comp[j]){
                s[i] = '\0'; i++;
                return (&s[comienzo]);
            }
            j++;
        }
        i++;
    }
    if(s[comienzo] == '\0')
        return NULL;
    else return  (&s[comienzo]);

}

int lp1Strnpn(char * cad1, char * cad2){

    int i=0,j=0, cont = 0;

    while (cad2[i] != '\0'){
        j=0;
        while (cad1[j] != '\0'){
            if (cad1[j]==cad2[i] && (cad2[i]>='0' && cad2[i] <='9')) cont ++;
            j++;
        }
        i++;
    }

    return cont;

}
int lp1Strcspn(char * cad1,char * cad2){

    //th1234
    //123456789
    int i=0,j=0,cont=0, flag;
    while (cad1[i] != '\0'){

        j=0; flag = 1;
        while (cad2[j] != '\0'){

            if (cad2[j] != cad1[i]) j++;
            else {
                flag = 0;
                break;
            }

        }
        if (flag) cont ++;
        i++;
    }

    return cont;

}

char* lp1Strlwr(char *cad5){

    int cont = 0;
    char *cadNueva = new char [20];
    while (1){

        if (cad5[cont] == '\0') break;
        if (cad5[cont]>='A' && cad5[cont]<='Z'){
            cadNueva[cont] = cad5[cont]+32;
        }
        else cadNueva[cont] = cad5[cont];
        cont ++;

    }
    return &(cadNueva[0]);

}

char* lp1Strupr(char *cad5){

    int cont = 0;
    char *cadNueva = new char [20];
    while (1){

        if (cad5[cont] == '\0') break;
        if (cad5[cont]>='a' && cad5[cont]<='z'){
            cadNueva[cont] = cad5[cont]-32;
        }
        else cadNueva[cont] = cad5[cont];
        cont ++;

    }
    return &(cadNueva[0]);

}


int lp1Strcmpi(char *cad1, char *cad2){

    int cont=0;
    while (1){

        if (cad1[cont] != '\0' && cad2[cont] == '\0') return cad2[cont];
        if (cad1[cont] == '\0' && cad2[cont] != '\0') return cad1[cont];
        if (cad1[cont]);



    }

}

int main(int argc, char** argv) {

    char *cad; int tam;
    char *p, s[] ="Hola,no soy,arroz,con,leche.galleta,erotica.caca";

    tam = lp1Read(cad);
    tam = lp1Write(cad);
    cout << "El resultado es: " << tam << endl << endl;;
    cout << "Usando la funcion strtok \n";

    p = lp1Strtok(s,",.");

    while ( p != NULL){
        lp1Write(p);
        p = lp1Strtok(NULL,",.");
    }

    putchar('\n');
    char cad1[]="1829th", cad2[] = "1234567890";
    int i = lp1Strnpn(cad1,cad2);
    printf("La longitud es %d\n",i);
    char cad3[]="th1829", cad4[] = "1234567890";
    int j = lp1Strcspn(cad3,cad4);
    printf("La longitud es %d\n\n\n",j);
    char *cad5 = "cOdIgO prUeba hEheHEHe";
    cad5 = lp1Strlwr(cad5);
    lp1Write(cad5);



    return 0;
}