Mercurial > pidgin.yaz
comparison plugins/perl/common/Account.xs @ 6508:cbd24b37350d
[gaim-migrate @ 7025]
Okay, ready for some breakage again? I rewrote the perl loader plugin. All
old scripts are broken, but the new API will be much better. Currently, you
can access accounts and do debug output, and that's it, but adding support
for new things is much easier. Please don't come after me with pitchforks.
committer: Tailor Script <tailor@pidgin.im>
author | Christian Hammond <chipx86@chipx86.com> |
---|---|
date | Tue, 19 Aug 2003 21:47:36 +0000 |
parents | |
children | d7e04709be96 |
comparison
equal
deleted
inserted
replaced
6507:c8e31153eea7 | 6508:cbd24b37350d |
---|---|
1 #include "module.h" | |
2 | |
3 MODULE = Gaim::Account PACKAGE = Gaim::Account PREFIX = gaim_account_ | |
4 PROTOTYPES: ENABLE | |
5 | |
6 Gaim::Connection | |
7 gaim_account_connect(account) | |
8 Gaim::Account account | |
9 | |
10 void | |
11 gaim_account_disconnect(account) | |
12 Gaim::Account account | |
13 | |
14 void | |
15 gaim_account_set_username(account, username) | |
16 Gaim::Account account | |
17 const char *username | |
18 | |
19 void | |
20 gaim_account_set_password(account, password) | |
21 Gaim::Account account | |
22 const char *password | |
23 | |
24 void | |
25 gaim_account_set_alias(account, alias) | |
26 Gaim::Account account | |
27 const char *alias | |
28 | |
29 void | |
30 gaim_account_set_user_info(account, user_info) | |
31 Gaim::Account account | |
32 const char *user_info | |
33 | |
34 void | |
35 gaim_account_set_buddy_icon(account, buddy_icon) | |
36 Gaim::Account account | |
37 const char *buddy_icon | |
38 | |
39 void | |
40 gaim_account_set_protocol_id(account, protocol_id) | |
41 Gaim::Account account | |
42 const char *protocol_id | |
43 | |
44 void | |
45 gaim_account_set_remember_password(account, value) | |
46 Gaim::Account account | |
47 gboolean value | |
48 | |
49 void | |
50 gaim_account_set_check_mail(account, value) | |
51 Gaim::Account account | |
52 gboolean value | |
53 | |
54 void | |
55 gaim_account_set_auto_login(account, ui, value) | |
56 Gaim::Account account | |
57 const char *ui | |
58 gboolean value | |
59 | |
60 void | |
61 gaim_account_set_public_ip(account, ip) | |
62 Gaim::Account account | |
63 const char *ip | |
64 | |
65 gboolean | |
66 gaim_account_is_connected(account) | |
67 Gaim::Account account | |
68 | |
69 const char * | |
70 gaim_account_get_username(account) | |
71 Gaim::Account account | |
72 | |
73 const char * | |
74 gaim_account_get_password(account) | |
75 Gaim::Account account | |
76 | |
77 const char * | |
78 gaim_account_get_alias(account) | |
79 Gaim::Account account | |
80 | |
81 const char * | |
82 gaim_account_get_user_info(account) | |
83 Gaim::Account account | |
84 | |
85 const char * | |
86 gaim_account_get_buddy_icon(account) | |
87 Gaim::Account account | |
88 | |
89 const char * | |
90 gaim_account_get_protocol_id(account) | |
91 Gaim::Account account | |
92 | |
93 Gaim::Connection | |
94 gaim_account_get_connection(account) | |
95 Gaim::Account account | |
96 | |
97 gboolean | |
98 gaim_account_get_remember_password(account) | |
99 Gaim::Account account | |
100 | |
101 gboolean | |
102 gaim_account_get_check_mail(account) | |
103 Gaim::Account account | |
104 | |
105 gboolean | |
106 gaim_account_get_auto_login(account, ui) | |
107 Gaim::Account account | |
108 const char *ui | |
109 | |
110 const char * | |
111 gaim_account_get_public_ip(account) | |
112 Gaim::Account account | |
113 | |
114 void * | |
115 handle() | |
116 CODE: | |
117 RETVAL = gaim_accounts_get_handle(); | |
118 OUTPUT: | |
119 RETVAL | |
120 | |
121 | |
122 MODULE = Gaim::Account PACKAGE = Gaim::Accounts PREFIX = gaim_accounts_ | |
123 | |
124 void | |
125 gaim_accounts_add(account) | |
126 Gaim::Account account | |
127 | |
128 void | |
129 gaim_accounts_remove(account) | |
130 Gaim::Account account | |
131 | |
132 | |
133 MODULE = Gaim::Account PACKAGE = Gaim | |
134 | |
135 void | |
136 accounts() | |
137 PREINIT: | |
138 GList *l; | |
139 PPCODE: | |
140 for (l = gaim_accounts_get_all(); l != NULL; l = l->next) | |
141 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Account"))); | |
142 | |
143 Gaim::Account | |
144 account_find(name, protocol_id) | |
145 const char *name | |
146 const char *protocol_id | |
147 CODE: | |
148 RETVAL = gaim_accounts_find_with_prpl_id(name, protocol_id); | |
149 OUTPUT: | |
150 RETVAL | |
151 |