ท้าทาย

กำหนดหมายเลขการอนุญาตเลขฐานแปดสามหลักให้ส่งออกการอนุญาตที่ได้รับ

chmod

บน UNIX OS การอนุญาตของไฟล์จะเปลี่ยนไปโดยใช้chmodคำสั่ง มีวิธีการใช้ chmod ที่แตกต่างกันเล็กน้อย แต่วิธีที่เราจะเน้นในวันนี้คือการใช้การอนุญาตแบบฐานแปด

ตัวเลขสามหลักในหมายเลขสิทธิ์แสดงถึงบุคคลอื่น:

• ตัวเลขตัวแรกแสดงถึงการอนุญาตสำหรับผู้ใช้
• ตัวเลขตัวที่สองหมายถึงการอนุญาตสำหรับกลุ่ม
• ตัวเลขสุดท้ายแสดงสิทธิ์ของผู้อื่น

ถัดไปแต่ละหลักหมายถึงสิทธิ์ที่แสดงด้านล่างใน:

Key: number | permission

7 | Read Write and Execute
6 | Read and Write
5 | Read and Execute
4 | Read only
3 | Write and Execute
2 | Write only
1 | Execute only
0 | None

อินพุต

อินพุตจะเป็นตัวเลขสามหลักเป็นสตริงเช่น:

133

หรือ

007

สิ่งนี้จะถูกส่งผ่าน STDIN หรือผ่านอาร์กิวเมนต์ของฟังก์ชัน

เอาท์พุต

ผลลัพธ์ของคุณควรได้รับการอนุญาตแตกต่างกันสำหรับผู้ใช้แต่ละคนกลุ่มและคนอื่น คุณต้องแสดงข้อมูลเช่นนี้:

User:   ddd
Group:  ddd
Others: ddd

ในกรณีที่มีสามช่องหลังจากที่Userสองหลังจากที่ช่องว่างและเป็นหนึ่งในช่องว่างหลังGroup Othersคุณแทนที่dddด้วยข้อมูลสิทธิ์

เอาต์พุตของคุณอาจเป็น STDOUT หรือเป็นสตริงที่ส่งคืน

ตัวอย่าง

อินพุต: 666

เอาท์พุท:

User:   Read and Write
Group:  Read and Write
Others: Read and Write

อินพุต: 042

เอาท์พุท:

User:   None
Group:  Read only
Others: Write only

อินพุต: 644

เอาท์พุท:

User:   Read and Write
Group:  Read only
Others: Read only

การชนะ

รหัสที่สั้นที่สุดในหน่วยไบต์ชนะ

05AB1E , 89 87 ไบต์

”‚Ý:‚Ù:ˆ†:”ð¡v”Šª0ÍÃ20‡í20‡í1ÍÃ0‚Ø20‚Ø1ÍÃ0‚Ø1‡í0‚؇í1ÍÔ2ð'€É«:1ð'€ƒ«:0ð«¡¹Nèèð3N-×ìyì,

เรียกการเข้ารหัสคธูลู ใช้การเข้ารหัสCP-1252 ลองออนไลน์!

Javascript (ES6), 165 161 ไบต์

n=>[0,1,2].map(i=>(s='User:  3Group: 68Others:58None576Read48Write476Execute475and4576only'.split(/(\d+)/))[i*2]+s[n[i]*2+1].replace(/./g,c=>' '+s[c*2])).join`
`

แก้ไข: +1 ไบต์เพื่อทำตามกฎ "ไม่มีแท็บ"

ตัวอย่าง

let f =
n=>[0,1,2].map(i=>(s='User:  3Group: 68Others:58None576Read48Write476Execute475and4576only'.split(/(\d+)/))[i*2]+s[n[i]*2+1].replace(/./g,c=>' '+s[c*2])).join`
`
console.log(f("666"));
console.log(f("042"));
console.log(f("644"));
console.log(f("137"));

รุ่น GNU, 187 163 158 (157 + 1) ไบต์

รันด้วย-r (ERE regexp) ไฟล์ไม่มีการขึ้นบรรทัดใหม่

s/(.)(.)/User:   \1\nGroup:  \2\nOthers: /g
s/[4-7]/Read &/g
s/[2367]/Write &/g
s/[1357]/Execute &/g
s/(\w) (\w+) [1-7]/\1 and \2/g
s/[1-7]/only/g
s/0/None/g

C # 214 ไบต์

string h(string y){string e="Execute ",r="Read ",w="Write ",O="Only",a="and ";var z=new[]{"None",e+O,w+O,w+a+e,r+O,r+a+e,r+a+w,r+w+a+e};return$"User:   {z[y[0]-'0']}\nGroup:  {z[y[1]-'0']}\nOthers: {z[y[2]-'0']}";}

