Cross Reference: /ast/src/lib/libtksh/tcl/tclIOCmd.c

Lines Matching defs:chan
37 	            Tcl_Channel chan, char *address, int port));
72     Tcl_Channel chan;			/* The channel to puts on. */
110     chan = Tcl_GetChannel(interp, channelId, &mode);
111     if (chan == (Tcl_Channel) NULL) {
120     result = Tcl_Write(chan, argv[i], -1);
125         result = Tcl_Write(chan, "\n", 1);
132     Tcl_AppendResult(interp, "error writing \"", Tcl_GetChannelName(chan),
163     Tcl_Channel chan;			/* The channel to flush on. */
173     chan = Tcl_GetChannel(interp, argv[1], &mode);
174     if (chan == (Tcl_Channel) NULL) {
183     result = Tcl_Flush(chan);
185         Tcl_AppendResult(interp, "error flushing \"", Tcl_GetChannelName(chan),
217     Tcl_Channel chan;			/* The channel to read from. */
232     chan = Tcl_GetChannel(interp, argv[1], &mode);
233     if (chan == (Tcl_Channel) NULL) {
248     lineLen = Tcl_Gets(chan, &ds);
250         if (!Tcl_Eof(chan) && !Tcl_InputBlocked(chan)) {
253 		    Tcl_GetChannelName(chan), "\": ", Tcl_PosixError(interp),
302     Tcl_Channel chan;			/* The channel to read from. */
335     chan = Tcl_GetChannel(interp, argv[i], &mode);
336     if (chan == (Tcl_Channel) NULL) {
367     bufSize = Tcl_GetChannelBufferSize(chan);
376             Tcl_Read(chan, Tcl_DStringValue(&ds) + charactersRead, toReadNow);
380 		    Tcl_GetChannelName(chan), "\": ",
547     Tcl_Channel chan;			/* The channel to tell on. */
556     chan = Tcl_GetChannel(interp, argv[1], NULL);
557     if (chan == (Tcl_Channel) NULL) {
583     result = Tcl_Seek(chan, offset, mode);
586 		Tcl_GetChannelName(chan), "\": ",
619     Tcl_Channel chan;			/* The channel to tell on. */
631     chan = Tcl_GetChannel(interp, argv[1], NULL);
632     if (chan == (Tcl_Channel) NULL) {
635     sprintf(interp->result, "%d", Tcl_Tell(chan));
666     Tcl_Channel chan;			/* The channel to close. */
674     chan = Tcl_GetChannel(interp, argv[1], NULL);
675     if (chan == (Tcl_Channel) NULL) {
678     if (Tcl_UnregisterChannel(interp, chan) != TCL_OK) {
727     Tcl_Channel chan;			/* The channel to set a mode on. */
739     chan = Tcl_GetChannel(interp, argv[1], NULL);
740     if (chan == (Tcl_Channel) NULL) {
745         if (Tcl_GetChannelOption(chan, (char *) NULL, &ds) != TCL_OK) {
756         if (Tcl_GetChannelOption(chan, argv[2], &ds) != TCL_OK) {
769         result = Tcl_SetChannelOption(interp, chan, argv[i-1], argv[i]);
804     Tcl_Channel chan;			/* The channel to query for EOF. */
812     chan = Tcl_GetChannel(interp, argv[1], &mode);
813     if (chan == (Tcl_Channel) NULL) {
816     sprintf(interp->result, "%d", Tcl_Eof(chan) ? 1 : 0);
853     Tcl_Channel chan;
893     chan = Tcl_OpenCommandChannel(interp, argc-firstWord,
897     if (chan == (Tcl_Channel) NULL) {
908         TclGetAndDetachPids(interp, chan);
910         if (Tcl_Close(interp, chan) != TCL_OK) {
916     if (Tcl_GetChannelFile(chan, TCL_READABLE) != NULL) {
924             readNow = Tcl_Read(chan, Tcl_DStringValue(&ds) + readSoFar,
943     result = Tcl_Close(interp, chan);
992     Tcl_Channel chan;			/* The channel to query for blocked. */
1000     chan = Tcl_GetChannel(interp, argv[1], &mode);
1001     if (chan == (Tcl_Channel) NULL) {
1010     sprintf(interp->result, "%d", Tcl_InputBlocked(chan) ? 1 : 0);
1042     Tcl_Channel chan;
1071         chan = Tcl_OpenFileChannel(interp, argv[1], modeString, prot);
1082 	    chan = NULL;
1099 	    chan = Tcl_OpenCommandChannel(interp, cmdArgc, cmdArgv, flags);
1103     if (chan == (Tcl_Channel) NULL) {
1106     Tcl_RegisterChannel(interp, chan);
1107     Tcl_AppendResult(interp, Tcl_GetChannelName(chan), (char *) NULL);
1271 AcceptCallbackProc(callbackData, chan, address, port)
1275     Tcl_Channel chan;			/* Channel for the newly accepted
1304         Tcl_RegisterChannel(interp, chan);
1305         result = Tcl_VarEval(interp, script, " ", Tcl_GetChannelName(chan),
1309 	    Tcl_UnregisterChannel(interp, chan);
1320         Tcl_Close((Tcl_Interp *) NULL, chan);
1393     Tcl_Channel chan;
1497         chan = Tcl_OpenTcpServer(interp, port, host, AcceptCallbackProc,
1499         if (chan == (Tcl_Channel) NULL) {
1520         Tcl_CreateCloseHandler(chan, TcpServerCloseProc,
1523         chan = Tcl_OpenTcpClient(interp, port, host, myaddr, myport, async);
1524         if (chan == (Tcl_Channel) NULL) {
1528     Tcl_RegisterChannel(interp, chan);            
1529     Tcl_AppendResult(interp, Tcl_GetChannelName(chan), (char *) NULL);