Запись строк в файл

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
/*
*   Дан строковый файл. Создать новый строковый файл, содержащий все строки исходного файла
*   наименьшей длины (в том же порядке).
*/
 
#define FIN_NAME "file.txt"
#define FOUT_NAME "shortest.txt"
 
typedef struct STRING {
    char * buf;
    size_t len;
    struct STRING * next;
} string_t;
 
string_t * new_string(const char * buf, string_t * last){
    string_t * str;
    if ( ( str = (string_t*)malloc(sizeof(string_t)) ) == NULL )
        return NULL;
    if ( ( str->buf = strdup(buf) ) == NULL ){
        free(str);
        return NULL;
    }
    str->len = strlen(str->buf);
    str->next = NULL;
    if ( last )
        last->next = str;
    return str;
}
 
void delete_strings(string_t * str){
    string_t * tmp;
    while ( str ){
        tmp = str->next;
        free(str->buf);
        free(str);
        str = tmp;
    }
}
 
size_t shortest_len(const string_t * str){
    size_t shl = str->len;
    while ( str = str->next )
        if ( str->len < shl )
            shl = str->len;
    return shl;
}
 
int main(void){
    FILE * fin, * fout;
    char buf[BUFSIZ], *p;
    string_t * first, * last;
    size_t len;
 
    if ( ( fin = fopen(FIN_NAME, "r") ) == NULL ){
        perror("fopen");
        exit(EXIT_FAILURE);
    }
 
    first = last = NULL;
 
    while ( fgets(buf, BUFSIZ, fin) ){
        if ( p = strrchr(buf, '\n') )
            *p = '\0';
        if ( *buf == '\0' )
            continue;
        if ( ( last = new_string(buf, last) ) == NULL ){
            fprintf(stderr, "Can't create new string!\n");
            if ( fclose(fin) )
                perror("fclose");
            if ( first )
                delete_strings(first);
            exit(EXIT_FAILURE);
        }
        if ( ! first )
            first = last;
    }
    if ( ferror(fin) ){
        perror("ferror");
        if ( fclose(fin) )
            perror("fclose");
        if ( first )
            delete_strings(first);
        exit(EXIT_FAILURE);
    }
    if ( fclose(fin) )
        perror("fclose");
 
    if ( ! first ){
        fprintf(stderr, "No strings reached!\n");
        exit(EXIT_FAILURE);
    }
 
    len = shortest_len(first);
 
    if ( ( fout = fopen(FOUT_NAME, "w") ) == NULL ){
        perror("fopen");
        delete_strings(first);
        exit(EXIT_FAILURE);
    }
 
    for ( last = first; last != NULL; last = last->next ){
        if ( last->len == len ){
            if ( fprintf(fout, "%s\n", last->buf) == EOF ){
                perror("fprintf");
                if ( fclose(fout) )
                    perror("fclose");
                delete_strings(first);
                exit(EXIT_FAILURE);
            }
        }
    }
 
    delete_strings(first);
 
    if ( fclose(fout) ){
        perror("fclose");
        exit(EXIT_FAILURE);
    }
 
    printf("Done.\n");
    exit(EXIT_SUCCESS);
}

size_t shortest_len(const string_t * str){
        size_t shl = str->len;
        while ( str = str->next )
                if ( str->len < shl )
                        shl = str->len;
        return shl;
}

size_t longest_len(const string_t * str){
        size_t shl = str-<len;
        while ( str = str-<next )
                if ( str-<len > shl )
                        shl = str-<len;
        return shl;
}

size_t longest_len(const string_t * str){
        size_t lol = str->len; // ;)
        while ( str = str->next )
                if ( str->len > lol )
                        lol = str->len;
        return lol;
}

...
len = longest_len(first);
...

/* The Bubble Sort. */
void bubble(char *items, int count)
{
  register int a, b;
  register char t;
 
  for(a=1; a < count; ++a)
    for(b=count-1; b >= a; --b) {
      if(items[b-1] > items[b]) {
        /* exchange elements */
        t = items[b-1];
        items[b-1] = items[b];
        items[b] = t;
      }
    }
}