2 * Copyright (c) 1990 Regents of the University of Michigan.
5 * Redistribution and use in source and binary forms are permitted
6 * provided that this notice is preserved and that due credit is given
7 * to the University of Michigan at Ann Arbor. The name of the University
8 * may not be used to endorse or promote products derived from this
9 * software without specific prior written permission. This software
10 * is provided ``as is'' without express or implied warranty.
18 #include <ac/signal.h>
19 #include <ac/socket.h>
20 #include <ac/string.h>
21 #include <ac/syslog.h>
23 #include <ac/unistd.h>
26 #ifdef HAVE_SYS_RESOURCE_H
27 #include <sys/resource.h>
35 #include <ldapconfig.h>
37 #define DEFAULT_PORT 79
38 #define DEFAULT_SIZELIMIT 50
41 char *ldaphost = NULL;
43 int deref = LDAP_DEREF_ALWAYS;
44 int sizelimit = DEFAULT_SIZELIMIT;
47 static void print_entry(LDAP *ld, LDAPMessage *e);
52 fprintf( stderr, "usage: %s [-d debuglevel] [-x ldaphost] [-b searchbase] [-a] [-z sizelimit] [-f filterfile] searchstring\r\n", name );
57 main( int argc, char **argv )
60 char *filterfile = FILTERFILE;
64 LDAPMessage *result, *e;
67 static char *attrs[] = { "title", "o", "ou", "postalAddress",
68 "telephoneNumber", "mail",
69 "facsimileTelephoneNumber", NULL };
71 while ( (i = getopt( argc, argv, "ab:d:f:x:z:" )) != EOF ) {
73 case 'a': /* do not deref aliases when searching */
74 deref = LDAP_DEREF_FINDING;
77 case 'b': /* search base */
78 base = strdup( optarg );
81 case 'd': /* turn on debugging */
82 debug = atoi( optarg );
85 case 'f': /* ldap filter file */
86 filterfile = strdup( optarg );
89 case 'x': /* specify ldap host */
90 ldaphost = strdup( optarg );
93 case 'z': /* size limit */
94 sizelimit = atoi( optarg );
102 if ( optind == argc ) {
107 if ( (filtd = ldap_init_getfilter( filterfile )) == NULL ) {
108 fprintf( stderr, "Cannot open filter file (%s)\n", filterfile );
112 if ( (ld = ldap_open( ldaphost, LDAP_PORT )) == NULL ) {
113 perror( "ldap_open" );
117 ldap_set_option(ld, LDAP_OPT_SIZELIMIT, &sizelimit);
118 ldap_set_option(ld, LDAP_OPT_DEREF, &deref);
120 if ( ldap_simple_bind_s( ld, NULL, NULL ) != LDAP_SUCCESS ) {
121 fprintf( stderr, "X.500 is temporarily unavailable.\n" );
122 ldap_perror( ld, "ldap_simple_bind_s" );
127 if ( strchr( key, ',' ) != NULL ) {
128 int ld_deref = LDAP_DEREF_FINDING;
129 ldap_set_option(ld, LDAP_OPT_DEREF, &ld_deref);
130 if ( (rc = ldap_ufn_search_s( ld, key, attrs, 0, &result ))
131 != LDAP_SUCCESS && rc != LDAP_SIZELIMIT_EXCEEDED &&
132 rc != LDAP_TIMELIMIT_EXCEEDED )
134 ldap_perror( ld, "ldap_ufn_search_s" );
137 matches = ldap_count_entries( ld, result );
139 for ( fi = ldap_getfirstfilter( filtd, "rp500", key );
140 fi != NULL; fi = ldap_getnextfilter( filtd ) ) {
141 if ( (rc = ldap_search_s( ld, base, LDAP_SCOPE_SUBTREE,
142 fi->lfi_filter, attrs, 0, &result ))
143 != LDAP_SUCCESS && rc != LDAP_SIZELIMIT_EXCEEDED
144 && rc != LDAP_TIMELIMIT_EXCEEDED )
146 ldap_perror( ld, "ldap_search" );
150 if ( (matches = ldap_count_entries( ld, result )) != 0
151 || rc != LDAP_SUCCESS ) {
157 if ( matches == 1 ) {
158 e = ldap_first_entry( ld, result );
160 print_entry( ld, e );
161 } else if ( matches > 1 ) {
162 fprintf( stderr, "%d %s matches for \"%s\":\r\n", matches,
165 for ( i = 1, e = ldap_first_entry( ld, result ); e != NULL;
166 i++, e = ldap_next_entry( ld, e ) ) {
171 dn = ldap_get_dn( ld, e );
173 if ( (p = strchr( dn, ',' )) != NULL )
175 while ( *rdn && *rdn != '=' )
179 if ( strcasecmp( rdn, buf ) == 0 ) {
183 cn = ldap_get_values( ld, e, "cn" );
184 for ( i = 0; cn[i] != NULL; i++ ) {
185 last = strlen( cn[i] ) - 1;
186 if ( isdigit( cn[i][last] ) ) {
187 rdn = strdup( cn[i] );
193 title = ldap_get_values( ld, e, "title" );
195 fprintf( stderr, " %d: %-20s %s\r\n", i, rdn,
196 title ? title[0] : "" );
197 if ( title != NULL ) {
198 for ( j = 1; title[j] != NULL; j++ )
199 fprintf( stderr, " %-20s %s\r\n",
203 ldap_value_free( title );
207 if ( rc == LDAP_SIZELIMIT_EXCEEDED
208 || rc == LDAP_TIMELIMIT_EXCEEDED ) {
209 fprintf( stderr, "(Size or time limit exceeded)\n" );
212 fprintf( stderr, "Enter the number of the person you want: ");
214 if ( fgets( buf, sizeof(buf), stdin ) == NULL
215 || buf[0] == '\n' ) {
219 e = ldap_first_entry( ld, result );
220 for ( ; i > 0 && e != NULL; i-- ) {
221 e = ldap_next_entry( ld, e );
224 fprintf( stderr, "Invalid choice!\n" );
228 print_entry( ld, e );
229 } else if ( matches == 0 ) {
230 fprintf( stderr, "No matches found for \"%s\"\n", key );
233 fprintf( stderr, "Error return from ldap_count_entries\n" );
242 print_entry( LDAP *ld, LDAPMessage *e )
247 char **title, **dept, **addr, **phone, **fax, **mail;
250 dn = ldap_get_dn( ld, e );
251 ufn = ldap_explode_dn( dn, 0 );
252 rdn = strchr( ufn[0], '=' ) + 1;
254 if ( (fax = ldap_get_values( ld, e, "facsimileTelephoneNumber" ))
256 fprintf( stderr, "Entry \"%s\" has no fax number.\n", dn );
259 faxmail = faxtotpc( fax[0], NULL );
260 title = ldap_get_values( ld, e, "title" );
261 phone = ldap_get_values( ld, e, "telephoneNumber" );
262 mail = ldap_get_values( ld, e, "mail" );
263 dept = ldap_get_values( ld, e, "ou" );
264 addr = ldap_get_values( ld, e, "postalAddress" );
266 for ( i = 0; ufn[i] != NULL; i++ ) {
267 if ( strncmp( "o=", ufn[i], 2 ) == 0 ) {
268 org = strdup( strchr( ufn[i], '=' ) + 1 );
273 printf( "To: %s\n", faxmail );
274 printf( "Subject:\n" );
275 printf( "--------\n" );
276 printf( "#<application/remote-printing\n" );
277 printf( "Recipient: %s\r\n", rdn );
278 printf( "Title: %s\r\n", title ? title[0] : "" );
279 printf( "Organization: %s\r\n", org );
280 printf( "Department: %s\r\n", dept ? dept[0] : "" );
281 printf( "Telephone: %s\r\n", phone ? phone[0] : "" );
282 printf( "Facsimile: %s\r\n", fax ? fax[0] : "" );
283 printf( "Email: %s\r\n", mail ? mail[0] : "" );