/* test_semaphores.c Basic NDS api testing utility 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, Jan 09 Patrick Pollet */ #ifdef N_PLAT_MSW4 #include #include #include #include #include #include #include #include #include "getopt.h" #define _(X) X typedef unsigned int u_int32_t; typedef unsigned long NWObjectID; typedef u_int32_t Time_T; #else #include #include #include #include #include #include #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" "-N semaphoreName Name of the semaphore (default TEST_SEM)\n" "-m concurrent access limit ( <127) (default 1)\n" "\n")); } #ifdef N_PLAT_MSW4 char* strnwerror(int err) { static char errc[200]; sprintf(errc, "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]"; //char* server = "CDROM"; const char * server=NULL; const char * userName=NULL; const char * userPwd=NULL; int opt; u_int32_t ctxflag = 0; u_int32_t confidence = 0; const char *semName="TEST_SEM"; int maxAccess =1; 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:U:P:v:S:C:N:m:")) != EOF) { switch (opt) { case 'C': confidence = strtoul(optarg, NULL, 0); break; case 'c': context = optarg; break; case 'v': ctxflag = strtoul(optarg, NULL, 0); break; case 'h': case '?': help(); goto finished; case 'S': server = optarg; break; case 'U':userName =optarg; break; case 'P':userPwd =optarg; break; case 'm': maxAccess = strtoul(optarg, NULL, 0); break; case 'N': semName = 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 { printf (" via ncp_init \n"); // NB si on met 1 = login required , si il n'y a pas // de password dans ~./nwclient le demande !!!! conn=ncp_initialize(&argc,argv,0,&err); if (!conn) { fprintf(stderr, "ncp_initialize failed with %s\n",strnwerror(err)); err= 111; goto closing_ctx; } } printf ("DONE\n"); dserr = NWDSAddConnection(ctx, conn); #endif if (dserr) { fprintf(stderr, "Cannot bind connection to context: %s\n", strnwerror(dserr)); err=dserr; goto closing_all; } // testing code goes here { nuint32 semHandle; nuint16 semCurrentCount, semOpenCount; nint16 semValue; err=NWOpenSemaphore (conn,semName,maxAccess,&semHandle, &semCurrentCount); if (err) { fprintf(stderr, "NWOpenSemaphore failed with error %s\n", strnwerror(err)); goto closing_all; } printf ("%s is open with handle(%x) for %u max concurrent access. Currently it has %d access\n", semName,semHandle,maxAccess,semCurrentCount); err=NWExamineSemaphore(conn, semHandle, &semValue, &semOpenCount); if (err) { fprintf(stderr, "NWExamineSemaphore failed with error %s\n", strnwerror(err)); } else printf ("%s (%x) for %u max concurrent access. Currently it has Value=%d OpenCount=%d access\n", semName,semHandle,maxAccess,semValue,semOpenCount); err=NWWaitOnSemaphore (conn,semHandle,18*5); if (err) { fprintf(stderr, "NWWaitOnSemaphore failed with error %s\n", strnwerror(err)); } else printf ("Waited for %s (%x) during 5 seconds \n",semName,semHandle); #ifdef N_PLAT_LINUX sleep(5); #else # ifdef N_PLAT_MSW4 Sleep(5000); # else # error Please define sleep # endif #endif err=NWSignalSemaphore (conn,semHandle); if (err) { fprintf(stderr, "NWSignalSemaphore failed with error %s\n", strnwerror(err)); } else printf ("Signaled %s (%x) \n",semName,semHandle); err=NWCloseSemaphore (conn, semHandle); if (err) { fprintf(stderr, "NWCloseSemaphore failed with error %s\n", strnwerror(err)); goto closing_all; } printf ("%s is closed\n",semName); } // end of testing code 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; } /* testing */