libpurple/plugins/perl/common/Smiley.xs

Sat, 22 Jun 2013 15:58:44 +0530

author
Ankit Vani <a@nevitus.org>
date
Sat, 22 Jun 2013 15:58:44 +0530
branch
soc.2013.gobjectification
changeset 34606
bca53cda8ed5
parent 23329
a3348556c57d
permissions
-rw-r--r--

Added ciphers and hashes _new functions to .xs files

23023
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
1 #include "module.h"
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
2
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
3 MODULE = Purple::Smiley PACKAGE = Purple::Smiley PREFIX = purple_smiley_
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
4 PROTOTYPES: ENABLE
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
5
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
6 Purple::Smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
7 purple_smiley_new(img, shortcut)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
8 Purple::StoredImage img
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
9 const char * shortcut
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
10
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
11 Purple::Smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
12 purple_smiley_new_from_file(shortcut, filepath)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
13 const char * shortcut
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
14 const char * filepath
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
15
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
16 void
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
17 purple_smiley_delete(smiley)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
18 Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
19
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
20 gboolean
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
21 purple_smiley_set_shortcut(smiley, shortcut)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
22 Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
23 const char * shortcut
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
24
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
25 void
23329
a3348556c57d Update the perl bindings for the changed smiley API.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents: 23023
diff changeset
26 purple_smiley_set_data(smiley, data, data_len)
23023
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
27 Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
28 guchar * data
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
29 size_t data_len
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
30
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
31 const char *
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
32 purple_smiley_get_shortcut(smiley)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
33 Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
34
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
35 const char *
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
36 purple_smiley_get_checksum(smiley)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
37 Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
38
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
39 Purple::StoredImage
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
40 purple_smiley_get_stored_image(smiley)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
41 Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
42
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
43 gconstpointer
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
44 purple_smiley_get_data(smiley, len)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
45 Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
46 size_t * len
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
47
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
48 const char *
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
49 purple_smiley_get_extension(smiley)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
50 Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
51
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
52
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
53 gchar_own *
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
54 purple_smiley_get_full_path(smiley)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
55 Purple::Smiley smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
56
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
57
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
58 MODULE = Purple::Smiley PACKAGE = Purple::Smileys PREFIX = purple_smileys_
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
59 PROTOTYPES: ENABLE
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
60
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
61 void
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
62 purple_smileys_get_all()
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
63 PREINIT:
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
64 GList *l;
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
65 PPCODE:
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
66 for (l = purple_smileys_get_all(); l != NULL; l = g_list_delete_link(l, l)) {
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
67 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Smiley")));
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
68 }
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
69
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
70 Purple::Smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
71 purple_smileys_find_by_shortcut(shortcut)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
72 const char * shortcut
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
73
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
74 Purple::Smiley
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
75 purple_smileys_find_by_checksum(checksum)
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
76 const char * checksum
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
77
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
78 const char *
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
79 purple_smileys_get_storing_dir()
6aeeb2037709 Expose smiley API to perl plugins.
Sadrul Habib Chowdhury <sadrul@pidgin.im>
parents:
diff changeset
80

mercurial