libpurple/plugins/perl/common/Privacy.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
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::Privacy PACKAGE = Purple::Privacy PREFIX = purple_privacy_
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
15066
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
6 gboolean
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
7 purple_privacy_permit_add(account, name, local_only)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
8 Purple::Account account
15066
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
9 const char * name
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
10 gboolean local_only
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
11
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
12 gboolean
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
13 purple_privacy_permit_remove(account, name, local_only)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
14 Purple::Account account
15066
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
15 const char * name
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
16 gboolean local_only
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
17
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
18 gboolean
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
19 purple_privacy_deny_add(account, name, local_only)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
20 Purple::Account account
15066
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
21 const char * name
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
22 gboolean local_only
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
23
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
24 gboolean
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
25 purple_privacy_deny_remove(account, name, local_only)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
26 Purple::Account account
15066
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
27 const char * name
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
28 gboolean local_only
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
29
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
30 gboolean
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
31 purple_privacy_check(account, who)
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
32 Purple::Account account
15066
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
33 const char * who

mercurial