DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download
Index: T l

⟦25fc63fee⟧ TextFile

    Length: 1813 (0x715)
    Types: TextFile
    Names: »lmnpq_dish.c«

Derivation

└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0
    └─⟦dc59850a2⟧ »EurOpenD22/pp5.0/pp-5.tar.Z« 
        └─⟦e5a54fb17⟧ 
            └─⟦this⟧ »pp-5.0/Chans/dirlist/lmnpq_dish.c« 

TextFile

/* lmnpq_dish.c: */

# ifndef lint
static char Rcsid[] = "@(#)$Header: /cs/research/pp/hubris/pp-beta/Chans/dirlist/RCS/lmnpq_dish.c,v 5.0 90/09/20 15:45:56 pp Exp Locker: pp $";
# endif

/*
 * $Header: /cs/research/pp/hubris/pp-beta/Chans/dirlist/RCS/lmnpq_dish.c,v 5.0 90/09/20 15:45:56 pp Exp Locker: pp $
 *
 * $Log:	lmnpq_dish.c,v $
 * Revision 5.0  90/09/20  15:45:56  pp
 * rcsforce : 5.0 public release
 * 
 */



#include "dlist.h"
#include <isode/quipu/dua.h>
#include <isode/quipu/read.h>

extern Entry    current_entry;
extern char 	frompipe;
extern DN       dn, current_dn;

#define	OPT	(!frompipe || rps -> ps_byteno == 0 ? opt : rps)
#define	RPS	(!frompipe || opt -> ps_byteno == 0 ? rps : opt)
extern	PS	opt, rps;

call_dlist (argc, argv)
int             argc;
char          **argv;
{
int             x;
char		dn_check = FALSE;
char		or_check = FALSE;
char		or_update = FALSE;
	
	for (x=1; x<argc; x++) {
		if (test_arg (argv[x], "-dncheck",1))
			dn_check = TRUE;
		else if (test_arg (argv[x], "-orcheck",3))
			or_check = TRUE;
		else if (test_arg (argv[x], "-check",1)) {
			dn_check = TRUE;
			or_check = TRUE;
		} else if (test_arg (argv[x], "-orupdate",3)) {
			or_update = TRUE;
			dn_check = TRUE;
		} else if (test_arg (argv[x], "-update",1)) {
			or_update = TRUE;
			or_check = TRUE;
			dn_check = TRUE;
		} else if (move (argv[x]) != OK)
			continue;
		shuffle_up (argc--,argv,x--);
	}

	if (argc != 1) {
		ps_printf (OPT,"Unknown option %s\n",argv[1]);
		Usage (argv[0]);
		return -1;
	}

	if ((argc = read_cache (argc, argv)) < 0)
		return OK;

	if (dn_check && (rebind () != OK))
		return(-2);

	if (dn_check || or_check) {
                check_dl_members (RPS,dn,current_entry->e_attributes,dn_check,or_check,or_update);
		return OK;
	}

	dl_print (RPS,current_dn);
	return OK;
}