เยลลี่ , 100 91 85 ไบต์

^{สามารถเล่นกอล์ฟได้เกือบแน่นอน - 91 ไบต์อะไรนะ!} 8 เดือนกับ 6 ภูมิปัญญาไบต์!
- 1. การบีบอัดสตริงเพิ่มเติม
- 2. ลบการลดลงของ post-ordinal 48 เนื่องจากการทำดัชนีเป็นโมดุล
- 3. ใช้การผูกมัดที่ดีกว่าโดยปริยาย)

-9 bytes ด้วยความช่วยเหลือจาก @Lynn ที่ใช้การบีบอัดสตริงสำหรับฉัน

,“£ɱ~»
Ñ
ṖK,“ and”,Ṫ
LĿK
7RBUT€Uị“ØJƓ“¥Ị£“¤/¡»Ç€“¡*g»ṭ
“ṖŒhJ"ỵd¡»ḲðJ4_⁶ẋ⁸,"j€”:ż⁹Oị¢¤Y

ทดสอบที่TryItOnline

อย่างไร?

,“£ɱ~» - Link 1: pair with the string "Only"

Ñ - Link 2: call next link

ṖK,“ and”,Ṫ - Link 3: insert " and" between the last two elements of x
Ṗ           - x[:-1]
 K          - join with spaces
   “ and”   - the string " and"
          Ṫ - x[-1]
  ,      ,  - pair

LĿK - Link 4: call appropriate link and add missing spaces
L   - length
 Ŀ  - call link at that index
  K - join the result with spaces

