source/unres/src_MD-M/xdrf/ftocstr.c

   1
   2
   3 int ftocstr(ds, dl, ss, sl)
   4     char *ds, *ss;      /* dst, src ptrs */
   5     int dl;             /* dst max len */
   6     int sl;             /* src len */
   7 {
   8     char *p;
   9
  10     for (p = ss + sl; --p >= ss && *p == ' '; ) ;
  11     sl = p - ss + 1;
  12     dl--;
  13     ds[0] = 0;
  14     if (sl > dl)
  15         return 1;
  16     while (sl--)
  17         (*ds++ = *ss++);
  18     *ds = '\0';
  19     return 0;
  20 }
  21
  22
  23 int ctofstr(ds, dl, ss)
  24         char *ds;               /* dest space */
  25         int dl;                 /* max dest length */
  26         char *ss;               /* src string (0-term) */
  27 {
  28     while (dl && *ss) {
  29         *ds++ = *ss++;
  30         dl--;
  31     }
  32     while (dl--)
  33         *ds++ = ' ';
  34     return 0;
  35 }