libpurple/plugins/perl/common/Notify.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 32204
2a09624616c3
child 34449
bbcb198650b7
permissions
-rw-r--r--

Added ciphers and hashes _new functions to .xs files

11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
1 #include "module.h"
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
2
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
3 MODULE = Purple::Notify PACKAGE = Purple::Notify PREFIX = purple_notify_
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
4 PROTOTYPES: ENABLE
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
5
16773
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
6 BOOT:
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
7 {
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
8 HV *type_stash = gv_stashpv("Purple::Notify::Type", 1);
24597
66f817bb9805 Simon Ruderich points out that Purple::Notify::Msg was incorrectly stashed.
Ethan Blanton <elb@pidgin.im>
parents: 23987
diff changeset
9 HV *msg_type_stash = gv_stashpv("Purple::Notify::Msg", 1);
16773
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
10 HV *user_info_stash = gv_stashpv("Purple::NotifyUserInfo::Type", 1);
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
11
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
12 static const constiv *civ, type_const_iv[] = {
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
13 #define const_iv(name) {#name, (IV)PURPLE_NOTIFY_##name}
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
14 const_iv(MESSAGE),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
15 const_iv(EMAIL),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
16 const_iv(EMAILS),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
17 const_iv(FORMATTED),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
18 const_iv(SEARCHRESULTS),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
19 const_iv(USERINFO),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
20 const_iv(URI),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
21 };
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
22 static const constiv msg_type_const_iv[] = {
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
23 #undef const_iv
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
24 #define const_iv(name) {#name, (IV)PURPLE_NOTIFY_MSG_##name}
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
25 const_iv(ERROR),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
26 const_iv(WARNING),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
27 const_iv(INFO),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
28 };
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
29 static const constiv user_info_const_iv[] = {
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
30 #undef const_iv
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
31 #define const_iv(name) {#name, (IV)PURPLE_NOTIFY_USER_INFO_ENTRY_##name}
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
32 const_iv(PAIR),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
33 const_iv(SECTION_BREAK),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
34 const_iv(SECTION_HEADER),
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
35 };
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
36
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
37 for (civ = type_const_iv + sizeof(type_const_iv) / sizeof(type_const_iv[0]); civ-- > type_const_iv; )
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
38 newCONSTSUB(type_stash, (char *)civ->name, newSViv(civ->iv));
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
39
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
40 for (civ = msg_type_const_iv + sizeof(msg_type_const_iv) / sizeof(msg_type_const_iv[0]); civ-- > msg_type_const_iv; )
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
41 newCONSTSUB(msg_type_stash, (char *)civ->name, newSViv(civ->iv));
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
42
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
43 for (civ = user_info_const_iv + sizeof(user_info_const_iv) / sizeof(user_info_const_iv[0]); civ-- > user_info_const_iv; )
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
44 newCONSTSUB(user_info_stash, (char *)civ->name, newSViv(civ->iv));
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
45 }
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
46
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12242
diff changeset
47 void
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
48 purple_notify_close(type, ui_handle)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
49 Purple::NotifyType type
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12242
diff changeset
50 void * ui_handle
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
51
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12242
diff changeset
52 void
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
53 purple_notify_close_with_handle(handle)
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12242
diff changeset
54 void * handle
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
55
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
56 void *
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
57 purple_notify_email(handle, subject, from, to, url, cb, user_data)
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12242
diff changeset
58 void * handle
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
59 const char *subject
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
60 const char *from
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
61 const char *to
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
62 const char *url
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
63 Purple::NotifyCloseCallback cb
12242
e7fc1748eb56 [gaim-migrate @ 14544]
Richard Laager <rlaager@pidgin.im>
parents: 12235
diff changeset
64 gpointer user_data
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
65
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
66 void *
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
67 purple_notify_emails(handle, count, detailed, subjects, froms, tos, urls, cb, user_data)
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12242
diff changeset
68 void * handle
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
69 size_t count
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
70 gboolean detailed
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
71 const char **subjects
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
72 const char **froms
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
73 const char **tos
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
74 const char **urls
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
75 Purple::NotifyCloseCallback cb
12242
e7fc1748eb56 [gaim-migrate @ 14544]
Richard Laager <rlaager@pidgin.im>
parents: 12235
diff changeset
76 gpointer user_data
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
77
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
78 void *
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
79 purple_notify_formatted(handle, title, primary, secondary, text, cb, user_data)
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12242
diff changeset
80 void * handle
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
81 const char *title
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
82 const char *primary
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
83 const char *secondary
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
84 const char *text
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
85 Purple::NotifyCloseCallback cb
12242
e7fc1748eb56 [gaim-migrate @ 14544]
Richard Laager <rlaager@pidgin.im>
parents: 12235
diff changeset
86 gpointer user_data
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
87
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
88 void *
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
89 purple_notify_userinfo(gc, who, user_info, cb, user_data)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
90 Purple::Connection gc
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
91 const char *who
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
92 Purple::NotifyUserInfo user_info
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
93 Purple::NotifyCloseCallback cb
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
94 gpointer user_data
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
95
16774
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
96 void *
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
97 purple_notify_message(handle, type, title, primary, secondary, cb, user_data)
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
98 void * handle
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
99 Purple::NotifyMsgType type
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
100 const char *title
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
101 const char *primary
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
102 const char *secondary
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
103 Purple::NotifyCloseCallback cb
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
104 gpointer user_data
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
105
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
106 void *
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
107 purple_notify_searchresults(gc, title, primary, secondary, results, cb, user_data)
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
108 Purple::Connection gc
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
109 const char *title
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
110 const char *primary
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
111 const char *secondary
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
112 Purple::NotifySearchResults results
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
113 Purple::NotifyCloseCallback cb
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
114 gpointer user_data
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
115
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
116 void *
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
117 purple_notify_uri(handle, uri)
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
118 void * handle
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
119 const char *uri
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
120
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
121 MODULE = Purple::Notify PACKAGE = Purple::NotifyUserInfo PREFIX = purple_notify_user_info_
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
122 PROTOTYPES: ENABLE
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
123
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
124 Purple::NotifyUserInfo
16774
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
125 purple_notify_user_info_new(class)
064f0b6c87a5 Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents: 16773
diff changeset
126 C_ARGS: /* void */
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
127
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
128 void
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
129 purple_notify_user_info_destroy(user_info)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
130 Purple::NotifyUserInfo user_info
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
131
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
132 void
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
133 purple_notify_user_info_get_entries(user_info)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
134 Purple::NotifyUserInfo user_info
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
135 PREINIT:
18190
bcf28ef7e8ff Re-fix the DBus list handling code by killing const GList* / const GSList*
Richard Laager <rlaager@pidgin.im>
parents: 16774
diff changeset
136 GList *l;
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
137 PPCODE:
32193
42173d1c1317 Change PurpleNotifyUserInfo->user_info_entries from a GList to a GQueue.
Mark Doliner <markdoliner@pidgin.im>
parents: 32192
diff changeset
138 l = purple_notify_user_info_get_entries(user_info)->head;
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
139 for (; l != NULL; l = l->next) {
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
140 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::NotifyUserInfoEntry")));
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
141 }
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
142
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
143 gchar_own *
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
144 purple_notify_user_info_get_text_with_newline(user_info, newline)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
145 Purple::NotifyUserInfo user_info
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
146 const char *newline
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
147
32192
e72cf5c45d78 Fix perl compilation. I really wish the .c files regenerated with the
Mark Doliner <markdoliner@pidgin.im>
parents: 24597
diff changeset
148 void purple_notify_user_info_add_pair_html(user_info, label, value)
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
149 Purple::NotifyUserInfo user_info
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
150 const char *label
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
151 const char *value
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
152
32204
2a09624616c3 Actually commit the purple_notify_user_info_prepend_pair_plaintext
Mark Doliner <markdoliner@pidgin.im>
parents: 32193
diff changeset
153 void purple_notify_user_info_prepend_pair_html(user_info, label, value)
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
154 Purple::NotifyUserInfo user_info
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
155 const char *label
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
156 const char *value
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
157
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
158 void purple_notify_user_info_add_section_break(user_info)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
159 Purple::NotifyUserInfo user_info
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
160
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
161 void purple_notify_user_info_add_section_header(user_info, label)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
162 Purple::NotifyUserInfo user_info
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
163 const char *label
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
164
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
165 void purple_notify_user_info_remove_last_item(user_info)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
166 Purple::NotifyUserInfo user_info
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
167
22843
494d03e9a2fd Shut up two compiler warnings about discarding qualifiers.
Etan Reisner <deryni@pidgin.im>
parents: 18190
diff changeset
168 const gchar *
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
169 purple_notify_user_info_entry_get_label(user_info_entry)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
170 Purple::NotifyUserInfoEntry user_info_entry
15266
a168574c18d2 [gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents: 14254
diff changeset
171
22843
494d03e9a2fd Shut up two compiler warnings about discarding qualifiers.
Etan Reisner <deryni@pidgin.im>
parents: 18190
diff changeset
172 const gchar *
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
173 purple_notify_user_info_entry_get_value(user_info_entry)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
174 Purple::NotifyUserInfoEntry user_info_entry

mercurial