--with-domain= is a joke
[apps/madmutt.git] / account.c
1 /*
2  * Copyright notice from original mutt:
3  * Copyright (C) 2000-5 Brendan Cully <brendan@kublai.com>
4  *
5  * This file is part of mutt-ng, see http://www.muttng.org/.
6  * It's licensed under the GNU General Public License,
7  * please see the file GPL in the top level source directory.
8  */
9
10 /* remote host account manipulation (POP/IMAP) */
11
12 #if HAVE_CONFIG_H
13 # include "config.h"
14 #endif
15
16 #include <lib-lib/mem.h>
17 #include <lib-lib/str.h>
18 #include <lib-lib/ascii.h>
19 #include <lib-lib/macros.h>
20
21 #include "mutt.h"
22 #include "enter.h"
23 #include "account.h"
24 #include "url.h"
25
26
27 /* mutt_account_match: compare account info (host/port/user/login) */
28 int mutt_account_match (const ACCOUNT * a1, const ACCOUNT * a2)
29 {
30     const char* user = NONULL (Username);
31 #ifdef USE_IMAP
32     const char* login = NONULL (Username);
33 #endif
34
35     if (a1->type != a2->type)
36         return 0;
37     if (ascii_strcasecmp (a1->host, a2->host))
38         return 0;
39     if (a1->port != a2->port)
40         return 0;
41
42 #ifdef USE_IMAP
43     if (a1->type == M_ACCT_TYPE_IMAP) {
44         if (ImapUser && (ImapUser[0] != '\0'))
45             user = ImapUser;
46         if (ImapLogin && (ImapLogin[0] != '\0'))
47             login = ImapLogin;
48     }
49 #endif
50
51 #ifdef USE_POP
52     if (a1->type == M_ACCT_TYPE_POP && PopUser)
53         user = PopUser;
54 #endif
55
56 #ifdef USE_NNTP
57     if (a1->type == M_ACCT_TYPE_NNTP && NntpUser)
58         user = NntpUser;
59 #endif
60
61     if (a1->flags & a2->flags & M_ACCT_USER)
62         return (!m_strcmp(a1->user, a2->user));
63     if (a1->flags & M_ACCT_USER)
64         return (!m_strcmp(a1->user, user));
65     if (a2->flags & M_ACCT_USER)
66         return (!m_strcmp(a2->user, user));
67
68     return 1;
69 }
70
71 /* mutt_account_fromurl: fill account with information from url. */
72 int mutt_account_fromurl(ACCOUNT *account, ciss_url_t *url)
73 {
74     /* must be present */
75     if (!url->host)
76         return -1;
77     m_strcpy(account->host, sizeof(account->host), url->host);
78
79     if (url->user) {
80         m_strcpy(account->user, sizeof(account->user), url->user);
81         account->flags |= M_ACCT_USER;
82     }
83     if (url->pass) {
84         m_strcpy(account->pass, sizeof(account->pass), url->pass);
85         account->flags |= M_ACCT_PASS;
86     }
87     if (url->port) {
88         account->port = url->port;
89         account->flags |= M_ACCT_PORT;
90     }
91
92     return 0;
93 }
94
95 /* mutt_account_tourl: fill URL with info from account. The URL information
96  *   is a set of pointers into account - don't free or edit account until
97  *   you've finished with url (make a copy of account if you need it for
98  *   a while). */
99 void mutt_account_tourl (ACCOUNT * account, ciss_url_t * url)
100 {
101     url->scheme = U_UNKNOWN;
102     url->user = NULL;
103     url->pass = NULL;
104     url->port = 0;
105
106 #ifdef USE_IMAP
107     if (account->type == M_ACCT_TYPE_IMAP) {
108         if (account->flags & M_ACCT_SSL)
109             url->scheme = U_IMAPS;
110         else
111             url->scheme = U_IMAP;
112     }
113 #endif
114
115 #ifdef USE_POP
116     if (account->type == M_ACCT_TYPE_POP) {
117         if (account->flags & M_ACCT_SSL)
118             url->scheme = U_POPS;
119         else
120             url->scheme = U_POP;
121     }
122 #endif
123
124 #ifdef USE_NNTP
125     if (account->type == M_ACCT_TYPE_NNTP) {
126         if (account->flags & M_ACCT_SSL)
127             url->scheme = U_NNTPS;
128         else
129             url->scheme = U_NNTP;
130     }
131 #endif
132
133     url->host = account->host;
134     if (account->flags & M_ACCT_PORT)
135         url->port = account->port;
136     if (account->flags & M_ACCT_USER)
137         url->user = account->user;
138     if (account->flags & M_ACCT_PASS)
139         url->pass = account->pass;
140 }
141
142 /* mutt_account_getuser: retrieve username into ACCOUNT, if necessary */
143 int mutt_account_getuser (ACCOUNT * account)
144 {
145     char prompt[SHORT_STRING];
146
147     /* already set */
148     if (account->flags & M_ACCT_USER)
149         return 0;
150 #ifdef USE_IMAP
151     else if ((account->type == M_ACCT_TYPE_IMAP) && !m_strisempty(ImapUser))
152         m_strcpy(account->user, sizeof(account->user), ImapUser);
153 #endif
154 #ifdef USE_POP
155     else if ((account->type == M_ACCT_TYPE_POP) && !m_strisempty(PopUser))
156         m_strcpy(account->user, sizeof(account->user), PopUser);
157 #endif
158 #ifdef USE_NNTP
159     else if ((account->type == M_ACCT_TYPE_NNTP) && !m_strisempty(NntpUser))
160         m_strcpy(account->user, sizeof(account->user), NntpUser);
161 #endif
162     /* prompt (defaults to unix username), copy into account->user */
163     else {
164         snprintf(prompt, sizeof(prompt), _("Username at %s: "), account->host);
165         m_strcpy(account->user, sizeof(account->user), NONULL(Username));
166         if (mutt_get_field_unbuffered(prompt, account->user,
167                                       sizeof(account->user), 0))
168             return -1;
169     }
170
171     account->flags |= M_ACCT_USER;
172
173     return 0;
174 }
175
176 int mutt_account_getlogin (ACCOUNT* account)
177 {
178     /* already set */
179     if (account->flags & M_ACCT_LOGIN)
180         return 0;
181 #ifdef USE_IMAP
182     else if (account->type == M_ACCT_TYPE_IMAP)
183     {
184         if (!m_strisempty(ImapLogin)) {
185             m_strcpy(account->login, sizeof(account->login), ImapLogin);
186             account->flags |= M_ACCT_LOGIN;
187         }
188     }
189 #endif
190
191     if (!(account->flags & M_ACCT_LOGIN)) {
192         mutt_account_getuser (account);
193         m_strcpy(account->login, sizeof(account->login), account->user);
194     }
195
196     account->flags |= M_ACCT_LOGIN;
197
198     return 0;
199 }
200
201 /* mutt_account_getpass: fetch password into ACCOUNT, if neccessary */
202 int mutt_account_getpass (ACCOUNT * account)
203 {
204     char prompt[SHORT_STRING];
205
206     if (account->flags & M_ACCT_PASS)
207         return 0;
208 #ifdef USE_IMAP
209     else if ((account->type == M_ACCT_TYPE_IMAP) && !m_strisempty(ImapPass))
210         m_strcpy(account->pass, sizeof(account->pass), ImapPass);
211 #endif
212 #ifdef USE_POP
213     else if ((account->type == M_ACCT_TYPE_POP) && !m_strisempty(PopPass))
214         m_strcpy(account->pass, sizeof(account->pass), PopPass);
215 #endif
216 #ifdef USE_NNTP
217     else if ((account->type == M_ACCT_TYPE_NNTP) && !m_strisempty(NntpPass))
218         m_strcpy(account->pass, sizeof(account->pass), NntpPass);
219 #endif
220     else {
221         snprintf(prompt, sizeof(prompt), _("Password for %s@%s: "),
222                  account->flags & M_ACCT_LOGIN ? account->login : account->user,
223                  account->host);
224         account->pass[0] = '\0';
225         if (mutt_get_field_unbuffered(prompt, account->pass,
226                                       sizeof(account->pass), M_PASS))
227             return -1;
228     }
229
230     account->flags |= M_ACCT_PASS;
231
232     return 0;
233 }
234
235 void mutt_account_unsetpass (ACCOUNT * account)
236 {
237     account->flags &= !M_ACCT_PASS;
238 }