Функции и строки в си

[YulichkaR]

Задача поставлена вот какая: Написать функцию, которая в данной строке, состоящей из слов, разделенных пробе-лами, между словами оставит только по одному пробелу и после каждого слова вставит запятую.

Я её вроде как сделала, но суть в том, что вылетает из памяти, вот мой код:

# include <stdio.h>
 # include <conio.h>
 # include <stdlib.h>
 # include <string.h>
 # include <locale.h>
 char f1(char *d)

 { char *k;char *l= ", ";
 char *razd=" ",*p,*j;
 p=strtok(d,razd);
 k=strcat(p,l);
 while (p) { 
 p=strtok(p,razd);
 j=strcpy(p,k);
 k=strcat(k,p); <------тут вылетает
 k=strcat(k,l);}
 printf("% ch",k);
 return 0;
 }
 int main(void)
 { char *p;
 setlocale (0,"rus");
 setlocale(LC_ALL,"Russian");
 char *d=(char*)malloc(200*sizeof(char));
 if (!d) {printf("Память не выделена"); return 1;}
 d=(char*)realloc(d,(strlen(d)+1)*sizeof(char));
 if (!d) {printf("Память не выделена"); return 1;}
 printf("Введите строку: ");
 gets(d);
 f1(d);
 _getch();
 return 0;
 }

Может кто знает в чем ошибка? Большое спасибо))

[Stilet]

Предположу что функция должна выглядеть так:

 char* trims(char* s){
  int si=0;for(;s[si];si++);
  char* a=(char*)malloc(si);
  for(int i=0,j=0;i<si-1;i++){
   if(s[i]!=' ' && s[i+1]==' ') {a[j++]=s[i];a[j]=',';} else
   if(s[i]!=' ' && s[i+1]!=' ') a[j++]=s[i];
  }
  a[si]=0;
  return a;
 }