← Back to branch summary

~ubuntu-branches/ubuntu/trusty/virtualbox-lts-xenial/trusty-proposed

« back to all changes in this revision

Viewing changes to src/libs/xpcom18a4/xpcom/reflect/xptcall/src/md/unix/xptcstubs_openvms_alpha.cpp

  • Committer: Package Import Robot
  • Author(s): Gianfranco Costamagna
  • Date: 2016-02-23 14:28:26 UTC
  • Revision ID: package-import@ubuntu.com-20160223142826-bdu69el2z6wa2a44
Tags: upstream-4.3.36-dfsg
Import upstream version 4.3.36-dfsg

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/libs/xpcom18a4/xpcom/reflect/xptcall/src/md/unix/xptcstubs_openvms_alpha.cpp
 
1
/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
 
2
/* ***** BEGIN LICENSE BLOCK *****
 
3
 * Version: MPL 1.1/GPL 2.0/LGPL 2.1
 
4
 *
 
5
 * The contents of this file are subject to the Mozilla Public License Version
 
6
 * 1.1 (the "License"); you may not use this file except in compliance with
 
7
 * the License. You may obtain a copy of the License at
 
8
 * http://www.mozilla.org/MPL/
 
9
 *
 
10
 * Software distributed under the License is distributed on an "AS IS" basis,
 
11
 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
 
12
 * for the specific language governing rights and limitations under the
 
13
 * License.
 
14
 *
 
15
 * The Original Code is mozilla.org code.
 
16
 *
 
17
 * The Initial Developer of the Original Code is
 
18
 * Netscape Communications Corporation.
 
19
 * Portions created by the Initial Developer are Copyright (C) 1999
 
20
 * the Initial Developer. All Rights Reserved.
 
21
 *
 
22
 * Contributor(s):
 
23
 *
 
24
 * Alternatively, the contents of this file may be used under the terms of
 
25
 * either of the GNU General Public License Version 2 or later (the "GPL"),
 
26
 * or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
 
27
 * in which case the provisions of the GPL or the LGPL are applicable instead
 
28
 * of those above. If you wish to allow use of your version of this file only
 
29
 * under the terms of either the GPL or the LGPL, and not to allow others to
 
30
 * use your version of this file under the terms of the MPL, indicate your
 
31
 * decision by deleting the provisions above and replace them with the notice
 
32
 * and other provisions required by the GPL or the LGPL. If you do not delete
 
33
 * the provisions above, a recipient may use your version of this file under
 
34
 * the terms of any one of the MPL, the GPL or the LGPL.
 
35
 *
 
36
 * ***** END LICENSE BLOCK ***** */
 
37
 
 
38
/* Implement shared vtbl methods. */
 
39
 
 
40
#include "xptcprivate.h"
 
