https://m204wiki.rocketsoftware.com/index.php?action=history&feed=atom&title=Sample_IFDIAL_procedure
Sample IFDIAL procedure - Revision history
2026-04-23T19:33:20Z
Revision history for this page on the wiki
MediaWiki 1.43.1
https://m204wiki.rocketsoftware.com/index.php?title=Sample_IFDIAL_procedure&diff=50224&oldid=prev
JAL2 at 19:46, 16 March 2012
2012-03-16T19:46:02Z
<p></p>
<table style="background-color: #fff; color: #202122;" data-mw="interface">
<col class="diff-marker" />
<col class="diff-content" />
<col class="diff-marker" />
<col class="diff-content" />
<tr class="diff-title" lang="en">
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">← Older revision</td>
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 19:46, 16 March 2012</td>
</tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l91">Line 91:</td>
<td colspan="2" class="diff-lineno">Line 91:</td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div><ul></div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div><ul></div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div><li>[[Janus IFDIAL Library]]</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div><li>[[Janus IFDIAL Library]]</div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div><li>[[Janus TCP/IP Base IFDIAL <del style="font-weight: bold; text-decoration: none;">Library </del>installation]]</div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><li>[[Janus TCP/IP Base IFDIAL installation]]</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>[[Category:Janus TCP/IP Base]]</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>[[Category:Janus TCP/IP Base]]</div></td></tr>
</table>
JAL2
https://m204wiki.rocketsoftware.com/index.php?title=Sample_IFDIAL_procedure&diff=50223&oldid=prev
JAL2 at 19:45, 16 March 2012
2012-03-16T19:45:17Z
<p></p>
<table style="background-color: #fff; color: #202122;" data-mw="interface">
<col class="diff-marker" />
<col class="diff-content" />
<col class="diff-marker" />
<col class="diff-content" />
<tr class="diff-title" lang="en">
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">← Older revision</td>
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 19:45, 16 March 2012</td>
</tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l2">Line 2:</td>
<td colspan="2" class="diff-lineno">Line 2:</td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>terminal input lines to the <var class="product">Model 204</var> server address space.</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>terminal input lines to the <var class="product">Model 204</var> server address space.</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div><p class="code">#include <stdio.h></div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div><p class="code">#include <stdio.h></div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>#include <manifest.h></div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">&</ins>#<ins style="font-weight: bold; text-decoration: none;">35;</ins>include <manifest.h></div></td></tr>
<tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>#include <ifdial.h></div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">&</ins>#<ins style="font-weight: bold; text-decoration: none;">35;</ins>include <ifdial.h></div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> </div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div> </div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>int main(argc, argv) /* Main batch2 program */</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>int main(argc, argv) /* Main batch2 program */</div></td></tr>
<tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l87">Line 87:</td>
<td colspan="2" class="diff-lineno">Line 87:</td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>}</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>}</div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div></p></div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div></p></div></td></tr>
<tr><td colspan="2" class="diff-side-deleted"></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;"></ins></div></td></tr>
<tr><td colspan="2" class="diff-side-deleted"></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">==See also==</ins></div></td></tr>
<tr><td colspan="2" class="diff-side-deleted"></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;"><ul></ins></div></td></tr>
<tr><td colspan="2" class="diff-side-deleted"></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;"><li>[[Janus IFDIAL Library]]</ins></div></td></tr>
<tr><td colspan="2" class="diff-side-deleted"></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;"><li>[[Janus TCP/IP Base IFDIAL Library installation]]</ins></div></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br></td></tr>
<tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>[[Category:Janus TCP/IP Base]]</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>[[Category:Janus TCP/IP Base]]</div></td></tr>
</table>
JAL2
https://m204wiki.rocketsoftware.com/index.php?title=Sample_IFDIAL_procedure&diff=50222&oldid=prev
JAL2: Created page with "This <var>IFDIAL</var> program uses the C routines from a workstation to upload terminal input lines to the <var class="product">Model 204</var> server address space. <p class="c..."
2012-03-16T19:40:45Z
<p>Created page with "This <var>IFDIAL</var> program uses the C routines from a workstation to upload terminal input lines to the <var class="product">Model 204</var> server address space. <p class="c..."</p>
<p><b>New page</b></p><div>This <var>IFDIAL</var> program uses the C routines from a workstation to upload<br />
terminal input lines to the <var class="product">Model 204</var> server address space.<br />
<p class="code">#include <stdio.h><br />
#include <manifest.h><br />
#include <ifdial.h><br />
<br />
int main(argc, argv) /* Main batch2 program */<br />
int argc; /* Number of arguments */<br />
char **argv; /* Pointers to argument pointers */<br />
<br />
{<br />
char input[256];<br />
char infile[256], outfile[256];<br />
int i, rc, port;<br />
int cnum;<br />
char *host;<br />
char *host_data;<br />
FILE *inf, *outf;<br />
<br />
if (argc < 3) { /* If no host name */<br />
printf("%s - Command format is %s filename host ( port ).\n",<br />
argv[0], argv[0]);<br />
return(4); /* Leave in shame */<br />
}<br />
<br />
inf = NULL;<br />
outf = NULL;<br />
if (strlen(argv[1]) < 252) { /* If reasonable file name */<br />
strcpy(infile, argv[1]); /* Copy filename */<br />
strcpy(outfile, argv[1]); /* Copy filename */<br />
strcat(infile, ".m204"); /* Tack on input suffix */<br />
strcat(outfile, ".lst"); /* Tack on output suffix */<br />
inf = fopen(infile, "r"); /* Open the input file */<br />
outf = fopen(outfile, "w"); /* Open the output file */<br />
}<br />
<br />
if (inf == NULL) { /* If error opening input file */<br />
printf("%s - Unable to open %s.\n", argv[0], infile);<br />
return(24); /* Leave in shame */<br />
}<br />
<br />
if (outf == NULL) { /* If error opening output file */<br />
printf("%s - Unable to open %s.\n", argv[0], outfile);<br />
return(24); /* Leave in shame */<br />
}<br />
<br />
port = 0; /* Assume port will default */<br />
if (argc >= 4) { /* If have port number */<br />
rc = sscanf(argv[3], "%d", &port); /* Get port number */<br />
if (rc < 1) { /* If port number invalid */<br />
printf("%s - Invalid port number - %s.\n", argv[0], argv[3]);<br />
return(8); /* Leave in shame */<br />
}<br />
}<br />
<br />
cnum = ifdial(argv[2], port, 0, 0, 0); /* Connect to server */<br />
if (cnum < 0) { /* If invalid return code */<br />
printf("%s - Unable to connect to %s. ifdial = %d\n",<br />
argv[0], argv[2], cnum); /* Explain the situation */<br />
return(-cnum); /* Leave in disgrace */<br />
}<br />
<br />
while (fgets(input, sizeof(input), inf) /* Get next line */<br />
!= NULL) { /* Until no more data to read */<br />
input[strlen(input) - 1] = '\0'; /* Get rid of \n */<br />
rc = ifwrite(cnum, input); /* Send data to 204 */<br />
if (rc == 1) /* If more data required */<br />
continue; /* Get another line */<br />
if (rc != 2) /* If no ifread data */<br />
break; /* Something's gone wrong */<br />
do { /* Until no more data */<br />
rc = ifread(cnum, &host_data); /* Get the response line */<br />
if (rc > 2) /* If problem */<br />
break; /* Bail out */<br />
fputs(host_data, outf); /* Output the returned data */<br />
putc('\n', outf); /* Out with a new line */<br />
} while (rc == 2);<br />
if (rc != 1) /* If problem */<br />
break; /* Bail out */<br />
}<br />
<br />
if (rc == 200) /* If connection lost */<br />
printf("%s - Connection lost.\n", argv[0]);<br />
<br />
iffinish();<br />
return(rc); /* All done */<br />
}<br />
</p><br />
<br />
[[Category:Janus TCP/IP Base]]</div>
JAL2