libpurple/plugins/perl/common/Notify.xs

Thu, 30 Oct 2008 22:40:49 +0000

author
Richard Laager <rlaager@pidgin.im>
date
Thu, 30 Oct 2008 22:40:49 +0000
changeset 24569
5dbd0617a27d
parent 23987
3d41ccd1f8bf
child 24597
66f817bb9805
permissions
-rw-r--r--

Build everything with the *_DISABLE_DEPRECATED flags set. This allows us
to detect when we're still using deprecated functions internally (and by
extension, when we've deprecated something we shouldn't have). In the
course of developing this changeset, I fixed a few such cases.

Given that the plan is to switch from PURPLE_HIDE_STRUCTS to
PURPLE_DISABLE_DEPRECATED as each struct is fully dealt with, this will
also ensure we have no regressions on the struct hiding work.

Deprecated functions are still available to the respective .c file, to
avoid missing prototype errors. Also, Perl and DBus undef the
*_DISABLE_DEPRECATED defines as appropriate so that deprecated functions
will still be exported to Perl plugins and via DBus. (Otherwise, we'd
be breaking backwards compatibility.)

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);
e1171eb45f07 Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
9 HV *msg_type_stash = gv_stashpv("Purple::Notify:Msg", 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
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:
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
138 l = purple_notify_user_info_get_entries(user_info);
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
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
148 void purple_notify_user_info_add_pair(user_info, label, value)
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
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
153 void purple_notify_user_info_prepend_pair(user_info, label, value)
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