head    1.2;
access;
symbols;
locks; strict;
comment @ * @;


1.2
date    95.06.23.19.28.17;      author p-pomes; state Exp;
branches;
next    1.1;

1.1
date    93.11.24.22.34.03;      author paul;    state Exp;
branches;
next    ;


desc
@@


1.2
log
@*** empty log message ***
@
text
@/* $Id: apitest.c,v 1.1 1993/11/24 22:34:03 paul Exp p-pomes $
* apitest: test the qiapi routines.
*/
#include <stdio.h>
#include "qiapi.h"

#ifndef QIHOST
#define QIHOST "ns"
#endif

static char *UseHost = QIHOST;
static char *User = NULL;
static char *Password = NULL;
static int Opts = -1;

static void do_opts __P((int, char **));

main(argc,argv)
int argc;
char **argv;
{
 FILE *To, *From;
 int rc;
 char *alias;

 do_opts(argc,argv);
 rc = OpenQi(UseHost,&To,&From);
 if (rc) {
   fprintf(stderr,"OpenQi failed with %d\n",rc);
   exit(1);
 }
 alias = LoginQi(UseHost,To,From,Opts,User,Password);
 if (alias)
   printf("Logged in as %s\n",alias);
 else {
   fprintf(stderr,"Login failed.\n");
   exit(1);
 }
 rc = LogoutQi(To, From);
 if (rc)
   printf("logged out\n");
 else {
   fprintf(stderr,"logout failed %d\n",rc);
   exit(1);
 }
 CloseQi(To, From);
 exit(0);
}

static void
do_opts(argc,argv)
int argc;
char **argv;
{
 extern int optind;
 extern char *optarg;
 int c,argerr=0;

 while ((c = getopt(argc,argv,"aik:elds:u:p:")) != EOF)
   switch(c) {
   case 'd':
     ++QiDebug;
     break;
   case 's':
     UseHost = optarg;
     break;
   case 'a':
     if (Opts == -1)
       Opts = 0;
     Opts |= LQ_AUTO;
     break;
   case 'i':
     if (Opts == -1)
       Opts = 0;
     Opts |= LQ_INTERACTIVE;
     break;
   case 'k':
     if (Opts == -1)
       Opts = 0;
     if (!optarg || *optarg == '\0' || *optarg == '4')
       Opts |= LQ_KRB4;
     else if (*optarg == '5')
       Opts |= LQ_KRB5;
     break;
   case 'e':
     if (Opts == -1)
       Opts = 0;
     Opts |= LQ_EMAIL;
     break;
   case 'l':
     if (Opts == -1)
       Opts = 0;
     Opts |= LQ_PASSWORD;
     break;
   case 'u':
     User = optarg;
     break;
   case 'p':
     Password = optarg;
     break;
   default:
     ++argerr;
     break;
   }
 if (argerr) {
   fprintf(stderr,"Usage: %s [-daikel] [-s host] [-u user] [-p pass]\n",argv[0]);
   fprintf(stderr,"\t-d debug\n");
   fprintf(stderr,"\t-a attempt auto login\n");
   fprintf(stderr,"\t-i interactively prompt for user/pass if needed\n");
   fprintf(stderr,"\t-k use kerberos login protocol\n");
   fprintf(stderr,"\t-e use email login protocol\n");
   fprintf(stderr,"\t-l use conventional login protocol\n");
   exit(1);
 }
 if (Opts == -1)
   Opts = LQ_ALL|LQ_INTERACTIVE|LQ_AUTO;
}

@


1.1
log
@Initial revision
@
text
@d1 1
a1 1
/* $Id: apitest.c,v 1.1 93/10/25 17:23:06 alan Exp $
d59 1
a59 1
 while ((c = getopt(argc,argv,"aikelds:u:p:")) != EOF)
d80 4
a83 1
     Opts |= LQ_KERBEROS;
d93 1
a93 1
     Opts |= LQ_LOGIN;
@

You are viewing proxied material from mozz.us. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.