1 # include <errno.h> 2 # include "sendmail.h" 3 4 #ifndef DAEMON 5 SCCSID(@(#)daemon.c 3.25 08/25/82 (w/o daemon mode)); 6 #else 7 8 # include <sys/socket.h> 9 # include <net/in.h> 10 # include <wait.h> 11 12 SCCSID(@(#)daemon.c 3.25 08/25/82 (with daemon mode)); 13 14 /* 15 ** DAEMON.C -- routines to use when running as a daemon. 16 ** 17 ** This entire file is highly dependent on the 4.2 BSD 18 ** interprocess communication primitives. No attempt has 19 ** been made to make this file portable to Version 7, 20 ** Version 6, MPX files, etc. If you should try such a 21 ** thing yourself, I recommend chucking the entire file 22 ** and starting from scratch. Basic semantics are: 23 ** 24 ** getrequests() 25 ** Opens a port and initiates a connection. 26 ** Returns in a child. Must set InChannel and 27 ** OutChannel appropriately. 28 ** makeconnection(host, port, outfile, infile) 29 ** Make a connection to the named host on the given 30 ** port. Set *outfile and *infile to the files 31 ** appropriate for communication. Returns zero on 32 ** success, else an exit status describing the 33 ** error. 34 ** 35 ** The semantics of both of these should be clean. 36 */ 37 /* 38 ** GETREQUESTS -- open mail IPC port and get requests. 39 ** 40 ** Parameters: 41 ** none. 42 ** 43 ** Returns: 44 ** none. 45 ** 46 ** Side Effects: 47 ** Waits until some interesting activity occurs. When 48 ** it does, a child is created to process it, and the 49 ** parent waits for completion. Return from this 50 ** routine is always in the child. 51 */ 52 53 # define MAXCONNS 4 /* maximum simultaneous sendmails */ 54 55 getrequests() 56 { 57 union wait status; 58 int numconnections = 0; 59 60 for (;;) 61 { 62 register int pid; 63 register int port; 64 65 /* 66 ** Wait for a connection. 67 */ 68 69 while ((port = getconnection()) < 0) 70 { 71 syserr("getrequests: getconnection failed"); 72 finis(); 73 } 74 75 /* 76 ** Create a subprocess to process the mail. 77 */ 78 79 # ifdef DEBUG 80 if (tTd(15, 2)) 81 printf("getrequests: forking (port = %d)\n", port); 82 # endif DEBUG 83 84 pid = fork(); 85 if (pid < 0) 86 { 87 syserr("daemon: cannot fork"); 88 sleep(10); 89 (void) close(port); 90 continue; 91 } 92 93 if (pid == 0) 94 { 95 /* 96 ** CHILD -- return to caller. 97 ** Verify calling user id if possible here. 98 */ 99 100 InChannel = fdopen(port, "r"); 101 OutChannel = fdopen(port, "w"); 102 # ifdef DEBUG 103 if (tTd(15, 2)) 104 printf("getreq: returning\n"); 105 # endif DEBUG 106 # ifdef LOG 107 if (LogLevel > 11) 108 syslog(LOG_DEBUG, "connected, pid=%d", getpid()); 109 # endif LOG 110 return; 111 } 112 113 /* 114 ** PARENT -- wait for child to terminate. 115 ** Perhaps we should allow concurrent processing? 116 */ 117 118 # ifdef DEBUG 119 if (tTd(15, 2)) 120 { 121 sleep(2); 122 printf("getreq: parent waiting\n"); 123 } 124 # endif DEBUG 125 126 /* close the port so that others will hang (for a while) */ 127 (void) close(port); 128 129 /* pick up old zombies; implement load limiting */ 130 numconnections++; 131 while (wait3(&status, numconnections < MAXCONNS ? WNOHANG : 0, 0) > 0) 132 numconnections--; 133 } 134 } 135 /* 136 ** GETCONNECTION -- make a connection with the outside world 137 ** 138 ** Parameters: 139 ** none. 140 ** 141 ** Returns: 142 ** The port for mail traffic. 143 ** 144 ** Side Effects: 145 ** Waits for a connection. 146 */ 147 148 #define IPPORT_PLAYPORT 3055 /* random number */ 149 150 struct sockaddr_in SendmailAddress = { AF_INET, IPPORT_SMTP }; 151 152 getconnection() 153 { 154 register int s; 155 struct sockaddr otherend; 156 157 /* 158 ** Set up the address for the mailer. 159 */ 160 161 SendmailAddress.sin_addr.s_addr = 0; 162 SendmailAddress.sin_port = IPPORT_SMTP; 163 # ifdef DEBUG 164 if (tTd(15, 15)) 165 SendmailAddress.sin_port = IPPORT_PLAYPORT; 166 # endif DEBUG 167 SendmailAddress.sin_port = htons(SendmailAddress.sin_port); 168 169 /* 170 ** Try to actually open the connection. 171 */ 172 173 # ifdef DEBUG 174 if (tTd(15, 1)) 175 printf("getconnection\n"); 176 # endif DEBUG 177 178 for (;;) 179 { 180 int acptcnt; /* for debugging */ 181 time_t lasttick; /* for debugging */ 182 183 /* get a socket for the SMTP connection */ 184 s = socket(SOCK_STREAM, 0, &SendmailAddress, SO_ACCEPTCONN); 185 if (s < 0) 186 { 187 /* probably another daemon already */ 188 syserr("getconnection: can't create socket"); 189 break; 190 } 191 192 # ifdef DEBUG 193 if (tTd(15, 1)) 194 printf("getconnection: %d\n", s); 195 # endif DEBUG 196 197 /* wait for a connection */ 198 lasttick = curtime(); 199 acptcnt = 0; 200 do 201 { 202 errno = 0; 203 (void) accept(s, &otherend); 204 if (lasttick == curtime()) 205 { 206 if(++acptcnt > 2) 207 { 208 syserr("wild accept"); 209 /* abort(); */ 210 break; 211 } 212 } 213 else 214 { 215 lasttick = curtime(); 216 acptcnt = 0; 217 } 218 } while (errno == ETIMEDOUT || errno == EINTR); 219 if (errno == 0) 220 break; 221 syserr("getconnection: accept"); 222 (void) close(s); 223 sleep(20); 224 } 225 226 return (s); 227 } 228 /* 229 ** MAKECONNECTION -- make a connection to an SMTP socket on another machine. 230 ** 231 ** Parameters: 232 ** host -- the name of the host. 233 ** port -- the port number to connect to. 234 ** outfile -- a pointer to a place to put the outfile 235 ** descriptor. 236 ** infile -- ditto for infile. 237 ** 238 ** Returns: 239 ** An exit code telling whether the connection could be 240 ** made and if not why not. 241 ** 242 ** Side Effects: 243 ** none. 244 */ 245 246 makeconnection(host, port, outfile, infile) 247 char *host; 248 u_short port; 249 FILE **outfile; 250 FILE **infile; 251 { 252 register int s; 253 254 /* 255 ** Set up the address for the mailer. 256 */ 257 258 if ((SendmailAddress.sin_addr.s_addr = rhost(&host)) == -1) 259 return (EX_NOHOST); 260 if (port == 0) 261 port = IPPORT_SMTP; 262 SendmailAddress.sin_port = htons(port); 263 264 /* 265 ** Try to actually open the connection. 266 */ 267 268 # ifdef DEBUG 269 if (tTd(16, 1)) 270 printf("makeconnection (%s)\n", host); 271 # endif DEBUG 272 273 s = socket(SOCK_STREAM, 0, (struct sockaddr_in *) 0, 0); 274 if (s < 0) 275 { 276 syserr("makeconnection: no socket"); 277 goto failure; 278 } 279 280 # ifdef DEBUG 281 if (tTd(16, 1)) 282 printf("makeconnection: %d\n", s); 283 # endif DEBUG 284 (void) fflush(Xscript); /* for debugging */ 285 if (connect(s, &SendmailAddress) < 0) 286 { 287 /* failure, decide if temporary or not */ 288 failure: 289 switch (errno) 290 { 291 case EISCONN: 292 case ETIMEDOUT: 293 case EINPROGRESS: 294 case EALREADY: 295 case EADDRINUSE: 296 case ENETDOWN: 297 case ENETRESET: 298 case ENOBUFS: 299 case ECONNREFUSED: 300 /* there are others, I'm sure..... */ 301 return (EX_TEMPFAIL); 302 303 default: 304 return (EX_UNAVAILABLE); 305 } 306 } 307 308 /* connection ok, put it into canonical form */ 309 *outfile = fdopen(s, "w"); 310 *infile = fdopen(s, "r"); 311 312 return (0); 313 } 314 315 #endif DAEMON 316