diff options
Diffstat (limited to '')
| -rw-r--r-- | doc/manual/docbook-refentry-to-H-help.xsl | 137 |
1 files changed, 137 insertions, 0 deletions
diff --git a/doc/manual/docbook-refentry-to-H-help.xsl b/doc/manual/docbook-refentry-to-H-help.xsl new file mode 100644 index 00000000..7f6285c9 --- /dev/null +++ b/doc/manual/docbook-refentry-to-H-help.xsl @@ -0,0 +1,137 @@ +<?xml version="1.0"?> +<!-- + docbook-refentry-to-H-help.xsl: + XSLT stylesheet for generating command and sub-command + constants header for the built-in help. + + Copyright (C) 2006-2020 Oracle Corporation + + This file is part of VirtualBox Open Source Edition (OSE), as + available from http://www.virtualbox.org. This file is free software; + you can redistribute it and/or modify it under the terms of the GNU + General Public License (GPL) as published by the Free Software + Foundation, in version 2 as it comes in the "COPYING" file of the + VirtualBox OSE distribution. VirtualBox OSE is distributed in the + hope that it will be useful, but WITHOUT ANY WARRANTY of any kind. +--> + +<xsl:stylesheet + version="1.0" + xmlns:xsl="http://www.w3.org/1999/XSL/Transform" + xmlns:str="http://xsltsl.org/string" + > + + <xsl:import href="string.xsl"/> + + <xsl:output method="text" version="1.0" encoding="utf-8" indent="yes"/> + <xsl:strip-space elements="*"/> + + <xsl:param name="g_sMode" select="not-specified"/> + + + <!-- Default action, do nothing. --> + <xsl:template match="node()|@*"/> + + <!-- + Generate SCOPE enum for a refentry. We convert the + cmdsynopsisdiv/cmdsynopsis IDs into constants. + --> + <xsl:template match="refentry"> + <xsl:variable name="RefEntry" select="."/> + <xsl:variable name="sRefEntryId" select="@id"/> + <xsl:variable name="sBaseNm"> + <xsl:choose> + <xsl:when test="contains($sRefEntryId, '-')"> <!-- Multi level command. --> + <xsl:call-template name="str:to-upper"> + <xsl:with-param name="text" select="translate(substring-after($sRefEntryId, '-'), '-', '_')"/> + </xsl:call-template> + </xsl:when> + <xsl:otherwise> <!-- Simple command. --> + <xsl:call-template name="str:to-upper"> + <xsl:with-param name="text" select="translate($sRefEntryId, '-', '_')"/> + </xsl:call-template> + </xsl:otherwise> + </xsl:choose> + </xsl:variable> + + <xsl:choose> + <!-- Generate subcommand enums and defines --> + <xsl:when test="$g_sMode = 'subcmd'"> + <!-- Start enum type and start off with the refentry id. --> + <xsl:text> +enum +{ +#define HELP_SCOPE_</xsl:text> + <xsl:value-of select="$sBaseNm"/> + <xsl:value-of select="substring(' ',1,56 - string-length($sBaseNm) - 11)"/> + <xsl:text> RT_BIT_32(HELP_SCOPE_</xsl:text><xsl:value-of select="$sBaseNm"/><xsl:text>_BIT) + HELP_SCOPE_</xsl:text><xsl:value-of select="$sBaseNm"/><xsl:text>_BIT = 0</xsl:text> + + <!-- Synopsis IDs --> + <xsl:for-each select="./refsynopsisdiv/cmdsynopsis[@id != concat('synopsis-', $sRefEntryId)]"> + <xsl:variable name="sSubNm"> + <xsl:text>HELP_SCOPE_</xsl:text> + <xsl:call-template name="str:to-upper"> + <xsl:with-param name="text" select="translate(substring-after(substring-after(@id, '-'), '-'), '-', '_')"/> + </xsl:call-template> + </xsl:variable> + <xsl:text>, +#define </xsl:text> + <xsl:value-of select="$sSubNm"/> + <xsl:value-of select="substring(' ',1,56 - string-length($sSubNm))"/> + <xsl:text> RT_BIT_32(</xsl:text><xsl:value-of select="$sSubNm"/><xsl:text>_BIT) + </xsl:text> + <xsl:value-of select="$sSubNm"/><xsl:text>_BIT</xsl:text> + </xsl:for-each> + + <!-- Add scoping info for refsect1, refsect2 and refsect3 IDs that aren't part of the synopsis. --> + <xsl:for-each select=".//refsect1[@id] | .//refsect2[@id] | .//refsect3[@id]"> + <xsl:variable name="sThisId" select="@id"/> + <xsl:if test="not($RefEntry[@id = $sThisId]) and not($RefEntry/refsynopsisdiv/cmdsynopsis[@id = concat('synopsis-', $sThisId)])"> + <xsl:variable name="sSubNm"> + <xsl:text>HELP_SCOPE_</xsl:text> + <xsl:choose> + <xsl:when test="contains($sRefEntryId, '-')"> <!-- Multi level command. --> + <xsl:call-template name="str:to-upper"> + <xsl:with-param name="text" select="translate(substring-after(@id, '-'), '-', '_')"/> + </xsl:call-template> + </xsl:when> + <xsl:otherwise> <!-- Simple command. --> + <xsl:call-template name="str:to-upper"> + <xsl:with-param name="text" select="translate(@id, '-', '_')"/> + </xsl:call-template> + </xsl:otherwise> + </xsl:choose> + </xsl:variable> + <xsl:text>, +#define </xsl:text> + <xsl:value-of select="$sSubNm"/> + <xsl:value-of select="substring(' ',1,56 - string-length($sSubNm))"/> + <xsl:text> RT_BIT_32(</xsl:text><xsl:value-of select="$sSubNm"/><xsl:text>_BIT) + </xsl:text> + <xsl:value-of select="$sSubNm"/><xsl:text>_BIT</xsl:text> + </xsl:if> + </xsl:for-each> + + <!-- Done - complete the enum. --> + <xsl:text>, + HELP_SCOPE_</xsl:text><xsl:value-of select="$sBaseNm"/><xsl:text>_END +}; +</xsl:text> + </xsl:when> + + <!-- Generate command enum value. --> + <xsl:when test="$g_sMode = 'cmd'"> + <xsl:text> HELP_CMD_</xsl:text><xsl:value-of select="$sBaseNm"/><xsl:text>, +</xsl:text> + </xsl:when> + + <!-- Shouldn't happen. --> + <xsl:otherwise> + <xsl:message terminate="yes">Bad or missing g_sMode string parameter value.</xsl:message> + </xsl:otherwise> + </xsl:choose> + </xsl:template> + +</xsl:stylesheet> + |