10 #include "ldapconfig.h"
12 #include "lutil.h" /* Get lutil_detach() */
16 * when more than one slapd is running on one machine, each one might have
17 * it's own LOCAL for syslogging and must have its own pid/args files
22 #define DEFAULT_SYSLOG_USER LOG_LOCAL4
24 typedef struct _str2intDispatch {
30 } STRDISP, *STRDISP_P;
33 /* table to compute syslog-options to integer */
34 static STRDISP syslog_types[] = {
36 { "LOCAL0", 6, LOG_LOCAL0 },
37 { "LOCAL1", 6, LOG_LOCAL1 },
38 { "LOCAL2", 6, LOG_LOCAL2 },
39 { "LOCAL3", 6, LOG_LOCAL3 },
40 { "LOCAL4", 6, LOG_LOCAL4 },
41 { "LOCAL5", 6, LOG_LOCAL5 },
42 { "LOCAL6", 6, LOG_LOCAL6 },
43 { "LOCAL7", 6, LOG_LOCAL7 },
48 static int cnvt_str2int();
50 #endif /* LOG_LOCAL4 */
52 extern int listener_running;
58 fprintf( stderr, "usage: %s [-d ?|debuglevel] [-f configfile] [-p portnumber] [-s sysloglevel]", name );
60 fprintf( stderr, " [-l sysloguser]" );
62 fprintf( stderr, "\n" );
66 main( int argc, char **argv )
75 int syslogUser = DEFAULT_SYSLOG_USER;
80 configfile = SLAPD_DEFAULT_CONFIGFILE;
85 while ( (i = getopt( argc, argv, "d:f:ip:s:u" )) != EOF ) {
88 case 'd': /* turn on debugging */
89 if ( optarg[0] == '?' ) {
90 printf( "Debug levels:\n" );
91 printf( "\tLDAP_DEBUG_TRACE\t%d\n",
93 printf( "\tLDAP_DEBUG_PACKETS\t%d\n",
95 printf( "\tLDAP_DEBUG_ARGS\t\t%d\n",
97 printf( "\tLDAP_DEBUG_CONNS\t%d\n",
99 printf( "\tLDAP_DEBUG_BER\t\t%d\n",
101 printf( "\tLDAP_DEBUG_FILTER\t%d\n",
103 printf( "\tLDAP_DEBUG_CONFIG\t%d\n",
105 printf( "\tLDAP_DEBUG_ACL\t\t%d\n",
107 printf( "\tLDAP_DEBUG_STATS\t%d\n",
109 printf( "\tLDAP_DEBUG_STATS2\t%d\n",
111 printf( "\tLDAP_DEBUG_SHELL\t%d\n",
113 printf( "\tLDAP_DEBUG_PARSE\t%d\n",
115 printf( "\tLDAP_DEBUG_ANY\t\t%d\n",
119 slap_debug |= atoi( optarg );
123 case 'd': /* turn on debugging */
125 "must compile with LDAP_DEBUG for debugging\n" );
129 case 'f': /* read config file */
130 configfile = ch_strdup( optarg );
133 case 'i': /* run from inetd */
137 case 'p': /* port on which to listen */
138 port = atoi( optarg );
141 case 's': /* set syslog level */
142 ldap_syslog = atoi( optarg );
147 case 'l': /* set syslog local user */
148 syslogUser = cnvt_str2int( optarg, syslog_types,
149 DEFAULT_SYSLOG_USER );
154 case 'u': /* do udp */
164 lber_set_option(NULL, LBER_OPT_DEBUG_LEVEL, &slap_debug);
165 ldap_set_option(NULL, LDAP_OPT_DEBUG_LEVEL, &slap_debug);
166 ldif_debug = slap_debug;
168 Debug( LDAP_DEBUG_TRACE, "%s", Versionstr, 0, 0 );
170 if ( (serverName = strrchr( argv[0], '/' )) == NULL ) {
171 serverName = ch_strdup( argv[0] );
173 serverName = ch_strdup( serverName + 1 );
177 /* pre-open config file before detach in case it is a relative path */
178 fp = fopen( configfile, "r" );
180 lutil_detach( ldap_debug, 0 );
182 lutil_detach( 0, 0 );
187 openlog( serverName, OPENLOG_OPTIONS, syslogUser );
189 openlog( serverName, OPENLOG_OPTIONS );
197 read_config_env( configfile, &be, fp, 1 );
204 if ( status = pthread_create( &listener_tid, NULL,
205 slapd_daemon, (void *) port ) != 0 )
207 Debug( LDAP_DEBUG_ANY,
208 "listener pthread_create failed (%d)\n", status, 0, 0 );
212 /* We must prevent the Father of All Threads to terminate
213 before the listener thread has done it's clean-up work
214 (that's not always garuanteed when using LINUX kernel
215 threads :-( ) So we have to withhold the Father, until
218 while ( listener_running ) {
219 ldap_pvt_thread_join( listener_tid, (void *) NULL );
228 unsigned long len, tag;
231 struct sockaddr_in from;
238 c.c_sb.sb_options = 0;
239 c.c_sb.sb_naddr = udp ? 1 : 0;
240 c.c_sb.sb_ber.ber_buf = NULL;
241 c.c_sb.sb_ber.ber_ptr = NULL;
242 c.c_sb.sb_ber.ber_end = NULL;
243 pthread_mutex_init( &c.c_dnmutex, pthread_mutexattr_default );
244 pthread_mutex_init( &c.c_opsmutex, pthread_mutexattr_default );
245 pthread_mutex_init( &c.c_pdumutex, pthread_mutexattr_default );
247 c.c_sb.sb_addrs = (void **) saddrlist;
248 c.c_sb.sb_fromaddr = &faddr;
249 c.c_sb.sb_useaddr = saddrlist[ 0 ] = &saddr;
252 if ( getpeername( 0, (struct sockaddr *) &from, &flen ) == 0 ) {
253 #ifdef SLAPD_RLOOKUPS
254 hp = gethostbyaddr( (char *) &(from.sin_addr.s_addr),
255 sizeof(from.sin_addr.s_addr), AF_INET );
260 Debug( LDAP_DEBUG_ARGS, "connection from %s (%s)\n",
261 hp == NULL ? "unknown" : hp->h_name,
262 inet_ntoa( from.sin_addr ), 0 );
264 c.c_addr = inet_ntoa( from.sin_addr );
265 c.c_domain = ch_strdup( hp == NULL ? "" : hp->h_name );
267 Debug( LDAP_DEBUG_ARGS, "connection from unknown\n",
271 ber_init_w_nullc( &ber, 0 );
273 while ( (tag = ber_get_next( &c.c_sb, &len, &ber ))
274 == LDAP_TAG_MESSAGE ) {
275 pthread_mutex_lock( ¤ttime_mutex );
276 time( ¤ttime );
277 pthread_mutex_unlock( ¤ttime_mutex );
279 if ( (tag = ber_get_int( &ber, &msgid ))
280 != LDAP_TAG_MSGID ) {
281 /* log and send error */
282 Debug( LDAP_DEBUG_ANY,
283 "ber_get_int returns 0x%lx\n", tag, 0, 0 );
288 if ( (tag = ber_peek_tag( &ber, &len ))
290 /* log, close and send error */
291 Debug( LDAP_DEBUG_ANY,
292 "ber_peek_tag returns 0x%lx\n", tag, 0, 0 );
294 close( c.c_sb.sb_sd );
299 connection_activity( &c );
311 * Convert a string to an integer by means of a dispatcher table
312 * if the string is not in the table return the default
316 cnvt_str2int (stringVal, dispatcher, defaultVal)
318 STRDISP_P dispatcher;
321 int retVal = defaultVal;
324 for (disp = dispatcher; disp->stringVal; disp++) {
326 if (!strncasecmp (stringVal, disp->stringVal, disp->abbr)) {
328 retVal = disp->intVal;
338 #endif /* LOG_LOCAL4 */