1#
2# Copyright (c) 2004, 2008, Oracle and/or its affiliates. All rights reserved.
3#
4
5#
6# Ucred.pm provides the bootstrap for the Sun::Solaris::Ucred module.
7#
8
9require 5.8.4;
10use strict;
11use warnings;
12
13package Sun::Solaris::Ucred;
14
15our $VERSION = '1.3';
16use XSLoader;
17XSLoader::load(__PACKAGE__, $VERSION);
18
19our (@EXPORT_OK, %EXPORT_TAGS);
20my @syscalls = qw(getpeerucred ucred_get);
21my @libcalls = qw(ucred_geteuid ucred_getruid ucred_getsuid ucred_getegid
22	ucred_getrgid ucred_getsgid ucred_getgroups ucred_getprivset
23	ucred_getpflags ucred_getpid ucred_getzoneid ucred_getprojid);
24
25@EXPORT_OK = (@syscalls, @libcalls);
26%EXPORT_TAGS = (SYSCALLS => \@syscalls, LIBCALLS => \@libcalls,
27		ALL => \@EXPORT_OK);
28
29require Exporter;
30
31use base qw(Exporter Sun::Solaris::Privilege);
32
33use Sun::Solaris::Utils qw(gettext);
34
351;
36__END__
37