841f898574
A rough implementation of uno bindings for LOWA using embind. Adds new parameter '-W' to cppumaker to generate _embind.cxx files alongside .hdl & .hpp. For usage examples see static/README.wasm.md Change-Id: Iee5d05e37bfba8e101c08212b15c05f7f2fa6c33 Reviewed-on: https://gerrit.libreoffice.org/c/core/+/156273 Tested-by: Jenkins Reviewed-by: Sarper Akdemir <sarper.akdemir.extern@allotropia.de>
343 lines
12 KiB
C++
343 lines
12 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*
|
|
* This file is part of the LibreOffice project.
|
|
*
|
|
* This Source Code Form is subject to the terms of the Mozilla Public
|
|
* License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
*
|
|
* This file incorporates work covered by the following license notice:
|
|
*
|
|
* Licensed to the Apache Software Foundation (ASF) under one or more
|
|
* contributor license agreements. See the NOTICE file distributed
|
|
* with this work for additional information regarding copyright
|
|
* ownership. The ASF licenses this file to you under the Apache
|
|
* License, Version 2.0 (the "License"); you may not use this file
|
|
* except in compliance with the License. You may obtain a copy of
|
|
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "cppuoptions.hxx"
|
|
|
|
#ifdef SAL_UNX
|
|
#define SEPARATOR '/'
|
|
#else
|
|
#define SEPARATOR '\\'
|
|
#endif
|
|
|
|
bool CppuOptions::initOptions(int ac, char* av[], bool bCmdFile)
|
|
{
|
|
bool ret = true;
|
|
int i=0;
|
|
|
|
if (!bCmdFile)
|
|
{
|
|
bCmdFile = true;
|
|
|
|
OString name(av[0]);
|
|
sal_Int32 index = name.lastIndexOf(SEPARATOR);
|
|
m_program = name.copy(index > 0 ? index+1 : 0);
|
|
|
|
if (ac < 2)
|
|
{
|
|
fprintf(stderr, "%s", prepareHelp().getStr());
|
|
ret = false;
|
|
}
|
|
|
|
i = 1;
|
|
}
|
|
else
|
|
{
|
|
i = 0;
|
|
}
|
|
|
|
char *s=nullptr;
|
|
for( ; i < ac; i++)
|
|
{
|
|
if (av[i][0] == '-')
|
|
{
|
|
switch (av[i][1])
|
|
{
|
|
case 'O':
|
|
if (av[i][2] == '\0')
|
|
{
|
|
if (i < ac - 1 && av[i+1][0] != '-')
|
|
{
|
|
i++;
|
|
s = av[i];
|
|
}
|
|
else
|
|
{
|
|
OString tmp("'-O', please check");
|
|
if (i <= ac - 1)
|
|
{
|
|
tmp += OString::Concat(" your input '") + av[i+1] + "'";
|
|
}
|
|
|
|
throw IllegalArgument(tmp);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
s = av[i] + 2;
|
|
}
|
|
|
|
m_options["-O"] = OString(s);
|
|
break;
|
|
case 'n':
|
|
if (av[i][2] != 'D' || av[i][3] != '\0')
|
|
{
|
|
OString tmp = OString::Concat("'-nD', please check your input '") + av[i] + "'";
|
|
throw IllegalArgument(tmp);
|
|
}
|
|
|
|
m_options["-nD"] = OString();
|
|
break;
|
|
case 'T':
|
|
if (av[i][2] == '\0')
|
|
{
|
|
if (i < ac - 1 && av[i+1][0] != '-')
|
|
{
|
|
i++;
|
|
s = av[i];
|
|
}
|
|
else
|
|
{
|
|
OString tmp("'-T', please check");
|
|
if (i <= ac - 1)
|
|
{
|
|
tmp += OString::Concat(" your input '") + av[i+1] + "'";
|
|
}
|
|
|
|
throw IllegalArgument(tmp);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
s = av[i] + 2;
|
|
}
|
|
|
|
if (m_options.count("-T") > 0)
|
|
{
|
|
OString tmp = m_options["-T"] + ";" + s;
|
|
m_options["-T"] = tmp;
|
|
}
|
|
else
|
|
{
|
|
m_options["-T"] = OString(s);
|
|
}
|
|
break;
|
|
case 'L':
|
|
if (av[i][2] != '\0')
|
|
{
|
|
OString tmp("'-L', please check");
|
|
if (i <= ac - 1)
|
|
{
|
|
tmp += OString::Concat(" your input '") + av[i] + "'";
|
|
}
|
|
|
|
throw IllegalArgument(tmp);
|
|
}
|
|
|
|
if (isValid("-C") || isValid("-CS"))
|
|
{
|
|
throw IllegalArgument("'-L' could not be combined with '-C' or '-CS' option");
|
|
}
|
|
m_options["-L"] = OString();
|
|
break;
|
|
case 'C':
|
|
if (av[i][2] == 'S')
|
|
{
|
|
if (av[i][3] != '\0')
|
|
{
|
|
OString tmp("'-CS', please check");
|
|
if (i <= ac - 1)
|
|
{
|
|
tmp += OString::Concat(" your input '") + av[i] + "'";
|
|
}
|
|
|
|
throw IllegalArgument(tmp);
|
|
}
|
|
|
|
if (isValid("-L") || isValid("-C"))
|
|
{
|
|
throw IllegalArgument("'-CS' could not be combined with '-L' or '-C' option");
|
|
}
|
|
m_options["-CS"] = OString();
|
|
break;
|
|
}
|
|
else if (av[i][2] != '\0')
|
|
{
|
|
OString tmp("'-C', please check");
|
|
if (i <= ac - 1)
|
|
{
|
|
tmp += OString::Concat(" your input '") + av[i] + "'";
|
|
}
|
|
|
|
throw IllegalArgument(tmp);
|
|
}
|
|
|
|
if (isValid("-L") || isValid("-CS"))
|
|
{
|
|
throw IllegalArgument("'-C' could not be combined with '-L' or '-CS' option");
|
|
}
|
|
m_options["-C"] = OString();
|
|
break;
|
|
case 'G':
|
|
if (av[i][2] == 'c')
|
|
{
|
|
if (av[i][3] != '\0')
|
|
{
|
|
OString tmp("'-Gc', please check");
|
|
if (i <= ac - 1)
|
|
{
|
|
tmp += OString::Concat(" your input '") + av[i] + "'";
|
|
}
|
|
|
|
throw IllegalArgument(tmp);
|
|
}
|
|
|
|
m_options["-Gc"] = OString();
|
|
break;
|
|
}
|
|
else if (av[i][2] != '\0')
|
|
{
|
|
OString tmp("'-G', please check");
|
|
if (i <= ac - 1)
|
|
{
|
|
tmp += OString::Concat(" your input '") + av[i] + "'";
|
|
}
|
|
|
|
throw IllegalArgument(tmp);
|
|
}
|
|
|
|
m_options["-G"] = OString();
|
|
break;
|
|
case 'W': // generate embind javascript bindings for LOWA
|
|
if (av[i][2] != '\0')
|
|
{
|
|
OString tmp("'-W', please check");
|
|
if (i <= ac - 1)
|
|
{
|
|
tmp += OString::Concat(" your input '") + av[i] + "'";
|
|
}
|
|
|
|
throw IllegalArgument(tmp);
|
|
}
|
|
|
|
if (!isValid("-C") && !isValid("-CS") && !isValid("-L"))
|
|
{
|
|
throw IllegalArgument("'-W' requires '-C' or '-CS' or '-L' option");
|
|
}
|
|
m_options["-W"] = OString();
|
|
break;
|
|
case 'X': // support for eXtra type rdbs
|
|
{
|
|
if (av[i][2] == '\0')
|
|
{
|
|
if (i < ac - 1 && av[i+1][0] != '-')
|
|
{
|
|
i++;
|
|
s = av[i];
|
|
}
|
|
else
|
|
{
|
|
OString tmp("'-X', please check");
|
|
if (i <= ac - 1)
|
|
{
|
|
tmp += OString::Concat(" your input '") + av[i+1] + "'";
|
|
}
|
|
|
|
throw IllegalArgument(tmp);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
s = av[i] + 2;
|
|
}
|
|
|
|
m_extra_input_files.emplace_back(s );
|
|
break;
|
|
}
|
|
|
|
default:
|
|
throw IllegalArgument(OString::Concat("the option is unknown") + av[i]);
|
|
}
|
|
} else
|
|
{
|
|
if (av[i][0] == '@')
|
|
{
|
|
FILE* cmdFile = fopen(av[i]+1, "r");
|
|
if( cmdFile == nullptr )
|
|
{
|
|
fprintf(stderr, "%s", prepareHelp().getStr());
|
|
ret = false;
|
|
}
|
|
else
|
|
{
|
|
int rargc=0;
|
|
char* rargv[512];
|
|
char buffer[512];
|
|
|
|
while (fscanf(cmdFile, "%511s", buffer) != EOF && rargc < 512)
|
|
{
|
|
rargv[rargc]= strdup(buffer);
|
|
rargc++;
|
|
}
|
|
fclose(cmdFile);
|
|
|
|
ret = initOptions(rargc, rargv, bCmdFile);
|
|
|
|
for (int j=0; j < rargc; j++)
|
|
{
|
|
free(rargv[j]);
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
m_inputFiles.emplace_back(av[i]);
|
|
}
|
|
}
|
|
}
|
|
|
|
return ret;
|
|
}
|
|
|
|
OString CppuOptions::prepareHelp()
|
|
{
|
|
OString help = "\nusing: " +
|
|
m_program + " [-options] file_1 ... file_n\nOptions:\n"
|
|
" -O<path> = path describes the root directory for the generated output.\n"
|
|
" The output directory tree is generated under this directory.\n"
|
|
" -T<name> = name specifies a type or a list of types. The output for this\n"
|
|
" [t1;...] type is generated. If no '-T' option is specified,\n"
|
|
" then output for all types is generated.\n"
|
|
" Example: 'com.sun.star.uno.XInterface' is a valid type.\n"
|
|
" -L = UNO type functions are generated lightweight, that means only\n"
|
|
" the name and typeclass are given and everything else is retrieved\n"
|
|
" from the type library dynamically. The default is that UNO type\n"
|
|
" functions provides enough type information for bootstrapping C++.\n"
|
|
" '-L' should be the default for external components.\n"
|
|
" -C = UNO type functions are generated comprehensive that means all\n"
|
|
" necessary information is available for bridging the type in UNO.\n"
|
|
" -nD = no dependent types are generated.\n"
|
|
" -G = generate only target files which does not exists.\n"
|
|
" -Gc = generate only target files which content will be changed.\n"
|
|
" -X<file> = extra types which will not be taken into account for generation.\n\n" +
|
|
prepareVersion();
|
|
|
|
return help;
|
|
}
|
|
|
|
OString CppuOptions::prepareVersion() const
|
|
{
|
|
OString version = m_program + " Version 2.0\n\n";
|
|
return version;
|
|
}
|
|
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|