Files
mars-tinyldap/dumpacls.c
leitner 783126698f ACL parsing appears to work, and a new test program called dumpacl can
dump them back out.  Now we just need to check them when executing ldap
requests.  *cough*
2005-07-15 23:04:23 +00:00

133 lines
3.8 KiB
C
Raw Blame History

This file contains ambiguous Unicode characters
This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
#include <stdlib.h>
#include <assert.h>
#include "buffer.h"
#include "mmap.h"
#include "uint16.h"
#include "uint32.h"
#include "ldap.h"
#include "byte.h"
int main(int argc,char* argv[]) {
int verbose=0;
unsigned long filelen;
char* fn=argc<2?"data":argv[1];
char* map=mmap_read(fn,&filelen);
uint32 magic,attribute_count,record_count,indices_offset,size_of_string_table,acl_ofs;
if (!map) {
buffer_puts(buffer_2,"could not open `");
buffer_puts(buffer_2,fn);
buffer_puts(buffer_2,"´: ");
buffer_puterror(buffer_2);
buffer_putnlflush(buffer_2);
exit(1);
}
uint32_unpack(map,&magic);
uint32_unpack(map+4,&attribute_count);
uint32_unpack(map+2*4,&record_count);
uint32_unpack(map+3*4,&indices_offset);
uint32_unpack(map+4*4,&size_of_string_table);
{
uint32 ofs,next;
acl_ofs=0;
for (ofs=indices_offset+record_count*4; ofs<(unsigned long)filelen;) {
uint32 index_type,next,indexed_attribute;
uint32_unpack(map+ofs,&index_type);
uint32_unpack(map+ofs+4,&next);
if (index_type==2) { acl_ofs=ofs; break; }
if (next<ofs || next>filelen) {
kaputt:
buffer_putsflush(buffer_1,"broken file!\n");
return 1;
}
ofs=next;
}
if (acl_ofs) {
uint32 i,filters,acls,filtertab,acltab;
ofs=acl_ofs+8;
buffer_putulong(buffer_1,filters=uint32_read(map+ofs));
buffer_puts(buffer_1," Filters:\n\n");
filtertab=ofs+4;
ofs=filtertab+filters*4;
if (ofs<filtertab) goto kaputt;
for (i=0; i<filters; ++i) {
struct Filter* f;
ofs=uint32_read(map+filtertab+i*4);
if (ofs<filtertab || ofs>filelen) goto kaputt;
buffer_putulong(buffer_1,i);
buffer_puts(buffer_1,": ");
if (byte_equal(map+ofs,4,"self"))
buffer_puts(buffer_1,"self");
else if (byte_equal(map+ofs,3,"any"))
buffer_puts(buffer_1,"any");
else if (scan_ldapsearchfilter(map+ofs,map+filelen,&f)!=0) {
unsigned long l=fmt_ldapsearchfilterstring(0,f);
unsigned long l2;
char* buf=malloc(l+23);
if (!buf) goto kaputt;
buf[l2=fmt_ldapsearchfilterstring(buf,f)]=0;
buffer_puts(buffer_1,buf);
if (l!=l2) {
buffer_puts(buffer_1,"\n\n\n");
buffer_putulong(buffer_1,l);
buffer_puts(buffer_1," != ");
buffer_putulong(buffer_1,l2);
buffer_puts(buffer_1,"\n");
buffer_flush(buffer_1);
assert(l==l2);
}
free_ldapsearchfilter(f);
free(f);
}
buffer_putsflush(buffer_1,"\n");
}
ofs=uint32_read(map+filtertab+filters*4);
if (ofs<filtertab || ofs>filelen-4) goto kaputt;
acls=uint32_read(map+ofs);
buffer_puts(buffer_1,"\n\n");
buffer_putulong(buffer_1,acls);
buffer_putsflush(buffer_1," ACLs:\n\n");
acltab=ofs+4;
for (i=0; i<acls; ++i) {
uint16 may,maynot;
ofs=uint32_read(map+acltab+i*4);
if (ofs>filelen-16) goto kaputt;
buffer_putlong(buffer_1,i);
buffer_puts(buffer_1,": acl [");
buffer_putulong(buffer_1,uint32_read(map+ofs));
buffer_puts(buffer_1,"] [");
buffer_putulong(buffer_1,uint32_read(map+ofs+4));
buffer_puts(buffer_1,"] ");
may=uint16_read(map+ofs+8);
maynot=uint16_read(map+ofs+10);
for (ofs+=12; ofs<filelen; ofs+=4) {
uint32 j=uint32_read(map+ofs);
if (j>ofs) goto kaputt;
if (!j) break;
buffer_puts(buffer_1,map+j);
buffer_puts(buffer_1,uint32_read(map+ofs+4)?",":" ");
}
if (may) {
buffer_puts(buffer_1,"+");
if (may&1) buffer_puts(buffer_1,"r");
if (may&2) buffer_puts(buffer_1,"w");
if (may&4) buffer_puts(buffer_1,"a");
if (may&8) buffer_puts(buffer_1,"d");
if (may&16) buffer_puts(buffer_1,"R");
}
if (maynot) {
buffer_puts(buffer_1,"-");
if (maynot&1) buffer_puts(buffer_1,"r");
if (maynot&2) buffer_puts(buffer_1,"w");
if (maynot&4) buffer_puts(buffer_1,"a");
if (maynot&8) buffer_puts(buffer_1,"d");
if (maynot&16) buffer_puts(buffer_1,"R");
}
buffer_putsflush(buffer_1,"\n");
}
}
}
buffer_flush(buffer_1);
return 0;
}