12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667 |
- /*
- * This file is part of the UCB release of Plan 9. It is subject to the license
- * terms in the LICENSE file found in the top-level directory of this
- * distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No
- * part of the UCB release of Plan 9, including this file, may be copied,
- * modified, propagated, or distributed except according to the terms contained
- * in the LICENSE file.
- */
- #include <u.h>
- #include <libc.h>
- #include <bio.h>
- #include <ctype.h>
- #include <ndb.h>
- #include "ndbhf.h"
- /*
- * Parse a data base entry. Entries may span multiple
- * lines. An entry starts on a left margin. All subsequent
- * lines must be indented by white space. An entry consists
- * of tuples of the forms:
- * attribute-name
- * attribute-name=value
- * attribute-name="value with white space"
- *
- * The parsing returns a 2-dimensional structure. The first
- * dimension joins all tuples. All tuples on the same line
- * form a ring along the second dimension.
- */
- /*
- * parse the next entry in the file
- */
- Ndbtuple*
- ndbparse(Ndb *db)
- {
- char *line;
- Ndbtuple *t;
- Ndbtuple *first, *last;
- int len;
- first = last = 0;
- for(;;){
- if((line = Brdline(&db->b, '\n')) == 0)
- break;
- len = Blinelen(&db->b);
- if(line[len-1] != '\n')
- break;
- if(first && !ISWHITE(*line) && *line != '#'){
- Bseek(&db->b, -len, 1);
- break;
- }
- t = _ndbparseline(line);
- if(t == 0)
- continue;
- setmalloctag(t, getcallerpc(&db));
- if(first)
- last->entry = t;
- else
- first = t;
- last = t;
- while(last->entry)
- last = last->entry;
- }
- ndbsetmalloctag(first, getcallerpc(&db));
- return first;
- }
|