Files
mars-tinyldap/tinyldap.c
leitner 5413d2bdeb renamed a struct,
started ldapsearchresultentry formatter
fixed scan_ldapmessage to accept PRIMITIVE messages, too (unbind)
2002-01-14 21:23:33 +00:00

60 lines
1.6 KiB
C

#include <unistd.h>
#include "byte.h"
#include "buffer.h"
#include "ldap.h"
#include "ldif.h"
#define BUFSIZE 8192
int main() {
char buf[BUFSIZE];
int len=0;
for (;;) {
int tmp=read(0,buf+len,BUFSIZE-len);
int res;
long messageid,op,Len;
if (tmp==0) { write(2,"eof!\n",5); return 0; }
if (tmp<1) { write(2,"error!\n",7); return 1; }
len+=tmp;
res=scan_ldapmessage(buf,buf+len,&messageid,&op,&Len);
if (res>0) {
buffer_puts(buffer_2,"got message of length ");
buffer_putulong(buffer_2,Len);
buffer_puts(buffer_2," with id ");
buffer_putulong(buffer_2,messageid);
buffer_puts(buffer_2,": op ");
buffer_putulong(buffer_2,op);
buffer_putsflush(buffer_2,".\n");
switch (op) {
case 0:
{
long version,method;
struct string name;
res=scan_ldapbindrequest(buf+res,buf+res+len,&version,&name,&method);
if (res>=0) {
buffer_puts(buffer_2,"bind request: version ");
buffer_putulong(buffer_2,version);
buffer_puts(buffer_2," for name \"");
buffer_put(buffer_2,name.s,name.l);
buffer_puts(buffer_2,"\" with method ");
buffer_putulong(buffer_2,method);
buffer_putsflush(buffer_2,".\n");
{
char outbuf[1024];
int s=100;
int len=fmt_ldapbindresponse(outbuf+s,0,"","go ahead","");
int hlen=fmt_ldapmessage(0,messageid,BindResponse,len);
fmt_ldapmessage(outbuf+s-hlen,messageid,BindResponse,len);
write(1,outbuf+s-hlen,len+hlen);
}
}
}
}
if (Len<len) {
byte_copyr(buf,len-Len,buf+len);
len-=Len;
}
}
}
}