%';;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; %' ; %' INTEL CORPORATION PROPRIETARY INFORMATION ; %' ; %' This software is supplied under the terms of a license agreement ; %' or non disclosure agreement with Intel Corporation and may not be ; %' copied nor disclosed except in accordance with the terms of that ; %' agreement. ; %' ; %';;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; %' ; dgroup group DATA %' ; %';;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; %' Utility macro cleanup to cleanup parameters %';;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; %' %' Define strings for strip. %' %define(cr) ( ) %define(lf) ( ) %define(tab) ( ) %define(space) ( ) %' %' Strip: %' strip all occurances of "char" string from "arg" string. %' %*define(strip(char,arg)) local str head tail (%' %' '%define(str) (%0)%' %' '%define(tail) (%arg)%' %' '%while(%nes(%tail,%0)) (%' %' '%match(head%(%char)tail) (%tail)%' %' '%define(str) (%str%head)%' %' ')%' %' '%str%' )%' %' %' Cleanup: %' strip spaces, tabs and CRLFs from string. %' %*define(cleanup(str)) (%strip(%space,%strip(%tab,%strip(%cr,%strip(%lf,%str))))) %' %';;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; %*define(file_server(server_name_p))(%' %' DATA segment public 'data' %define(server_name)(%cleanup(%server_name_p))%' server_name db '%server_name',0 public server_name DATA ends )%' %*define(user(u_name_p))(%' %' DATA segment public 'data' %define(u_name)(%cleanup(%u_name_p))%' u_name db '%u_name',0 public u_name DATA ends )%' %*define(image_name(i_name_p))(%' %' DATA segment public 'data' %define(i_name)(%cleanup(%i_name_p))%' i_name db '%i_name',0 public i_name DATA ends )%' %*define(password(u_password_p))(%' %' DATA segment public 'data' %define(u_password)(%cleanup(%u_password_p))%' u_password db '%u_password',0 public u_password DATA ends )%'