plugins/perl/common/Connection.xs@12f08de92674 (annotated)
plugins/perl/common/Connection.xs
Sat, 27 Sep 2003 19:17:21 +0000
- author
- Mark Doliner <markdoliner@pidgin.im>
- date
- Sat, 27 Sep 2003 19:17:21 +0000
- changeset 6982
- 12f08de92674
- parent 6584
- 9785a533d08e
- child 11118
- 36db35a9da56
- permissions
- -rw-r--r--
[gaim-migrate @ 7538]
This is Mr. Holland's Opus. And by Mr. Holland I mean Robot101. He
rewrote the coreish IM image support so that the binary data gets
ripped out in the prpl and put in an imgstore instead of just being
passed in the same huge as char string as the actual message. This
is good because it's prpl agnostic, or something. It also means
we don't have a silly length of "-1" with pretty much every send or
receive IM function.
It should be crash free, bug free, and memleak free, but additional
testing is always a good thing.
If you like good stuff then you'll love this patch. But don't take
my word for it--ba dun dunt!
| 6584 | 1 | #include "module.h" |
| 2 | ||
| 3 | MODULE = Gaim::Connection PACKAGE = Gaim::Connection PREFIX = gaim_connection_ | |
| 4 | PROTOTYPES: ENABLE | |
| 5 | ||
| 6 | void | |
| 7 | gaim_connection_set_display_name(gc, name) | |
| 8 | Gaim::Connection gc | |
| 9 | const char *name | |
| 10 | ||
| 11 | Gaim::Account | |
| 12 | gaim_connection_get_account(gc) | |
| 13 | Gaim::Connection gc | |
| 14 | ||
| 15 | const char * | |
| 16 | gaim_connection_get_display_name(gc) | |
| 17 | Gaim::Connection gc | |
| 18 | ||
| 19 | ||
| 20 | MODULE = Gaim::Connections PACKAGE = Gaim::Connections PREFIX = gaim_connections_ | |
| 21 | PROTOTYPES: ENABLE | |
| 22 | ||
| 23 | void | |
| 24 | gaim_connections_disconnect_all() | |
| 25 | ||
| 26 | void * | |
| 27 | handle() | |
| 28 | CODE: | |
| 29 | RETVAL = gaim_connections_get_handle(); | |
| 30 | OUTPUT: | |
| 31 | RETVAL | |
| 32 | ||
| 33 | ||
| 34 | MODULE = Gaim::Connection PACKAGE = Gaim | |
| 35 | ||
| 36 | void | |
| 37 | connections() | |
| 38 | PREINIT: | |
| 39 | GList *l; | |
| 40 | PPCODE: | |
| 41 | for (l = gaim_connections_get_all(); l != NULL; l = l->next) | |
| 42 | XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Connection"))); |
