123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278 |
- /*
- * libdpkg - Debian packaging suite library routines
- * parsehelp.c - helpful routines for parsing and writing
- *
- * Copyright © 1995 Ian Jackson <ian@chiark.greenend.org.uk>
- *
- * This is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as
- * published by the Free Software Foundation; either version 2,
- * or (at your option) any later version.
- *
- * This is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program. If not, see <http://www.gnu.org/licenses/>.
- */
- #include <config.h>
- #include <compat.h>
- #include <ctype.h>
- #include <string.h>
- #include <stdlib.h>
- #include <stdio.h>
- #include <dpkg/i18n.h>
- #include <dpkg/dpkg.h>
- #include <dpkg/dpkg-db.h>
- #include <dpkg/string.h>
- #include <dpkg/parsedump.h>
- static void
- parse_error_msg(struct parsedb_state *ps, const struct pkginfo *pigp,
- const char *type, char *buf)
- {
- if (pigp && pigp->name)
- sprintf(buf, _("%s, in file '%.255s' near line %d package '%.255s':\n "),
- type, ps->filename, ps->lno, pigp->name);
- else
- sprintf(buf, _("%s, in file '%.255s' near line %d:\n "),
- type, ps->filename, ps->lno);
- }
- void
- parse_error(struct parsedb_state *ps,
- const struct pkginfo *pigp, const char *fmt, ...)
- {
- va_list al;
- char buf1[768], buf2[1000], *q;
- parse_error_msg(ps, pigp, _("parse error"), buf1);
- q = str_escape_fmt(buf2, buf1);
- strcat(q,fmt);
- va_start(al,fmt);
- ohshitv(buf2, al);
- }
- void
- parse_warn(struct parsedb_state *ps,
- const struct pkginfo *pigp, const char *fmt, ...)
- {
- va_list al;
- char buf1[768], buf2[1000], *q;
- parse_error_msg(ps, pigp, _("warning"), buf1);
- q = str_escape_fmt(buf2, buf1);
- strcat(q, fmt);
- va_start(al, fmt);
- ps->warncount++;
- if (ps->warnto) {
- strcat(q,"\n");
- if (vfprintf(ps->warnto, buf2, al) == EOF)
- ohshite(_("failed to write parsing warning"));
- }
- va_end(al);
- }
- const struct namevalue booleaninfos[]= { /* Note ! These must be in order ! */
- { "no", 0, 2 },
- { "yes", 1, 3 },
- { NULL }
- };
- const struct namevalue priorityinfos[]= { /* Note ! These must be in order ! */
- { "required", pri_required, 8 },
- { "important", pri_important, 9 },
- { "standard", pri_standard, 8 },
- { "optional", pri_optional, 8 },
- { "extra", pri_extra, 5 },
- { "this is a bug - please report", pri_other, 28 },
- { "unknown", pri_unknown, 7 },
- { NULL }
- };
- const struct namevalue statusinfos[]= { /* Note ! These must be in order ! */
- { "not-installed", stat_notinstalled, 13 },
- { "config-files", stat_configfiles, 12 },
- { "half-installed", stat_halfinstalled, 14 },
- { "unpacked", stat_unpacked, 8 },
- { "half-configured", stat_halfconfigured, 15, },
- { "triggers-awaited", stat_triggersawaited, 16 },
- { "triggers-pending", stat_triggerspending, 16 },
- { "installed", stat_installed, 9 },
- /* These are additional entries for reading only, in any order ... */
- /* XXX: backwards compat., remove. */
- { "postinst-failed", stat_halfconfigured, 15 },
- /* XXX: backwards compat., remove. */
- { "removal-failed", stat_halfinstalled, 14 },
- { NULL }
- };
- const struct namevalue eflaginfos[]= { /* Note ! These must be in order ! */
- { "ok", eflag_ok, 2 },
- { "reinstreq", eflag_reinstreq, 9 },
- { NULL }
- };
- const struct namevalue wantinfos[]= { /* Note ! These must be in order ! */
- { "unknown", want_unknown, 7 },
- { "install", want_install, 7 },
- { "hold", want_hold, 4 },
- { "deinstall", want_deinstall, 9 },
- { "purge", want_purge, 5 },
- { NULL }
- };
- const char *illegal_packagename(const char *p, const char **ep) {
- static const char alsoallowed[]= "-+._"; /* _ is deprecated */
- static char buf[150];
- int c;
-
- if (!*p) return _("may not be empty string");
- if (!isalnum(*p)) return _("must start with an alphanumeric");
- while ((c = *p++) != '\0')
- if (!isalnum(c) && !strchr(alsoallowed,c)) break;
- if (!c) return NULL;
- if (isspace(c) && ep) {
- while (isspace(*p)) p++;
- *ep= p; return NULL;
- }
- snprintf(buf, sizeof(buf), _(
- "character `%c' not allowed (only letters, digits and characters `%s')"),
- c, alsoallowed);
- return buf;
- }
- const struct nickname nicknames[]= {
- /* NB: capitalisation of these strings is important. */
- { "Recommended", "Recommends" },
- { "Optional", "Suggests" },
- { "Class", "Priority" },
- { "Package-Revision", "Revision" },
- { "Package_Revision", "Revision" },
- { NULL }
- };
- int informativeversion(const struct versionrevision *version) {
- return (version->epoch ||
- (version->version && *version->version) ||
- (version->revision && *version->revision));
- }
- void varbufversion
- (struct varbuf *vb,
- const struct versionrevision *version,
- enum versiondisplayepochwhen vdew)
- {
- switch (vdew) {
- case vdew_never:
- break;
- case vdew_nonambig:
- if (!version->epoch &&
- (!version->version || !strchr(version->version,':')) &&
- (!version->revision || !strchr(version->revision,':'))) break;
- case vdew_always: /* FALL THROUGH */
- varbufprintf(vb,"%lu:",version->epoch);
- break;
- default:
- internerr("unknown versiondisplayepochwhen '%d'", vdew);
- }
- if (version->version) varbufaddstr(vb,version->version);
- if (version->revision && *version->revision) {
- varbufaddc(vb,'-');
- varbufaddstr(vb,version->revision);
- }
- }
- const char *versiondescribe
- (const struct versionrevision *version,
- enum versiondisplayepochwhen vdew)
- {
- static struct varbuf bufs[10];
- static int bufnum=0;
- struct varbuf *vb;
-
- if (!informativeversion(version)) return _("<none>");
- vb= &bufs[bufnum]; bufnum++; if (bufnum == 10) bufnum= 0;
- varbufreset(vb);
- varbufversion(vb,version,vdew);
- varbufaddc(vb,0);
- return vb->buf;
- }
- const char *parseversion(struct versionrevision *rversion, const char *string) {
- char *hyphen, *colon, *eepochcolon;
- const char *end, *ptr;
- unsigned long epoch;
- if (!*string) return _("version string is empty");
- /* trim leading and trailing space */
- while (*string && isblank(*string))
- string++;
- /* string now points to the first non-whitespace char */
- end = string;
- /* find either the end of the string, or a whitespace char */
- while (*end && !isblank(*end))
- end++;
- /* check for extra chars after trailing space */
- ptr = end;
- while (*ptr && isblank(*ptr))
- ptr++;
- if (*ptr) return _("version string has embedded spaces");
- colon= strchr(string,':');
- if (colon) {
- epoch= strtoul(string,&eepochcolon,10);
- if (colon != eepochcolon) return _("epoch in version is not number");
- if (!*++colon) return _("nothing after colon in version number");
- string= colon;
- rversion->epoch= epoch;
- } else {
- rversion->epoch= 0;
- }
- rversion->version= nfstrnsave(string,end-string);
- hyphen= strrchr(rversion->version,'-');
- if (hyphen)
- *hyphen++ = '\0';
- rversion->revision= hyphen ? hyphen : "";
-
- return NULL;
- }
- void
- parse_must_have_field(struct parsedb_state *ps,
- const struct pkginfo *pigp,
- const char *value, const char *what)
- {
- if (!value)
- parse_error(ps, pigp, _("missing %s"), what);
- else if (!*value)
- parse_error(ps, pigp, _("empty value for %s"), what);
- }
- void
- parse_ensure_have_field(struct parsedb_state *ps,
- const struct pkginfo *pigp,
- const char **value, const char *what)
- {
- static const char empty[] = "";
- if (!*value) {
- parse_warn(ps, pigp, _("missing %s"), what);
- *value = empty;
- } else if (!**value) {
- parse_warn(ps, pigp, _("empty value for %s"), what);
- }
- }
|