"titulo"

# gemtext2html # convierte un archivo en gemtext a html de acuerdo a la spec # excepción: enlaces a imagen (jpg, png, gif) se vuelven # # modo de uso: # awk -f gemtext2html.awk archivo.gmi > archivo.html # BEGIN{ # para poder abrir y cerrar

, :
	modo_lista = 0 
	modo_pre = 0
	modo_parrafo = 0 

	en_section = 1

	bloque = 0 # para no agregar 
 después de headers y blockquotes

	print ""
	print ""
	print ""
	print ""
	print ""

	contenido = "
"
	nav = ""
}

function appendContenido( t ){
	contenido = contenido t
}
function appendNav( t ){
	nav = nav t
}

function wikiLink( t ){
	i = match( t, /{.+}/)
	if ( i ){
		ifinal = index(t, "}") # índice del } final

		prev = substr(t, 1, i-1) # string previa al link
		link = substr(t, i, ifinal-i+1) # {link}
		nombre = substr(t, i+1, ifinal-i-1) # link	
		post = substr(t, ifinal+1) # string posterior

		return prev "" link "" post
	}
	else{
		return t
	}
}

NR == 1{
	titulo = $0
	sub("#[[:blank:]]+","",titulo) #prefijo
	print ""titulo""
	print ""
	print ""
	print ""
	print ""titulo""
	print ""

	bloque = 1

	getline # lee la siguiente línea
}

$0 !~ /^(=>|```|#{1,3} |* |>|[[:blank:]]*$)/{ # líneas de texto (no "especiales")
	if(!modo_pre){
		if(!modo_parrafo){
			modo_parrafo = 1
			appendContenido( "" )
		}
		else # nueva línea en el mismo párrafo
			appendContenido( "
" )
		
		appendContenido( wikiLink($0) )
	}
	else{
		appendContenido( $0 )
	}
}

/^[[:blank:]]*$/ { # línea vacía
	if( !modo_pre ) {
		if( modo_lista ){ # cierra la lista
			modo_lista = 0
			appendContenido( "" )
		}
		else if( modo_parrafo ){ # cierra el párrafo
			modo_parrafo = 0
			appendContenido( "" )
		}
		else if( bloque ) # si lo previo fue header o blockquote
			bloque = 0;
		else
			appendContenido( "
" )
	}
	else
		appendContenido( $0 )

}

/^=>/{ # link
	if(!modo_pre){
		if( modo_lista ){ # cierra la lista
			modo_lista = 0
			appendContenido(  "

" ) } else if( modo_parrafo ){ # cierra el párrafo modo_parrafo = 0 appendContenido( "

" ) } # borra flecha del inicio sub("^=>","",$0) # ahora $1 es el path, $2 a $NF el texto # concatena todo el texto texto = $2 for(i=3; i<=NF; i++){ texto = texto" "$i } # si el path es imagen if( match($1, /(png|jpg|gif)$/) ){ # crea imagen $0=" "texto"

"texto"

" } # si el path no es imagen else{ # convierte enlace de .gmi a .html ! sub(".gmi$",".html",$1) # crea link $0=""texto"
" } } appendContenido( $0 ) } /^* /{ # lista if(!modo_pre){ if(!modo_lista){ # inicia la lista if(modo_parrafo){ modo_parrafo = 0 appendContenido( "

" ) } modo_lista = 1 appendContenido( "

",$0) sub("$","

" ) } else if( modo_parrafo ){ # cierra el párrafo modo_parrafo = 0 appendContenido( "

" ) } # abre preformatted modo_pre = 1 appendContenido( "

" )
	}
}

/^> /{ # blockquote
	if(!modo_pre){
		sub(">[[:blank:]]+","",$0)
		sub("$","",$0)
		bloque = 1
	}	
	appendContenido(  $0 )
}

/^# /{ # h1
	if(!modo_pre){
		sub("#[[:blank:]]+","",$0) #prefijo
		sub("$","",$0) #sufijo
		bloque = 1

		if( !en_section ){ # si no se ha iniciado una sección antes
			appendContenido( "" )
			en_section = 1
		}
		else{
			appendContenido( "
" )
		}

		appendContenido(  ""$0"" )

		# agrega header a navegación
		appendNav(  ""$0"" )
	}	
	else{
		appendContenido(  $0 )
	}

}

/^## /{ # h2
	if(!modo_pre){
		sub("##[[:blank:]]+","",$0)
		sub("$","",$0)
		bloque = 1
	}
	appendContenido(  $0 )
}

/^### /{ # h3
	if(!modo_pre){
		sub("###[[:blank:]]+","",$0)
		sub("$","",$0)
		bloque = 1
	}
	appendContenido(  $0 )
}

END{
	print nav
	print ""
	print contenido
	# cierra tags que pudiero n haber quedado abiertas
	if(modo_pre)
		print "

" else if(modo_parrafo) print "

" else if(modo_lista) print "" print "" print "" print "" print "" print "" }