Logo Search packages:      
Sourcecode: man-db version File versions


 * db_delete.c: dbdelete(), database delete routine.
 * Copyright (C) 1994, 1995 Graeme W. Wilford. (Wilf.)
 * Copyright (C) 2001, 2002 Colin Watson.
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Library General Public
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) any later version.
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * Library General Public License for more details.
 * You should have received a copy of the GNU Library General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 * Mon Aug  8 20:35:30 BST 1994  Wilf. (G.Wilford@ee.surrey.ac.uk)

#include "config.h"
#endif /* HAVE_CONFIG_H */

#include <stdio.h>
#include <assert.h>

#if defined(STDC_HEADERS)
#include <string.h>
#include <stdlib.h>
#elif defined(HAVE_STRING_H)
#include <string.h>
#elif defined(HAVE_STRINGS_H)
#include <strings.h>
#else /* no string(s) header file */
extern char *strsep();
#endif /* STDC_HEADERS */

#  include <unistd.h>
#endif /* HAVE_UNISTD_H */

extern long atol();
extern char *strsep();
#endif /* not STDC_HEADERS */

#include <libintl.h>
#define _(String) gettext (String)

#include "manconfig.h"
#include "lib/error.h"
#include "mydbm.h"
#include "db_storage.h"

/* Delete an entry for a page.
   Again, 3 possibilities:

   1) page is singular reference, just delete it :)
   2) page has 2+ companions. Delete page and alter multi entry to not
      point to it anymore.
   3) page has 1 companion. Could do as (2), but we'd waste an entry in
      the db. Should delete page, extract friend and reinsert as singular,
      overwriting the old multi entry.

#define NO_ENTRY  1;

int dbdelete (const char *name, struct mandata *info)
      datum key, cont;

      /* get entry for info */

      if (debug)
            fprintf (stderr, "Attempting delete of %s(%s) entry.\n",
                   name, info->ext);

      key.dptr = name_to_key (name);
      key.dsize = strlen (key.dptr) + 1;
      cont = MYDBM_FETCH (dbf, key);

      if (!cont.dptr) {             /* 0 entries */
            free (key.dptr);
            return NO_ENTRY;
      } else if (*cont.dptr != '\t') {    /* 1 entry */
            MYDBM_DELETE (dbf, key);
            MYDBM_FREE (cont.dptr);
      } else {                      /* 2+ entries */
            char **names, **ext;
            char *multi_content = NULL;
            datum multi_key;
            int refs, i, j;

            /* Extract all of the extensions associated with
               this key */

            refs = list_extensions (cont.dptr + 1, &names, &ext);

            for (i = 0; i < refs; ++i)
                  if (STREQ (names[i], name) &&
                      STREQ (ext[i], info->ext))

            if (i >= refs) {
                  free (names);
                  free (ext);
                  MYDBM_FREE (cont.dptr);
                  free (key.dptr);
                  return NO_ENTRY;

            multi_key = make_multi_key (names[i], ext[i]);
            if (!MYDBM_EXISTS (dbf, multi_key)) {
                  error (0, 0,
                         _( "multi key %s does not exist"),
                  gripe_corrupt_data ();
            MYDBM_DELETE (dbf, multi_key);
            free (multi_key.dptr);

            /* refs *may* be 1 if all manual pages with this name
               have been deleted. In this case, we'll have to remove
               the key too */

            if (refs == 1) {
                  free (names);
                  free (ext);
                  MYDBM_FREE (cont.dptr);
                  MYDBM_DELETE (dbf, key);
                  free (key.dptr);
                  return 0;

            /* create our new multi content */
            for (j = 0; j < refs; ++j)
                  if (i != j)
                        multi_content = strappend (multi_content,
                                             "\t", names[j],
                                             "\t", ext[j], NULL);

            MYDBM_FREE (cont.dptr);

            /* if refs = 2 do something else. Doesn't really matter as
               the gdbm db file does not shrink any after a deletion
               anyway */

            cont.dptr = multi_content;
            cont.dsize = strlen (cont.dptr) + 1;

            if (MYDBM_REPLACE (dbf, key, cont))
                  gripe_replace_key (key.dptr);

            free (names);
            free (ext);

      free (key.dptr);
      return 0;

Generated by  Doxygen 1.6.0   Back to index