41
 
 
42
extern "C" {
 
43
 
 
44
nsresult
 
45
PrepareAndDispatch(nsXPTCStubBase* self, uint32 methodIndex, PRUint64* args)
 
46
{
 
47
    const PRUint8 PARAM_BUFFER_COUNT = 16;
 
48
    const PRUint8 NUM_ARG_REGS = 6-1;        // -1 for "this" pointer
 
49
 
 
50
    nsXPTCMiniVariant paramBuffer[PARAM_BUFFER_COUNT];
 
51
    nsXPTCMiniVariant* dispatchParams = NULL;
 
52
    nsIInterfaceInfo* iface_info = NULL;
 
53
    const nsXPTMethodInfo* info;
 
54
    PRUint8 paramCount;
 
55
    PRUint8 i;
 
56
    nsresult result = NS_ERROR_FAILURE;
 
57
 
 
58
    NS_ASSERTION(self,"no self");
 
59
 
 
60
    self->GetInterfaceInfo(&iface_info);
 
61
    NS_ASSERTION(iface_info,"no interface info");
 
62
 
 
63
    iface_info->GetMethodInfo(PRUint16(methodIndex), &info);
 
64
    NS_ASSERTION(info,"no interface info");
 
65
 
 
66
    paramCount = info->GetParamCount();
 
67
 
 
68
    // setup variant array pointer
 
69
    if(paramCount > PARAM_BUFFER_COUNT)
 
70
        dispatchParams = new nsXPTCMiniVariant[paramCount];
 
71
    else
 
72
        dispatchParams = paramBuffer;
 
73
    NS_ASSERTION(dispatchParams,"no place for params");
 
74
 
 
75
    // args[0] to args[NUM_ARG_REGS] hold floating point register values
 
76
    PRUint64* ap = args + NUM_ARG_REGS;
 
77
    for(i = 0; i < paramCount; i++, ap++)
 
78
    {
 
79
        const nsXPTParamInfo& param = info->GetParam(i);
 
80
        const nsXPTType& type = param.GetType();
 
81
        nsXPTCMiniVariant* dp = &dispatchParams[i];
 
82
 
 
83
        if(param.IsOut() || !type.IsArithmetic())
 
84
        {
 
85
            dp->val.p = (void*) *ap;
 
86
            continue;
 
87
        }
 
88
        // else
 
89
        switch(type)
 
90
        {
 
91
        case nsXPTType::T_I8     : dp->val.i8  = (PRInt8)    *ap; break;
 
92
        case nsXPTType::T_I16    : dp->val.i16 = (PRInt16)   *ap; break;
 
93
        case nsXPTType::T_I32    : dp->val.i32 = (PRInt32)   *ap; break;
 
94
        case nsXPTType::T_I64    : dp->val.i64 = (PRInt64)   *ap; break;
 
95
        case nsXPTType::T_U8     : dp->val.u8  = (PRUint8)   *ap; break;
 
96
        case nsXPTType::T_U16    : dp->val.u16 = (PRUint16)  *ap; break;
 
97
        case nsXPTType::T_U32    : dp->val.u32 = (PRUint32)  *ap; break;
 
98
        case nsXPTType::T_U64    : dp->val.u64 = (PRUint64)  *ap; break;
 
99
        case nsXPTType::T_FLOAT  :
 
100
            if(i < NUM_ARG_REGS)
 
101
            {
 
102
                // floats passed via registers are stored as doubles
 
103
                // in the first NUM_ARG_REGS entries in args
 
104
                dp->val.u64 = (PRUint64) args[i];
 
105
                dp->val.f = (float) dp->val.d;    // convert double to float
 
106
            }
 
107
            else
 
108
                dp->val.u32 = (PRUint32) *ap;
 
109
            break;
 
110
        case nsXPTType::T_DOUBLE :
 
111
            // doubles passed via registers are also stored
 
112
            // in the first NUM_ARG_REGS entries in args
 
113
            dp->val.u64 = (i < NUM_ARG_REGS) ? args[i] : *ap;
 
114
            break;
 
115
        case nsXPTType::T_BOOL   : dp->val.b   = (PRBool)    *ap; break;
 
116
        case nsXPTType::T_CHAR   : dp->val.c   = (char)      *ap; break;
 
117
        case nsXPTType::T_WCHAR  : dp->val.wc  = (PRUnichar) *ap; break;
 
118
        default:
 
119
            NS_ASSERTION(0, "bad type");
 
120
            break;
 
121
        }
 
122
    }
 
123
 
 
124
    result = self->CallMethod((PRUint16)methodIndex, info, dispatchParams);
 
125
 
 
126
    NS_RELEASE(iface_info);
 
127
 
 
128
    if(dispatchParams != paramBuffer)
 
129
        delete [] dispatchParams;
 
130
 
 
131
    return result;
 
132
}
 
133
 
 
134
}
 
135
 
 
136
#define STUB_ENTRY(n)  /* This is in the ASM file */
 
137
 
 
138
#define SENTINEL_ENTRY(n) \
 
139
nsresult nsXPTCStubBase::Sentinel##n() \
 
140
{ \
 
141
    NS_ASSERTION(0,"nsXPTCStubBase::Sentinel called"); \
 
142
    return NS_ERROR_NOT_IMPLEMENTED; \
 
143
}
 
144
 
 
145
#include "xptcstubsdef.inc"
 
146
 
 
147