Files
ncpfs/contrib/tcl-utils/ncplisttrees.c
2026-04-28 20:56:03 +02:00

308 lines
7.9 KiB
C

/*
ncplisttrees.c
Return a sorted list of avaiable trees
Copyright (C) 1999, 2000 Petr Vandrovec, Patrick Pollet
This program 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 of the License, or
(at your option) any later version.
This program 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, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
Revision history:
1.00 2001, Feb 19 Patrick Pollet <patrick.pollet@insa-lyon.fr>
Was named nwdslisttrees.c
1.01 2001, March 10 Patrick Pollet <patrick.pollet@insa-lyon.fr>
Renamed from nwdslisttrees.c to ncplisttrees.c
This program is meant to be called by a TCL/tk from end in -Q mode
so it should emit the word "failed" in case of trouble
somewhere in the line.
#removed useless -U and -P parameters
#rewritten for use of corrected NWDSReturnBlockOfTrees
#232: Added test code for the 64 mallocs
1.02 2001, March 12 Patrick Pollet <patrick.pollet@insa-lyon.fr>
Added -A option to list only trees where current user is authenticated.
for use from TCL/tk GUIS
1.03 2001, December 16 Petr Vandrovec <vandrove@vc.cvut.cz>
const <-> non const pointers cleanup
*/
#ifdef N_PLAT_MSW4
#include <nwcalls.h>
#include <nwnet.h>
#include <nwclxcon.h>
#include <stdlib.h>
#include <ctype.h>
#include <stdio.h>
#include <string.h>
#include "getopt.h"
#define _(X) X
typedef unsigned int u_int32_t;
typedef unsigned long NWObjectID;
typedef u_int32_t Time_T;
#else
#include <ncp/nwcalls.h>
#include <ncp/nwnet.h>
#include <unistd.h>
#include <stdlib.h>
#include <ctype.h>
#include <wchar.h>
#include "private/libintl.h"
#define _(X) gettext(X)
#endif
static char *progname;
static void
usage(void)
{
fprintf(stderr, _("usage: %s [options]\n"), progname);
}
static void
help(void)
{
printf(_("\n"
"usage: %s [options] \n"), progname);
printf(_("\n"
"-h Print this help text\n"
"-v value Context DCK_FLAGS value (default 0)\n"
"-c context_name Name of current context (default Root)\n"
"-C confidence DCK_CONFIDENCE value (default 0)\n"
"-S server Server to start with (default use .nwclient file)\n"
"-F filter Scan filter for trees (default *) \n"
" Yes, you can put * at the beginning and use ? \n"
"-a Only trees where current user is authenticated \n"
"With no options, will open a unlicensed connection to the nearest server\n"
"\n"));
}
#ifdef N_PLAT_MSW4
char* strnwerror(int err) {
static char errc[200];
sprintf(errc, "failed: error %u / %d / 0x%X", err, err, err);
return errc;
}
#endif
int main(int argc, char *argv[]) {
NWDSCCODE dserr;
NWDSContextHandle ctx;
NWCONN_HANDLE conn;
const char* context = "[Root]";
const char * server=NULL;
const char * scanFilter="*";
int allTrees=1;
int opt;
u_int32_t ctxflag = 0;
u_int32_t confidence = 0;
long err;
#ifndef N_PLAT_MSW4
setlocale(LC_ALL, "");
bindtextdomain(NCPFS_PACKAGE, LOCALEDIR);
textdomain(NCPFS_PACKAGE);
#endif
progname = argv[0];
NWCallsInit(NULL, NULL);
#ifndef N_PLAT_MSW4
NWDSInitRequester();
#endif
dserr = NWDSCreateContextHandle(&ctx);
if (dserr) {
fprintf(stderr, "NWDSCreateContextHandle failed with %s\n", strnwerror(dserr));
return 123;
}
while ((opt = getopt(argc, argv, "h?c:v:S:C:F:f:a")) != EOF)
{
switch (opt)
{
case 'C':
confidence = strtoul(optarg, NULL, 0);
break;
case 'c':
context = optarg;
break;
case 'a':
allTrees=0;
break;
case 'v':
ctxflag = strtoul(optarg, NULL, 0);
break;
case 'h':
case '?':
help();
goto finished;
case 'S':
server = optarg;
break;
case 'F':
case 'f':
scanFilter =optarg; break;
default:
usage();
goto finished;
}
}
ctxflag |= DCV_XLATE_STRINGS;
dserr = NWDSSetContext(ctx, DCK_FLAGS, &ctxflag);
if (dserr) {
fprintf(stderr, "NWDSSetContext(DCK_FLAGS) failed: %s\n",
strnwerror(dserr));
return 123;
}
dserr = NWDSSetContext(ctx, DCK_NAME_CONTEXT, context);
if (dserr) {
fprintf(stderr, "NWDSSetContext(DCK_NAME_CONTEXT) failed: %s\n",
strnwerror(dserr));
err = 122;
goto closing_ctx;
}
dserr = NWDSSetContext(ctx, DCK_CONFIDENCE, &confidence);
if (dserr) {
fprintf(stderr, "NWDSSetContext(DCK_CONFIDENCE) failed: %s\n",
strnwerror(dserr));
err=121;
goto closing_ctx;
}
#ifndef N_PLAT_MSW4
{
static const NET_ADDRESS_TYPE add[] = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15};
dserr = NWDSSetTransport(ctx, 16, add);
if (dserr) {
fprintf(stderr, "NWDSSetTransport failed: %s\n",
strnwerror(dserr));
err= 124;
goto closing_ctx;
}
}
#endif
#ifdef N_PLAT_MSW4
dserr = NWDSOpenConnToNDSServer(ctx, server, &conn);
#else
{
conn=ncp_initialize(&argc,argv,0,&err); /* no login required*/
if (!conn) {
fprintf(stderr, "ncp_initialize failed with %s\n",strnwerror(err));
err= 111;
goto closing_ctx;
}
}
dserr = NWDSAddConnection(ctx, conn);
#endif
if (dserr) {
fprintf(stderr, "failed: Cannot bind connection to context: %s\n",
strnwerror(dserr));
err=dserr;
goto closing_all;
}
// testing code goes here
{
#define NB 64
nuint32 i,cnt,totTrees;
char* table[NB];
char * nextBlock;
for (i=0;i<NB;i++) {
table[i]=(char *)malloc (MAX_TREE_NAME_CHARS);
if (!table[i]) {
fprintf(stderr, "failed: out of memory\n");
}
}
if (allTrees) {
/* request a count only*/
err=NWDSReturnBlockOfAvailableTrees (ctx,conn,scanFilter,NULL,NULL,0,NULL,NULL,&totTrees);
if (err) {
fprintf(stderr, "NWDSReturnBlockOfAvailableTres failed: %s\n",strnwerror(err));
goto closing_all;
}
nextBlock=NULL;
do {
if (totTrees >NB)
totTrees=NB;
err=NWDSReturnBlockOfAvailableTrees (ctx,conn,scanFilter,nextBlock,NULL,totTrees,table,&cnt,&totTrees);
if (err) {
fprintf(stderr, "NWDSReturnBlockOfAvailableTrees failed: %s\n",strnwerror(err));
goto closing_all;
}
for (i=0; i<cnt;i++) {
printf( "%s\n",table[i]);
}
nextBlock=table[cnt-1];
} while (cnt);
}else {
err=NWDSScanConnsForTrees (ctx,NB,&totTrees,table);
if (err) {
fprintf(stderr, "NWDSScanConnsForTreesfailed: %s\n",strnwerror(err));
goto closing_all;
}
for (i=0; i<totTrees;i++) {
printf( "%s\n",table[i]);
}
}
/* end of test block*/
}
err=0;
closing_all:
NWCCCloseConn(conn);
closing_ctx:
dserr = NWDSFreeContext(ctx);
if (dserr) {
fprintf(stderr, "NWDSFreeContext failed with %s\n", strnwerror(dserr));
return 121;
}
finished:
return err;
}