Вывести слова в порядке убывания количества символов

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
#define MAXW 1024
 
int slencmp(const void *p1, const void *p2)
{
    const char *s1, *s2;
 
    s1 = * (char **) p1;
    s2 = * (char **) p2;
    return strlen(s1) - strlen(s2);
}
 
int main(void)
{
    char s[4096], *words[MAXW];
    char *p, *delim = " -:,.!?";
    int i, nw;
 
    printf("Enter string: ");
    if(fgets(s, sizeof(s), stdin) == NULL || *s == '\n')
        return 1;
    
    if(p = strrchr(s, '\n'))
        *p = '\0';
    
    for(i = 0, p = s; i < MAXW && (p = strtok(p, delim)); i++, p = NULL)
        words[i] = strdup(p);
    
    nw = i;
    qsort(words, nw, sizeof(char *), slencmp);
    for(i = nw - 1; i >= 0; i--)
        printf("%s\n", words[i]);
    
    return 0;
}

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
#define SEP_CHARS " \t,.:;!?"
    
typedef struct tagWRD {
    char *word;
    size_t len;
    struct tagWRD *next;
} WRD;
 
WRD *maxWord(WRD *w){
    size_t max;
    WRD *pmax;
    
    max = w->len;
    pmax = w;
    while ( w = w->next ){
        if ( w->len > max ){
            max = w->len;
            pmax = w;
        }
    }
    return pmax;
}
 
void swapWords(WRD *a, WRD *b){
    WRD t;
    t.word = a->word;
    t.len = a->len;
    a->word = b->word;
    a->len = b->len;
    b->word = t.word;
    b->len = t.len;
}
 
void sortWords(WRD *w){
    WRD *max_word, *next_word;
    
    if ( !w )
        return;
    while ( next_word = w->next ){
        if ( ( max_word = maxWord(w) ) != w )
            swapWords(w, max_word);
        w = next_word;
    }
}
 
WRD *newWord(char *s){
    WRD *w;
    
    if ( !s )
        return NULL;
    if ( ( w = (WRD*)malloc(sizeof(WRD)) ) == NULL ){
        fprintf(stderr, "Bad memory!\n");
        exit(1);
    }
    if ( ( w->word = strdup(s) ) == NULL ){
        fprintf(stderr, "Bad memory!\n");
        exit(1);
    }
    w->len = strlen(w->word);
    w->next = NULL;
    return w;
}
 
void clearWords(WRD *w){
    WRD *t;
    
    while ( w ){
        t = w->next;
        if ( w->word ){
            free(w->word);
            w->word = NULL;
        }
        free(w);
        w = t;
    }
}
 
void printWords(WRD *w){
    while ( w ){
        printf( ( w->next ) ? "%s " : "%s\n", w->word);
        w = w->next;
    }
}
 
int main(void){
    char buf[BUFSIZ], *p;
    WRD *first, *w, *last;
    
    while ( 1 ){
        first = last = NULL;
        printf("String: ");
        if ( !fgets(buf, sizeof(buf), stdin) )
            exit(1);
        if ( p = strrchr(buf, '\n') )
            *p = 0;
        if ( !*buf )
            exit(0);
        for ( p = strtok(buf, SEP_CHARS); p != NULL; p = strtok(NULL, SEP_CHARS) ){
            if ( ( w = newWord(p) ) == NULL ){
                fprintf(stderr, "Can't get word!\n");
                exit(1);
            }
            if ( !first ){
                first = w;
                last = first;
            }
            else {
                last->next = w;
                last = last->next;
            }
        }
        if ( !first ){
            fprintf(stderr, "Can't get some words!\n");
            exit(1);
        }
        sortWords(first);
        printWords(first);
        clearWords(first);
    }
    exit(0);
}