git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@1812 ec53bebd-3082-4978-b11e-865c3cabbd6b
		
			
				
	
	
		
			36 lines
		
	
	
		
			637 B
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			36 lines
		
	
	
		
			637 B
		
	
	
	
		
			C
		
	
	
	
	
	
#include "admin_locl.h"
 | 
						|
 | 
						|
RCSID("$Id$");
 | 
						|
 | 
						|
void
 | 
						|
del_entry(int argc, char **argv)
 | 
						|
{
 | 
						|
    HDB *db;
 | 
						|
    int err;
 | 
						|
    hdb_entry ent;
 | 
						|
    
 | 
						|
    if(argc != 2){
 | 
						|
	warnx("Usage: del_entry principal");
 | 
						|
	return;
 | 
						|
    }
 | 
						|
	
 | 
						|
    krb5_parse_name(context, argv[1], &ent.principal);
 | 
						|
    
 | 
						|
    if((err = hdb_open(context, &db, database, O_RDWR, 0600))){
 | 
						|
	warnx("hdb_open: %s", krb5_get_err_text(context, err));
 | 
						|
	return;
 | 
						|
    }
 | 
						|
    
 | 
						|
    err = db->delete(context, db, &ent);
 | 
						|
    
 | 
						|
    switch(err){
 | 
						|
    case 0: 
 | 
						|
	break;
 | 
						|
    default:
 | 
						|
	warnx("delete: %s", krb5_get_err_text(context, err));;
 | 
						|
	break;
 | 
						|
    }
 | 
						|
    memset(&ent, 0, sizeof(ent));
 | 
						|
    db->close(context, db);
 | 
						|
}
 |