1 /*************************************************
2 * Exim - an Internet mail transport agent *
3 *************************************************/
5 /* SRS - Sender rewriting scheme support
6 (C)2004 Miles Wilton <miles@mirtol.com>
8 SRS Support Version: 1.0a
13 #ifdef EXPERIMENTAL_SRS
19 uschar
*srs_db_forward
= NULL
;
20 uschar
*srs_db_reverse
= NULL
;
23 /* srs_init just initialises libsrs and creates (if necessary)
24 an srs object to use for all srs calls in this instance */
28 uschar
*list
= srs_config
;
29 uschar secret_buf
[SRS_MAX_SECRET_LENGTH
];
30 uschar
*secret
= NULL
;
34 /* Check if this instance of Exim has not initialized SRS */
39 BOOL usetimestamp
, usehash
;
41 /* Copy config vars */
42 hashlen
= srs_hashlength
;
44 usetimestamp
= srs_usetimestamp
;
45 usehash
= srs_usehash
;
47 /* Pass srs_config var (overrides new config vars) */
49 if(srs_config
!= NULL
)
51 secret
= string_nextinlist(&list
, &co
, secret_buf
, SRS_MAX_SECRET_LENGTH
);
53 if((sbufp
= string_nextinlist(&list
, &co
, sbuf
, sizeof(sbuf
))) != NULL
)
56 if((sbufp
= string_nextinlist(&list
, &co
, sbuf
, sizeof(sbuf
))) != NULL
)
59 if((sbufp
= string_nextinlist(&list
, &co
, sbuf
, sizeof(sbuf
))) != NULL
)
60 usetimestamp
= atoi(sbuf
);
62 if((sbufp
= string_nextinlist(&list
, &co
, sbuf
, sizeof(sbuf
))) != NULL
)
67 srs_hashmin
= hashlen
;
69 /* First secret specified in secrets? */
72 if(secret
== NULL
|| *secret
== '\0')
74 if((secret
= string_nextinlist(&list
, &co
, secret_buf
, SRS_MAX_SECRET_LENGTH
)) == NULL
)
76 log_write(0, LOG_MAIN
| LOG_PANIC
,
77 "SRS Configuration Error: No secret specified");
83 if(maxage
< 0 || maxage
> 365)
85 log_write(0, LOG_MAIN
| LOG_PANIC
,
86 "SRS Configuration Error: Invalid maximum timestamp age");
89 if(hashlen
< 1 || hashlen
> 20 || srs_hashmin
< 1 || srs_hashmin
> 20)
91 log_write(0, LOG_MAIN
| LOG_PANIC
,
92 "SRS Configuration Error: Invalid hash length");
96 if((srs
= srs_open(secret
, Ustrlen(secret
), maxage
, hashlen
, srs_hashmin
)) == NULL
)
98 log_write(0, LOG_MAIN
| LOG_PANIC
,
99 "Failed to allocate SRS memory");
103 srs_set_option(srs
, SRS_OPTION_USETIMESTAMP
, usetimestamp
);
104 srs_set_option(srs
, SRS_OPTION_USEHASH
, usehash
);
107 while((secret
= string_nextinlist(&list
, &co
, secret_buf
, SRS_MAX_SECRET_LENGTH
)) != NULL
)
108 srs_add_secret(srs
, secret
, (Ustrlen(secret
) > SRS_MAX_SECRET_LENGTH
) ? SRS_MAX_SECRET_LENGTH
: Ustrlen(secret
));
111 debug_printf("SRS initialized\n");
129 int eximsrs_forward(uschar
**result
, uschar
*orig_sender
, uschar
*domain
)
134 if((n
= srs_forward(srs
, orig_sender
, domain
, res
, sizeof(res
))) & SRS_RESULT_FAIL
)
137 debug_printf("srs_forward failed (%s, %s): %s\n", orig_sender
, domain
, srs_geterrormsg(n
));
141 *result
= string_copy(res
);
146 int eximsrs_reverse(uschar
**result
, uschar
*address
)
151 if((n
= srs_reverse(srs
, address
, res
, sizeof(res
))) & SRS_RESULT_FAIL
)
154 debug_printf("srs_reverse failed (%s): %s\n", address
, srs_geterrormsg(n
));
155 if(n
== SRS_RESULT_NOTSRS
|| n
== SRS_RESULT_BADSRS
)
157 if(n
== SRS_RESULT_BADHASH
|| n
== SRS_RESULT_BADTIMESTAMP
|| n
== SRS_RESULT_TIMESTAMPEXPIRED
)
162 *result
= string_copy(res
);
167 int eximsrs_db_set(BOOL reverse
, uschar
*srs_db
)
170 srs_db_reverse
= (srs_db
== NULL
? NULL
: string_copy(srs_db
));
172 srs_db_forward
= (srs_db
== NULL
? NULL
: string_copy(srs_db
));
174 if(srs_set_db_functions(srs
, (srs_db_forward
? eximsrs_db_insert
: NULL
),
175 (srs_db_reverse
? eximsrs_db_lookup
: NULL
)) & SRS_RESULT_FAIL
)
182 srs_result
eximsrs_db_insert(srs_t
*srs
, char *data
, uint data_len
, char *result
, uint result_len
)
187 if(srs_db_forward
== NULL
)
188 return SRS_RESULT_DBERROR
;
190 srs_db_address
= string_copyn(data
, data_len
);
191 if(srs_generate_unique_id(srs
, srs_db_address
, buf
, 64) & SRS_RESULT_FAIL
)
192 return SRS_RESULT_DBERROR
;
194 srs_db_key
= string_copyn(buf
, 16);
196 if((res
= expand_string(srs_db_forward
)) == NULL
)
197 return SRS_RESULT_DBERROR
;
200 return SRS_RESULT_DBERROR
;
202 Ustrncpy(result
, srs_db_key
, result_len
);
204 return SRS_RESULT_OK
;
208 srs_result
eximsrs_db_lookup(srs_t
*srs
, char *data
, uint data_len
, char *result
, uint result_len
)
212 if(srs_db_reverse
== NULL
)
213 return SRS_RESULT_DBERROR
;
215 srs_db_key
= string_copyn(data
, data_len
);
216 if((res
= expand_string(srs_db_reverse
)) == NULL
)
217 return SRS_RESULT_DBERROR
;
219 if(Ustrlen(res
) >= result_len
)
220 return SRS_RESULT_ADDRESSTOOLONG
;
222 strncpy(result
, res
, result_len
);
224 return SRS_RESULT_OK
;