Início / unix / Perguntas / 480379
Accepted
micholeodon
Asked: 2018-11-08 07:19:32 +0800 CST

Script para converter .org em .xml

  • 772

Eu quero converter a árvore escrita no .orgarquivo para algum código XML para gerar a árvore gráfica dele mais tarde (por exemplo, carregá-lo na página www.draw.io ).

exemplo de árvore

Para fazer isso, preciso de um script bash que converterá .orgo arquivo contendo:

* tree_root
** root_node_1
*** subnode
** root_node_2

para .xmlarquivo contendo:

<mxCell id="b1" value="tree_root" > </mxCell>
<mxCell id="b2" value="root_node_1" ></mxCell>
    <mxCell id="a1" source="b2" target="b1">
<mxCell id="b3" value="subnode" ></mxCell>
    <mxCell id="a2" source="b3" target="b2">
<mxCell id="b4" value="root_node_2" ></mxCell>
    <mxCell id="a3" source="b4" target="b1">

No modo org, os títulos são indicados por asteriscos ( *- título de primeiro nível, **- título de segundo nível, etc.)

Explicação :

  • Os campos chamados idsão nomes exibidos nas caixas.
  • b1, b2, b3 significam "caixa", nomes enumerados pelo número da linha no .orgarquivo,
  • a1, a2, a3 significam "seta" são os nomes enumerados por números naturais subsequentes,
  • sourceé idonde a seta começa, targeté idpara onde as setas apontam.

Eu preciso de um caso simples, por exemplo, 6 níveis de profundidade max. Vou estendê-lo eu mesmo, mas preciso de algo para começar.

Como fazer isso?

bash emacs

1 respostas

  1. Best Answer

    Talvez isso atenda às suas necessidades? A idéia básica é ter um array (chamado labels) que contém o que é efetivamente o número da linha da última linha começando com um determinado número de estrelas. Ele produzirá o gráfico errado se você aumentar o número de estrelas em mais de uma, mas lidar com as diminuições de qualquer número corretamente. É claro que ele não lida com texto sob os títulos.

    #!/bin/bash

typeset -a labels
typeset -i node=1

while read -r stars rest
do
    level=${#stars}
    labels[level]=$node
    printf '<mxCell id="b%d" value="%q" ></mxCell>\n' $node "$rest"
    case $level in
    (1) ;;
    (*) printf '    <mxCell id="a%d" source="b%d" target="b%d">\n' $((node-1)) $node ${labels[level-1]} ;;
    esac
    : $((node++))
done
    • 1

relate perguntas