1 /*************************************************
2 * Exim - an Internet mail transport agent *
3 *************************************************/
5 /* SRS - Sender rewriting scheme support
6 (C)2004 Miles Wilton <miles@mirtol.com>
7 Copyright (c) The Exim Maintainers 2016
9 SRS Support Version: 1.0a
14 #ifdef EXPERIMENTAL_SRS
20 uschar
*srs_db_forward
= NULL
;
21 uschar
*srs_db_reverse
= NULL
;
24 /* srs_init just initialises libsrs and creates (if necessary)
25 an srs object to use for all srs calls in this instance */
30 const uschar
*list
= srs_config
;
31 uschar secret_buf
[SRS_MAX_SECRET_LENGTH
];
32 uschar
*secret
= NULL
;
36 /* Check if this instance of Exim has not initialized SRS */
41 BOOL usetimestamp
, usehash
;
43 /* Copy config vars */
44 hashlen
= srs_hashlength
;
46 usetimestamp
= srs_usetimestamp
;
47 usehash
= srs_usehash
;
49 /* Pass srs_config var (overrides new config vars) */
51 if (srs_config
!= NULL
)
53 secret
= string_nextinlist(&list
, &co
, secret_buf
, SRS_MAX_SECRET_LENGTH
);
55 if ((sbufp
= string_nextinlist(&list
, &co
, sbuf
, sizeof(sbuf
))))
58 if ((sbufp
= string_nextinlist(&list
, &co
, sbuf
, sizeof(sbuf
))))
61 if ((sbufp
= string_nextinlist(&list
, &co
, sbuf
, sizeof(sbuf
))))
62 usetimestamp
= atoi(sbuf
);
64 if ((sbufp
= string_nextinlist(&list
, &co
, sbuf
, sizeof(sbuf
))))
68 if (srs_hashmin
== -1)
69 srs_hashmin
= hashlen
;
71 /* First secret specified in secrets? */
74 if (secret
== NULL
|| *secret
== '\0')
75 if (!(secret
= string_nextinlist(&list
, &co
, secret_buf
, SRS_MAX_SECRET_LENGTH
)))
77 log_write(0, LOG_MAIN
| LOG_PANIC
,
78 "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
)))
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
)))
108 srs_add_secret(srs
, secret
,
109 Ustrlen(secret
) > SRS_MAX_SECRET_LENGTH
? SRS_MAX_SECRET_LENGTH
: Ustrlen(secret
));
112 debug_printf("SRS initialized\n");
122 if (srs
) srs_close(srs
);
129 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
);
147 eximsrs_reverse(uschar
**result
, uschar
*address
)
152 if ((n
= srs_reverse(srs
, address
, res
, sizeof(res
))) & SRS_RESULT_FAIL
)
155 debug_printf("srs_reverse failed (%s): %s\n", address
, srs_geterrormsg(n
));
156 if (n
== SRS_RESULT_NOTSRS
|| n
== SRS_RESULT_BADSRS
)
158 if (n
== SRS_RESULT_BADHASH
|| n
== SRS_RESULT_BADTIMESTAMP
|| n
== SRS_RESULT_TIMESTAMPEXPIRED
)
163 *result
= string_copy(res
);
169 eximsrs_db_set(BOOL reverse
, uschar
*srs_db
)
172 srs_db_reverse
= (srs_db
== NULL
? NULL
: string_copy(srs_db
));
174 srs_db_forward
= (srs_db
== NULL
? NULL
: string_copy(srs_db
));
176 if (srs_set_db_functions(srs
, (srs_db_forward
? eximsrs_db_insert
: NULL
),
177 (srs_db_reverse
? eximsrs_db_lookup
: NULL
)) & SRS_RESULT_FAIL
)
185 eximsrs_db_insert(srs_t
*srs
, char *data
, uint data_len
, char *result
, uint result_len
)
190 if (srs_db_forward
== NULL
)
191 return SRS_RESULT_DBERROR
;
193 srs_db_address
= string_copyn(data
, data_len
);
194 if (srs_generate_unique_id(srs
, srs_db_address
, buf
, 64) & SRS_RESULT_FAIL
)
195 return SRS_RESULT_DBERROR
;
197 srs_db_key
= string_copyn(buf
, 16);
199 if ((res
= expand_string(srs_db_forward
)) == NULL
)
200 return SRS_RESULT_DBERROR
;
203 return SRS_RESULT_DBERROR
;
205 Ustrncpy(result
, srs_db_key
, result_len
);
207 return SRS_RESULT_OK
;
212 eximsrs_db_lookup(srs_t
*srs
, char *data
, uint data_len
, char *result
, uint result_len
)
216 if (srs_db_reverse
== NULL
)
217 return SRS_RESULT_DBERROR
;
219 srs_db_key
= string_copyn(data
, data_len
);
220 if ((res
= expand_string(srs_db_reverse
)) == NULL
)
221 return SRS_RESULT_DBERROR
;
223 if (Ustrlen(res
) >= result_len
)
224 return SRS_RESULT_ADDRESSTOOLONG
;
226 strncpy(result
, res
, result_len
);
228 return SRS_RESULT_OK
;