algo de avance, C (gcc)

Language: Layout:

#include <stdio.h>
#include <ctype.h>
#include <string.h>
#include <stdlib.h>

typedef struct
{
    char mail[321];
    char domain[256];    
}users;

typedef struct
{
    char dominio[256];
    unsigned short cantidad;
}domains;

// -----------------Prototypes----------------------

void findDomain ( char *, char *);
int compareDomains( const void *, const void * );
void lowerCase( char *);
void registroDominio( const users *, domains *, int);

// ---------------Main Program-----------------------
int main(void)
{
    users typeDomain[10000];
    domains arrayDominios[10000];
    int i = 0;
    int total;
    //unsigned short sum;

// --------------------------Input----------------------
    
    while ( i < 10000)
    {
        scanf("%320s", typeDomain[i].mail);
        if ( strcmp(typeDomain[i].mail, "FIN") == 0)
            break;
        i++;
    }
    
    // -----------------------Process-----------------------
    
    total = i;
    for (i = 0 ; i < total ; i++)
        findDomain(typeDomain[i].mail, typeDomain[i].domain);
    
    for (i = 0 ; i < total  ; i++)
        lowerCase(typeDomain[i].domain);
    
    
    qsort(typeDomain, total, sizeof(users), compareDomains);
    
    for (i = 0 ; i < total ; i++)
        printf("%s\n", typeDomain[i].domain);
    printf("\n\n");
    
    registroDominio( typeDomain, arrayDominios, total);
    
    for (i = 0 ; i < total ; i++)
        printf("%s : %hu\n", arrayDominios[i].dominio, arrayDominios[i].cantidad );
    
    
    
    
        
        
    return 0;
}

void registroDominio( const users *type, domains *array, int total)
{
    short i, j;
    unsigned short suma;
    
    
    for ( i = 0 ; i < total - 1; i++)
    {
        strcpy(array[i].dominio, type[i].domain);
        suma = 1;
        for ( j = i + 1; j < total ; j++)
        {
            if ( strcmp(array[i].dominio, type[j].domain ) != 0 )
                break;
            else
                suma ++;
        }
        
        array[i].cantidad = suma;
        
        i += (j - i - 1);

}
    
    
}

/* -------------------------Procedimiento findDomain-------------------------------
 * Propósito: encontrar el dominio de un correo electrónico. Ejemplo: 
 * pedro@hotmail.com, el dominio es: hotmail.com 
 * 
 */

void findDomain ( char *mail, char *domain)
{
    char *pointer;
    pointer = mail;
    pointer = strchr(mail, '@');
    strcpy(domain, pointer + 1);
}

int compareDomains( const void *pivot, const void *element )
{
    users *ptrPivot = (users *) pivot;
    users *ptrElement = (users *) element;
    return strcmp( ( ptrPivot -> domain ), ( ptrElement -> domain ) );
}

void lowerCase( char *domain)
{
    while ( *domain != '\0')
    {
        if ( isupper( *domain ) )
            *domain = tolower(*domain);
        domain ++;
    }
}

iabarcae@yahoo.es     maeillanes@hotmail.com
osabarca@hotmail.com    cabrigo@garmendia.cl      Sb.nashxo.sk8@hotmail.com
fran.afull@live.cl         carlosaguileram@hotmail.com
ikis_rojo@hotmail.com     daniela_aguilera_m500@hotmail.com
VIZKALA@HOTMAIL.COM       ALEXUS3@HOTMAIL.COM
CAPITANAGUILERA@HOTMAIL.COM
APALAMOSG@HOTMAIL.COM     NIIKHOX__@HOTMAIL.COM
LUUUUUUCI@HOTMAIL.COM
KRISTIAN_SIEMPRE_AZUL@HOTMAIL.COM    MAPUCHIN@HOTMAIL.COM
ARAHUETES@MANQUEHUE.NET       EDUARDO.ARANCIBIA@GRANGE.CL
MARTACAM2002@YAHOO.COM
ANDREA.GEOPLANET@GMAIL.COM       FARAYA1910@HOTMAIL.COM
FARAYA@SPRINT.CL       LEONOR.ARAYA@GMAIL.COM
paulifran@hotmail.com      bad.girl.-@hotmail.es
aargomedo@hecsa.cl
aargomedo@hecsa.cl
elizabetharmstrong39@gmail.com
c_arnes@hotmail.com     aarriagada@petrok.cl
joy_pao_@hotmail.com   carlosarteaga.pef@gmail.com
arquitectoasenjo@gmail.com
masenjog@gmail.com
Sergio.Aspe@adretail.cl
caspe@canal13.cl
bantomaui@gmail.com
mfbanto@gmail.com
RODRIGO.BANTO@UVAVINS.CH
JBARRERA05@HOTMAIL.COM
CLAUDIABERGEZ@GMAIL.COM
MICHELEBK@HOTMAIL.COM
ANGELICABERGEZ@GMAIL.COM    FIN

Show compiler warnings [ + ] Compiler args [ - ] Show input
Compilation time: 0.57 sec, absolute running time: 0.18 sec, cpu time: 0.07 sec, memory peak: 3 Mb, absolute service time: 0,76 sec