ท้าทาย

เขียนฟังก์ชั่นที่ใช้การprintfจัดรูปแบบสตริงC- style

กฎระเบียบ

1. คุณจะต้องดำเนินการอย่างน้อย%%, %c, %s, และ%d%f
2. คุณต้องไม่ใช้วิธีการจัดรูปแบบสตริงในตัว
3. คุณต้องไม่เรียกใช้โปรแกรมภายนอกหรือเชื่อมต่ออินเทอร์เน็ตจากโปรแกรมของคุณ
4. มันขึ้นอยู่กับคุณที่จะตัดสินใจว่าจะจัดการกับอินพุตที่ไม่ถูกต้อง แต่โปรแกรมของคุณจะต้องไม่หยุดอย่างผิดปกติ
5. คุณควรเขียนฟังก์ชัน Variadicถ้าเป็นไปได้

คำสำคัญ "ต้อง", "ไม่ต้อง", "จำเป็นต้องใช้", "ไม่ควร", "ไม่ควร", "ไม่ควร", "ไม่ควร", "แนะนำ", "อาจ" และ "ตัวเลือก" ในเอกสารนี้ จะตีความตามที่อธิบายในRFC 2119

APL (73)

{⊃,/,⌿↑(⊂2∘↓¨Z⊂G),⊂{'c'0≡⍵,∊⊃⍺:⎕UCS⍺⋄⍕⍺}/⍵,⍪⌷∘G¨1↓1+(Z←G='%')/⍳⍴G←'%!',⍺}

การทดสอบบางอย่าง:

      'a:%c b:%s c:%d'{⊃,/,⌿↑(⊂2∘↓¨Z⊂G),⊂{'c'0≡⍵,∊⊃⍺:⎕UCS⍺⋄⍕⍺}/⍵,⍪⌷∘G¨1↓1+(Z←G='%')/⍳⍴G←'%!',⍺} 65 'foo' 67
a:A b:foo c:67 

      printf←{⊃,/,⌿↑(⊂2∘↓¨Z⊂G),⊂{'c'0≡⍵,∊⊃⍺:⎕UCS⍺⋄⍕⍺}/⍵,⍪⌷∘G¨1↓1+(Z←G='%')/⍳⍴G←'%!',⍺}
      '1:%s 2:%s 3:%d 4:%c 5:%c' printf 'foo' 'bar' 100 110 'z'
1:foo 2:bar 3:100 4:n 5:z   
      'The %s brown %c%c%c jumps over the %s dog.' printf 'quick' 102 111 'x' 'lazy'
The quick brown fox jumps over the lazy dog.

คำอธิบาย:

• G←'%!',⍺: คำนำหน้าตัวระบุตัวแทนเชิดไปยังสตริง
• (Z←G='%')/⍳⍴G: ค้นหาดัชนีของ%ตัวละครทั้งหมดในสตริง; เก็บ bitmask ด้วยZ
• ⌷∘G¨1↓1+: เลือกอักขระทั้งหมดที่อยู่ถัดจาก%s และปล่อยดัมมี่
• ⍵,⍪: จับคู่ตัวระบุแต่ละตัวกับค่าของมันจากอาร์กิวเมนต์ที่ถูกต้อง
• {... }/: เรียกใช้ฟังก์ชันต่อไปนี้ในแต่ละคู่:
  • 'c'0≡⍵,∊⊃⍺: ถ้าอาร์กิวเมนต์เป็นตัวเลขและตัวระบุคือc:
  • :⎕UCS⍺: จากนั้นคืนค่า Unicode ของอาร์กิวเมนต์
  • ⋄⍕⍺: มิฉะนั้นส่งคืนการแทนค่าสตริงของอาร์กิวเมนต์
• ⊂: ล้อมรอบ
• ⊂2∘↓¨Z⊂G: แยกสตริงบน%s จากนั้นลบอักขระสองตัวแรกของแต่ละสตริงย่อย (นี่คือตำแหน่งที่จำลองมา) และใส่ผลลัพธ์ของสิ่งนั้น
• ↑: สร้างเมทริกซ์จากสองอาร์เรย์ที่ล้อมรอบจับคู่แต่ละสตริงย่อยกับค่าที่ควรปฏิบัติตาม
• ,⌿: เข้าร่วมแต่ละสตริงย่อยด้วยค่า
• ⊃,/: จากนั้นเข้าร่วมสตริงที่เกิด

Ruby: 102 ตัวอักษร

f=->s,*a{s.gsub(/%(.)/){$1==?%??%:a.shift.send({?c=>:chr,?s=>:to_s,?d=>:to_i,?f=>:to_f}[$1])rescue$&}}

วิ่งตัวอย่าง:

irb(main):001:0> f=->s,*a{s.gsub(/%(.)/){$1==?%??%:a.shift.send({?c=>:chr,?s=>:to_s,?d=>:to_i,?f=>:to_f}[$1])rescue$&}}
=> #<Proc:0x96634ac@(irb):1 (lambda)>

irb(main):002:0> puts f["percent : %%\n   char : %c or %c\n string : %s or %s or %s\ndecimal : %d or %d or %d\n  float : %f or %f or %f\ninvalid : %x or %s or %d or %f", 65, 'B', 'format me', 42, Math::PI, 42, Math::PI, '2014', 42, Math::PI, '2014', 'more']
percent : %
   char : A or B
 string : format me or 42 or 3.141592653589793
decimal : 42 or 3 or 2014
  float : 42.0 or 3.141592653589793 or 2014.0
invalid : %x or  or 0 or 0.0
=> nil

ตัวระบุรูปแบบที่ไม่ถูกต้องจะถูกเก็บไว้ในสถานที่ ตัวระบุรูปแบบที่ไม่มีค่าอาร์กิวเมนต์จะถูกแทนที่ด้วยค่าว่างของประเภทที่กำหนด

Lua 5.2, 115 ไบต์

-- Function definition, 115 chars
function f(f,...)n,t=0,{...}return(f:gsub('%%(%a)',function(s)n=n+1return(({c=s.char})[s]or tostring)(t[n])end))end

-- Usage example
print(f('Happy %cew %d %s %f',78,2014,'Year!',math.pi))
-- Output: Happy New 2014 Year! 3.1415926535898

C ++ (281 ตัวอักษร)

#include<sstream>
#include<cstdarg>
#define q(x)va_arg(v,x);break;case
std::string p(char*f,...){std::ostringstream r;va_list v;va_start(v,f);while(*f)if(*f=='%')switch(++f,*f++){case's':r<<q(char*)'d':r<<q(int)'c':r<<(char)q(int)'%':r<<'%';}else r<<*f++;va_end(v);return r.str();}

ฉันเกลียด C ++ แต่ดูเหมือนจะเป็นทางเลือกที่ดี (ฉันจะไปกับ C จริงๆหากไม่ใช่char*ตัวชี้นั้นต้องใช้ความพยายามมากเกินไปที่จะเป็นประโยชน์จริง ๆ ) รับchar*ข้อโต้แย้งและstd::stringผลลัพธ์ แต่เฮ้นั่นคือ C ++ ดังนั้นใครสนใจเรื่องความมั่นคง (ในภาษาที่ตัวเองไม่สอดคล้องกัน)?

Java , 201 186 174 ไบต์

12 ไบต์ขอบคุณ Kevin Cruijssen

String f(String s,Object...a){String r="";for(char c,i=0,j=0;i<s.length();r+=c==37?(c=s.charAt(i++))<38?c:c==99?(char)(int)a[j++]:a[j++]:c==37?"":c)c=s.charAt(i++);return r;}

ลองออนไลน์!