7RBUT€Uị“ØJƓ“¥Ị£“¤/¡»Ç€“¡*g»ṭ - Link 5: construct all 8 cases
7R                            - range of 7: [1,2,3,4,5,6,7]
  B                           - binary (vectorises): [[1],[1,0],[1,1],[1,0,0],[1,0,1],[1,1,0],[1,1,1]]
   U                          - reverse (vectorises): [[1],[0,1],[1,1],[0,0,1],[1,0,1],[0,1,1],[1,1,1]]
    T€                        - indexes of truthy values for each: [[1],[2],[1,2],[3],[1,3],[2,3],[1,2,3]]
      U                       - reverse (vectorises): [[1],[2],[2,1],[3],[3, 1],[3,2],[3,2,1]]
        “ØJƓ“¥Ị£“¤/¡»         - list of strings: ["Execute","Write","Read"]
       ị                      - item at index (vectorises): [["Execute"],["Write"],["Write","Execute"],["Read"],["Read","Execute",["Read","Write"],["Read","Write","Execute"]]
                     ǀ       - call the previous link for each
                       “¡*g»  - the string "None"
                            ṭ - tack (Jelly is 1-based so the 8th item will be indexed as 0)

“ṖŒhJ"ỵd¡»ḲðJṚ⁶ẋ⁸,"j€”:ż⁹Oị¢¤Y - Main Link: parse input and make the result. e.g.: "042"
“ṖŒhJ"ỵd¡»                     - dictionary compression of "User Group Others"
          Ḳ                    - split at spaces -> ["User","Group","Others"]
           ð                   - dyadic chain separation, call that g (input as right)
            J                  - range of length of g -> [1,2,3]
             Ṛ                 - reverse -> [3,2,1]
              ⁶                - literal space
               ẋ               - repeat -> ["   ","  "," "]
                ⁸              - chain's left argument, g
                  "            - zip with:
                 ,             -   pair -> [["User","   "],["Group","  "],["Others"," "]]
                     ”:        - literal ':'
                   j€          - join for €ach -> ["User:   ","Group:  ","Others: "]
                            ¤  - nilad followed by link(s) as a nilad:
                        ⁹      - chain's right argument, the input string -> "042"
                         O     -   cast to ordinal (vectorises) -> [48, 52, 50]
                           ¢   -   call last link (5) as a nilad  -> ["Execute Only","Write Only","Write and Execute","Read Only","Read and Execute","Read and Write","Read Write and Execute","None"]
                          ị    -   index into (1-based & modular) -> ["None","Read Only","Write Only"]
                       ż       - zip together -> [["User:   ","None"],["Group:  ","Read Only"],["Others: ","Write Only"]]
                             Y - join with line feeds -> ["User:   ","None",'\n',"Group:  ","Read Only",'\n',"Others: ","Write Only"]
                               - implicit print:
                                             >>>User:   None
                                             >>>Group:  Read Only
                                             >>>Others: Write Only

อ็อกเทฟ 185 ไบต์

@(n)fprintf('User:   %s\nGroup:  %s\nOthers: %s',{'Read Write and Execute','Read and Write','Read and Execute','Read only','Write and Execute','Write only','Execute only','None'}{56-n})

สร้างฟังก์ชั่นที่ไม่ระบุชื่อที่รับอินพุตเป็นสตริง: '042' แปลงเป็นอาร์เรย์: (56-'042)' = [0 4 2]. Read Write and Execute','Read and Write', ...ใช้สิ่งนี้เป็นดัชนีมือถือหลายที่ดัชนีอาร์เรย์เซลล์ที่มี ใช้fprintfการส่งออกทั้งสามสายกับประเภทที่เหมาะสม: User:, และGroup:Others:

ฉันพยายามหาวิธีที่จะเก็บExecute, Write, Readเป็นคำที่แยกต่างหากและ concatenate ตามความจำเป็น แต่เปิดออกมานานกว่าวิธีการที่ไร้เดียงสา

ตัวอย่าง:

1> f('000')
User:   None
Group:  None
Others: None
2> f('042')
User:   None
Group:  Read only
Others: Write only

ลองออนไลน์

PowerShell v2 +, 189 168 ไบต์

[char[]]$args[0]|%{('User','Group','Others')[$i++]+":`t"+('None','Read','Write','Execute','only','and')[(0,(3,4),(2,4),(2,5,3),(1,4),(1,5,3),(1,5,2),(1,2,5,3))[$_-48]]}

วนซ้ำผ่านอินพุต$args[0]เป็นchar-array แต่ละซ้ำดัชนีเราเข้าแถวกับ$i++(ค่าเริ่มต้น0) เพื่อเลือกUser, GroupหรือOthers, concatenate กับลำไส้ใหญ่และแท็บและ concatenate ที่มีค่าดัชนีอาร์เรย์อีก

นี่คือความมหัศจรรย์ เราส่งคำcharสั่ง a ไปยังintและลบ48(เช่นเปลี่ยน ASCII 48( "0") เป็น0) โดยเลือกคำที่เหมาะสมเป็นอาร์เรย์ของints อาร์เรย์นั้นจะถูกใช้เป็นดัชนีใน'None','Read','Write','Execute','only','and'อาร์เรย์ เนื่องจากค่าเริ่มต้น$ofs(ตัวคั่นฟิลด์ผลลัพธ์) เป็นช่องว่างสิ่งนี้จะแทรกช่องว่างระหว่างองค์ประกอบอาเรย์อย่างถูกต้องเมื่อเกิดการทำให้เป็นสตริง (ซึ่งเกิดขึ้นเมื่อเชื่อมต่อทางด้านซ้าย)

สามสตริงเหล่านี้จะถูกทิ้งไว้ที่ไพพ์ไลน์และเอาต์พุตผ่านทาง implicit Write-Outputเกิดขึ้นเมื่อโปรแกรมเสร็จสิ้น

ตัวอย่าง

PS C:\Tools\Scripts\golfing> .\decode-the-chmod.ps1 '123'
User:   Execute only
Group:  Write only
Others: Write and Execute

สตรอเบอร์รี่ , 193 ไบต์

((01234567)((None)(Execute only)(Write only)(Write and Execute)(Read only)(Read and Execute)(Read and Write)(Read Write and Execute)))::~<:{-¢(User:   ),+>
>}:{-¢(Group:  ),+>
>}-¢(Others: ),+>

ลองออนไลน์

กด 3 เท่าของตารางการแปลงบนสแต็กแรกสลับเป็นสแต็กที่สองแปลงแต่ละตัวเลขโดยใช้ตารางการสนทนาและพิมพ์

Haskell, 186 ไบต์

s=zip(words"7654 6 7632 753 7531 0 421")(words"Read and Write and Execute None only")
m c=mapM_(\(x,y)->putStrLn(x++unwords[b|(a,b)<-s,elem y a]))$zip["User:   ","Group:  ","Others: "]c

ตัวอย่าง:

Prelude> :r
[1 of 1] Compiling Main             ( decCh.hs, interpreted )
Ok, modules loaded: Main.
*Main> m "654"
User:   Read and Write
Group:  Read and Execute
Others: Read only

โหมโรงเท่านั้นที่ใช้ ฉันทำสิ่งนี้ถูกไหม?

Ungolfed:

s = zip (words "7654 6 7632 753 7531 0 421")
        (words "Read and Write and Execute None only")

ps y = unwords [b|(a,b)<-s,elem y a] -- build permissions string
pp (x,y) = putStrLn $ x ++ ps y -- print user + permission

m c =   let up = zip ["User:   ","Group:  ","Others: "] c -- pair user and permission
        in mapM_ pp up --print each

Python 2, 190 185 ไบต์

def f(i):
 r,w,a,x,o,g="Read ","Write ","and ","Execute ","only",["User:  ","Group: ","Others:"];p=["None",x+o,w+o,w+a+x,r+o,r+a+x,r+a+w,r+w+a+x]
 for z in 0,1,2:print g[z],p[int(i[z])]

ออกจากพื้นที่ต่อท้ายหากดำเนินการหรือเขียนอยู่ที่ท้ายบรรทัด แต่ฉันไม่เห็นว่าสิ่งนี้ไม่ได้รับอนุญาต

แก้ไขบันทึก 5 ไบต์ด้วยการเปลี่ยนช่วง (3) เป็น 0,1,2 และตรวจสอบจำนวนไบต์บนแล็ปท็อป Linux ของฉันแทน Windows หนึ่ง (\ n = \ r \ n หรือวิธีอื่น ๆ ฉันไม่สามารถจำได้)

Python 2, 240 239 238 237 228 ไบต์

ฉันคิดว่าในที่สุดฉันก็จะออกไปเล่นกอล์ฟเย็น หวังว่าจะอนุญาตช่องว่างต่อท้ายได้ (คงที่และในกระบวนการบันทึกเป็นไบต์)

i=0
def a(b):
 for d in 4,2,1:
    if b&d:yield('Execute','Write','Read')[d/2]
for k in raw_input():
 b,q=list(a(int(k))),' and';e=len(b)
 if e:b[~e/2]+=(' only',q,q)[e-1]
 print'UGOsrteohrue:pr :s  :'[i::3],' '.join(b)or None;i+=1

PHP, 169 159 ไบต์

foreach([User,Group,Others]as$i=>$u){echo"
$u: ";for($n=[5,33,34,66,35,67,131,531][$i]];$n;$n>>=3)echo["and",Execute,Write,Read,only,None][$n&7]," ";}

ใช้เวลาสตริงเป็นอาร์กิวเมนต์บรรทัดคำสั่ง: php -r '<code>' <argument>,
พิมพ์ชั้นนำขึ้นบรรทัดใหม่แทนการลากหนึ่ง

ขอขอบคุณที่Jörgสำหรับการชี้ให้เห็นข้อบกพร่องของฉัน - \tและสำหรับ

PHP, 169 ไบต์

ด้วยข้อ จำกัด ใหม่: (ห้ามใช้อักขระแท็บ)

foreach(['User:  ','Group: ','Others:']as$i=>$u){echo"
$u";for($n=[5,33,34,66,35,67,131,531][$argv[1][$i]];$n;$n>>=3)echo' ',['and',Read,Write,Execute,only,None][$n&7];}

นี่คือ 1 ไบต์ที่สั้นกว่าด้วยstr_padเนื่องจากจะต้องมีช่องว่างเพิ่มเติม

ทำให้พังถล่ม

foreach([User,Group,Others]as$i=>$u)
{
    echo"\n$u:\t";                      // print newline, who, blanks
    for($n=[5,33,34,66,35,67,131,531]   // octal values for words indexes
        [$argv[1][$i]]                  // (last word=highest digit)
        ;$n;$n>>=3)                     // while value has bits left
        echo['and',Execute,Write,Read,only,None][$n&7]," "; // print that word
}

ในการสร้างอาร์เรย์ให้$nใช้:

$b=[[5],[1,4],[2,4],[2,0,1],[3,4],[3,0,1],[3,0,2],[3,2,0,1]];
foreach($b as$i=>$a){for($v=$j=0;$a;$j+=3)$v+=array_shift($a)<<$j;echo"$v,";}

ทุบตี - 221 213 ไบต์

GNU bash, version 4.3.46

l=("User:   " "Group:  " "Others: ")
o=\ only;a=" and ";x=Execute;w=Write;r=Read
b=(None "$x$o" "$w$o" "$w$a$x" "$r$o" "$r$a$x" "$r$a$w" "$r $w$a$x")
for c in `echo $1|grep -o .`;{ echo "${l[$((z++))]}${b[$c]}";}

ไม่ชัดเจนว่าสิ่งนี้จะรวมตัวกันเพิ่มเติมใด ๆ อย่างน้อยก็ไม่ได้โดยไม่ต้องเปลี่ยนวิธีการที่นี่ (แยกอินพุตและใช้มันเป็นดัชนีไปยังอาร์เรย์${b}ที่มีสตริงที่สอดคล้องกัน)

Java 7, 300 284 ไบต์

String c(String s){char[]a=s.toCharArray();return"User:   "+f(a[0])+"Group:  "+f(a[1])+"Others: "+f(a[2]);}String f(int i){return new String[]{"None","Execute only","Write only","Write and Execute","Read only","Read and Execute","Read and Write","Read Write and Execute"}[i%48]+"\n";}

วิธีการโดยตรงสำหรับตอนนี้ จะพยายามคิดหาวิธีทั่วไปที่จะนำคำมาใช้ซ้ำ

กรณีที่ไม่ได้รับการทดสอบ &:

ลองที่นี่

class M{
  static String c(String s){
    char[] a = s.toCharArray();
    return "User:   " + f(a[0]) + "Group:  " + f(a[1]) + "Others: " + f(a[2]);
  }

  static String f(int i){
    return new String[]{ "None", "Execute only", "Write only", "Write and Execute", "Read only", "Read and Execute", "Read and Write", "Read Write and Execute" }
      [i % 48] + "\n";
  }

  public static void main(String[] a){
    System.out.println(c("666"));
    System.out.println(c("042"));
    System.out.println(c("644"));
  }
}

เอาท์พุท:

User:   Read and Write
Group:  Read and Write
Others: Read and Write

User:   None
Group:  Read only
Others: Write only

User:   Read and Write
Group:  Read only
Others: Read only

Groovy, 217 207 205 ไบต์

def c(m){def i=0,e='Execute',w='Write',r='Read',o=' only',a=' and ';m.each{println(['User:   ','Group:  ','Others: '][i++]+['None',"$e$o","$w$o","$w$a$e","$r$o","$r$a$e","$r$a$w","$r $w$a$e"][it as int])}}

ungolfed:

def c(m) {
  def i=0,e='Execute',w='Write',r='Read',o=' only',a=' and ';
  m.each{
    println(['User:   ','Group:  ','Others: '][i++]+['None',"$e$o","$w$o","$w$a$e","$r$o","$r$a$e","$r$a$w","$r $w$a$e"][it as int])
  }
}

Mathematica, 211 ไบต์

{r,w,e,o,a}={"Read ","Write ","Execute ","only ","and "};""<>Transpose@{{"User:   ","Group:  ","Others: "},"None"[{e,o},{w,o},{w,a,e},{r,o},{r,a,e},{r,a,w},{r,w,a,e}][[#]]&/@IntegerDigits[#,10,3],"\n"&~Array~3}&

การใช้งานที่ตรงไปตรงมา (อาจเอาชนะได้ง่าย): ไม่คำนวณอะไรเลยเพียงแค่ใส่โค้ดที่ยากที่สุดในแต่ละเอาต์พุต อินพุตเป็นจำนวนเต็ม เอาต์พุตแต่ละบรรทัดด้วยช่องว่างต่อท้ายและการขึ้นบรรทัดใหม่โดยรวม

IntegerDigits[#,10,3]ให้ตัวเลขสามหลักของอินพุต (แม้ว่าจะมีศูนย์นำหน้า) แต่ละหลักหมายถึงการโต้แย้งของ "ฟังก์ชั่น"

"None"[{e,o},{w,o},{w,a,e},{r,o},{r,a,e},{r,a,w},{r,w,a,e}]

ด้วย 0 ระบุชื่อฟังก์ชั่นของตัวเอง ""<>เชื่อมสตริงทั้งหมดในรายการ (ของรายการ) "\n"&~Array~3สร้างสามบรรทัดใหม่

Java 7, 278

แข็งแรงเล่นกอล์ฟ:

String f(String i){String o="";for(int n=0;n<i.length();)o+=(n<1?"User:   ":n<2?"Group:  ":"Others: ")+new String[]{"None","Execute only","Write only","Write and Execute","Read only","Read and Execute","Read and Write","Read Write and Execute"}[i.charAt(n++)-48]+"\n";return o;}

Ungolfed:

  String f(String i) {
    String o = "";
    for (int n = 0; n < i.length();)
      o += (n < 1 ? "User:   " : n < 2 ? "Group:  " : "Others: ")
        + new String[] { "None", "Execute only", "Write only", "Write and Execute", "Read only", "Read and Execute",
            "Read and Write", "Read Write and Execute" }[i.charAt(n++) - 48]
        + "\n";
    return o;
  }

เอาท์พุท:

User:   Read and Write
Group:  Read and Write
Others: Read and Write

User:   None
Group:  Read only
Others: Write only

User:   Read and Write
Group:  Read only
Others: Read only

Python 3.5, 3.6 - 235 232 228 216 ไบต์

(ควรทำงานกับ Python 3.x ทั้งหมด)

ดังนั้นอินพุตอยู่ที่ STDIN ที่นี่ (บันทึกการนำเข้า☺)

a=input()
r=range
for i in r(3):
 p=int(a[i]);x=[["Read","Write","Execute"][j]for j in r(3)if 4>>j&p]
 if x[1:]:x[-1:-1]="and",
 if len(x)==1:x+="only",
 print(["User:  ","Group: ","Others:"][i]," ".join(x)or"None")

การใช้ประโยชน์จากสิ่งอันดับ, เว้นช่องว่างที่เป็นไปได้และผู้ประกอบการที่มีความสำคัญที่คุณมักจะใส่วงเล็บเพื่อให้ความตั้งใจของคุณชัดเจน

ตัวอย่างการใช้งาน:

$ echo -n '666' | python3 golf2.py
User:   Read and Write
Group:  Read and Write
Others: Read and Write
$ echo -n '644' | python3 golf2.py
User:   Read and Write
Group:  Read only
Others: Read only
$ echo '042' | python3 golf2.py
User:   None
Group:  Read only
Others: Write only
$ echo '123' | python3 golf2.py
User:   Execute only
Group:  Write only
Others: Write and Execute
$ echo -n '777' | python3 golf2.py
User:   Read Write and Execute
Group:  Read Write and Execute
Others: Read Write and Execute

ยกเลิกแข็งแรงเล่นกอล์ฟ:

input_perms = list(map(int, input()))

entities = ["User", "Group", "Others"]
perm_names = ["Read", "Write", "Execute"]

for i in range(3):
    bits = input_perms[i]
    perms = [
        perm_names[j]
        for j in range(3)
        if (1 << (2-j)) & bits
    ]

    if len(perms) > 1:
        perms.insert(-1, "and")
    if len(perms) == 1:
        perms.append("only")

    print("{:7} {}".format(
        entities[i]+":",
        " ".join(perms) or "None"
    ))

แบตช์ 280 ไบต์

@echo off
set/pc=
call:l "User:   " %c:~0,1%
call:l "Group:  " %c:~1,1%
call:l "Others: " %c:~2,1%
exit/b
:l
for %%s in (None.0 Execute.1 Write.2 "Write and Execute.3" Read.4 "Read and Execute.5" "Read and Write.6" "Read Write and Execute.7") do if %%~xs==.%2 echo %~1%%~ns

Hardcoding สตริงนั้นสั้นกว่า 47 ไบต์เมื่อพยายามรวมเข้าด้วยกัน น่าจะเป็น 267 ไบต์หากแท็บถูกกฎหมาย

C # 307 241 210 ไบต์

string X(string s){var z="User: ,Group: ,Others:,5,34,14,123,04,023,021,0123,Read,Write,and,Execute,only,None".Split(',');return string.Join("\n",s.Zip(z,(a,b)=>b+z[a-45].Aggregate("",(x,y)=>x+" "+z[y-37])));}

ที่จัดรูปแบบ

string X(string s)
{
    var z = "User:  ,Group: ,Others:,5,34,14,123,04,023,021,0123,Read,Write,and,Execute,only,None".Split(',');
    return string.Join("\n", s.Zip(z, (a, b) => b + z[a - 45].Aggregate("", (x, y) => x + " " + z[y - 37])));
}

C #, 322 337 348ไบต์

นั่นไม่ใช่รุ่นที่สั้นที่สุด แต่ฉันพยายามแก้ไขปัญหานี้โดยใช้ตัวดำเนินการบิตเนื่องจากchmodค่าเป็นบิตแฟล็ก นอกจากนี้ C # อาจไม่ใช่ภาษากอล์ฟที่ดีที่สุด: D

string P(string s){Func<int,string>X=p=>{var a=new List<string>();if((p&4)>0)a.Add("Read");if((p&2)>0)a.Add("Write");if((p&1)>0)a.Add("Execute");return a.Count>1?string.Join(" ",a.Take(a.Count-1))+" and "+a.Last():a.Count>0?a.First()+" only":"none";};return string.Join("\n",(new[]{"User:   ","Group:  ","Others: "}).Select((c,i)=>c+X(s[i]-'0')));}

ungolfed: (มีความคิดเห็น)

string P(string s)
{
    // Function that determines the permissions represented by a single digit (e.g. 4 => "Read only")
    Func<int, string> X = p => 
    {
        var a = new List<string>();         // temporary storage for set permissions
        if ((p & 4) > 0) a.Add("Read");     // Read bit set
        if ((p & 2) > 0) a.Add("Write");    // Write bit set
        if ((p & 1) > 0) a.Add("Execute");  // Execute bit set

        // actually just Output formatting ... Takes a lot of bytes *grr*
        return a.Count > 1 
            ? string.Join(" ", a.Take(a.Count - 1)) + " and " + a.Last() 
            : a.Count > 0 
                ? a.First() + " only" 
                : "none";
    };

    // Actual result:
    return string.Join("\n", (new[] { "User:   ", "Group:  ", "Others: " })
        .Select((c, i) => c + X(s[i] - '0'))); // Map "User, .." to its permissions by using above function
}

นี่เป็นครั้งแรกที่ฉันตีกอล์ฟดังนั้นโปรดบอกฉันถ้าฉันทำอะไรผิด :)

แก้ไข 1:

บันทึกบางไบต์โดยแทนที่s[i]-'0'ด้วยs[i]&7(ที่ท้ายสุด) และบันทึกรายการนับเป็นตัวแปร:

string P(string s){Func<int,string>X=p=>{var a=new List<string>();if((p&4)>0)a.Add("Read");if((p&2)>0)a.Add("Write");if((p&1)>0)a.Add("Execute");var c=a.Count;return c>1?string.Join(" ",a.Take(c-1))+" and "+a.Last():c>0?a[0]+" only":"none";};return string.Join("\n",(new[]{"User:   ","Group:  ","Others: "}).Select((c,i)=>c+X(s[i]&7)));}

แก้ไข 2:

เปลี่ยนเป็นการแสดงออกแลมบ์ดา:

s=>{Func<int,string>X=p=>{var a=new List<string>();if((p&4)>0)a.Add("Read");if((p&2)>0)a.Add("Write");if((p&1)>0)a.Add("Execute");var c=a.Count;return c>1?string.Join(" ",a.Take(c-1))+" and "+a.Last():c>0?a[0]+" only":"none";};return string.Join("\n",(new[]{"User:   ","Group:  ","Others: "}).Select((c,i)=>c+X(s[i]&7)));}

Javascript, 213 209 208 188 186 ไบต์

function(d){a=" and ";r="Read";w="Write";e="Execute";v=";";o=" only";c=["None",e+o,w+o,w+a+e,r+o,r+a+e,r+a+w,r+" "+w+a+e];return"User: "+c[d[0]]+"\nGroup: "+c[d[1]]+"\nOthers: "+c[d[2]]}

บันทึก 20 ไบต์ขอบคุณ Dada!

Visual Basic, 606 ไบต์

imports System.Collections
module h
sub main()
Dim i As String=console.readline()
Dim s=new Stack(new String(){"Others: ","Group:  ","User:   "})
for each j as Char in i
dim t=new Stack()
if((asc(j) MOD 2)=1)then t.push("Execute")
if(asc(j)=50 or asc(j)=51 or asc(j)=54 or asc(j)=55)then t.push("Write")
if(asc(J)>51)then t.push("Read")
if t.count=3 then
w(s.pop+t.pop+" "+t.pop+" and "+t.pop)
else
if t.count=2 then
w(s.pop+t.pop+" and "+t.pop)
else
if t.count=0 then
w(s.pop+"None")
else
w(s.pop+t.pop+" only")
end if
end if
end if
next
end sub
sub w(s As String)
console.writeline(s)
end sub
end module

คริสตัล200 194 ไบต์

def m(y)y=y.chars.map &.to_i
a=" and "
o=" only"
r="Read"
w="Write"
x="Execute"
c=["None",x+o,w+o,w+a+x,r+o,r+a+x,r+a+w,r+" "+w+a+x]
"User:   "+c[y[0]]+"
Group:  "+c[y[1]]+"
Others: "+c[y[2]]end

ส่งคืนสตริงผลลัพธ์สำหรับลำดับเลขฐานแปดที่กำหนดเป็นสตริง เช่น: m("670")ผลลัพธ์ไปที่: User: Read and Write\nGroup: Read Write and Execute\nOthers: None.

ลองมันออนไลน์

C #, 371 ไบต์

public String[] a = {"none","Execute only","Write only","Write and Execute","Read only","Read and Execute","Read and Write","Read Write and Execute"};
public String pA(int i){return a[i];}
public int d(int n,int i){
  n=n/Math.pow(10,i);
  return n%=10;
}
public void main(int i){
  Console.Write("User:\t{0}\nGroup:\t{1},Others:\t{2}",pA(d(i,0)),pA(d(i,1)),pA(d(i,2));
}

Python 3.5 - 370 294 243 ไบต์

แข็งแรงเล่นกอล์ฟ:

import sys
a=lambda o: [print(('User:  ','Group: ','Others:')[n],('None','Execute only','Write only','Write and Execute','Read only','Read and Execute','Read and Write','Read Write and Execute')[int(o[n])]) for n in range(0,3)]
a(sys.argv[1])

ตรวจสอบขนาด:

$ du -b OctalToHuman.py 
243     OctalToHuman.py

ยกเลิกแข็งแรงเล่นกอล์ฟ:

#!/usr/bin/env python3
from sys import argv as ARGS

types = ('User:  ', 'Group: ', 'Others:')
perms = ('None','Execute only','Write only','Write and Execute','Read only','Read and Execute','Read and Write','Read Write and Execute')

def convert(octal_string):
    for n in range(0,3):
        print(types[n], perms[int(octal_string[n])])

if __name__ == '__main__':
    convert(ARGS[1])

ตัวอย่างผลลัพธ์:

$ python ./OctalToHuman.py 666
User:   Read and Write
Group:  Read and Write
Others: Read and Write

$ python ./OctalToHuman.py 042
User:   None
Group:  Read only
Others: Write only

$ python ./OctalToHuman.py 644
User:   Read and Write
Group:  Read only
Others: Read only

F #, 204 203 ไบต์

กอล์ฟครั้งแรกของฉันดังนั้นโปรดให้อภัยข้อผิดพลาดใด ๆ ;)
รุ่น golfed (ตาม 1: 1 ตามคำตอบของ pinkfloydx33 ):

fun(y:string)->let e,r,w,o,a="Execute ","Read ","Write ","only","and ";let z=["None";e+o;w+o;w+a+e;r+o;r+a+e;r+a+w;r+w+a+e;];let(!-)a=z.[int y.[a]-48];sprintf"User:   %s\nGroup:  %s\nOthers: %s"!-0!-1!-2

เวอร์ชันที่ไม่ดีงาม:

fun (y : string) ->
    let e, r, w, o, a = "Execute ", "Read ", "Write ", "only", "and "
    let z = [
                "None";
                e + o;
                w + o;
                w + a + e;
                r + o;
                r + a + e;
                r + a + w;
                r + w + a + e;
            ]
    let (!-) a = z.[int(y.[a]) - 48]
    sprintf "User:   %s\nGroup:  %s\nOthers: %s" !-0 !-1 !-2

ตัวอย่างการใช้งาน:

let k =  ...... // function definition goes here

printf"%s"<|k"755"
printf"%s"<|k"042"
// etc ...

PHP, 199 ไบต์

foreach([User,Group,Others]as$i=>$u){$a=[];foreach([Read,Write,Execute]as$k=>$s)if($argv[1][$i]&4>>$k)$a[]=$s;$a[]=($x=array_pop($a))?$a?"and $x":"$x only":None;echo str_pad("\n$u:",9).join(" ",$a);}

PHP, 189 ไบต์พร้อม \ t

foreach([User,Group,Others]as$i=>$u){$a=[];foreach([Read,Write,Execute]as$k=>$s)if($argv[1][$i]&4>>$k)$a[]=$s;$a[]=($x=array_pop($a))?$a?"and $x":"$x only":None;echo"\n$u:\t".join(" ",$a);}

Python 3, 191 ไบต์

def d(n):a,b,c,d,e=' and ',' only',"Execute","Write","Read";l=["None",c+b,d+b,d+a+c,e+b,e+a+c,e+a+d,e+" "+d+a+c];y,u,i=map(int,n);return"User:   %s\nGroup:  %s\nOthers: %s\n"%(l[y],l[u],l[i])

ungolfed

def d(n):
    a,b,c,d,e=' and ',' only',"Execute","Write","Read"
    l=["None",c+b,d+b,d+a+c,e+b,e+a+c,e+a+d,e+" "+d+a+c]
    y,u,i=map(int,n)
    return"User:   %s\nGroup:  %s\nOthers: %s\n"%(l[y],l[u],l[i])

Javascript (ES6), 159 ไบต์

a=>`User:  ${(b=[' None',(c=' Execute')+(d=' only'),(e=' Write')+d,f=e+(g=' and')+c,(h=' Read')+d,h+g+c,h+g+e,h+f])[a[0]]}\nGroup: ${b[a[1]]}\nOthers:`+b[a[2]]

ตัวอย่าง:

(a=>`User:  ${(b=[' None',(c=' Execute')+(d=' only'),(e=' Write')+d,f=e+(g=' and')+c,(h=' Read')+d,h+g+c,h+g+e,h+f])[a[0]]}\nGroup: ${b[a[1]]}\nOthers:`+b[a[2]])("042")