Re: [9fans] wiki editing via web browser

[Roman Shaposhnick <rvs@sun.com>]

Wow! That's the spirit.

Thanks,
Roman.

On Tue, Apr 06, 2004 at 09:08:48AM -0400, Peter Bosch wrote:
> > On Tue, Apr 06, 2004 at 02:39:44AM +0200, boyd, rounin wrote:
> >> > P.S. Back in my childhood I though that Russian military tongue was
> >> > practically Morse code ...
> >> 
> >> -.-. --.-
> >   
> >    .--  -  ..-.  ..--..
> 
> #include <u.h>
> #include <libc.h>
> #include <bio.h>
> #include <ctype.h>
> 
> static char*asciitab[] = {
> 	".-",	// A  
> 	"-...",
> 	"-.-.",
> 	"-..",
> 	".",
> 	"..-.",
> 	"--.",
> 	"....",
> 	"..",
> 	".---",
> 	"-.-",
> 	".-..",
> 	"--",
> 	"-.",
> 	"---",
> 	".--.",
> 	"--.-",
> 	".-.",
> 	"...",
> 	"-",
> 	"..-",
> 	"...-",
> 	".--",
> 	"-..-",
> 	"-.--",
> 	"--..",	// Z
> };
> 
> static char*numtab[] = {
> 	"-----", // 0
> 	".----",
> 	"..---",
> 	"...--",
> 	"....-",
> 	".....",
> 	"-....",
> 	"--...",
> 	"---..",
> 	"----.",
> };
> 
> static struct {
> 	char c;
> 	char *m;
> } specials[] = {
> {	'.',	".-.-.-"	},
> {	',',	"--..--"	},
> {	'?',	"..--.."	},
> {	'@',	".--.-."	},
> {	' ',	" "		},
> };
> 
> int
> morsefmt(Fmt *f)
> {
> 	char *p, *src, *dst, c;
> 	int rv, len, i;
> 
> 	src = va_arg(f->args, char*);
> 	len = strlen(src);
> 	p = dst = malloc(len * 6 + 1);
> 	if(dst == nil)
> 		return fmtstrcpy(f, "(romanfmt)");
> 
> 	while(c = *src++){
> 		if(c == '\n')
> 			continue;
> 
> 		if(isalpha(c)){
> 			c = toupper(c);
> 			assert(c >= 'A' && c <= 'Z');
> 			c -= 'A';
> 			len = strlen(asciitab[c]);
> 			memcpy(p, asciitab[c], len);
> 			p += len;
> 			continue;
> 		}
> 
> 		if(isdigit(c)){
> 			assert(c >= '0' && c <= '9');
> 			c -= '0';
> 			len = strlen(numtab[c]);
> 			memcpy(p, numtab[c], len);
> 			p += len;
> 			continue;
> 		}
> 
> 		for(i = 0; i < nelem(specials); i++)
> 			if(specials[i].c == c)
> 				break;
> 
> 		if(i == nelem(specials)){
> 			*p++ = '?';
> 			continue;
> 		}
> 
> 		len = strlen(specials[i].m);
> 		memcpy(p, specials[i].m, len);
> 		p += len;
> 	}
> 	*p = 0;
> 
> 	rv = fmtstrcpy(f, dst);
> 	free(dst);
> 	return rv;
> }
> 
> void
> main(void)
> {
> 	Biobuf b;
> 	char *p;
> 
> 	Binit(&b, 0, OREAD);
> 	fmtinstall('M', morsefmt);
> 	while((p = Brdline(&b, '\n')) != nil){
> 		p[Blinelen(&b)] = 0;
> 		print("[%s] %M\n", p, p);
> 	}
> 	Bterm(&b);
> 	exits(0);
> }
>