FazBrowse GitHub Viewer
|
Trending
|
URL:
|
Home
Tools:
[Download Repo ZIP]
[View Raw Code]
[Original HTTPS Page]
rstudio/src/cpp/r/RErrorCategory.cpp at master · andschar/rstudio · GitHub
andschar
/
rstudio
Public
forked from
rstudio/rstudio
Notifications
You must be signed in to change notification settings
Fork
0
Star
0
Code
Pull requests
0
Actions
Projects
Wiki
Security and quality
0
Insights
Additional navigation options
Code
Pull requests
Actions
Projects
Wiki
Security and quality
Insights
Expand file tree
Breadcrumbs
rstudio
/
src
/
cpp
/
r
/
RErrorCategory.cpp
Copy path
More file actions
More file actions
Latest commit
History
History
History
119 lines (97 loc) · 2.81 KB
Breadcrumbs
rstudio
/
src
/
cpp
/
r
/
RErrorCategory.cpp
Copy path
File metadata and controls
119 lines (97 loc) · 2.81 KB
Raw
Copy raw file
Download raw file
Open symbols panel
Edit and raw actions
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
/*
* RErrorCategory.cpp
*
* Copyright (C) 2009-12 by RStudio, Inc.
*
* Unless you have received this program directly from RStudio pursuant
* to the terms of a commercial license agreement with RStudio, then
* this program is licensed to you under the terms of version 3 of the
* GNU Affero General Public License. This program is distributed WITHOUT
* ANY EXPRESS OR IMPLIED WARRANTY, INCLUDING THOSE OF NON-INFRINGEMENT,
* MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. Please refer to the
* AGPL (http://www.gnu.org/licenses/agpl-3.0.txt) for more details.
*
*/
#
include
<
r/RErrorCategory.hpp
>
namespace
rstudio
{
namespace
r
{
class
RErrorCategory
:
public
boost
::system::error_category
{
public:
virtual
const
char
*
name
()
const
BOOST_NOEXCEPT;
virtual
std::string
message
(
int
ev )
const
;
};
const
boost::system::error_category&
rCategory
()
{
static
RErrorCategory rErrorCategoryConst ;
return
rErrorCategoryConst ;
}
const
char
*
RErrorCategory::name
()
const
BOOST_NOEXCEPT
{
return
"
r
"
;
}
std::string
RErrorCategory::message
(
int
ev )
const
{
std::string message ;
switch
(ev)
{
case
errc::RHomeNotFound:
message =
"
Unable to find R home directory
"
;
break
;
case
errc::UnsupportedLocale:
message =
"
Unsupported locale (UTF-8 required)
"
;
break
;
case
errc::ExpressionParsingError:
message =
"
Expression parsing error
"
;
break
;
case
errc::CodeExecutionError:
message =
"
R code execution error
"
;
break
;
case
errc::SymbolNotFoundError:
message =
"
R symbol not found
"
;
break
;
case
errc::ListElementNotFoundError:
message =
"
List element not found
"
;
break
;
case
errc::UnexpectedDataTypeError:
message =
"
Unexpected data type
"
;
break
;
case
errc::NoDataAvailableError:
message =
"
No data available from R
"
;
break
;
default
:
message =
"
Unknown error
"
;
break
;
}
return
message ;
}
core::Error
rCodeExecutionError
(
const
std::string& errMsg,
const
core::ErrorLocation& location)
{
core::Error
error
(errc::CodeExecutionError, location);
error.
addProperty
(
"
errormsg
"
, errMsg);
return
error;
}
bool
isCodeExecutionError
(
const
core::Error& error, std::string* pErrMsg)
{
if
(error.
code
() == r::errc::CodeExecutionError)
{
if
(pErrMsg !=
NULL
)
*pErrMsg = error.
getProperty
(
"
errormsg
"
);
return
true
;
}
else
{
return
false
;
}
}
std::string
endUserErrorMessage
(
const
core::Error& error)
{
std::string errMsg;
if
(
isCodeExecutionError
(error, &errMsg))
return
errMsg;
else
return
error.
code
().
message
();
}
}
//
namespace r
}
//
namespace rstudio
Back
|
FazBrowse Home
|
New Git URL