00001 /* 00002 ** Copyright (C) 2002 by Kevin L. Mitchell <klmitch@mit.edu> 00003 ** 00004 ** This library is free software; you can redistribute it and/or 00005 ** modify it under the terms of the GNU Library General Public 00006 ** License as published by the Free Software Foundation; either 00007 ** version 2 of the License, or (at your option) any later version. 00008 ** 00009 ** This library is distributed in the hope that it will be useful, 00010 ** but WITHOUT ANY WARRANTY; without even the implied warranty of 00011 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00012 ** Library General Public License for more details. 00013 ** 00014 ** You should have received a copy of the GNU Library General Public 00015 ** License along with this library; if not, write to the Free 00016 ** Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, 00017 ** MA 02111-1307, USA 00018 ** 00019 ** @(#)$Id: sh_move.c,v 1.3 2006/07/13 19:16:24 klmitch Exp $ 00020 */ 00029 #include "dbprim.h" 00030 #include "dbprim_int.h" 00031 00032 RCSTAG("@(#)$Id: sh_move.c,v 1.3 2006/07/13 19:16:24 klmitch Exp $"); 00033 00034 unsigned long 00035 sh_move(smat_head_t *head, smat_entry_t *elem, link_loc_t loc, 00036 smat_entry_t *elem2) 00037 { 00038 initialize_dbpr_error_table(); /* initialize error table */ 00039 00040 /* Verify arguments--if elem is set, must be a valid element; if 00041 * location is before or after, elem must be set 00042 */ 00043 if (!sh_verify(head) || !se_verify(elem) || (elem2 && !se_verify(elem2))) 00044 return DB_ERR_BADARGS; 00045 00046 /* OK, call out to the linked list operation--it'll figure 00047 * everything else out 00048 */ 00049 return ll_move(&head->sh_head, &elem->se_link[head->sh_elem], loc, 00050 elem2 ? &elem2->se_link[head->sh_elem] : 0); 00051 }