45 LFUNC(ParseComment, int, (xpmData * mdata));
48 ParseComment(mdata)  in ParseComment()  argument
49 xpmData *mdata;  in ParseComment()
51  if (mdata->type == XPMBUFFER)
58   s = mdata->Comment;
59   *s = mdata->Bcmt[0];
62   s2 = mdata->Bcmt;
65    c = *mdata->cptr++;
74    mdata->cptr -= n;
78   mdata->Comment[0] = *s;
79   s = mdata->Comment;
84    s2 = mdata->Ecmt;
87     c = *mdata->cptr++;
90      s = mdata->Comment;
96    mdata->CommentLength = n;
99     c = *mdata->cptr++;
102      s = mdata->Comment;
113     mdata->cptr--;
119   FILE *file = mdata->stream.file;
125   s = mdata->Comment;
126   *s = mdata->Bcmt[0];
129   s2 = mdata->Bcmt;
147   mdata->Comment[0] = *s;
148   s = mdata->Comment;
153    s2 = mdata->Ecmt;
159      s = mdata->Comment;
165    mdata->CommentLength = n;
171      s = mdata->Comment;
193 xpmNextString(mdata)  in xpmNextString()  argument
194 xpmData *mdata;  in xpmNextString()
196  if (!mdata->type)
197   mdata->cptr = (mdata->stream.data)[++mdata->line];
199  if (mdata->type == XPMBUFFER)
204   if (mdata->Eos)
205    while ((c = *mdata->cptr++) && c != mdata->Eos);
211   if (mdata->Bos)
213    while ((c = *mdata->cptr++) && c != mdata->Bos)
214     if (mdata->Bcmt && c == mdata->Bcmt[0])
215      ParseComment(mdata);
217   if (mdata->Bcmt)
219    while ((c = *mdata->cptr++) == mdata->Bcmt[0])
220     ParseComment(mdata);
221    mdata->cptr--;
226   FILE *file = mdata->stream.file;
229   if (mdata->Eos)
230    while ((c = getc(file)) != mdata->Eos && c != EOF);
236   if (mdata->Bos)
238    while ((c = getc(file)) != mdata->Bos && c != EOF)
239     if (mdata->Bcmt && c == mdata->Bcmt[0])
240      ParseComment(mdata);
243   if (mdata->Bcmt)
245    while ((c = getc(file)) == mdata->Bcmt[0])
246     ParseComment(mdata);
259 xpmNextUI(mdata, ui_return)  in xpmNextUI()  argument
260 xpmData *mdata;  in xpmNextUI()
266  l = xpmNextWord(mdata, buf, BUFSIZ);
274 xpmNextWord(mdata, buf, buflen)  in xpmNextWord()  argument
275 xpmData *mdata;  in xpmNextWord()
282  if (!mdata->type || mdata->type == XPMBUFFER)
284   while (isspace(c = *mdata->cptr) && c != mdata->Eos)
285    mdata->cptr++;
288    c = *mdata->cptr++;
291   } while (!isspace(c) && c != mdata->Eos && n < buflen);
293   mdata->cptr--;
296   FILE *file = mdata->stream.file;
298   while ((c = getc(file)) != EOF && isspace(c) && c != mdata->Eos);
299   while (!isspace(c) && c != mdata->Eos && c != EOF && n < buflen)
314 xpmGetString(mdata, sptr, l)  in xpmGetString()  argument
315 xpmData *mdata;  in xpmGetString()
323  if (!mdata->type || mdata->type == XPMBUFFER)
325   if (mdata->cptr)
327    char *start = mdata->cptr;
328    while ((c = *mdata->cptr) && c != mdata->Eos)
329     mdata->cptr++;
330    n = mdata->cptr - start + 1;
335    if (mdata->type)		/* XPMBUFFER */
340   FILE *file = mdata->stream.file;
348   while (c != mdata->Eos && c != EOF)
408 xpmGetCmt(mdata, cmt)  in xpmGetCmt()  argument
409 xpmData *mdata;  in xpmGetCmt()
412  if (!mdata->type)
415  if (mdata->CommentLength)
417   *cmt = (char *) XpmMalloc(mdata->CommentLength + 1);
418   strncpy(*cmt, mdata->Comment, mdata->CommentLength);
419   (*cmt)[mdata->CommentLength] = '\0';
420   mdata->CommentLength = 0;
442 xpmParseHeader(mdata)  in xpmParseHeader()  argument
443 xpmData *mdata;  in xpmParseHeader()
448  if (mdata->type)
450   mdata->Bos = '\0';
451   mdata->Eos = '\n';
452   mdata->Bcmt = mdata->Ecmt = NULL;
453   l = xpmNextWord(mdata, buf, BUFSIZ);
459    l = xpmNextWord(mdata, buf, BUFSIZ);
467    mdata->format = 1;
475    l = xpmNextWord(mdata, buf, BUFSIZ);
484      l = xpmNextWord(mdata, buf, BUFSIZ);
493     mdata->format = 0;
502     mdata->Bcmt = xpmDataTypes[n].Bcmt;
503     mdata->Ecmt = xpmDataTypes[n].Ecmt;
504     xpmNextString(mdata);	/* skip the end of the headerline */
505     mdata->Bos = xpmDataTypes[n].Bos;
506     mdata->Eos = xpmDataTypes[n].Eos;
509     mdata->Bcmt = xpmDataTypes[n].Bcmt;
510     mdata->Ecmt = xpmDataTypes[n].Ecmt;
511     if (!mdata->format)
513      mdata->Bos = xpmDataTypes[n].Bos;
514      mdata->Eos = '\0';
516      xpmNextString(mdata);
517      mdata->Eos = xpmDataTypes[n].Eos;
519      xpmNextString(mdata);