Преобразовать строку так, чтобы между словами был ровно один пробел

#include <stdio.h> //i/o
#include <string.h>//strtok
#include <conio.h> //getch
 
int main()
{
    char delim[] = " ";//Разделители между токенами (их можно добавить ,.!?)
    char str[1025];//Думаю предложение(я) поменьше будут 1024 символов
    char *buf;//Для токенов(слов) и прочих нужд
    do
    {
        printf("Enter sentence(s) less than 1024 chars:\r\n");
        scanf("%[^\n]",str,&buf);//В str текст до '\n' в buf '\n'
        printf("Removing numerous spaces\r\n");
        buf = strtok(str,delim);
        while(buf)
        {
            printf("%s ",buf);
            buf = strtok(NULL,delim);
        }
        printf("\r\nPress \'y\' for new input\r\n");
    }
    while(getch() == 'y');
 
    return 0;
}

#include <stdio.h>
char* unique_space(char* str);
 
int  main(void) {
   char  str[] = "   Lisp      Actor         PL/I, Algol    .";
   puts( unique_space(str) );
   getchar();
   return 0;
}
 
char* unique_space(char* str) {
   char* iter, *sa, *sb;
   int cnt = 0;
   iter = str;
   do {
       if(*iter == ' ') cnt++;
       else {
           iter -= cnt;
           while(--cnt >= 1)
                 for(sa = iter, sb = iter + 1; *sa; *sa++ = *sb++);
           cnt = 0;
       }
   } while( *iter++ );
   return str;
}

#include <stdio.h> //i/o
#include <string.h>//strchr strlen
#include <conio.h> //getch
 
int main()
{
    long sLen,bLen,i;
    char str[1025];//Думаю предложение(я) поменьше будут 1024 символов
    char *buf;//Для частей строки и прочих нужд
    do
    {
        printf("Enter sentence(s) less than 1024 chars:\r\n");
        scanf("%[^\n]",str,&buf);//В str текст до '\n' в buf '\n'
        
        printf("Removing numerous spaces\r\n");
 
        buf = strchr(str,' ');
        while(buf)
        {
            sLen = strlen(str);//В sLen длину строки
            bLen = strlen(buf);
            i = 1;
            while(buf + i)
            {
                //Последовательно проверяем каждй символ после пробела
                if((buf + i)[0] == ' ')
                    i++;
                else
                    break;
            }
            //Копирование внутри строки
            strcpy(&str[sLen - bLen + 1],&str[sLen - bLen + i]);
            str[sLen - i + 1] = '\0';//Подрезаем исхоную строку на величину убранных пробелов
            buf = strchr(buf + 1,' ');//Продолжаем следующих пробелов между словами
        }
        printf("\r\n\tInput string after removing spaces\r\n%s",str);
        printf("\r\nPress \'y\' for new input\r\n");
    }
    while(getch() == 'y');
 
    return 0;
}

#include <stdio.h> //i/o
#include <string.h>//strtok
#include <conio.h> //getch
 
int main()
{
    char delim[] = " ";//Разделители между токенами (их можно добавить ,.!?)
    char BUF[1025]={0};
    char str[1025]={0};//Думаю предложение(я) поменьше будут 1024 символов
    char *buf;//Для токенов(слов) и прочих нужд
    do
    {
        printf("Enter sentence(s) less than 1024 chars:\r\n");
        scanf("%[^\n]",str,&buf);//В str текст до '\n' в buf '\n'
        printf("Removing numerous spaces\r\n");
        buf = strtok(str,delim);
        sprintf(BUF, "%s",buf);
        while(buf)
        {
            sprintf(BUF, "%s %s",BUF, buf);
            buf = strtok(NULL,delim);
        }
        printf("%s",strcpy(str,BUF));
        printf("\r\nPress \'y\' for new input\r\n");
    }
    while(getch() == 'y');
 
    return 0;
}

#include <stdio.h>
#include <string.h>
#include <ctype.h>
 
#define STR_LEN 512
#define STR_MASK "%511[^\n]%*c"
 
int main(void){
    char buf[STR_LEN], * p;
    
    while ( printf("String: ") > 0 && scanf(STR_MASK, buf) == 1 ){
        for ( p = buf; *p; ++p ){
            if ( isspace(*p) ){
                *p = ' ';
                while ( isspace(*(p+1)) )
                    memmove(p+1, p+2, strlen(p+1));
            }
        }
        
        printf("Result: %s\n", buf);
    }
    
    return 0;
}