/* Generated with C2C (Cedar To C)*/ /* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */ /* time: October 9, 1992 0:51:32 am PDT */ /* C2C version: October 16, 1990 (native) */ /* ref-counting: off */ /* file: X11CommanderOpsImpl, module: X11CommanderOpsImpl */ /* switches: bcfhklnouw */ #include <cedar/InstallationSupport.h> #include <cedar/CedarExtra.h> static char versionStamp[] = "@(#)mob←version [3994066225,1278941649] X11CommanderOpsImpl"; typedef unsigned word, *ptr; typedef unsigned char byte, *bPt; typedef unsigned short half, *hPt; typedef word (*fPt)(); typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8; typedef struct {W8 f; word r;} W9; typedef struct {word f0, f1;} W2; typedef struct {word f0, f1, f2, f3, f4, f5;} W6; typedef W2 *W2Pt; typedef struct {W8 f; W2 r;} W10; #define SOURCE(p, l) /* source p, l */ #define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) ) static void NoName←Q1164(); static void X11CommanderOpsImpl←P0(); static word CreateOrFail←P60(); static word NoName←Q1224(); static void SetConnection←P120(); static void FillInConnection←P180(); static void DoWithConnection←P240(); static word NoName←Q1284(); static void Cleanup←P696(); static void X11Command←P300(); static void ExecuteRealCommand←P996(); static void NoName←Q1344(); static void NoName←Q1404(); static struct {unsigned f; char r[4];} string1 = {131076, "\216\251\000"}; static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"}; static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\104\304\000\000"}; static struct {unsigned f; char r[24];} string4 = {1376277, "\007\000\001\002\007\020\001\002\000\007\036\002\004\003\002\004\014\016\015\003\001\000\000"}; static struct {unsigned f; char r[16];} string5 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"}; static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\373\225\000\071\300\362\156\307\320\100\230\000\000"}; static struct {unsigned f; char r[4];} string7 = {196611, "\004@\177"}; static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\126\304\000\000"}; static struct {unsigned f; char r[60];} string9 = {3735609, "\006\023\040\001\070\001\100\100\001\100\104\001\100\110\001\100\140\001\100\144\001\100\150\001\100\154\001\100\160\001\100\164\001\100\170\001\100\174\001\100\200\001\100\224\001\100\234\001\100\240\001\100\244\001\100\250\001\000\000"}; static struct {unsigned f; char r[4];} string10 = {196612, "** "}; static struct {unsigned f; char r[16];} string11 = {983056, "CommanderHandle"}; static struct {unsigned f; char r[12];} string12 = {589836, "X11server\000\000"}; static struct {unsigned f; char r[12];} string13 = {720908, "X11geometry"}; static struct {unsigned f; char r[12];} string14 = {524300, "X11synch\000\000\000"}; static struct {unsigned f; char r[8];} string15 = {262152, "TRUE\000\000\000"}; static struct {unsigned f; char r[28];} string16 = {1703964, "** Dead default connection\000"}; static struct {unsigned f; char r[144];} string17 = {9240720, "Executes command following -- with default server.\012\011Format: X11 [-display ServerName] [-sync] [-check] [-geometry wXh[+x+y]] -- Real Command\012\000\000"}; static struct {unsigned f; char r[44];} string18 = {2621484, "** Default for connection not recognized\000\000\000"}; static struct {unsigned f; char r[4];} string19 = {196612, "X11"}; static struct {unsigned f; char r[20];} string20 = {1179668, "** Dead connection\000"}; static struct {unsigned f; char r[8];} string21 = {262152, " -- \000\000\000"}; static struct {unsigned f; char r[36];} string22 = {2162724, " ** must specify -- and a command\000\000"}; static struct {unsigned f; char r[16];} string23 = {851984, " ** missed --\000\000"}; static struct {unsigned f; char r[12];} string24 = {524300, "-display\000\000\000"}; static struct {unsigned f; char r[8];} string25 = {458760, "-server"}; static struct {unsigned f; char r[8];} string26 = {393224, "-synch\000"}; static struct {unsigned f; char r[8];} string27 = {327688, "-sync\000\000"}; static struct {unsigned f; char r[8];} string28 = {393224, "-check\000"}; static struct {unsigned f; char r[12];} string29 = {589836, "-geometry\000\000"}; static struct {unsigned f; char r[4];} string30 = {131076, "--\000"}; static struct {unsigned f; char r[28];} string31 = {1769500, " ** unrecognized argument: "}; static struct {unsigned f; char r[4];} string32 = {65540, "\012\000\000"}; static struct {unsigned f; char r[20];} string33 = {1179668, "GetShellConnection\000"}; static struct {unsigned f; char r[16];} string34 = {851984, "\257\300\356\020\235\061\300\114\073\031\321\100\164\000\000"}; static struct {unsigned f; char r[12];} string35 = {524296, "\006\001\054\010\000\004\030\001\000\000\000"}; static struct {unsigned f; char r[16];} string36 = {851984, "\257\300\055\153\222\376\300\327\164\352\142\100\150\000\000"}; static struct {unsigned f; char r[16];} string37 = {851984, "\257\300\373\225\000\071\300\362\156\307\320\100\150\000\000"}; static struct {unsigned f; char r[16];} string38 = {851984, "\257\300\311\235\133\064\300\165\175\234\175\100\150\000\000"}; static struct {unsigned f; char r[16];} string39 = {851984, "\257\300\314\116\377\204\300\167\024\373\125\100\150\000\000"}; static struct {unsigned f; char r[16];} string40 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"}; static struct {unsigned f; char r[16];} string41 = {851984, "\257\300\351\276\264\273\300\115\104\320\264\100\164\000\000"}; static struct {unsigned f; char r[16];} string42 = {851984, "\257\300\313\123\221\202\300\154\256\060\341\100\150\000\000"}; static struct {unsigned f; char r[16];} string43 = {851984, "\257\300\242\021\151\152\300\254\342\070\173\100\150\000\000"}; static struct {unsigned f; char r[16];} string44 = {851984, "\257\300\054\174\025\242\300\120\014\117\154\100\150\000\000"}; static struct {unsigned f; char r[16];} string45 = {851984, "\257\300\273\033\216\325\300\071\334\365\112\100\150\000\000"}; static struct { word f0[35]; word f35; word f36; word f37; word f38; word f39; word f40; word f41; word f42; word f43; word f44; word f45; word f46[11]; } globalframe = { {0}, (word) X11Command←P300, 0, (word) DoWithConnection←P240, 0, (word) FillInConnection←P180, 0, (word) SetConnection←P120, 0, (word) CreateOrFail←P60, 0, (word) X11CommanderOpsImpl←P0, {0} }; static void NoName←Q1164() { register ptr gf←c0109 = (ptr) &globalframe; word var←c19688; (* (( (ptr) gf←c0109)+4) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2); (* (( (ptr) gf←c0109)+7) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4); (* (( (ptr) gf←c0109)+8) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string2); (* (( (ptr) gf←c0109)+9) ) = (word) XR←GetTypeIndex((word) &string6, 0, (word) &string7); (* (( (ptr) gf←c0109)+10) ) = (word) XR←GetTypeIndex((word) &string8, 0, (word) &string9); (* (ptr) (( (bPt) gf←c0109)+44) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string10); (* (ptr) (( (bPt) gf←c0109)+48) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+4) ), (word) &string11); (* (ptr) (( (bPt) gf←c0109)+52) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+4) ), (word) &string12); (* (ptr) (( (bPt) gf←c0109)+56) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+4) ), (word) &string13); (* (ptr) (( (bPt) gf←c0109)+60) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+4) ), (word) &string14); (* (ptr) (( (bPt) gf←c0109)+64) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+4) ), (word) &string15); (* (ptr) (( (bPt) gf←c0109)+68) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string16); (* (ptr) (( (bPt) gf←c0109)+72) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string17); (* (ptr) (( (bPt) gf←c0109)+76) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string18); (* (ptr) (( (bPt) gf←c0109)+80) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string19); (* (ptr) (( (bPt) gf←c0109)+84) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string20); (* (ptr) (( (bPt) gf←c0109)+88) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string21); (* (ptr) (( (bPt) gf←c0109)+92) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string22); (* (ptr) (( (bPt) gf←c0109)+96) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string23); (* (ptr) (( (bPt) gf←c0109)+100) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string24); (* (ptr) (( (bPt) gf←c0109)+104) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string25); (* (ptr) (( (bPt) gf←c0109)+108) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string26); (* (ptr) (( (bPt) gf←c0109)+112) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string27); (* (ptr) (( (bPt) gf←c0109)+116) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string28); (* (ptr) (( (bPt) gf←c0109)+120) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string29); (* (ptr) (( (bPt) gf←c0109)+124) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string30); (* (ptr) (( (bPt) gf←c0109)+128) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string31); (* (ptr) (( (bPt) gf←c0109)+132) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+8) ), (word) &string32); (* (ptr) (( (bPt) gf←c0109)+136) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0109)+4) ), (word) &string33); (void) XR←DeclareGlobalFrame((word) "X11CommanderOpsImpl", &globalframe, (word) XR←GetTypeIndex((word) &string34, 0, (word) &string35) , (word) (( (bPt) gf←c0109)+180)/* var←c18984 */ ); var←c19688 = (word) XR←ImportInterface((word) "Atom", (word) XR←GetTypeIndexS((word) (&string36)), 16); (* (( (ptr) gf←c0109)+55)/* var←c19624 */ ) = var←c19688; (void) XR←ImportProcS(var←c19688, 67897859); var←c19688 = (word) XR←ImportInterface((word) "Commander", (word) XR←GetTypeIndexS((word) (&string37)), 3); (* (( (ptr) gf←c0109)+48)/* var←c19048 */ ) = var←c19688; (void) XR←ImportProcS(var←c19688, 1310725); var←c19688 = (word) XR←ImportInterface((word) "CommanderOps", (word) XR←GetTypeIndexS((word) (&string38)), 14); (* (( (ptr) gf←c0109)+50)/* var←c19112 */ ) = var←c19688; (void) XR←ImportProcS(var←c19688, 67634946); (void) XR←ImportProcS(var←c19688, 67633666); var←c19688 = (word) XR←ImportInterface((word) "ProcessProps", (word) XR←GetTypeIndexS((word) (&string39)), 6); (* (( (ptr) gf←c0109)+52)/* var←c19240 */ ) = var←c19688; (void) XR←ImportProcS(var←c19688, 524290); (void) XR←ImportProcS(var←c19688, 67371777); var←c19688 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string40)), 43); (* (( (ptr) gf←c0109)+51)/* var←c19176 */ ) = var←c19688; (void) XR←ImportProcS(var←c19688, 67898627); (void) XR←ImportProcS(var←c19688, 68419845); (void) XR←ImportProcS(var←c19688, 67896323); (void) XR←ImportProcS(var←c19688, 68159236); (void) XR←ImportProcS(var←c19688, 67633666); var←c19688 = (word) XR←ImportInterface((word) "Xl", (word) XR←GetTypeIndexS((word) (&string41)), 218); (* (( (ptr) gf←c0109)+49)/* var←c19080 */ ) = var←c19688; (void) XR←ImportProcS(var←c19688, 533762); (void) XR←ImportProcS(var←c19688, 533506); (void) XR←ImportProcS(var←c19688, 68690438); var←c19688 = (word) XR←ImportInterface((word) "XTkDB", (word) XR←GetTypeIndexS((word) (&string42)), 7); (* (( (ptr) gf←c0109)+53)/* var←c19304 */ ) = var←c19688; (void) XR←ImportProcS(var←c19688, 402915841); var←c19688 = (word) XR←ImportInterface((word) "XTkNotification", (word) XR←GetTypeIndexS((word) (&string43)), 2); (* (( (ptr) gf←c0109)+47)/* var←c19016 */ ) = var←c19688; (void) XR←ImportProcS(var←c19688, 1048580); var←c19688 = (word) XR←ImportInterface((word) "XTkShellWidgets", (word) XR←GetTypeIndexS((word) (&string44)), 26); (* (( (ptr) gf←c0109)+54)/* var←c19368 */ ) = var←c19688; (void) XR←ImportProcS(var←c19688, 67376641); (void) XR←ImportProcS(var←c19688, 67371009); var←c19688 = (word) XR←ExportInterface((word) "X11CommanderOps", (word) XR←GetTypeIndexS((word) (&string45)), 1); (* (( (ptr) gf←c0109)+56)/* var←c19720 */ ) = var←c19688; (void) XR←ExportProcS(var←c19688, (word) (( (bPt) gf←c0109)+148)/* var←c18856 */ , 786435); } static void X11CommanderOpsImpl←P0(formal←c024, formal←c023) word formal←c024; word formal←c023; { register ptr gf←c19752 = (ptr) &globalframe; /* X11CommanderOpsImpl: */ SOURCE(131, 5253) SOURCE(5118, 80) { word pd46; pd46 = (* (( (ptr) (* (( (ptr) gf←c19752)+47)/* var←c19016 */ ))+4) ); (void) ( *( (fPt) ((* (ptr) pd46 ))))((* (( (ptr) gf←c19752)+34) ), (word) (( (bPt) gf←c19752)+156)/* var←c18888 */ , 0, 1, pd46) ; }; SOURCE(5200, 184) { word pd47; pd47 = (* (( (ptr) (* (( (ptr) gf←c19752)+48)/* var←c19048 */ ))+4) ); (void) ( *( (fPt) ((* (ptr) pd47 ))))((* (( (ptr) gf←c19752)+20) ), (word) (( (bPt) gf←c19752)+140)/* var←c18824 */ , (* ( ( (ptr) gf←c19752)+18) ), 0, 1, pd47); }; } static word CreateOrFail←P60(formal←c0132, formal←c0133) word formal←c0132; word formal←c0133; { W9 var←c19784; /* declaration of serverName←v3136 skipped */ /* declaration of synch←v3164 skipped */ register ptr gf←c19816 = (ptr) &globalframe; word connection←v3208; /* declaration of reason←v3440 skipped */ (* (( (ptr) &var←c19784)+4)/* serverName←v3136 */ ) = formal←c0132; (* (( (ptr) &var←c19784)+5)/* synch←v3164 */ ) = formal←c0133; /* CreateOrFail: */ SOURCE(303, 341) SOURCE(303, 341) connection←v3208 = 0; SOURCE(405, 17) (* (( (ptr) &var←c19784)+6)/* reason←v3440 */ ) = 0; SOURCE(424, 122) SOURCE(424, 122) { /* declaration of var←c01 skipped */ (* (( (ptr) &var←c19784)+7)/* var←c01 */ ) = (* (( (ptr) (* (( (ptr) gf←c19816)+49)/* var←c19080 */ ))+38) ); { /* declaration of var←c02 skipped */ { word var←c03; { word var←c0124; var←c0124 = (word) &var←c19784; var←c03 = (word) XR←Enable(( ((word) (fPt) NoName←Q1224) ), ( ((word) (fPt) NoName←Q1404) ), var←c0124); }; if ((var←c03 == 2)) { goto lab←L100001; }; }; connection←v3208 = (* (( (ptr) &var←c19784)+8)/* var←c02 */ ); }; }; lab←L100001: ; SOURCE(560, 84) if ((connection←v3208 == 0) || (0 == (* (( (ptr) connection←v3208)+15) ))) { SOURCE(591, 53) { word var←c19144; { word pd48; pd48 = (* (( (ptr) (* (( (ptr) gf←c19816)+51)/* var←c19176 */ ))+6) ); var←c19144 = (word) ( *( (fPt) ((* (ptr) pd48 ))))((* (( (ptr) gf←c19816)+11) ), (* (( (ptr) &var←c19784)+6)/* reason←v3440 */ ), pd48) ; }; { word var←c030; var←c030 = var←c19144; (void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c19816)+50)/* var←c19112 */ ))+4) ), (word) &var←c030); }; }; }; SOURCE(303, 341) return(connection←v3208); } static word NoName←Q1224(formal←c0112) word formal←c0112; { SOURCE(424, 122) { word pd49; pd49 = (* (( (ptr) formal←c0112)+7) ); (* (( (ptr) formal←c0112)+8) ) = (word) ( *( (fPt) ((* (ptr) pd49 ))))((* (( (ptr) formal←c0112)+4) ), (* (( (ptr) formal←c0112)+5) ), 0, 0, 0, 0, pd49); }; return(0); } static void SetConnection←P120(widget←v3268, connection←v3296) word widget←v3268; word connection←v3296; { register ptr gf←c19848 = (ptr) &globalframe; /* SetConnection: */ SOURCE(650, 197) SOURCE(722, 125) if ( ( (connection←v3296 != 0) ? (0 != (* (( (ptr) connection←v3296)+15) )) : 0 ) ) { SOURCE(753, 30) (* (( (ptr) widget←v3268)+34) ) = connection←v3296; SOURCE(785, 34) { word pd50; pd50 = (* (( (ptr) (* (( (ptr) gf←c19848)+49)/* var←c19080 */ ))+40) ); (void) ( *( (fPt) ((* (ptr) pd50 ))))(connection←v3296, widget←v3268, pd50); }; SOURCE(821, 26) { word pd51; pd51 = (* (( (ptr) (* (( (ptr) gf←c19848)+49)/* var←c19080 */ ))+41) ); (void) ( *( (fPt) ((* (ptr) pd51 ))))(connection←v3296, 0, pd51); }; }; } static void FillInConnection←P180(widget←v6036, registerData←v6064, callData←v6092, event←v6120) word widget←v6036; word registerData←v6064; word callData←v6092; word event←v6120; { register ptr gf←c19880 = (ptr) &globalframe; word var←c19208; word c←v18776; /* FillInConnection: */ SOURCE(856, 1714) SOURCE(899, 42) c←v18776 = (* (( (ptr) widget←v6036)+34) ); if ((c←v18776 != 0)) { var←c19208 = (0 != (* (( (ptr) c←v18776)+15) )); } else { var←c19208 = 0; }; if ((0 != var←c19208)) { SOURCE(935, 6) return; }; SOURCE(943, 1627) { word var←c19272; { word pd52; pd52 = (* (( (ptr) (* (( (ptr) gf←c19880)+52)/* var←c19240 */ ))+7) ); var←c19272 = (word) ( *( (fPt) ((* (ptr) pd52 ))))((* ((( (ptr) gf←c19880)+12)) ), pd52); }; if ((var←c19272 == 0)) { goto lab←L100005; }; if (((* (( (ptr) gf←c19880)+9) ) == XR←GetReferentType(var←c19272))) { { word cmd←v3484; cmd←v3484 = var←c19272; SOURCE(1024, 1552) { word server←v3528; word geometry←v3556; word synch←v3584; SOURCE(1150, 46) { word pd53; pd53 = (* (( (ptr) (* (( (ptr) gf←c19880)+52)/* var←c19240 */ ))+7) ); server←v3528 = (word) ( *( (fPt) ((* (ptr) pd53 ))))((* ((( (ptr) gf←c19880)+13)) ), pd53); }; SOURCE(1198, 50) { word pd54; pd54 = (* (( (ptr) (* (( (ptr) gf←c19880)+52)/* var←c19240 */ ))+7) ); geometry←v3556 = (word) ( *( (fPt) ((* (ptr) pd54 ))))((* ((( (ptr) gf←c19880)+14)) ), pd54); }; SOURCE(1250, 51) { word pd55; pd55 = (* (( (ptr) (* (( (ptr) gf←c19880)+52)/* var←c19240 */ ))+7) ); synch←v3584 = ((word) ( *( (fPt) ((* (ptr) pd55 ))))((* ((( (ptr) gf←c19880)+15)) ), pd55) == (* (( (ptr) gf←c19880)+16) )); }; SOURCE(1303, 743) if ((geometry←v3556 != 0)) { SOURCE(1324, 730) { word hints←v3656 = 0; W2 s←v3684; W2 p←v3712; word xneg←v3740; word yneg←v3768; SOURCE(1414, 49) { W6 var←c19336; { word pd56; pd56 = (* (( (ptr) (* (( (ptr) gf←c19880)+53)/* var←c19304 */ ))+6) ); (void) ( *( (fPt) ((* (ptr) pd56 ))))((word) &var←c19336, geometry←v3556, pd56); }; yneg←v3768 = var←c19336.f5; xneg←v3740 = var←c19336.f4; p←v3712 = (* (W2Pt) (( (ptr) &var←c19336)+2) ); s←v3684 = (* (W2Pt) &var←c19336 ); }; SOURCE(1465, 82) { word pd57; pd57 = (* (( (ptr) (* (( (ptr) gf←c19880)+54)/* var←c19368 */ ))+4) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd57 ))))(widget←v6036, pd57))) { SOURCE(1507, 40) { /*1*/ word pd58; /*1*/ pd58 = (* (( (ptr) (* (( (ptr) gf←c19880)+54)/* var←c19368 */ ))+26) ); /*1*/ hints←v3656 = (word) ( *( (fPt) ((* (ptr) pd58 ))))(widget←v6036, pd58); /*1*/ }; }; }; SOURCE(1552, 252) if ( ( ( (int)s←v3684.f0 > (int)0) ? ( (int)s←v3684.f1 > (int)0) : 0 ) ) { SOURCE(1587, 26) (* (W2Pt) (( (ptr) widget←v6036)+7) ) = s←v3684; SOURCE(1615, 189) if ((hints←v3656 != 0)) { SOURCE(1635, 63) (* (W2Pt) (( (ptr) hints←v3656)+14) ) = s←v3684; (* (W2Pt) (( (ptr) hints←v3656)+26) ) = s←v3684; SOURCE(1701, 68) (* (( (ptr) hints←v3656)+10) ) = 1; (* (( (ptr) hints←v3656)+8) ) = 1; SOURCE(1771, 33) (* (ptr) hints←v3656 ) = 1; }; }; SOURCE(1812, 234) if ( ( ( ( ( (int)p←v3712.f0 >= (int)0) ? ( (int)p←v3712.f1 >= (int)0) : 0 ) ? (0 == xneg←v3740) : 0 ) ? (0 == yneg←v3768) : 0 ) ) { SOURCE(1860, 25) (* (W2Pt) (( (ptr) widget←v6036)+5) ) = p←v3712; SOURCE(1887, 159) if ((hints←v3656 != 0)) { SOURCE(1907, 35) (* (W2Pt) (( (ptr) hints←v3656)+12) ) = p←v3712; SOURCE(1945, 66) (* (( (ptr) hints←v3656)+9) ) = 1; (* (( (ptr) hints←v3656)+7) ) = 1; SOURCE(2013, 33) (* (ptr) hints←v3656 ) = 1; }; }; }; }; SOURCE(2057, 513) { word var←c19432; word var←c19464; var←c19432 = server←v3528; if ((var←c19432 == 0)) { goto lab←L100006; }; var←c19464 = XR←GetReferentType(var←c19432); { word tc59; if (((* (( (ptr) gf←c19880)+7) ) == var←c19464)) { tc59 = (word) ((*(int*)var←c19432<0) == 0); } else { tc59 = (word) 0; }; if (tc59) { { word r←v3824; r←v3824 = var←c19432; SOURCE(2097, 89) { /*1*/ word connection←v3868; SOURCE(2099, 50) /*1*/ connection←v3868 = (word) CreateOrFail←P60(r←v3824, synch←v3584); SOURCE(2151, 33) /*1*/ (void) SetConnection←P120(widget←v6036, connection←v3868); /*1*/ }; }; } else { if (((* (( (ptr) gf←c19880)+10) ) == var←c19464)) { { /*1*/ word connection←v3912; /*1*/ connection←v3912 = var←c19432; SOURCE(2220, 80) /*1*/ if ((connection←v3912 == 0) || (0 == (* (( (ptr) connection←v3912)+15) ))) { SOURCE(2251, 49) /*1*/ { /*1*/ word var←c057; /*1*/ var←c057 = (* (( (ptr) gf←c19880)+17) ); /*1*/ (void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c19880)+50)/* var←c19112 */ ))+4) ), (word) &var←c057); /*1*/ }; /*1*/ }; SOURCE(2302, 30) /*1*/ (* (( (ptr) widget←v6036)+34) ) = connection←v3912; SOURCE(2334, 34) /*1*/ { /*1*/ word pd60; /*1*/ pd60 = (* (( (ptr) (* (( (ptr) gf←c19880)+49)/* var←c19080 */ ))+40) ); /*1*/ (void) ( *( (fPt) ((* (ptr) pd60 ))))(connection←v3912, widget←v6036, pd60); /*1*/ }; /*1*/ }; } else { lab←L100006: ; SOURCE(2384, 188) { /*1*/ word connection←v3956 = 0; SOURCE(2413, 83) /*1*/ if ((server←v3528 != 0)) { SOURCE(2433, 63) /*1*/ { /*1*/ word var←c059; /*1*/ var←c059 = (* (( (ptr) gf←c19880)+19) ); /*1*/ (void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c19880)+50)/* var←c19112 */ ))+4) ), (word) &var←c059); /*1*/ }; /*1*/ }; SOURCE(2498, 37) /*1*/ connection←v3956 = (word) CreateOrFail←P60(0, synch←v3584); SOURCE(2537, 33) /*1*/ (void) SetConnection←P120(widget←v6036, connection←v3956); /*1*/ }; }; }; }; }; }; }; } else { lab←L100005: ; }; }; } static void DoWithConnection←P240(formal←c0134, formal←c0135, application←v3412) word formal←c0134; word formal←c0135; word application←v3412; { W10 var←c19912; /* declaration of proc←v3356 skipped */ /* declaration of catchXErrors←v3384 skipped */ register ptr gf←c19944 = (ptr) &globalframe; /* declaration of var←c19496 skipped */ /* declaration of mustDec←v4000 skipped */ /* declaration of connection←v4028 skipped */ word server←v4056; word synch←v4084; (* (( (ptr) &var←c19912)+4)/* proc←v3356 */ ) = formal←c0134; (* (( (ptr) &var←c19912)+5)/* catchXErrors←v3384 */ ) = formal←c0135; /* DoWithConnection: */ SOURCE(2597, 840) { word tmpAddr61; tmpAddr61 = (word) (( (ptr) &var←c19912)+6)/* var←c19496 */ ; (* (ptr) tmpAddr61 ) = ( ((word) (fPt) Cleanup←P696) ); (* (( (ptr) tmpAddr61) + 1) ) = 1; }; SOURCE(2722, 21) (* (( (ptr) &var←c19912)+8)/* mustDec←v4000 */ ) = 0; SOURCE(2745, 25) (* (( (ptr) &var←c19912)+9)/* connection←v4028 */ ) = 0; SOURCE(2772, 46) { word pd62; pd62 = (* (( (ptr) (* (( (ptr) gf←c19944)+52)/* var←c19240 */ ))+7) ); server←v4056 = (word) ( *( (fPt) ((* (ptr) pd62 ))))((* ((( (ptr) gf←c19944)+13)) ), pd62); }; SOURCE(2820, 51) { word pd63; pd63 = (* (( (ptr) (* (( (ptr) gf←c19944)+52)/* var←c19240 */ ))+7) ); synch←v4084 = ((word) ( *( (fPt) ((* (ptr) pd63 ))))((* ((( (ptr) gf←c19944)+15)) ), pd63) == (* (( (ptr) gf←c19944)+16) )); }; SOURCE(2941, 290) { word var←c19528; word var←c19560; var←c19528 = server←v4056; if ((var←c19528 == 0)) { goto lab←L100007; }; var←c19560 = XR←GetReferentType(var←c19528); { word tc64; if (((* (( (ptr) gf←c19944)+7) ) == var←c19560)) { tc64 = (word) ((*(int*)var←c19528<0) == 0); } else { tc64 = (word) 0; }; if (tc64) { { word r←v4184; r←v4184 = var←c19528; SOURCE(2983, 35) (* (( (ptr) &var←c19912)+9)/* connection←v4028 */ ) = (word) CreateOrFail←P60(r←v4184, synch←v4084); SOURCE(3021, 14) (* (( (ptr) &var←c19912)+8)/* mustDec←v4000 */ ) = 1; }; } else { if (((* (( (ptr) gf←c19944)+10) ) == var←c19560)) { { word c←v4228; c←v4228 = var←c19528; SOURCE(3062, 14) (* (( (ptr) &var←c19912)+9)/* connection←v4028 */ ) = c←v4228; }; } else { lab←L100007: ; SOURCE(3092, 83) if ((server←v4056 != 0)) { SOURCE(3112, 63) { word var←c072; var←c072 = (* (( (ptr) gf←c19944)+19) ); (void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c19944)+50)/* var←c19112 */ ))+4) ), (word) &var←c072); }; }; SOURCE(3177, 37) (* (( (ptr) &var←c19912)+9)/* connection←v4028 */ ) = (word) CreateOrFail←P60(0, synch←v4084); SOURCE(3217, 14) (* (( (ptr) &var←c19912)+8)/* mustDec←v4000 */ ) = 1; }; }; }; }; SOURCE(3238, 71) if (((* (( (ptr) &var←c19912)+9)/* connection←v4028 */ ) == 0) || (0 == (* (( (ptr) (* (( (ptr) &var←c19912)+9)/* connection←v4028 */ ))+15) ))) { SOURCE(3268, 41) { word var←c073; var←c073 = (* (( (ptr) gf←c19944)+21) ); (void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c19944)+50)/* var←c19112 */ ))+4) ), (word) &var←c073); }; }; SOURCE(3311, 112) { word var←c0125; var←c0125 = (word) &var←c19912; (void) (word) XR←Enable(( ((word) (fPt) NoName←Q1284) ), ( ((word) (fPt) NoName←Q1344) ), var←c0125); }; SOURCE(3428, 9) (void) Cleanup←P696((word) ((( (bPt) &var←c19912)+24)/* var←c19496 */ )); } static word NoName←Q1284(formal←c0116) word formal←c0116; { SOURCE(3311, 112) { word pd65; pd65 = (* (( (ptr) formal←c0116)+4) ); (void) ( *( (fPt) ((* (ptr) pd65 ))))((* ((( (ptr) formal←c0116)+9)) ), pd65); }; return(0); } static void Cleanup←P696(formal←c20008) word formal←c20008; { register ptr gf←c19976 = (ptr) &globalframe; formal←c20008 = (formal←c20008 - 24); /* Cleanup: */ SOURCE(2873, 63) SOURCE(2894, 42) if ((0 != (* (( (ptr) formal←c20008)+8) ))) { SOURCE(2910, 26) { word pd66; pd66 = (* (( (ptr) (* (( (ptr) gf←c19976)+49)/* var←c19080 */ ))+41) ); (void) ( *( (fPt) ((* (ptr) pd66 ))))((* (( (ptr) formal←c20008)+9) ), 0, pd66); }; }; } static void X11Command←P300(formal←c094, formal←c0136) word formal←c094; word formal←c0136; { W9 var←c20040; /* declaration of cmd←v6180 skipped */ register ptr gf←c20072 = (ptr) &globalframe; /* declaration of result←v6224 skipped */ word msg←v6252; /* declaration of var←c19592 skipped */ word decRefCountOnThis←v4272 = 0; word server←v4300 = 0; word check←v4328 = 0; word synch←v4356 = 0; word appIdx←v4384 = 0; word i←v4412 = 1; word propList←v4440 = 0; word argv←v4468; /* declaration of pos←v4496 skipped */ (* (( (ptr) &var←c20040)+4)/* cmd←v6180 */ ) = formal←c0136; /* X11Command: */ SOURCE(3443, 1668) { word tmpAddr67; tmpAddr67 = (word) (( (ptr) &var←c20040)+6)/* var←c19592 */ ; (* (ptr) tmpAddr67 ) = ( ((word) (fPt) ExecuteRealCommand←P996) ); (* (( (ptr) tmpAddr67) + 1) ) = 1; }; SOURCE(3443, 1668) (* (( (ptr) &var←c20040)+5)/* result←v6224 */ ) = 0; SOURCE(3443, 1668) msg←v6252 = 0; SOURCE(3636, 59) { word pd68; pd68 = (* (( (ptr) (* (( (ptr) gf←c20072)+50)/* var←c19112 */ ))+6) ); argv←v4468 = (word) ( *( (fPt) ((* (ptr) pd68 ))))((* (( (ptr) &var←c20040)+4)/* cmd←v6180 */ ), 0, pd68); }; SOURCE(3697, 45) { word pd69; pd69 = (* (( (ptr) (* (( (ptr) gf←c20072)+51)/* var←c19176 */ ))+11) ); (* (( (ptr) &var←c20040)+8)/* pos←v4496 */ ) = (word) ( *( (fPt) ((* (ptr) pd69 ))))((* (( (ptr) (* (( (ptr) &var←c20040)+4) /* cmd←v6180 */ ))+4) ), (* (( (ptr) gf←c20072)+22) ), 0, 1, pd69); }; SOURCE(3744, 70) if (( (int)(* (( (ptr) &var←c20040)+8)/* pos←v4496 */ ) < (int)0)) { SOURCE(3758, 56) { word var←c087; var←c087 = (* (( (ptr) gf←c20072)+23) ); (void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c20072)+50)/* var←c19112 */ ))+4) ), (word) &var←c087); }; }; SOURCE(3816, 784) lab←L100013: ; SOURCE(3819, 781) if ((i←v4412 >= (* (ptr) argv←v4468 ))) { SOURCE(3840, 42) { word var←c088; var←c088 = (* (( (ptr) gf←c20072)+24) ); (void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c20072)+50)/* var←c19112 */ ))+4) ), (word) &var←c088); }; } else { SOURCE(3882, 720) { word this←v4540; SOURCE(3884, 25) { word limit70; this←v4540 = (* ((( (ptr) argv←v4468)+1)+( limit70 = (* (ptr) argv←v4468 ), BCK(i←v4412, limit70) )) ); }; SOURCE(3912, 7) i←v4412 = (i←v4412 + 1); { word tc71; word pd72; word pd74; pd72 = (* (( (ptr) (* (( (ptr) gf←c20072)+51)/* var←c19176 */ ))+8) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd72 ))))((* (( (ptr) gf←c20072)+25) ), this←v4540, 0, pd72))) { goto then073;}; pd74 = (* (( (ptr) (* (( (ptr) gf←c20072)+51)/* var←c19176 */ ))+8) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd74 ))))((* (( (ptr) gf←c20072)+26) ), this←v4540, 0, pd74))) { then073: ; tc71 = (word) (i←v4412 < (* (ptr) argv←v4468 )); } else { tc71 = (word) 0; }; if (tc71) { SOURCE(4035, 16) { word limit75; server←v4300 = (* ((( (ptr) argv←v4468)+1)+( limit75 = (* (ptr) argv←v4468 ), BCK(i←v4412, limit75) )) ); }; SOURCE(4053, 7) i←v4412 = (i←v4412 + 1); SOURCE(4062, 59) { word pd76; pd76 = (* (( (ptr) (* (( (ptr) gf←c20072)+55)/* var←c19624 */ ))+14) ); propList←v4440 = (word) ( *( (fPt) ((* (ptr) pd76 ))))(propList←v4440, (* (( (ptr) gf←c20072)+13) ), server←v4300, pd76) ; }; } else { { word pd77; word pd79; pd77 = (* (( (ptr) (* (( (ptr) gf←c20072)+51)/* var←c19176 */ ))+8) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd77 ))))((* (( (ptr) gf←c20072)+27) ), this←v4540, 0, pd77))) { goto then078;}; pd79 = (* (( (ptr) (* (( (ptr) gf←c20072)+51)/* var←c19176 */ ))+8) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd79 ))))((* (( (ptr) gf←c20072)+28) ), this←v4540, 0, pd79))) { then078: ; SOURCE(4201, 12) synch←v4356 = 1; SOURCE(4215, 57) { word pd80; pd80 = (* (( (ptr) (* (( (ptr) gf←c20072)+55)/* var←c19624 */ ))+14) ); propList←v4440 = (word) ( *( (fPt) ((* (ptr) pd80 ))))(propList←v4440, (* (( (ptr) gf←c20072)+15) ), (* (( (ptr) gf←c20072)+16) ), pd80); }; } else { { word pd81; pd81 = (* (( (ptr) (* (( (ptr) gf←c20072)+51)/* var←c19176 */ ))+8) ); if ((0 != (word) ( *( (fPt) ((* (ptr) pd81 ))))((* (( (ptr) gf←c20072)+29) ), this←v4540, 0, pd81))) { SOURCE(4316, 12) check←v4328 = 1; } else { { /*1*/ word tc82; /*1*/ word pd83; /*1*/ pd83 = (* (( (ptr) (* (( (ptr) gf←c20072)+51)/* var←c19176 */ ))+8) ); /*1*/ if ((0 != (word) ( *( (fPt) ((* (ptr) pd83 ))))((* (( (ptr) gf←c20072)+30) ), this←v4540, 0, pd83))) { /*1*/ tc82 = (word) (i←v4412 < (* (ptr) argv←v4468 )); /*1*/ } /*1*/ else { /*1*/ tc82 = (word) 0; /*1*/ }; /*1*/ if (tc82) { SOURCE(4391, 62) /*1*/ { /*1*/ word pd84; /*1*/ word limit85; /*1*/ pd84 = (* (( (ptr) (* (( (ptr) gf←c20072)+55)/* var←c19624 */ ))+14) ); /*1*/ propList←v4440 = (word) ( *( (fPt) ((* (ptr) pd84 ))))(propList←v4440, (* (( (ptr) gf←c20072)+14) ), (* ((( (ptr) argv←v4468)+1) /*1*/ +( /*1*/ limit85 = (* (ptr) argv←v4468 ), /*1*/ BCK(i←v4412, limit85) /*1*/ )) ), pd84); /*1*/ }; SOURCE(4455, 7) /*1*/ i←v4412 = (i←v4412 + 1); /*1*/ } /*1*/ else { /*1*/ { /*1*/ word pd86; /*1*/ pd86 = (* (( (ptr) (* (( (ptr) gf←c20072)+51)/* var←c19176 */ ))+8) ); /*1*/ if ((0 != (word) ( *( (fPt) ((* (ptr) pd86 ))))((* (( (ptr) gf←c20072)+31) ), this←v4540, 1, pd86))) { SOURCE(4496, 10) /*1*/ appIdx←v4384 = i←v4412; SOURCE(4509, 5) /*1*/ goto lab←L100012; /*1*/ } /*1*/ else { SOURCE(4528, 72) /*1*/ { /*1*/ word var←c19656; /*1*/ { /*1*/ word pd87; /*1*/ pd87 = (* (( (ptr) (* (( (ptr) gf←c20072)+51)/* var←c19176 */ ))+5) ); /*1*/ var←c19656 = (word) ( *( (fPt) ((* (ptr) pd87 ))))((* (( (ptr) gf←c20072)+32) ), this←v4540, (* (( (ptr) gf←c20072)+33) ), 0, 0, pd87) /*1*/ ; /*1*/ }; /*1*/ { /*1*/ word var←c091; /*1*/ var←c091 = var←c19656; /*1*/ (void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c20072)+50)/* var←c19112 */ ))+4) ), (word) &var←c091); /*1*/ }; /*1*/ }; /*1*/ }; /*1*/ }; /*1*/ }; /*1*/ }; }; }; }; }; }; }; }; }; goto lab←L100013; lab←L100012: ; SOURCE(4614, 59) if ((appIdx←v4384 == 0)) { SOURCE(4631, 42) { word var←c092; var←c092 = (* (( (ptr) gf←c20072)+24) ); (void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c20072)+50)/* var←c19112 */ ))+4) ), (word) &var←c092); }; }; SOURCE(4675, 138) if ((0 != check←v4328)) { SOURCE(4689, 126) { word c←v4584; SOURCE(4691, 66) decRefCountOnThis←v4272 = (word) CreateOrFail←P60(server←v4300, synch←v4356); c←v4584 = decRefCountOnThis←v4272; SOURCE(4759, 54) { word pd88; pd88 = (* (( (ptr) (* (( (ptr) gf←c20072)+55)/* var←c19624 */ ))+14) ); propList←v4440 = (word) ( *( (fPt) ((* (ptr) pd88 ))))(propList←v4440, (* (( (ptr) gf←c20072)+13) ), c←v4584, pd88); }; }; }; SOURCE(4818, 225) SOURCE(4970, 71) { word pd89; pd89 = (* (( (ptr) (* (( (ptr) gf←c20072)+52)/* var←c19240 */ ))+4) ); (void) ( *( (fPt) ((* (ptr) pd89 ))))(propList←v4440, (word) (( (bPt) &var←c20040)+24)/* var←c19592 */ , pd89); }; SOURCE(5048, 63) if ((decRefCountOnThis←v4272 != 0)) { SOURCE(5078, 33) { word pd90; pd90 = (* (( (ptr) (* (( (ptr) gf←c20072)+49)/* var←c19080 */ ))+41) ); (void) ( *( (fPt) ((* (ptr) pd90 ))))(decRefCountOnThis←v4272, 0, pd90); }; }; /* removed tail goto */ (* (ptr) formal←c094 ) = (* (( (ptr) &var←c20040)+5)/* result←v6224 */ ); (* (( (ptr) formal←c094)+1) ) = msg←v6252; return; } static void ExecuteRealCommand←P996(formal←c20136) word formal←c20136; { register ptr gf←c20104 = (ptr) &globalframe; word commandLine←v4688; formal←c20136 = (formal←c20136 - 24); /* ExecuteRealCommand: */ SOURCE(4824, 27) SOURCE(4854, 60) { word pd91; pd91 = (* (( (ptr) (* (( (ptr) gf←c20104)+51)/* var←c19176 */ ))+17) ); commandLine←v4688 = (word) ( *( (fPt) ((* (ptr) pd91 ))))((* (( (ptr) (* (( (ptr) formal←c20136)+4) ))+4) ), ((* (( (ptr) formal←c20136)+8) ) + 4), 2147483647, pd91); }; SOURCE(4916, 49) { word pd92; pd92 = (* (( (ptr) (* (( (ptr) gf←c20104)+50)/* var←c19112 */ ))+11) ); (* (( (ptr) formal←c20136)+5) ) = (word) ( *( (fPt) ((* (ptr) pd92 ))))(commandLine←v4688, (* (( (ptr) formal←c20136)+4) ), pd92); }; } static void NoName←Q1344(formal←c0102, formal←c200004, formal←c200005, formal←c200006, formal←c200007) word formal←c0102; word formal←c200004; word formal←c200005; word formal←c200006; word formal←c200007; { register ptr gf←c0122 = (ptr) &globalframe; if ((formal←c200005 == (* (( (ptr) (* (( (ptr) gf←c0122)+49)/* var←c19080 */ ))+4) ))) { { word err←v16676; err←v16676 = (* (ptr) formal←c200007 ); SOURCE(3344, 57) if ((0 != (* (( (ptr) formal←c200004)+5) ))) { SOURCE(3365, 36) { word var←c0101; var←c0101 = (* (( (ptr) err←v16676)+5) ); (void) XR←RaiseError((* (( (ptr) (* (( (ptr) gf←c0122)+50)/* var←c19112 */ ))+4) ), (word) &var←c0101); }; }; }; } else { if ((formal←c200005 == XR←Unwind)) { SOURCE(3414, 9) (void) Cleanup←P696((word) ((( (bPt) formal←c200004)+24))); }; }; (* (ptr) formal←c0102 ) = 0; (* (( (ptr) formal←c0102)+1) ) = 0; return; } static void NoName←Q1404(formal←c0108, formal←c200000, formal←c200001, formal←c200002, formal←c200003) word formal←c0108; word formal←c200000; word formal←c200001; word formal←c200002; word formal←c200003; { register ptr gf←c0123 = (ptr) &globalframe; if ((formal←c200001 == (* (( (ptr) (* (( (ptr) gf←c0123)+49)/* var←c19080 */ ))+39) ))) { { word why←v9824; why←v9824 = (* (ptr) formal←c200003 ); SOURCE(527, 19) (* (( (ptr) formal←c200000)+6) ) = (* (( (ptr) why←v9824)+1) ); SOURCE(548, 8) (* (ptr) formal←c0108 ) = 2; (* (( (ptr) formal←c0108)+1) ) = 2; return; }; }; (* (ptr) formal←c0108 ) = 0; (* (( (ptr) formal←c0108)+1) ) = 0; return; } /* file: X11CommanderOpsImpl, module: X11CommanderOpsImpl, compiled at: October 9, 1992 0:51:31 am PDT */ extern void XR←install←X11CommanderOpsImpl() { NoName←Q1164(); } extern void XR←run←X11CommanderOpsImpl() { XR←Start(&globalframe); }