HP3000-L Archives

November 2006, Week 1

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"Miller, Keven" <[log in to unmask]>
Reply To:
Miller, Keven
Date:
Sat, 4 Nov 2006 18:27:02 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (95 lines)
 From sources of Digipage and other modem types I found from CSL,
I found references to using fdevicecontrol.

I put together this sample to change the trigger to NULL.
Funny that as I compile and test on my VT session, I get
no change; nor does the trigger returned equal 0x11.

But on my telnet connection, it appears to disable the trigger.

Keven


#pragma list off
#include <stdio.h>

#pragma intrinsic FDEVICECONTROL
#pragma intrinsic CCODE

int main ( int ac, char *av[] )
{
    int   fn, cc;
    unsigned short ierr;
    char  buf[4];

    fn = mpe_fileno (fileno (stdin));
    memset ( buf, '*', sizeof(buf));

    buf [1] = 0;
    FDEVICECONTROL ( fn, buf, 1, 192, 32, 3, &ierr );
    cc = CCODE ();

    printf ( "CC%c   buf %2.2X %2.2X %2.2X   err %d\n",
       "GLE?"[cc], buf[0], buf[1], buf[2], ierr );
}

Fox 11:ccxllk sttc,sttp
CCOPTS=-Aa -C +e +w1
SAT NOV  4 2006  6:16 PM  Copyright Hewlett-Packard Co.  1984.       PAGE     1
HP C/iX HP31506 A.05.19                                                  "STTC"

     1  0   # 1 "STTC.PDC.KEVENM"
     1  0   #pragma list off
Clean compile
HP Link Editor/iX (HP30315A.06.17) Copyright Hewlett-Packard Co 1986

LinkEd> link from=$oldpass,xdbend.lib.sys;rl=libcshr.lib.sys,libcansi.lib.sys,l
ibmansi.lib.sys,libcrand.lib.sys,socketrl.net.sys,librl.lib.kevenm;TO=sttp;SHAR
E;CAP=IA,BA

Clean Link
VERSION  C.60.02 Copyright (C) Hewlett-Packard 1987.  All Rights Reserved.

STTP.PDC.KEVENM

SOM #1
@(#) HP30315    A.05.10    95/02/08 NRT0 Startup routine
@(#) HP31508    A.05.06    97/01/16 HP Symbolic Debugger(XDBEND)

MAX STACK SIZE: 393216
MAX HEAP SIZE: 81920000
CAPABILITIES: BA,IA
UNSAT PROC NAME:
ENTRY NAME:
LIBRARY SEARCH LIST:
Fox 11:
Fox 11:^Qsttp
CCE   buf 00 00 2A   err 0
Fox 11:^Qsttp
CCE   buf 00 00 2A   err 0
Fox 11:^Q


 From me Telnet session

<Your 'TELNET' connection has terminated>
Fox:^Q hello kev,mgr.kevenm
ENTER ACCOUNT (KEVENM) PASSWORD:^Q
  HP3000  Release: C.60.00   User Version: C.60.02   SAT, NOV  4, 2006,  6:18 PM
  MPE/iX  HP31900 C.16.01  Copyright Hewlett-Packard 1987.  All rights reserved.
Fox 12:^Q
Fox 12:^Q sttp
CCE   buf 00 11 2A   err 0
Fox 12:sttp
CCE   buf 00 00 2A   err 0
Fox 12:



(Ok, I had to insert the ^Q myself because they didn't copy from the
  reflection screen. But I placed them there where I saw them with
  display functins enabled)

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2