source/build/pidl/tests/ndr_refptr.pl

   1 #!/usr/bin/perl
   2 # Simple tests for pidl's handling of ref pointers, based
   3 # on tridge's ref_notes.txt
   4 # (C) 2005 Jelmer Vernooij <jelmer@samba.org>.
   5 # Published under the GNU General Public License.
   6 use strict;
   7
   8 use FindBin qw($RealBin);
   9 use lib "$RealBin/..";
  10 use test;
  11
  12 my %settings = Test::GetSettings(@ARGV);
  13 $settings{'IDL-Arguments'} = ['--quiet', '--parse', '--parser=ndr_test.c', '--header=ndr_test.h'];
  14 $settings{'IncludeFiles'} = ['ndr_test.h'];
  15 $settings{'ExtraFiles'} = ['ndr_test.c'];
  16
  17 Test::test_idl("noptr-push", \%settings,
  18 '       typedef struct {
  19                 uint16 x;
  20         } xstruct;
  21
  22         [public] uint16 echo_TestRef([in] xstruct foo);
  23 ',
  24 '
  25         struct ndr_push *ndr = ndr_push_init();
  26         uint16_t v = 13;
  27         struct echo_TestRef r;
  28         r.in.foo.x = v;
  29
  30         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r))) {
  31                 fprintf(stderr, "push failed\n");
  32                 return 1;
  33         }
  34
  35         if (ndr->offset != 2) {
  36                 fprintf(stderr, "Offset(%d) != 2\n", ndr->offset);
  37                 return 2;
  38         }
  39
  40         if (ndr->data[0] != 13 || ndr->data[1] != 0) {
  41                 fprintf(stderr, "Data incorrect\n");
  42                 return 3;
  43         }
  44 ');
  45
  46 Test::test_idl("ptr-embedded-push", \%settings,
  47 '   typedef struct {
  48                 uint16 *x;
  49         } xstruct;
  50
  51         [public] uint16 echo_TestRef([in] xstruct foo);
  52 ',
  53 '
  54         uint16_t v = 13;
  55         struct ndr_push *ndr = ndr_push_init();
  56         struct echo_TestRef r;
  57         r.in.foo.x = &v;
  58
  59         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
  60                 return 1;
  61
  62         if (ndr->offset != 6)
  63                 return 2;
  64
  65         if (ndr->data[0] == 0 && ndr->data[1] == 0 &&
  66             ndr->data[2] == 0 && ndr->data[3] == 0)
  67                 return 3;
  68
  69         if (ndr->data[4] != 13 || ndr->data[5] != 0)
  70                 return 4;
  71 ');
  72
  73 Test::test_idl("ptr-embedded-push-null", \%settings,
  74 '   typedef struct {
  75                 uint16 *x;
  76         } xstruct;
  77
  78         [public] uint16 echo_TestRef([in] xstruct foo);
  79 ',
  80 '
  81         struct ndr_push *ndr = ndr_push_init();
  82         struct echo_TestRef r;
  83         r.in.foo.x = NULL;
  84
  85         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
  86                 return 1;
  87
  88         if (ndr->offset != 4)
  89                 return 2;
  90
  91         if (ndr->data[0] != 0 || ndr->data[1] != 0 ||
  92             ndr->data[2] != 0 || ndr->data[3] != 0)
  93                 return 3;
  94 ');
  95
  96 Test::test_idl("refptr-embedded-push", \%settings,
  97 '
  98         typedef struct {
  99                 [ref] uint16 *x;
 100         } xstruct;
 101
 102         [public] uint16 echo_TestRef([in] xstruct foo);
 103 ',
 104 '
 105         uint16_t v = 13;
 106         struct ndr_push *ndr = ndr_push_init();
 107         struct echo_TestRef r;
 108         r.in.foo.x = &v;
 109
 110         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 111                 return 1;
 112
 113         if (ndr->offset != 6)
 114                 return 2;
 115
 116         if (ndr->data[0] == 0 && ndr->data[1] == 0 &&
 117             ndr->data[2] == 0 && ndr->data[3] == 0)
 118                 return 3;
 119
 120         if (ndr->data[4] != 13 || ndr->data[5] != 0)
 121                 return 4;
 122 ');
 123
 124 Test::test_idl("refptr-embedded-push-null", \%settings,
 125 '
 126         typedef struct {
 127                 [ref] uint16 *x;
 128         } xstruct;
 129
 130         [public] uint16 echo_TestRef([in] xstruct foo);
 131 ',
 132 '
 133         struct ndr_push *ndr = ndr_push_init();
 134         struct echo_TestRef r;
 135         r.in.foo.x = NULL;
 136
 137         if (NT_STATUS_IS_OK(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 138                 return 1;
 139         /* Windows gives [client runtime error 0x6f4] */
 140 ');
 141
 142 Test::test_idl("ptr-top-push", \%settings,
 143 '
 144         typedef struct {
 145                 uint16 x;
 146         } xstruct;
 147
 148         [public] uint16 echo_TestRef([in] xstruct *foo);
 149 ',
 150 '
 151         struct ndr_push *ndr = ndr_push_init();
 152         struct echo_TestRef r;
 153         struct xstruct s;
 154         s.x = 13;
 155         r.in.foo = &s;
 156
 157         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 158                 return 1;
 159
 160         if (ndr->offset != 2)
 161                 return 2;
 162
 163         if (ndr->data[0] != 13 || ndr->data[1] != 0)
 164                 return 3;
 165 ');
 166
 167 Test::test_idl("ptr-top-push-null", \%settings,
 168 '
 169         typedef struct {
 170                 uint16 x;
 171         } xstruct;
 172
 173         [public] uint16 echo_TestRef([in] xstruct *foo);
 174 ',
 175 '
 176         struct ndr_push *ndr = ndr_push_init();
 177         struct echo_TestRef r;
 178         r.in.foo = NULL;
 179
 180         if (NT_STATUS_IS_OK(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 181                 return 1;
 182
 183         /* Windows gives [client runtime error 0x6f4] */
 184 ');
 185
 186
 187 Test::test_idl("refptr-top-push", \%settings,
 188 '
 189         typedef struct {
 190                 uint16 x;
 191         } xstruct;
 192
 193         [public] uint16 echo_TestRef([in,ref] xstruct *foo);
 194 ',
 195 '
 196         struct ndr_push *ndr = ndr_push_init();
 197         struct echo_TestRef r;
 198         struct xstruct s;
 199         s.x = 13;
 200         r.in.foo = &s;
 201
 202         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 203                 return 1;
 204
 205         if (ndr->offset != 2)
 206                 return 2;
 207
 208         if (ndr->data[0] != 13 || ndr->data[1] != 0)
 209                 return 3;
 210 ');
 211
 212 Test::test_idl("refptr-top-push-null", \%settings,
 213 '
 214         typedef struct {
 215                 uint16 x;
 216         } xstruct;
 217
 218         [public] uint16 echo_TestRef([in,ref] xstruct *foo);
 219 ',
 220 '
 221         struct ndr_push *ndr = ndr_push_init();
 222         struct echo_TestRef r;
 223         r.in.foo = NULL;
 224
 225         if (NT_STATUS_IS_OK(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 226                 return 1;
 227
 228         /* Windows gives [client runtime error 0x6f4] */
 229 ');
 230
 231
 232 Test::test_idl("uniqueptr-top-push", \%settings,
 233 '       typedef struct {
 234                 uint16 x;
 235         } xstruct;
 236
 237         [public] uint16 echo_TestRef([in,unique] xstruct *foo);
 238 ',
 239 '
 240         struct ndr_push *ndr = ndr_push_init();
 241         struct echo_TestRef r;
 242         struct xstruct s;
 243         s.x = 13;
 244         r.in.foo = &s;
 245
 246         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 247                 return 1;
 248
 249         if (ndr->offset != 6)
 250                 return 2;
 251
 252         if (ndr->data[0] == 0 && ndr->data[1] == 0 &&
 253             ndr->data[2] == 0 && ndr->data[3] == 0)
 254                 return 3;
 255
 256         if (ndr->data[4] != 13 || ndr->data[5] != 0)
 257                 return 4;
 258 ');
 259
 260 Test::test_idl("uniqueptr-top-push-null", \%settings,
 261 '       typedef struct {
 262                 uint16 x;
 263         } xstruct;
 264
 265         [public] uint16 echo_TestRef([in,unique] xstruct *foo);
 266 ',
 267 '
 268         struct ndr_push *ndr = ndr_push_init();
 269         struct echo_TestRef r;
 270         r.in.foo = NULL;
 271
 272         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 273                 return 1;
 274
 275         if (ndr->offset != 4)
 276                 return 2;
 277
 278         if (ndr->data[0] != 0 || ndr->data[1] != 0 ||
 279             ndr->data[2] != 0 || ndr->data[3] != 0)
 280                 return 3;
 281 ');
 282
 283
 284 Test::test_idl("ptr-top-out-pull", \%settings,
 285 '
 286         typedef struct {
 287                 uint16 x;
 288         } xstruct;
 289
 290         [public] void echo_TestRef([out] xstruct *foo);
 291 ',
 292 '
 293         uint8_t data[] = { 0x0D, 0x00 };
 294         DATA_BLOB b = { data, 2 };
 295         struct ndr_pull *ndr = ndr_pull_init_blob(&b, NULL);
 296         struct xstruct s;
 297         struct echo_TestRef r;
 298
 299         r.out.foo = &s;
 300
 301         if (NT_STATUS_IS_ERR(ndr_pull_echo_TestRef(ndr, NDR_OUT, &r)))
 302                 return 1;
 303
 304         if (!r.out.foo)
 305                 return 2;
 306
 307         if (r.out.foo->x != 13)
 308                 return 3;
 309 ');
 310
 311 Test::test_idl("ptr-top-out-pull-null", \%settings,
 312 '
 313         typedef struct {
 314                 uint16 x;
 315         } xstruct;
 316
 317         [public] void echo_TestRef([out] xstruct *foo);
 318 ',
 319 '
 320         uint8_t data[] = { 0x0D, 0x00 };
 321         DATA_BLOB b = { data, 2 };
 322         struct ndr_pull *ndr = ndr_pull_init_blob(&b, NULL);
 323         struct echo_TestRef r;
 324
 325         r.out.foo = NULL;
 326
 327         if (NT_STATUS_IS_OK(ndr_pull_echo_TestRef(ndr, NDR_OUT, &r)))
 328                 return 1;
 329
 330         /* Windows gives [client runtime error 0x6f4] */
 331 ');
 332
 333
 334 Test::test_idl("refptr-top-out-pull", \%settings,
 335 '
 336         typedef struct {
 337                 uint16 x;
 338         } xstruct;
 339
 340         [public] void echo_TestRef([out,ref] xstruct *foo);
 341 ',
 342 '
 343         uint8_t data[] = { 0x0D, 0x00 };
 344         DATA_BLOB b = { data, 2 };
 345         struct ndr_pull *ndr = ndr_pull_init_blob(&b, NULL);
 346         struct xstruct s;
 347         struct echo_TestRef r;
 348
 349         r.out.foo = &s;
 350
 351         if (NT_STATUS_IS_ERR(ndr_pull_echo_TestRef(ndr, NDR_OUT, &r)))
 352                 return 1;
 353
 354         if (!r.out.foo)
 355                 return 2;
 356
 357         if (r.out.foo->x != 13)
 358                 return 3;
 359 ');
 360
 361 Test::test_idl("refptr-top-out-pull-null", \%settings,
 362 '
 363         typedef struct {
 364                 uint16 x;
 365         } xstruct;
 366
 367         [public] void echo_TestRef([out,ref] xstruct *foo);
 368 ',
 369 '
 370         uint8_t data[] = { 0x0D, 0x00 };
 371         DATA_BLOB b = { data, 2 };
 372         struct ndr_pull *ndr = ndr_pull_init_blob(&b, NULL);
 373         struct echo_TestRef r;
 374
 375         r.out.foo = NULL;
 376
 377         if (NT_STATUS_IS_OK(ndr_pull_echo_TestRef(ndr, NDR_OUT, &r)))
 378                 return 1;
 379
 380         /* Windows gives [client runtime error 0x6f4] */
 381 ');
 382
 383
 384 Test::test_idl("ptr-top-push-double", \%settings,
 385 '
 386         [public] void echo_TestRef([in] uint16 **foo);
 387 ',
 388 '       struct ndr_push *ndr = ndr_push_init();
 389         struct echo_TestRef r;
 390         uint16_t v = 13;
 391         uint16_t *pv = &v;
 392         r.in.foo = &pv;
 393
 394         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 395                 return 1;
 396
 397         if (ndr->offset != 6)
 398                 return 2;
 399
 400         if (ndr->data[0] == 0 && ndr->data[1] == 0 &&
 401             ndr->data[2] == 0 && ndr->data[3] == 0)
 402                 return 3;
 403
 404         if (ndr->data[4] != 0x0D || ndr->data[5] != 0x00)
 405                 return 4;
 406 ');
 407
 408 Test::test_idl("ptr-top-push-double-sndnull", \%settings,
 409 '
 410         [public] void echo_TestRef([in] uint16 **foo);
 411 ',
 412 '       struct ndr_push *ndr = ndr_push_init();
 413         struct echo_TestRef r;
 414         uint16_t *pv = NULL;
 415         r.in.foo = &pv;
 416
 417         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 418                 return 1;
 419
 420         if (ndr->offset != 4)
 421                 return 2;
 422
 423         if (ndr->data[0] != 0 || ndr->data[1] != 0 ||
 424             ndr->data[2] != 0 || ndr->data[3] != 0)
 425                 return 3;
 426 ');
 427
 428 Test::test_idl("ptr-top-push-double-fstnull", \%settings,
 429 '
 430         [public] void echo_TestRef([in] uint16 **foo);
 431 ',
 432 '       struct ndr_push *ndr = ndr_push_init();
 433         struct echo_TestRef r;
 434         r.in.foo = NULL;
 435
 436         if (NT_STATUS_IS_OK(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 437                 return 1;
 438
 439         /* Windows gives [client runtime error 0x6f4] */
 440
 441 ');
 442
 443
 444 Test::test_idl("refptr-top-push-double", \%settings,
 445 '
 446         [public] void echo_TestRef([in,ref] uint16 **foo);
 447 ',
 448 '       struct ndr_push *ndr = ndr_push_init();
 449         struct echo_TestRef r;
 450         uint16_t v = 13;
 451         uint16_t *pv = &v;
 452         r.in.foo = &pv;
 453
 454         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 455                 return 1;
 456
 457         if (ndr->offset != 6)
 458                 return 2;
 459
 460         if (ndr->data[0] == 0 && ndr->data[1] == 0 &&
 461             ndr->data[2] == 0 && ndr->data[3] == 0)
 462                 return 3;
 463
 464         if (ndr->data[4] != 0x0D || ndr->data[5] != 0x00)
 465                 return 4;
 466 ');
 467
 468 Test::test_idl("refptr-top-push-double-sndnull", \%settings,
 469 '
 470         [public] void echo_TestRef([in,ref] uint16 **foo);
 471 ',
 472 '       struct ndr_push *ndr = ndr_push_init();
 473         struct echo_TestRef r;
 474         uint16_t *pv = NULL;
 475         r.in.foo = &pv;
 476
 477         if (NT_STATUS_IS_ERR(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 478                 return 1;
 479
 480         if (ndr->offset != 4)
 481                 return 2;
 482
 483         if (ndr->data[0] != 0 || ndr->data[1] != 0 ||
 484             ndr->data[2] != 0 || ndr->data[3] != 0)
 485                 return 3;
 486 ');
 487
 488 Test::test_idl("refptr-top-push-double-fstnull", \%settings,
 489 '
 490         [public] void echo_TestRef([in,ref] uint16 **foo);
 491 ',
 492 '       struct ndr_push *ndr = ndr_push_init();
 493         struct echo_TestRef r;
 494         r.in.foo = NULL;
 495
 496         if (NT_STATUS_IS_OK(ndr_push_echo_TestRef(ndr, NDR_IN, &r)))
 497                 return 1;
 498
 499         /* Windows gives [client runtime error 0x6f4] */
 500
 501 ');