libpurple/plugins/perl/common/XMLNode.xs

Tue, 18 Aug 2009 06:33:25 +0000

author
Paul Aurich <darkrain42@pidgin.im>
date
Tue, 18 Aug 2009 06:33:25 +0000
changeset 28224
315ba0216ae0
parent 28223
928e9c958b31
child 28393
1f319c8ff5cb
permissions
-rw-r--r--

Add Purple::XMLNode::get_name()

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::XMLNode PACKAGE = Purple::XMLNode PREFIX = xmlnode_
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
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
6 Purple::XMLNode
28223
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
7 xmlnode_copy(src)
15894
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::XMLNode src
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
9
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12364
diff changeset
10 void
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
11 xmlnode_free(node)
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
12 Purple::XMLNode node
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
13
15894
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::XMLNode
28223
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
15 xmlnode_from_str(const char *str, gssize length(str))
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
16 PROTOTYPE: $
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
17
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
18 const char *
28224
315ba0216ae0 Add Purple::XMLNode::get_name()
Paul Aurich <darkrain42@pidgin.im>
parents: 28223
diff changeset
19 xmlnode_get_name(node)
315ba0216ae0 Add Purple::XMLNode::get_name()
Paul Aurich <darkrain42@pidgin.im>
parents: 28223
diff changeset
20 Purple::XMLNode node
315ba0216ae0 Add Purple::XMLNode::get_name()
Paul Aurich <darkrain42@pidgin.im>
parents: 28223
diff changeset
21 CODE:
315ba0216ae0 Add Purple::XMLNode::get_name()
Paul Aurich <darkrain42@pidgin.im>
parents: 28223
diff changeset
22 RETVAL = node->name;
315ba0216ae0 Add Purple::XMLNode::get_name()
Paul Aurich <darkrain42@pidgin.im>
parents: 28223
diff changeset
23 OUTPUT:
315ba0216ae0 Add Purple::XMLNode::get_name()
Paul Aurich <darkrain42@pidgin.im>
parents: 28223
diff changeset
24 RETVAL
315ba0216ae0 Add Purple::XMLNode::get_name()
Paul Aurich <darkrain42@pidgin.im>
parents: 28223
diff changeset
25
315ba0216ae0 Add Purple::XMLNode::get_name()
Paul Aurich <darkrain42@pidgin.im>
parents: 28223
diff changeset
26 const char *
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
27 xmlnode_get_attrib(node, attr)
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
28 Purple::XMLNode node
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
29 const char *attr
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
30
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::XMLNode
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
32 xmlnode_get_child(parent, name)
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
33 Purple::XMLNode parent
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
34 const char *name
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
35
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
36 Purple::XMLNode
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
37 xmlnode_get_child_with_namespace(parent, name, xmlns)
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
38 Purple::XMLNode parent
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
39 const char *name
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
40 const char *xmlns
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
41
15165
0ff631dfbbca [gaim-migrate @ 17889]
Daniel Atallah <datallah@pidgin.im>
parents: 14779
diff changeset
42 gchar_own *
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
43 xmlnode_get_data(node)
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
44 Purple::XMLNode node
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
45
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
46 Purple::XMLNode
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
47 xmlnode_get_next_twin(node)
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::XMLNode node
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
49
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12364
diff changeset
50 void
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
51 xmlnode_insert_child(parent, child)
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
52 Purple::XMLNode parent
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::XMLNode child
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
54
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12364
diff changeset
55 void
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
56 xmlnode_insert_data(node, data, size)
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::XMLNode node
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
58 const char *data
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
59 gssize size
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
60
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
61 Purple::XMLNode
12364
42b44fed7423 [gaim-migrate @ 14668]
Will Thompson <resiak@pidgin.im>
parents: 11290
diff changeset
62 xmlnode_new(class, name)
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
63 const char *name
12364
42b44fed7423 [gaim-migrate @ 14668]
Will Thompson <resiak@pidgin.im>
parents: 11290
diff changeset
64 C_ARGS:
42b44fed7423 [gaim-migrate @ 14668]
Will Thompson <resiak@pidgin.im>
parents: 11290
diff changeset
65 name
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
66
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::XMLNode
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
68 xmlnode_new_child(parent, name)
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
69 Purple::XMLNode parent
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
70 const char *name
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
71
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12364
diff changeset
72 void
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
73 xmlnode_remove_attrib(node, attr)
15894
765ec644ac47 Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents: 15435
diff changeset
74 Purple::XMLNode node
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
75 const char *attr
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
76
12773
1f635f83d71f [gaim-migrate @ 15120]
Etan Reisner <deryni@pidgin.im>
parents: 12364
diff changeset
77 void
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
78 xmlnode_set_attrib(node, attr, 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
79 Purple::XMLNode node
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
80 const char *attr
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
81 const char *value
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
82
15165
0ff631dfbbca [gaim-migrate @ 17889]
Daniel Atallah <datallah@pidgin.im>
parents: 14779
diff changeset
83 gchar_own *
28223
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
84 xmlnode_to_formatted_str(node)
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::XMLNode node
28223
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
86 CODE:
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
87 RETVAL = xmlnode_to_formatted_str(node, NULL);
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
88 OUTPUT:
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
89 RETVAL
11118
36db35a9da56 [gaim-migrate @ 13174]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
90
15165
0ff631dfbbca [gaim-migrate @ 17889]
Daniel Atallah <datallah@pidgin.im>
parents: 14779
diff changeset
91 gchar_own *
28223
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
92 xmlnode_to_str(node)
15894
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::XMLNode node
28223
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
94 CODE:
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
95 RETVAL = xmlnode_to_str(node, NULL);
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
96 OUTPUT:
928e9c958b31 Fix the Perl XMLNode API so that calls don't need to explicitly pass
Etan Reisner <deryni@pidgin.im>
parents: 15894
diff changeset
97 RETVAL

mercurial