在UNIX(与GNU/Linux相反)中，有listusers命令。有关listusers，请参阅Solaris手册页。

注意，这个命令是开源家宝项目的一部分。我认为它在GNU/Linux中是缺失的，因为RMS不相信组和权限。: -)

在UNIX(与GNU/Linux相反)中，有listusers命令。有关listusers，请参阅Solaris手册页。

注意，这个命令是开源家宝项目的一部分。我认为它在GNU/Linux中是缺失的，因为RMS不相信组和权限。: -)

getent group <groupname>;

它可以在Linux和Solaris上移植，并且可以使用本地组/密码文件、NIS和LDAP配置。

我认为最简单的方法是以下步骤，你不需要安装任何软件包或软件:

首先，你找出你想知道的用户组的GID，有很多方法: cat /etc/group(最后一列是GID) Id用户(用户是属于组的人) 现在，您将在文件/etc/passwd中列出所有用户，但是您将使用以下后续命令应用一些过滤器，以获得前一个组的成员。

cut -d: -f1,4 /etc/passwd |grep GID (GID是你从步骤1中得到的数字)

切命令将选择一些“列”的文件,参数d设置分隔符”:“在这种情况下,参数- f选择“字段”(或列)在案例1和4所示(在/ etc / passwd文件,1º列是用户的名称和4º是用户所属的组的GID),完成| grep GID将滤波器组(4º列),你选择了。

lid -g groupname | cut -f1 -d'(' 

不幸的是，据我所知，没有好的、可移植的方法来做到这一点。如果您尝试解析/etc/group，就像其他人建议的那样，您将会错过那些将该组作为主要组的用户，以及通过UNIX平面文件以外的机制(即LDAP、NIS、pam-pgsql等)添加到该组的任何用户。

如果我必须自己做这件事，我可能会反过来做:使用id获取系统上每个用户的组(这将拉出对NSS可见的所有源)，并使用Perl或类似的东西为发现的每个组维护一个哈希表，并指出该用户的成员。

编辑:当然，这给您留下了一个类似的问题:如何获得系统上每个用户的列表。由于我的位置只使用平面文件和LDAP，所以我只能从两个位置获得一个列表，但对于您的环境可能是这样，也可能不是这样。

编辑2:有人提醒我，getent passwd将返回系统中所有用户的列表，包括来自LDAP/NIS/等的用户。，但getent组仍然会错过仅通过默认组条目成为成员的用户，所以这激发了我写这个快速破解。

#!/usr/bin/perl -T
#
# Lists members of all groups, or optionally just the group
# specified on the command line
#
# Copyright © 2010-2013 by Zed Pobre (zed@debian.org or zed@resonant.org)
#
# Permission to use, copy, modify, and/or distribute this software for any
# purpose with or without fee is hereby granted, provided that the above
# copyright notice and this permission notice appear in all copies.
#

use strict; use warnings;

$ENV{"PATH"} = "/usr/bin:/bin";

my $wantedgroup = shift;

my %groupmembers;
my $usertext = `getent passwd`;

my @users = $usertext =~ /^([a-zA-Z0-9_-]+):/gm;

foreach my $userid (@users)
{
    my $usergrouptext = `id -Gn $userid`;
    my @grouplist = split(' ',$usergrouptext);

    foreach my $group (@grouplist)
    {
        $groupmembers{$group}->{$userid} = 1;
    }
}

if($wantedgroup)
{
    print_group_members($wantedgroup);
}
else
{
    foreach my $group (sort keys %groupmembers)
    {
        print "Group ",$group," has the following members:\n";
        print_group_members($group);
        print "\n";
    }
}

sub print_group_members
{
    my ($group) = @_;
    return unless $group;

    foreach my $member (sort keys %{$groupmembers{$group}})
    {
        print $member,"\n";
    }
}