diff options
Diffstat (limited to 'perl/rpm.xs')
-rw-r--r-- | perl/rpm.xs | 47 |
1 files changed, 46 insertions, 1 deletions
diff --git a/perl/rpm.xs b/perl/rpm.xs index 1eb8fc0fe..d4c6573f5 100644 --- a/perl/rpm.xs +++ b/perl/rpm.xs @@ -1,7 +1,7 @@ /* * Perl interface to rpmlib * - * $Id: rpm.xs,v 1.2 1999/07/14 17:23:30 gafton Exp $ + * $Id: rpm.xs,v 1.3 1999/07/14 22:06:21 gafton Exp $ */ #include "EXTERN.h" @@ -18,8 +18,14 @@ #include <sys/stat.h> #include <fcntl.h> +typedef rpmTransactionSet_s * Transaction; + +/* + * External functions + */ extern double constant(char *name, int arg); + MODULE = rpm PACKAGE = rpm PROTOTYPES: ENABLE @@ -58,6 +64,10 @@ Header(package) sv_setref_pv(ST(0), "HeaderPtr", (void*)RETVAL); } +Transaction * +Transaction(header) + Header * header + MODULE = rpm PACKAGE = HeaderPtr PREFIX = Header @@ -268,3 +278,38 @@ HeaderTagsRef(header) headerFreeIterator(iterator); OUTPUT: RETVAL + +MODULE = rpm PACKAGE = TransactionPtr PREFIX = Trans + +int +TransAdd(trans, header) + Transaction * trans + Header * header + +int +TransDepCheck(trans) + Transaction * trans + +int +TransRun(trans) + Transaction * trans + +Transaction * +TransOrder(trans) + Transaction *trans + +int +TransDealloc(trans) + Transaction * trans + +int +TransGetAttr(trans, name) + Transaction * trans + const char * name + +int +TransSetAttr(trans, name, val) + Transaction * trans + const char * name + void * val + |