Sfida

Scrivi una funzione che implementa printfla formattazione di stringhe in stile C.

Regole

1. È necessario implementare almeno %%, %c, %s, %de %f.
2. Non è necessario utilizzare un metodo di formattazione stringa incorporato.
3. Non è necessario eseguire programmi esterni o connettersi a Internet dal proprio programma.
4. Sta a te decidere come gestire input non validi, ma il tuo programma non deve terminare in modo anomalo.
5. Si dovrebbe scrivere un Funzione Variadica se possibile.

Le parole chiave "DEVE", "NON DEVE", "RICHIESTO", "DEVE ESSERE", "NON DEVE", "DOVREBBE", "NON DOVREBBE", "CONSIGLIATO", "MAGGIO" e "OPZIONALE" in questo documento sono da interpretare come descritto in RFC 2119 .

APL (73)

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

Alcuni test:

      '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.

Spiegazione:

• G←'%!',⍺: prefisso un identificatore fittizio alla stringa (per un'elaborazione più semplice)
• (Z←G='%')/⍳⍴G: trova gli indici di tutti i %caratteri nella stringa; memorizza anche una maschera di bitZ
• ⌷∘G¨1↓1+: seleziona tutti i caratteri accanto alla %s e rilascia il manichino.
• ⍵,⍪: abbina ogni identificatore con il suo valore dall'argomento giusto.
• {... }/: esegue la seguente funzione su ogni coppia:
  • 'c'0≡⍵,∊⊃⍺: se l'argomento è un numero e lo specificatore è c:
  • :⎕UCS⍺: quindi restituisce il valore unicode dell'argomento,
  • ⋄⍕⍺: altrimenti, restituisce la rappresentazione in formato stringa dell'argomento.
• ⊂: accludere
• ⊂2∘↓¨Z⊂G: dividere la stringa su %s, quindi rimuovere i primi due caratteri di ogni sottostringa (qui entra in gioco il manichino) e racchiuderne il risultato.
• ↑: crea una matrice dai due array racchiusi, abbinando ciascuna sottostringa al valore che dovrebbe seguirla.
• ,⌿: unisce ogni sottostringa al suo valore.
• ⊃,/: quindi unisci le stringhe risultanti.

Rubino: 102 caratteri

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

Esecuzione di esempio:

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

Gli identificatori di formato non validi vengono mantenuti in posizione. Gli identificatori di formato senza valore argomento vengono sostituiti con il valore vuoto del tipo specificato.

Lua 5.2, 115 byte

-- 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 caratteri)

#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();}

Odio il C ++, ma mi è sembrata una buona scelta (andrei davvero con C, altrimenti il char*puntatore richiede troppo sforzo per essere effettivamente utile). Accetta char*argomenti e std::stringrisultati, ma ehi, questo è C ++, quindi a chi importa la coerenza (in un linguaggio che non è coerente)?

Java , 201 186 174 byte

12 byte grazie a 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;}

Provalo online!