| 1 | #include <sys/types.h> |
| 2 | #include <sys/stat.h> |
| 3 | #include "substdio.h" |
| 4 | #include "subfd.h" |
| 5 | #include "exit.h" |
| 6 | #include "fmt.h" |
| 7 | #include "str.h" |
| 8 | #include "control.h" |
| 9 | #include "constmap.h" |
| 10 | #include "stralloc.h" |
| 11 | #include "direntry.h" |
| 12 | #include "auto_uids.h" |
| 13 | #include "auto_qmail.h" |
| 14 | #include "auto_break.h" |
| 15 | #include "auto_patrn.h" |
| 16 | #include "auto_spawn.h" |
| 17 | #include "auto_split.h" |
| 18 | |
| 19 | stralloc me = {0}; |
| 20 | int meok; |
| 21 | |
| 22 | stralloc line = {0}; |
| 23 | char num[FMT_ULONG]; |
| 24 | |
| 25 | void safeput(buf,len) |
| 26 | char *buf; |
| 27 | unsigned int len; |
| 28 | { |
| 29 | char ch; |
| 30 | |
| 31 | while (len > 0) { |
| 32 | ch = *buf; |
| 33 | if ((ch < 32) || (ch > 126)) ch = '?'; |
| 34 | substdio_put(subfdout,&ch,1); |
| 35 | ++buf; |
| 36 | --len; |
| 37 | } |
| 38 | } |
| 39 | |
| 40 | void do_int(fn,def,pre,post) |
| 41 | char *fn; |
| 42 | char *def; |
| 43 | char *pre; |
| 44 | char *post; |
| 45 | { |
| 46 | int i; |
| 47 | substdio_puts(subfdout,"\n"); |
| 48 | substdio_puts(subfdout,fn); |
| 49 | substdio_puts(subfdout,": "); |
| 50 | switch(control_readint(&i,fn)) { |
| 51 | case 0: |
| 52 | substdio_puts(subfdout,"(Default.) "); |
| 53 | substdio_puts(subfdout,pre); |
| 54 | substdio_puts(subfdout,def); |
| 55 | substdio_puts(subfdout,post); |
| 56 | substdio_puts(subfdout,".\n"); |
| 57 | break; |
| 58 | case 1: |
| 59 | if (i < 0) i = 0; |
| 60 | substdio_puts(subfdout,pre); |
| 61 | substdio_put(subfdout,num,fmt_uint(num,i)); |
| 62 | substdio_puts(subfdout,post); |
| 63 | substdio_puts(subfdout,".\n"); |
| 64 | break; |
| 65 | default: |
| 66 | substdio_puts(subfdout,"Oops! Trouble reading this file.\n"); |
| 67 | break; |
| 68 | } |
| 69 | } |
| 70 | |
| 71 | void do_str(fn,flagme,def,pre) |
| 72 | char *fn; |
| 73 | int flagme; |
| 74 | char *def; |
| 75 | char *pre; |
| 76 | { |
| 77 | substdio_puts(subfdout,"\n"); |
| 78 | substdio_puts(subfdout,fn); |
| 79 | substdio_puts(subfdout,": "); |
| 80 | switch(control_readline(&line,fn)) { |
| 81 | case 0: |
| 82 | substdio_puts(subfdout,"(Default.) "); |
| 83 | if (!stralloc_copys(&line,def)) { |
| 84 | substdio_puts(subfdout,"Oops! Out of memory.\n"); |
| 85 | break; |
| 86 | } |
| 87 | if (flagme && meok) |
| 88 | if (!stralloc_copy(&line,&me)) { |
| 89 | substdio_puts(subfdout,"Oops! Out of memory.\n"); |
| 90 | break; |
| 91 | } |
| 92 | case 1: |
| 93 | substdio_puts(subfdout,pre); |
| 94 | safeput(line.s,line.len); |
| 95 | substdio_puts(subfdout,".\n"); |
| 96 | break; |
| 97 | default: |
| 98 | substdio_puts(subfdout,"Oops! Trouble reading this file.\n"); |
| 99 | break; |
| 100 | } |
| 101 | } |
| 102 | |
| 103 | int do_lst(fn,def,pre,post) |
| 104 | char *fn; |
| 105 | char *def; |
| 106 | char *pre; |
| 107 | char *post; |
| 108 | { |
| 109 | int i; |
| 110 | int j; |
| 111 | |
| 112 | substdio_puts(subfdout,"\n"); |
| 113 | substdio_puts(subfdout,fn); |
| 114 | substdio_puts(subfdout,": "); |
| 115 | switch(control_readfile(&line,fn)) { |
| 116 | case 0: |
| 117 | substdio_puts(subfdout,"(Default.) "); |
| 118 | substdio_puts(subfdout,def); |
| 119 | substdio_puts(subfdout,"\n"); |
| 120 | return 0; |
| 121 | case 1: |
| 122 | substdio_puts(subfdout,"\n"); |
| 123 | i = 0; |
| 124 | for (j = 0;j < line.len;++j) |
| 125 | if (!line.s[j]) { |
| 126 | substdio_puts(subfdout,pre); |
| 127 | safeput(line.s + i,j - i); |
| 128 | substdio_puts(subfdout,post); |
| 129 | substdio_puts(subfdout,"\n"); |
| 130 | i = j + 1; |
| 131 | } |
| 132 | return 1; |
| 133 | default: |
| 134 | substdio_puts(subfdout,"Oops! Trouble reading this file.\n"); |
| 135 | return -1; |
| 136 | } |
| 137 | } |
| 138 | |
| 139 | void main() |
| 140 | { |
| 141 | DIR *dir; |
| 142 | direntry *d; |
| 143 | struct stat stmrh; |
| 144 | struct stat stmrhcdb; |
| 145 | |
| 146 | substdio_puts(subfdout,"qmail home directory: "); |
| 147 | substdio_puts(subfdout,auto_qmail); |
| 148 | substdio_puts(subfdout,".\n"); |
| 149 | |
| 150 | substdio_puts(subfdout,"user-ext delimiter: "); |
| 151 | substdio_puts(subfdout,auto_break); |
| 152 | substdio_puts(subfdout,".\n"); |
| 153 | |
| 154 | substdio_puts(subfdout,"paternalism (in decimal): "); |
| 155 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_patrn)); |
| 156 | substdio_puts(subfdout,".\n"); |
| 157 | |
| 158 | substdio_puts(subfdout,"silent concurrency limit: "); |
| 159 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_spawn)); |
| 160 | substdio_puts(subfdout,".\n"); |
| 161 | |
| 162 | substdio_puts(subfdout,"subdirectory split: "); |
| 163 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_split)); |
| 164 | substdio_puts(subfdout,".\n"); |
| 165 | |
| 166 | substdio_puts(subfdout,"user ids: "); |
| 167 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_uida)); |
| 168 | substdio_puts(subfdout,", "); |
| 169 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_uidd)); |
| 170 | substdio_puts(subfdout,", "); |
| 171 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_uidl)); |
| 172 | substdio_puts(subfdout,", "); |
| 173 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_uido)); |
| 174 | substdio_puts(subfdout,", "); |
| 175 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_uidp)); |
| 176 | substdio_puts(subfdout,", "); |
| 177 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_uidq)); |
| 178 | substdio_puts(subfdout,", "); |
| 179 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_uidr)); |
| 180 | substdio_puts(subfdout,", "); |
| 181 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_uids)); |
| 182 | substdio_puts(subfdout,".\n"); |
| 183 | |
| 184 | substdio_puts(subfdout,"group ids: "); |
| 185 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_gidn)); |
| 186 | substdio_puts(subfdout,", "); |
| 187 | substdio_put(subfdout,num,fmt_ulong(num,(unsigned long) auto_gidq)); |
| 188 | substdio_puts(subfdout,".\n"); |
| 189 | |
| 190 | if (chdir(auto_qmail) == -1) { |
| 191 | substdio_puts(subfdout,"Oops! Unable to chdir to "); |
| 192 | substdio_puts(subfdout,auto_qmail); |
| 193 | substdio_puts(subfdout,".\n"); |
| 194 | substdio_flush(subfdout); |
| 195 | _exit(111); |
| 196 | } |
| 197 | if (chdir("control") == -1) { |
| 198 | substdio_puts(subfdout,"Oops! Unable to chdir to control.\n"); |
| 199 | substdio_flush(subfdout); |
| 200 | _exit(111); |
| 201 | } |
| 202 | |
| 203 | dir = opendir("."); |
| 204 | if (!dir) { |
| 205 | substdio_puts(subfdout,"Oops! Unable to open current directory.\n"); |
| 206 | substdio_flush(subfdout); |
| 207 | _exit(111); |
| 208 | } |
| 209 | |
| 210 | meok = control_readline(&me,"me"); |
| 211 | if (meok == -1) { |
| 212 | substdio_puts(subfdout,"Oops! Trouble reading control/me."); |
| 213 | substdio_flush(subfdout); |
| 214 | _exit(111); |
| 215 | } |
| 216 | |
| 217 | do_lst("badmailfrom","Any MAIL FROM is allowed.",""," not accepted in MAIL FROM."); |
| 218 | do_str("bouncefrom",0,"MAILER-DAEMON","Bounce user name is "); |
| 219 | do_str("bouncehost",1,"bouncehost","Bounce host name is "); |
| 220 | do_int("concurrencylocal","10","Local concurrency is ",""); |
| 221 | do_int("concurrencyremote","20","Remote concurrency is ",""); |
| 222 | do_int("databytes","0","SMTP DATA limit is "," bytes"); |
| 223 | do_str("defaultdomain",1,"defaultdomain","Default domain name is "); |
| 224 | do_str("defaulthost",1,"defaulthost","Default host name is "); |
| 225 | do_str("doublebouncehost",1,"doublebouncehost","2B recipient host: "); |
| 226 | do_str("doublebounceto",0,"postmaster","2B recipient user: "); |
| 227 | do_str("envnoathost",1,"envnoathost","Presumed domain name is "); |
| 228 | do_str("helohost",1,"helohost","SMTP client HELO host name is "); |
| 229 | do_str("idhost",1,"idhost","Message-ID host name is "); |
| 230 | do_str("localiphost",1,"localiphost","Local IP address becomes "); |
| 231 | do_lst("locals","Messages for me are delivered locally.","Messages for "," are delivered locally."); |
| 232 | do_str("me",0,"undefined! Uh-oh","My name is "); |
| 233 | do_lst("percenthack","The percent hack is not allowed.","The percent hack is allowed for user%host@","."); |
| 234 | do_str("plusdomain",1,"plusdomain","Plus domain name is "); |
| 235 | do_lst("qmqpservers","No QMQP servers.","QMQP server: ","."); |
| 236 | do_int("queuelifetime","604800","Message lifetime in the queue is "," seconds"); |
| 237 | |
| 238 | if (do_lst("rcpthosts","SMTP clients may send messages to any recipient.","SMTP clients may send messages to recipients at ",".")) |
| 239 | do_lst("morercpthosts","No effect.","SMTP clients may send messages to recipients at ","."); |
| 240 | else |
| 241 | do_lst("morercpthosts","No rcpthosts; morercpthosts is irrelevant.","No rcpthosts; doesn't matter that morercpthosts has ","."); |
| 242 | /* XXX: check morercpthosts.cdb contents */ |
| 243 | substdio_puts(subfdout,"\nmorercpthosts.cdb: "); |
| 244 | if (stat("morercpthosts",&stmrh) == -1) |
| 245 | if (stat("morercpthosts.cdb",&stmrhcdb) == -1) |
| 246 | substdio_puts(subfdout,"(Default.) No effect.\n"); |
| 247 | else |
| 248 | substdio_puts(subfdout,"Oops! morercpthosts.cdb exists but morercpthosts doesn't.\n"); |
| 249 | else |
| 250 | if (stat("morercpthosts.cdb",&stmrhcdb) == -1) |
| 251 | substdio_puts(subfdout,"Oops! morercpthosts exists but morercpthosts.cdb doesn't.\n"); |
| 252 | else |
| 253 | if (stmrh.st_mtime > stmrhcdb.st_mtime) |
| 254 | substdio_puts(subfdout,"Oops! morercpthosts.cdb is older than morercpthosts.\n"); |
| 255 | else |
| 256 | substdio_puts(subfdout,"Modified recently enough; hopefully up to date.\n"); |
| 257 | |
| 258 | do_lst("relayhosts","No relayhosts","Relay host: ",""); |
| 259 | do_str("smtpgreeting",1,"smtpgreeting","SMTP greeting: 220 "); |
| 260 | do_lst("smtproutes","No artificial SMTP routes.","SMTP route: ",""); |
| 261 | do_int("timeoutconnect","60","SMTP client connection timeout is "," seconds"); |
| 262 | do_int("timeoutremote","1200","SMTP client data timeout is "," seconds"); |
| 263 | do_int("timeoutsmtpd","1200","SMTP server data timeout is "," seconds"); |
| 264 | do_lst("virtualdomains","No virtual domains.","Virtual domain: ",""); |
| 265 | |
| 266 | while (d = readdir(dir)) { |
| 267 | if (str_equal(d->d_name,".")) continue; |
| 268 | if (str_equal(d->d_name,"..")) continue; |
| 269 | if (str_equal(d->d_name,"bouncefrom")) continue; |
| 270 | if (str_equal(d->d_name,"bouncehost")) continue; |
| 271 | if (str_equal(d->d_name,"badmailfrom")) continue; |
| 272 | if (str_equal(d->d_name,"bouncefrom")) continue; |
| 273 | if (str_equal(d->d_name,"bouncehost")) continue; |
| 274 | if (str_equal(d->d_name,"concurrencylocal")) continue; |
| 275 | if (str_equal(d->d_name,"concurrencyremote")) continue; |
| 276 | if (str_equal(d->d_name,"databytes")) continue; |
| 277 | if (str_equal(d->d_name,"defaultdomain")) continue; |
| 278 | if (str_equal(d->d_name,"defaulthost")) continue; |
| 279 | if (str_equal(d->d_name,"doublebouncehost")) continue; |
| 280 | if (str_equal(d->d_name,"doublebounceto")) continue; |
| 281 | if (str_equal(d->d_name,"envnoathost")) continue; |
| 282 | if (str_equal(d->d_name,"helohost")) continue; |
| 283 | if (str_equal(d->d_name,"idhost")) continue; |
| 284 | if (str_equal(d->d_name,"localiphost")) continue; |
| 285 | if (str_equal(d->d_name,"locals")) continue; |
| 286 | if (str_equal(d->d_name,"me")) continue; |
| 287 | if (str_equal(d->d_name,"morercpthosts")) continue; |
| 288 | if (str_equal(d->d_name,"morercpthosts.cdb")) continue; |
| 289 | if (str_equal(d->d_name,"percenthack")) continue; |
| 290 | if (str_equal(d->d_name,"plusdomain")) continue; |
| 291 | if (str_equal(d->d_name,"qmqpservers")) continue; |
| 292 | if (str_equal(d->d_name,"queuelifetime")) continue; |
| 293 | if (str_equal(d->d_name,"rcpthosts")) continue; |
| 294 | if (str_equal(d->d_name,"relayhosts")) continue; |
| 295 | if (str_equal(d->d_name,"smtpgreeting")) continue; |
| 296 | if (str_equal(d->d_name,"smtproutes")) continue; |
| 297 | if (str_equal(d->d_name,"timeoutconnect")) continue; |
| 298 | if (str_equal(d->d_name,"timeoutremote")) continue; |
| 299 | if (str_equal(d->d_name,"timeoutsmtpd")) continue; |
| 300 | if (str_equal(d->d_name,"virtualdomains")) continue; |
| 301 | substdio_puts(subfdout,"\n"); |
| 302 | substdio_puts(subfdout,d->d_name); |
| 303 | substdio_puts(subfdout,": I have no idea what this file does.\n"); |
| 304 | } |
| 305 | |
| 306 | substdio_flush(subfdout); |
| 307 | _exit(0); |
| 308 | } |