plugins/perl/common/Account.xs@70f67d7c84c4 (annotated)
plugins/perl/common/Account.xs
Sun, 27 Feb 2005 08:35:11 +0000
- author
- Sean Egan <seanegan@pidgin.im>
- date
- Sun, 27 Feb 2005 08:35:11 +0000
- changeset 10643
- 70f67d7c84c4
- parent 10504
- eae130eefbfe
- child 10738
- 63ca8277c234
- permissions
- -rw-r--r--
[gaim-migrate @ 12153]
GtkGaimStatusBox, a new status selection widget.
It currently sucks. Pretty much just the UI code with enough copy/paste
code hacked in from gtkstatusselector to minimally work.
Minimally work provided you're only using protocol which have already been
updated to handle offline/online as statuses. Which I think is limited to
AIM and Yahoo! right now. Anyway, it's cool.
| 6508 | 1 | #include "module.h" |
| 2 | ||
| 3 | MODULE = Gaim::Account PACKAGE = Gaim::Account PREFIX = gaim_account_ | |
| 4 | PROTOTYPES: ENABLE | |
| 5 | ||
|
10437
80a61d4c9a61
[gaim-migrate @ 11694]
Balwinder S Dheeman <bsd@rubyforge.org>
parents:
10404
diff
changeset
|
6 | Gaim::Connection |
|
80a61d4c9a61
[gaim-migrate @ 11694]
Balwinder S Dheeman <bsd@rubyforge.org>
parents:
10404
diff
changeset
|
7 | gaim_account_connect(account) |
|
80a61d4c9a61
[gaim-migrate @ 11694]
Balwinder S Dheeman <bsd@rubyforge.org>
parents:
10404
diff
changeset
|
8 | Gaim::Account account |
|
80a61d4c9a61
[gaim-migrate @ 11694]
Balwinder S Dheeman <bsd@rubyforge.org>
parents:
10404
diff
changeset
|
9 | CODE: |
|
80a61d4c9a61
[gaim-migrate @ 11694]
Balwinder S Dheeman <bsd@rubyforge.org>
parents:
10404
diff
changeset
|
10 | RETVAL = gaim_account_connect(account, |
|
80a61d4c9a61
[gaim-migrate @ 11694]
Balwinder S Dheeman <bsd@rubyforge.org>
parents:
10404
diff
changeset
|
11 | gaim_account_get_status(account, "online")); |
|
80a61d4c9a61
[gaim-migrate @ 11694]
Balwinder S Dheeman <bsd@rubyforge.org>
parents:
10404
diff
changeset
|
12 | OUTPUT: |
|
80a61d4c9a61
[gaim-migrate @ 11694]
Balwinder S Dheeman <bsd@rubyforge.org>
parents:
10404
diff
changeset
|
13 | RETVAL |
|
80a61d4c9a61
[gaim-migrate @ 11694]
Balwinder S Dheeman <bsd@rubyforge.org>
parents:
10404
diff
changeset
|
14 | |
| 6508 | 15 | void |
| 16 | gaim_account_disconnect(account) | |
| 17 | Gaim::Account account | |
| 18 | ||
| 19 | void | |
| 20 | gaim_account_set_username(account, username) | |
| 21 | Gaim::Account account | |
| 22 | const char *username | |
| 23 | ||
| 24 | void | |
| 25 | gaim_account_set_password(account, password) | |
| 26 | Gaim::Account account | |
| 27 | const char *password | |
| 28 | ||
| 29 | void | |
| 30 | gaim_account_set_alias(account, alias) | |
| 31 | Gaim::Account account | |
| 32 | const char *alias | |
| 33 | ||
| 34 | void | |
| 35 | gaim_account_set_user_info(account, user_info) | |
| 36 | Gaim::Account account | |
| 37 | const char *user_info | |
|
6523
20c459e452ac
[gaim-migrate @ 7040]
Christian Hammond <chipx86@chipx86.com>
parents:
6508
diff
changeset
|
38 | CODE: |
|
20c459e452ac
[gaim-migrate @ 7040]
Christian Hammond <chipx86@chipx86.com>
parents:
6508
diff
changeset
|
39 | gaim_account_set_user_info(account, user_info); |
|
20c459e452ac
[gaim-migrate @ 7040]
Christian Hammond <chipx86@chipx86.com>
parents:
6508
diff
changeset
|
40 | serv_set_info(gaim_account_get_connection(account), user_info); |
| 6508 | 41 | |
| 42 | void | |
| 43 | gaim_account_set_buddy_icon(account, buddy_icon) | |
| 44 | Gaim::Account account | |
| 45 | const char *buddy_icon | |
| 46 | ||
| 47 | void | |
| 48 | gaim_account_set_protocol_id(account, protocol_id) | |
| 49 | Gaim::Account account | |
| 50 | const char *protocol_id | |
| 51 | ||
| 52 | void | |
| 53 | gaim_account_set_remember_password(account, value) | |
| 54 | Gaim::Account account | |
| 55 | gboolean value | |
| 56 | ||
| 57 | void | |
| 58 | gaim_account_set_check_mail(account, value) | |
| 59 | Gaim::Account account | |
| 60 | gboolean value | |
| 61 | ||
|
10504
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
62 | void |
|
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
63 | gaim_account_set_enabled(account, ui, value) |
|
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
64 | Gaim::Account account |
|
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
65 | const char *ui |
|
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
66 | gboolean value |
|
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
67 | |
| 6508 | 68 | gboolean |
| 69 | gaim_account_is_connected(account) | |
| 70 | Gaim::Account account | |
| 71 | ||
| 72 | const char * | |
| 73 | gaim_account_get_username(account) | |
| 74 | Gaim::Account account | |
| 75 | ||
| 76 | const char * | |
| 77 | gaim_account_get_password(account) | |
| 78 | Gaim::Account account | |
| 79 | ||
| 80 | const char * | |
| 81 | gaim_account_get_alias(account) | |
| 82 | Gaim::Account account | |
| 83 | ||
| 84 | const char * | |
| 85 | gaim_account_get_user_info(account) | |
| 86 | Gaim::Account account | |
| 87 | ||
| 88 | const char * | |
| 89 | gaim_account_get_buddy_icon(account) | |
| 90 | Gaim::Account account | |
| 91 | ||
| 92 | const char * | |
| 93 | gaim_account_get_protocol_id(account) | |
| 94 | Gaim::Account account | |
| 95 | ||
| 96 | Gaim::Connection | |
| 97 | gaim_account_get_connection(account) | |
| 98 | Gaim::Account account | |
| 99 | ||
| 100 | gboolean | |
| 101 | gaim_account_get_remember_password(account) | |
| 102 | Gaim::Account account | |
| 103 | ||
| 104 | gboolean | |
| 105 | gaim_account_get_check_mail(account) | |
| 106 | Gaim::Account account | |
| 107 | ||
|
10504
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
108 | gboolean |
|
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
109 | gaim_account_get_enabled(account, ui) |
|
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
110 | Gaim::Account account |
|
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
111 | const char *ui |
|
eae130eefbfe
[gaim-migrate @ 11796]
Stu Tomlinson <nosnilmot@pidgin.im>
parents:
10437
diff
changeset
|
112 | |
| 6508 | 113 | |
| 114 | MODULE = Gaim::Account PACKAGE = Gaim::Accounts PREFIX = gaim_accounts_ | |
| 115 | ||
| 116 | void | |
| 117 | gaim_accounts_add(account) | |
| 118 | Gaim::Account account | |
| 119 | ||
| 120 | void | |
| 121 | gaim_accounts_remove(account) | |
| 122 | Gaim::Account account | |
| 123 | ||
|
6595
cfd716049cd6
[gaim-migrate @ 7119]
Christian Hammond <chipx86@chipx86.com>
parents:
6551
diff
changeset
|
124 | Gaim::Account |
|
cfd716049cd6
[gaim-migrate @ 7119]
Christian Hammond <chipx86@chipx86.com>
parents:
6551
diff
changeset
|
125 | find(name, protocol_id) |
|
cfd716049cd6
[gaim-migrate @ 7119]
Christian Hammond <chipx86@chipx86.com>
parents:
6551
diff
changeset
|
126 | const char *name |
|
cfd716049cd6
[gaim-migrate @ 7119]
Christian Hammond <chipx86@chipx86.com>
parents:
6551
diff
changeset
|
127 | const char *protocol_id |
|
cfd716049cd6
[gaim-migrate @ 7119]
Christian Hammond <chipx86@chipx86.com>
parents:
6551
diff
changeset
|
128 | CODE: |
| 7176 | 129 | RETVAL = gaim_accounts_find(name, protocol_id); |
|
6595
cfd716049cd6
[gaim-migrate @ 7119]
Christian Hammond <chipx86@chipx86.com>
parents:
6551
diff
changeset
|
130 | OUTPUT: |
|
cfd716049cd6
[gaim-migrate @ 7119]
Christian Hammond <chipx86@chipx86.com>
parents:
6551
diff
changeset
|
131 | RETVAL |
|
cfd716049cd6
[gaim-migrate @ 7119]
Christian Hammond <chipx86@chipx86.com>
parents:
6551
diff
changeset
|
132 | |
|
6551
74b6944d5c87
[gaim-migrate @ 7073]
Christian Hammond <chipx86@chipx86.com>
parents:
6523
diff
changeset
|
133 | void * |
|
74b6944d5c87
[gaim-migrate @ 7073]
Christian Hammond <chipx86@chipx86.com>
parents:
6523
diff
changeset
|
134 | handle() |
|
74b6944d5c87
[gaim-migrate @ 7073]
Christian Hammond <chipx86@chipx86.com>
parents:
6523
diff
changeset
|
135 | CODE: |
|
74b6944d5c87
[gaim-migrate @ 7073]
Christian Hammond <chipx86@chipx86.com>
parents:
6523
diff
changeset
|
136 | RETVAL = gaim_accounts_get_handle(); |
|
74b6944d5c87
[gaim-migrate @ 7073]
Christian Hammond <chipx86@chipx86.com>
parents:
6523
diff
changeset
|
137 | OUTPUT: |
|
74b6944d5c87
[gaim-migrate @ 7073]
Christian Hammond <chipx86@chipx86.com>
parents:
6523
diff
changeset
|
138 | RETVAL |
|
74b6944d5c87
[gaim-migrate @ 7073]
Christian Hammond <chipx86@chipx86.com>
parents:
6523
diff
changeset
|
139 | |
| 6508 | 140 | |
| 141 | MODULE = Gaim::Account PACKAGE = Gaim | |
| 142 | ||
| 143 | void | |
| 144 | accounts() | |
| 145 | PREINIT: | |
| 146 | GList *l; | |
| 147 | PPCODE: | |
| 148 | for (l = gaim_accounts_get_all(); l != NULL; l = l->next) | |
| 149 | XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Account"))); | |
| 150 |
