X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=src%2Fcclqfile.c;h=1c5372573fb3bed30184f9c921705f7046546b99;hb=dd7de5f04a0de631f98ad9c4774f2111a85388e5;hp=a637b75326c88909cb04142bc3a92bbd7340cdfa;hpb=5655212777a8fe68bf5cc1e563287c0f075a0ae5;p=yaz-moved-to-github.git diff --git a/src/cclqfile.c b/src/cclqfile.c index a637b75..1c53725 100644 --- a/src/cclqfile.c +++ b/src/cclqfile.c @@ -44,7 +44,7 @@ /* CCL qualifiers * Europagate, 1995 * - * $Id: cclqfile.c,v 1.2 2004-08-18 10:03:01 adam Exp $ + * $Id: cclqfile.c,v 1.5 2004-10-02 13:28:26 adam Exp $ * * Old Europagate Log: * @@ -132,6 +132,8 @@ void ccl_qual_field (CCL_bibset bibset, const char *cp, const char *qual_name) type = CCL_BIB1_REL; if (!ccl_stricmp (qual_value, "o")) value = CCL_BIB1_REL_ORDER; + else if (!ccl_stricmp (qual_value, "r")) + value = CCL_BIB1_REL_PORDER; break; case 'p': case 'P': @@ -186,7 +188,7 @@ void ccl_qual_field (CCL_bibset bibset, const char *cp, const char *qual_name) len = split - qual_value; else len = strlen(qual_value); - svalue_ar[pair_no] = xmalloc(len+1); + svalue_ar[pair_no] = (char *) xmalloc(len+1); memcpy(svalue_ar[pair_no], qual_value, len); svalue_ar[pair_no][len] = '\0'; } @@ -214,6 +216,31 @@ void ccl_qual_fitem (CCL_bibset bibset, const char *cp, const char *qual_name) ccl_qual_field(bibset, cp, qual_name); } +void ccl_qual_buf(CCL_bibset bibset, const char *buf) +{ + const char *cp1 = buf; + char line[256]; + while (1) + { + const char *cp2 = cp1; + int len; + while (*cp2 && !strchr("\r\n", *cp2)) + cp2++; + len = cp2 - cp1; + if (len > 0) + { + if (len >= (sizeof(line)-1)) + len = sizeof(line)-1; + memcpy(line, cp1, len); + line[len] = '\0'; + ccl_qual_line(bibset, line); + } + if (!*cp2) + break; + cp1 = cp2+1; + } +} + void ccl_qual_line(CCL_bibset bibset, char *line) { int no_scan = 0;