Lines Matching refs:os2
123 int ret = G.os2.rexx_error;
125 G.os2.rexx_mes = "file not found";
126 if (*G.os2.rexx_mes != '0') {
133 BUILDRXSTRING(retstr, G.os2.rexx_mes);
142 G.os2.request.shvnext = NULL;
143 EZRXSTRING(G.os2.request.shvname, name);
144 G.os2.request.shvnamelen = G.os2.request.shvname.strlength;
145 G.os2.request.shvvalue.strptr = G.os2.buffer;
146 G.os2.request.shvvalue.strlength = IBUF_LEN;
147 G.os2.request.shvvaluelen = IBUF_LEN;
148 G.os2.request.shvcode = RXSHV_SYFET;
149 G.os2.request.shvret = 0;
150 switch (RexxVariablePool(&G.os2.request)) {
152 G.os2.rexx_mes = ERROR_NOMEM;
156 G.os2.request.shvvaluelen = 0;
158 *(G.os2.buffer+G.os2.request.shvvaluelen) = 0;
159 return G.os2.request.shvvaluelen;
166 /* Stem must exist in G.os2.getvar_buf w/ length in G.os2.getvar_len */
169 sprintf(G.os2.getvar_buf+G.os2.getvar_len,"%d",index);
170 return GetVariable(__G__ G.os2.getvar_buf);
184 G.os2.getvar_len = strlen(name);
185 memcpy(G.os2.getvar_buf,name,G.os2.getvar_len+1);
186 if (*(G.os2.getvar_buf+G.os2.getvar_len-1) != '.')
187 *(G.os2.getvar_buf+G.os2.getvar_len++) = '.', *(G.os2.getvar_buf+G.os2.getvar_len) = 0;
192 total = atoi(G.os2.buffer);
197 trav[count-1] = (char *)malloc(strlen(G.os2.buffer)+1);
198 strcpy(trav[count-1],G.os2.buffer);
403 * os2/makefile.os2 *
404 * os2/os2.c *
405 * os2/dll/dll.def *
406 * os2/dll/unzipapi.c *
409 * stem.fullname i.e. stem."os2/dll/unzipapi.c" *
417 * stem.4 = os2/makefile.os2 *
418 * stem.5 = os2/os2.c *
419 * stem.6 = os2/dll/dll.def *
420 * stem.7 = os2/dll/unzipapi.c *
427 * stem.os2/makefile.os2 *
428 * stem.os2/os2.c *
429 * stem.os2/dll/dll.def *
430 * stem.os2/dll/unzipapi.c *
434 * been stored in stem.os2.dll.unzipapi.c *
448 * stem.OS2.1 = makefile.os2 *
449 * stem.OS2.2 = os2.c *
461 * stem.OS2.makefile.os2 *
462 * stem.OS2.os2.c *
523 G.os2.request.shvnext = NULL;
524 EZRXSTRING(G.os2.request.shvname, args[4].strptr);
525 G.os2.request.shvnamelen = G.os2.request.shvname.strlength;
526 G.os2.request.shvcode = RXSHV_SYDRO;
527 G.os2.request.shvret = 0;
528 RexxVariablePool(&G.os2.request);
657 memcpy(G.os2.buffer+G.os2.putchar_idx,buf,size);
658 G.os2.putchar_idx = TextSetNext(__G__ G.os2.buffer, size+G.os2.putchar_idx,0);
664 G.os2.buffer[G.os2.putchar_idx++] = c;
666 G.os2.buffer[G.os2.putchar_idx] = 0;
667 if (G.os2.output_var[0])
668 G.os2.putchar_idx = TextSetNext(__G__ G.os2.buffer, G.os2.putchar_idx,0);
670 G.os2.buffer[--G.os2.putchar_idx] = 0;
671 puts(G.os2.buffer);
672 G.os2.putchar_idx = 0;
684 G.os2.output_idx = 0;
685 strcpy(G.os2.output_var, name);
687 strupr(G.os2.output_var); /* uppercase the name */
688 if (*(G.os2.output_var+len-1) != '.') {
689 *(G.os2.output_var+len) = '.';
691 *(G.os2.output_var+len) = 0;
693 WriteToVariable(__G__ G.os2.output_var,"",0);
695 G.os2.stem_len = len;
696 return G.os2.stem_len;
703 G.os2.output_idx = 0;
704 strcpy(G.os2.output_var, name);
705 strupr(G.os2.output_var); /* uppercase the name */
707 G.os2.stem_len = len;
709 G.os2.stem_len = 0;
710 return G.os2.stem_len;
715 if (G.os2.stem_len > 0) {
716 if (G.os2.putchar_idx)
717 TextSetNext(__G__ G.os2.buffer,G.os2.putchar_idx,1);
718 return PrintToSubVariable(__G__ 0,"%d",G.os2.output_idx);
736 G.os2.request.shvnext = NULL;
737 EZRXSTRING(G.os2.request.shvname, name);
738 G.os2.request.shvnamelen = G.os2.request.shvname.strlength;
739 G.os2.request.shvvalue.strptr = buffer;
740 G.os2.request.shvvalue.strlength = len;
741 G.os2.request.shvvaluelen = len;
742 G.os2.request.shvcode = RXSHV_SET;
743 G.os2.request.shvret = 0;
744 switch (RexxVariablePool(&G.os2.request)) {
746 G.os2.rexx_error = INVALID_ROUTINE;
749 G.os2.rexx_mes = ERROR_NOMEM;
759 int ret = vsprintf(G.os2.buffer, format, arg_ptr);
760 WriteToVariable(__G__ name, G.os2.buffer, strlen(G.os2.buffer));
769 if (G.os2.stem_len == 0)
771 sprintf(G.os2.output_var+G.os2.stem_len,"%d",idx);
774 ret = _PrintToVariable(__G__ G.os2.output_var, format, arg_ptr);
782 if (G.os2.stem_len > 0) {
783 G.os2.output_idx++;
784 sprintf(G.os2.output_var+G.os2.stem_len,"%d",G.os2.output_idx);
786 return WriteToVariable(__G__ G.os2.output_var, buffer, len);
838 strcpy(G.os2.output_var+G.os2.stem_len, G.filename);
839 WriteToVariable(__G__ G.os2.output_var, G.redirect_buffer, G.redirect_size);
851 scan = G.os2.output_var+G.os2.stem_len;
855 WriteToVariable(__G__ G.os2.output_var, G.redirect_buffer, G.redirect_size);
859 strcpy(G.os2.getvar_buf, G.os2.output_var);
865 if (first || !GetVariable(__G__ G.os2.output_var)) {
866 ptr = G.os2.getvar_buf+offset+G.os2.stem_len;
869 if (!GetVariable(__G__ G.os2.getvar_buf))
872 idx = atoi(G.os2.buffer)+1;
873 PrintToVariable(__G__ G.os2.getvar_buf,"%d",idx);
876 PrintToVariable(__G__ G.os2.output_var,"%d",idx);
881 WriteToVariable(__G__ G.os2.getvar_buf,G.filename+offset,strlen(G.filename+offset));
885 *(G.os2.output_var+G.os2.stem_len+offset-1) = 0;